Ponto-de-Entrada: CTBGRV - Executa procedimento
| Abrangências: | Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 |
| Versões: | Todas |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
Descrição:
Ponto de entrada para executar procedimento de usuário após a gravação do lançamento contábil.
Programa Fonte
CTBXFUN.PRX
Sintaxe
CTBGRV - Executa procedimento ( < nOpc> , < cProg> )
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| nOpc | Numérico | Opção para lançamento (3-Inclusão; 4-Alteracão;5-Exclusão. | X | ||||||||||||||
| cProg | Array of Record | Nome do programa. | X |
Retorno
-
()
Exemplos
User Function CTBGRV()nOpcLct := aParamIxb[1]nProgra := aParamIxb[2]If nOpcLct == 3 //inclusao CT2->CT2_USUHOR := TIME() // campo de usuario para gravar horario do lancamentoEndIfReturn
Variáveis
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
| Array of Record | Global | Não |