Árvore de páginas

Ponto-de-Entrada: CT101TOK - Valida Folder de Lancamento Contabil
Abrangências: Microsiga Protheus 10 , Microsiga Protheus 11
Versões: Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Português (Brasil) , Português (Portugal) , Espanhol , Inglês
Descrição:
Executa a valiação de todos os campos do folder contabil 
Eventos

É execudado na rotina que Valida Folder de Lancamento Contabil    

Programa Fonte
CTBA101.PRW 
Sintaxe

CT101TOK - Valida Folder de Lancamento Contabil ( [ cTipo ], [ cDebito ], [ cCredito ], [ cCustoDeb ], [ cCustoCrd ], [ cItemDeb ], [ cItemCrd ], [ cClVlDeb ], [ cClVlCrd ], [ cTpSald ], [ nOpc ], [ @cTexto ] ) --> lRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cTipo Caracter Tipo do Lancamento Contabil
cDebito caracter Conta debito
cCredito caracter Conta Credito
cCustoDeb caracter C Custo Debito
cCustoCrd caracter C Custo Credito
cItemDeb caracter Item Debito
cItemCrd caracter Item Credito
cClVlDeb caracter Classe de Valor Debito
cClVlCrd caracter Classe de Valor Credito
cTpSald caracter Tipo do Saldo
nOpc caracter Numero da opcao escolhida
@cTexto caracter Conteudo do Historico
Retorno
    lRet(logico)
  • Indicador de validade do folder de lan;amento contabil
Observações

Caso seu valor seja falso o folder contabil sera considerado invalido

Exemplos
If lCt101TOK	lRet := ExecBlock( "CT101TOK" , .F. , .F. , {cTipo,cDebito,cCredito,cCustoDeb,cCustoCrd,cItemDeb,cItemCrd,cClVlDeb,cClVlCrd,cTpSald,nOpc,@cTexto } )Endif