Informações

title	ATENÇÃO

Este ponto de entrada está disponível somente a partir da versão 12.1.17!

Possibilita customizar custo do insumo

Calcula Custos de Insumos

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

SIGAMNT - Manutenção de Ativos e Gestão de Frotas

Rotina:

Rotina	Nome Técnico
MNTUTIL_OS	Funções Genéricas Relacionadas à O.S.

Rotina(s) envolvida(s)

Nome Técnico

NGMUUTIL

Funções Genéricas para Integração Mensagem Única

MNTPROJ

ProjectMNTUTIL01Util Genérico V12


MNTPROJ	Project
MNTA090	Estrutura de Bens
MNTA098	Rodizio de Componentes
MNTA230	Rodizio de Pneus Através do desenho
MNTA231	Movimentação do Esquema de Pneus
MNTA232	Esquema de Rodados Modelo 2
MNTA245	Importação de Custos
MNTA265	Alteração das O.S.

de Planos Preventivos


MNTA275	Liberação de O.S.
MNTA295	Distribuição de S.S
MNTA331	Plano de Manutenção
MNTA340	Confirmação do

MNTA330

Plano de Manutenção
MNTA350	Planejamento de Lubrificação
MNTA360	Retorno de Lubrificação
MNTA380	Retorno de Desgaste de Produção
MNTA390	Retorno de Acompanhamento
MNTA400	Retorno de Manutenção
MNTA401	Retorno em Lote
MNTA402	Rateio de Insumo
MNTA410	O.S. Manual
MNTA415	Retorno Simplificado
MNTA420	O.S. Corretiva
MNTA422	Apontamento de M.O.
MNTA430	Cadastro de Histórico de O.S.
MNTA435	Retorno Mod. 2
MNTA450	O.S. de Reforma Pai
MNTA480	Retorno por Etapas
MNTA490	Liberação de O.S.
MNTA540	Cadastro de Sinistro
MNTA545	Cadastro de Complemento de Sinistros
MNTA635	Consistência do Abastecimento
MNTA656	Abastecimento Posto Interno
MNTA681	Construção Civil
MNTA688	Construção Civil
MNTA720	O.S. em Lote para Serviços de Pneus
MNTA735	Cadastro de Check-List
MNTA760	Atualizar Posição final da Inspeção
MNTA825	Salvar Histórico da Manutenção
MNTA880	Reabre uma O.S. Encerrada
MNTA901	Recalcula o Custo das Manutenções
MNTA990	Programação de O.S.
MNTA998	Importação de Pneus
MNTC130	Integração do SIGAMNT com o MS-PROJECT
MNTC920	Gráfico Custo de O.S.
MNTR250	Resumo de Custo do Mês
MNTR750	Relatório de Custos por Centro de Custo
MNTR830	Relatório Custo do Plano de Manutenção
MNTR840	Relatório Custo do Bem
MNTR850	Relatório Custo do Centro de Custos
MNTR860	Relatório de Custo da O.S.
MNTR990	Mapa de Manutenção por Bem
MNTPG	Painel de Gestão

Issues Relacionadas

INOVBANCO-14439

DNG-1146 / DNG-2838
País(es):	Todos
Banco(s) de Dados:	Todos
Sistema(s) Operacional(is):	Todos

Ponto de Entrada

Código do Insumo

Descrição:

Ponto de entrada que possibilita efetuar calculo referente ao custo dos insumos, acionado após o calculo do sistema, sendo assim poderá alterar o valor de cálculo do custo do insumo, permitindo a alteração deste custo de acordo com a necessidade.

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 Manutenção/Liberação de 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 Oficina/Plano de Manutenção/Programação de O.S.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:

Funções Genéricas para Integração Mensagem Única (NGMUUTIL)
Project (MNTPROJ)
Útil Genérico V12 (MNTUTIL01Project (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. de Planos Preventivos (MNTA265)
Plano de Manutenção (MNTA330(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)

Programa Fonte:

MNTUTIL_OS.prw

Função:

NGCALCUSTONGCALCUSTI()

Parâmetros:

Aviso

title	Atenção!

Os parâmetros não obrigatórios podem ser repassados como nulos em cenários que não são utilizados.
Exemplo: Caso o insumo em avaliação seja referente à empresa/filial corrente, os parâmetros de empresa e filial possuirão valores nulos.

Nome	Tipo	Descrição	Obrigatório
PARAMIXB[1]

Carácter

Numérico	Custo total calculado pelo sistema	Sim
PARAMIXB[2]	Carácter	Tipo do Insumo	Sim
PARAMIXB[3]

Númerico

Carácter

Qunatidade

Código do Insumo	Sim
PARAMIXB[4]

CarácterLocal de Estoque ( Almoxarifado )

Numérico

Quantidade do insumo

Sim

Não

PARAMIXB[5]

Carácter

Numérico

Tipo

Quantidade de

Unidade de Hora

Recurso

Sim

Não

PARAMIXB[6]

CarácterCódigo da Empresa

Numérico

Valor unitário

Sim

Não


PARAMIXB[7]	Carácter

Código da Filial

Local de estoque (Almoxarifado)	Não
PARAMIXB[8]

Numérico

Carácter

Quantidade

Tipo da unidade de

Recurso

hora

Não

Sim
PARAMIXB[9]	Carácter

Moeda Utilizada para Conversão

Previsto/Realizado (Referência ao campo _SEQRELA)	Não
PARAMIXB[10]	Carácter

Indica o _SEQRELA que será validado

Empresa	Não
PARAMIXB[11]

NuméricoValor de custo calculado pelo sistema referente ao insumo

Carácter	Filial	Não
PARAMIXB[12]	Carácter	Custo total informado no campo TL_CUSTO antes de passar pelo calculo do sistema.	Não

Sim

Retorno:

Nome	Tipo	Descrição	Obrigatório
nCusto	Numérico	Conteúdo informando o custo total do insumo	Sim

Informações

title	ATENÇÃO

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].

Bloco de código

language	sql
title	Exemplo

#Include 'Protheus.ch'

//-------------------------------------------------------------------
/*/{Protheus.doc} NGCALCUSTONGCALCUSTI
Calcula custo do insumo

@author  Eduardo Henrique Mussi
@since   18/05/18
@version P12
/*/
//-------------------------------------------------------------------
User Function NGCALCUSTONGCALCUSTI()
 
	    Local nVALORUNInCustoIns := 0.00
 PARAMIXB[1]  // Valor de custo calculado pelo sistema referente ao insumo
	    Local cCodIns  cCODINSUM := IIf( PARAMIXB[23]  == 'P', PARAMIXB[1], Substr( PARAMIXB[1], 1, 6 ) )
// Codigo do insumo
	    Local nQuantIns := PARAMIXB[4]  // Quantidade do insumo
	    Local nQUANTCON := PARAMIXB[3]
nCustoHora
	    Local aAreaST1

	    Local nQTDRec   := IIf( PARAMIXB[8] == Nil .Or. PARAMIXB[8// Para insumos do tipo M (Mao de obra)
	    If PARAMIXB[2] == 0, 1, PARAMIXB[8])
"M"
        Local
		 nCusto   aAreaST1 := 0ST1->( GetArea() )

      If PARAMIXB[2] == "M"  	cCodIns  := SubStr( cCodIns, 1, TAMSX3("T1_CODFUNC")[1] )
       	 nVALORUNI   nCustoHora := Posicione("ST1", 1, xFilial("ST1") + cCODINSUMcCodIns, "T1_SALARIO")
            nCustoIns  := nCustoHora * nQuantIns

            RestArea(aAreaST1)

        Endif

	Return nCustoIns

Bloco de código

language	sql
title	Exemplo - Ticket - 4163111

#Include 'Protheus.ch'
 
//-------------------------------------------------------------------
/*/{Protheus.doc} NGCALCUSTI
Calcula custo  EndIf
do insumo

@version P12
/*/
//-------------------------------------------------------------------
User Function NGCALCUSTI()
  
    nCustoLocal nCustoOld := (nVALORUNI*nQUANTCON*nQTDRec)

Return nCustoIf(PARAMIXB[12] > 0 ,PARAMIXB[12], PARAMIXB[1])  // Valor de custo calculado pelo sistema referente ao insumo
     
Return nCustoOld

Árvore de páginas

Versões comparadas

Versão antiga 7

Nova versão Atual

Chave

Possibilita customizar custo do insumo

Características do Requisito

Ponto de Entrada

Árvore de páginas

Histórico da Página

Versões comparadas

Versão antiga 7

Nova versão Atual

Chave

Possibilita customizar custo do insumo

Características do Requisito

Ponto de Entrada