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