Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: MTAB2D1 - Manipula os dados do SB2
Descrição:
Eventos
Programa Fonte SIGACUSA.PRX Sintaxe MTAB2D1 - Manipula os dados do SB2 ( [ PARAMIXB[1] ], [ PARAMIXB[2] ], [ PARAMIXB[3] ] ) --> Nil Parâmetros:
Retorno
Observações
Exemplos User Function MTAB2D1()Local cCodPro := ParamIXB[1] //-- Código do ProdutoLocal cLocal := ParamIXB[2] //-- LocalLocal nMultiplic := ParamIXB[3] //-- 1 = Operação de Entrada/ -1 = Operação de SaídadbSelectArea('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.)//--//--Atualização dos campos do SB2 conforme necessidade do usuário. Exemplo:REPLACE B2_QATU WITH B2_QATU + (SD1->D1_QUANT*nMultiplic)//--MsUnLock()Return Nil |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas