Histórico da Página

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

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.

SIGACUS.PRX

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

Nil(nulo)
• Nil

User Function MTAB2D2()                      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 + (SD2->D2_QUANT*nMultiplic)//--MsUnLock()Return .T.