Ponto-de-Entrada: MTAB2D2 - 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 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. Eventos Sintaxe 01. DADOS GERAIS
| Produto: | |
|---|
| Linha de Produto: | |
|---|
| Segmento: | |
|---|
| Módulo: | TOTVS Backoffice (Linha Protheus) - Estoque e Custos (SIGAEST) |
|---|
| Fonte: | SIGACUSA - Generica do estoque |
|---|
| País: | Brasil |
|---|
02. DESCRIÇÃO
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.
SINTAXE: MTAB2D2 - Manipula dados do SB2 ( [ PARAMIXB[1] ], [ PARAMIXB[2] ], [ PARAMIXB[3] ] ) --> Nil
Parâmetros
PARÂMETROS:| Nome | Tipo | Descrição | Default | Obrigatório | Referência |
| PARAMIXB[1] | Caracter | Codigo do Produto (D2_COD) |
|
|
|
| PARAMIXB[2] | Caracter | Local (D2_LOCAL) |
|
|
|
| PARAMIXB[3] | Caracter | Expressao numerica indicando se a movimentação soma ou subtrai : 1 = Operacao de Entrada ; -1 = Operacao de Saida |
Retorno Nil Observações Exemplos - O Ponto de entrada não possui retorno.
EXEMPLO DE UTILIZAÇÃO ADVPL| Bloco de código |
|---|
| language | delphi |
|---|
| theme | Midnight |
|---|
| title | Exemplo de Utilização - MTAB2D2 |
|---|
| linenumbers | true |
|---|
|
User Function MTAB2D2() |
:= ParamIXB[1] //-- Codigo do |
ProdutoLocal cLocal Produto (D2_COD)
Local cLocal := ParamIXB[2] //-- |
LocalLocal nMultiplic Local (D2_LOCAL)
Local nMultiplic := ParamIXB[3] //-- |
1-OperacaodeEntrada/-1Operacaode 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.ou subtrai : 1 = Operacao de Entrada ; -1 = Operacao de Saida
// Customizacoes do Cliente
Return Nil |
04. ASSUNTOS RELACIONADOS