Árvore de páginas

Ponto-de-Entrada: MTAB2D3 - Manipula dados do SB2
Versões: Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição:

LOCALIZAÇÃO : Este Ponto de Entrada está localizado na função B2AtuComD3 (Atualiza os dados do SB2 baseado no SD3);

EM QUE PONTO : É executado ANTES da gravação do SB2, pois, seu objetivo é que o usuario possa manipular os dados do SB2, antes da atualização feita pelo sistema.

Eventos


 

Programa Fonte
SIGACUSA.PRX
Sintaxe

MTAB2D3 - Manipula dados do SB2 ( [ PARAMIXB[1] ], [ PARAMIXB[2] ], [ PARAMIXB[3] ] ) --> Nil

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
PARAMIXB[1] Caracter Codigo do Produto (D3_COD)
PARAMIXB[2] Caracter Local
PARAMIXB[3] Caracter Expressão numerica indicando se a movimentação soma ou subtrai : 1 = Operacao de Entrada ; -1 = Operacao de Saida
Retorno
    Nil(nulo)
  • Nil
Observações


 

Exemplos
User Function MTAB2D3()                      Local cCodPro     := ParamIXB[1]  //-- Codigo do ProdutoLocal cLocal      := ParamIXB[2]  //-- LocalLocal nMultiplic  := ParamIXB[3]  //-- 1 - Operacao de Entrada/ -1 Operacao de SaidadbSelectArea('SB2')dbSetOrder(1)//-- Se o produto nao existir no SB2, sera criado automaticamenteIf !MsSeek(xFilial('SB2')+cCodPro+cLocal, .F.)   CriaSB2(cCodPro,cLocal)EndIfRecLock('SB2',.F.)//--//--Atualizacao dos campos do SB2 conforme necessidade do usuario. Exemplo:REPLACE B2_QATU WITH B2_QATU + (SD3->D3_QUANT*nMultiplic)//--MsUnLock()Return .T.