Histórico da Página

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.

SIGACUSA.PRX

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

Nil(nulo)
• Nil

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.