Descrição | Manutenção de contrato de financiamento | |||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Exemplos | #include "protheus.ch"
Begin Sequence If ValType(ParamIXB) == "A" cParamIXB:= ParamIXB[1] Else cParamIXB:= ParamIXB EndIf Do Case Case cParamIXB == "ANTES_GRAVA_EF3" MsgInfo("Teste ANTES_GRAVA_EF3", "ponto de entrada") Case cParamIXB == "GRAVANDO_EF3" MsgInfo("Teste GRAVANDO_EF3", "ponto de entrada") Case cParamIXB == "INC_EF3" MsgInfo("Teste INC_EF3", "ponto de entrada") EndCase End Sequence Return | |||||||||||||||
Idioma | Português(Brasil) | |||||||||||||||
Versões | Microsiga Protheus11 e posteriores | |||||||||||||||
Sistemas Operacionais Suportados | Todos | |||||||||||||||
Compatível com as Bases de Dados | Todas | |||||||||||||||
Parâmetros |
| |||||||||||||||
Retorno | ||||||||||||||||
Variáveis |
| |||||||||||||||
Programa Fonte | EFFEX400.PRW |