Linha Microsiga Protheus

Árvore de páginas

Ponto de Entrada A320CUST

Descrição:

O ponto de entrada A320CUST foi desenvolvido para realização de dois tratamentos:

  • MA320Estru(): Executado após o cálculo e gravação do custo standard para cada produto calculado pela estrutura permitindo customizações do usuário.
  • MA320LCust(): Função utilizada para atualizar o custo standard (B1_CUSTD) baseado no ultimo custo de NF de compra.

Parâmetros:

ParamIXB[1]: Carácter, Código do produto.
ParamIXB[2]: Numérico, Valor do novo custo gravado.
ParamIXB[3]: Carácter, Qual função deseja processar MA320Estru ou MA320LCust até mesmo as duas.

Os pontos de entrada A320CUSTR e A320CUSTD foram substituídos pelo A320CUST.

Eventos:

Chamado na função MA320Estru() - Cálculo do custo standard pela estrutura.
Chamado na função MA320LCust() - Executada após a gravação dos custos nas tabelas SB1 / SBZ.

Programa Fonte:

MATA320.PRX

Retorno:

Nil

 

Exemplo:

#Include 'Protheus.ch'

User Function A320CUST()
Local cCodProd:= ParamIXB[1] // Codigo do Produto
Local nCusto := ParamIXB[2] // Valor do novo custo gravado// Customizacoes do Usuario
Local cProc := ParamIXB[3] // Define qual processamento sera realizado de acordo com a funcao

If cProc == "MA320LCust"
/* Tipo de processamento / Function MA320LCust() - Função utilizada
para atualizar o custo standard (B1_CUSTD) baseado no ultimo custo de NF de compra .
*/
Else
/*
MA320Estru() - Calculo do custo standard pela estrutura.
*/
EndIf
Return Nil