Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: CTB103EXC - Valida Execução a gravação dos lançamentos
Descrição: Esse P.E Ocorre antes da efetivação da gravação dos lançamentos validando sua execução Eventos É executada na função que grava os lançamentos contabeis Programa Fonte CTBA103.PRW Sintaxe CTB103EXC - Valida Execução a gravação dos lançamentos ( ) --> lOk Retorno
Observações Caso esse P.E retorne falso o processo de gravação sera cancelado Exemplos 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 |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas