NGCALCUSTI()
| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | NGCALCUSTI() |
| País: | Brasil |
| Descrição | Ponto de entrada executado no programa de Funções Padrão (NGUTIL) utilizado para realizar consistências finais da função genérica NGCAD02 (Construção de Tela de Cadastro - Mod. 2) | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| Programa Fonte: |
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| Localização: | SIGAMNT: Atualizações/Controle de Oficina/Plano de Manutenção/Alteração de O.S. SIGAMNT: Atualizações/Controle de Oficina/Plano de Manutenção/Plano SIGAMNT: Atualizações/Controle de Oficina/Plano de Manutenção/Confirmação SIGAMNT: Atualizações/Controle de Oficina/Plano de Manutenção/Liberação de O.S. SIGAMNT: Atualizações/Controle de Oficina/Plano de Manutenção/Programação de O.S. SIGAMNT: Atualizações/Controle de Oficina/Bens/Estrutura de Bens SIGAMNT: Atualizações/Controle de Oficina/Bens/Rodízio SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Reabertura de O.S. SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Retorno SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Retorno Mod. 2 SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Retorno em Lote SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Rateio de Insumo SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Simplificado SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Retorno por Etapas SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Apontamento M.D.O. SIGAMNT: Atualizações/Controle de Oficina/Ordem De Serviço/Manual SIGAMNT: Atualizações/Controle de Oficina/Ordem De Serviço/Corretiva SIGAMNT: Atualizações/Controle de Oficina/Ordem De Serviço/Historico SIGAMNT: Atualizações/Controle de Oficina/Reforma/Ordem de Serviço SIGAMNT: Atualizações/Controle de Oficina/Plano de Acompanhamento/Retorno SIGAMNT: Atualizações/Controle de Oficina/Check List/Retorno Check List SIGAMNT: Atualizações/Controle de Pneus/O.S. de Pneus/O.S. em Lote SIGAMNT: Atualizações/Controle de Pneus/Inspeção/Atualização SIGAMNT: Atualizações/Controle de Riscos/Controle de Riscos/Sinistro SIGAMNT: Atualizações/Controle de Riscos/Controle de Riscos/Complemento de Sinistro SIGAMNT: Atualizações/Controle de Abastecimento/Abastecimento/Consistência de abastecimento SIGAMNT: Atualizações/Controle de Abastecimento/Abastecimento/Abastecimento Lote Posto Interno SIGAMNT: Atualizações/Construção Civil/Abastecimento Comboio/Controle de Abastecimento SIGAMNT: Atualizações/Controle de Oficina/Lubrificação/Planejamento SIGAMNT: Atualizações/Controle de Oficina/Lubrificação/Retorno SIGAMNT: Atualizações/Controle de Oficina/Contador/Retorno Produção SIGAMNT: Atualizações/Controle de Oficina/Solicitação de Serviço/Distribuição de S.S. SIGAMNT: Consultas/Controle de Oficina/Gráfico Custos/Serviço SIGAMNT: Relatórios/Controle de Oficina/Custos/Centro de Custos SIGAMNT: Relatórios/Controle de Oficina/Custos/Plano SIGAMNT: Relatórios/Controle de Oficina/Custos/Bem SIGAMNT: Relatórios/Controle de Oficina/Custos/Serviço SIGAMNT: Relatórios/Controle de Oficina/Custos/Ordem de Serviço SIGAMNT: Relatórios/Controle de Oficina/Custos/Resumo Mês SIGAMNT: Relatórios/Controle de Oficina/Planos/Mapa Manutenção Por Bem SIGAMNT: Miscelânea/Histórico/Acum. Histórico Manutenção SIGAMNT: Miscelânea/Gera Bens/Pneus a partir de Txt SIGAMNT: Miscelânea/Bandag/Importação de Custos SIGAMNT: Miscelânea/Arquivos/Project | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Eventos: | Project (MNTPROJ) Estrutura de Bens (MNTA090) Rodizio de Componentes (MNTA098) Rodizio de Pneus Através do desenho (MNTA230) Movimentação do Esquema de Pneus (MNTA231) Esquema de Rodados Modelo 2 (MNTA232) Importação de Custos (MNTA245) Alteração das O.S. (MNTA265) Liberação de O.S. (MNTA275) Distribuição de S.S (MNTA295) Plano de Manutenção (MNTA331) Confirmação do Plano de Manutenção (MNTA340) Planejamento de Lubrificação (MNTA350) Retorno de Lubrificação (MNTA360) Retorno Produção (MNTA380) Retorno de Acompanhamento (MNTA390) Retorno de Manutenção (MNTA400) Retorno em Lote (MNTA401) Rateio de Insumo (MNTA402) O.S. Manual (MNTA410) Retorno Simplificado (MNTA415) O.S. Corretiva (MNTA420) Apontamento de M.O. (MNTA422) Cadastro de Histórico de O.S. (MNTA430) Retorno Mod. 2 (MNTA435) O.S. de Reforma Pai (MNTA450) Retorno por Etapas (MNTA480) Liberação de O.S. (MNTA490) Cadastro de Sinistro (MNTA540) Cadastro de Complemento de Sinistros (MNTA545) Consistência do Abastecimento (MNTA635) Abastecimento Posto Interno (MNTA656) Construção Civil (MNTA681) Construção Civil (MNTA688) O.S. em Lote para Serviços de Pneus (MNTA720) Cadastro de Check-List (MNTA735) Atualizar Posição final da Inspeção (MNTA760) Salvar Histórico da Manutenção (MNTA825) Reabre uma O.S. Encerrada (MNTA880) Recalcula o Custo das Manutenções (MNTA901) Programação de O.S. (MNTA990) Importação de Pneus (MNTA998) Integração do SIGAMNT com o MS-PROJECT (MNTC130) Gráfico Custo de O.S. (MNTC920) Resumo de Custo do Mês (MNTR250) Relatório de Custos por Centro de Custo (MNTR750) Relatório Custo do Plano de Manutenção (MNTR830) Relatório Custo do Bem (MNTR840) Relatório Custo do Centro de Custos (MNTR850) Relatório de Custo da O.S. (MNTR860) Mapa de Manutenção por Bem (MNTR990) Painel de Gestão (MNTPG) | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Função: | NGCALCUSTI() | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| Parâmetros: |
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Retorno: |
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Obs.: | Para casos onde deseja-se manter o custo calculado pelo sistema, o ponto de entrada deverá retornar o valor repassado no parâmetro PARAMIXB[1]. |
#Include 'Protheus.ch'
//-------------------------------------------------------------------
/*/{Protheus.doc} NGCALCUSTI
Calcula custo do insumo
@author Eduardo Henrique Mussi
@since 18/05/18
@version P12
/*/
//-------------------------------------------------------------------
User Function NGCALCUSTI()
Local nCustoIns := PARAMIXB[1] // Valor de custo calculado pelo sistema referente ao insumo
Local cCodIns := PARAMIXB[3] // Codigo do insumo
Local nQuantIns := PARAMIXB[4] // Quantidade do insumo
Local nCustoHora
Local aAreaST1
// Para insumos do tipo M (Mao de obra)
If PARAMIXB[2] == "M"
aAreaST1 := ST1->( GetArea() )
cCodIns := SubStr( cCodIns, 1, TAMSX3("T1_CODFUNC")[1] )
nCustoHora := Posicione("ST1", 1, xFilial("ST1") + cCodIns, "T1_SALARIO")
nCustoIns := nCustoHora * nQuantIns
RestArea(aAreaST1)
Endif
Return nCustoIns |