Linha Microsiga Protheus

Árvore de páginas

  • Criado por Usuário desconhecido (pauloc), última alteração por admin em 03 jul, 2012

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