Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
| Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: DPCTB103GR - Valida pós execução a gravação dos lançamentos
Descrição: Valida se registro foi gravado corretamente Eventos É executado dentro da função de gravação de lançamentos contabeis Programa Fonte CTBA103.PRW Sintaxe DPCTB103GR - Valida pós execução a gravação dos lançamentos ( [ nOpc ], [ dDataLanc ], [ cLote ], [ cSubLote ], [ cDoc ] ) Parâmetros:
Retorno Nil (Nulo) Observações Ele ocorre após a efetiva gravação dos lançamentos Exemplos If lOk .And. (!l103Visual) If l103Exclui .And. ExistBlock("CTB103EXC") lOk := ExecBlock("CTB103EXC",.F.,.F.) EndIf If lOk If ExistBlock("ANCTB103GR") ExecBlock("ANCTB103GR",.F.,.F.,{ nOpc,dDataLanc,cLote,cSubLote,cDoc } ) Endif CTBGrava(nOpc,dDataLanc,cLote,cSubLote,cDoc,.F.,"",__lCusto,__lItem,__lCLVL,nTotInf,'CTBA103',,,cEmpAnt,cFilAnt,,,,,,,cSeqCorr) If ExistBlock("DPCTB103GR") ExecBlock("DPCTB103GR",.F.,.F.,{ nOpc,dDatalanc,cLote,cSubLote,cDoc } ) Endif EndIf EndifEndIf |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas