EICPT252 - Previsão do Desembolso e Pré-cálculo
Descrição | EICPT252 - Previsão de Desembolso | |||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Observações | Utilizado para a manutenção do relatório de Previsão de Desembolso | |||||||||||||||||||||||||||||||||||
Exemplos | User Function eictp252() Local cParam := "" If ValType(ParamIXB) == "A" cParam:= ParamIXB[1] ElseIf ValType(ParamIXB) == "C" cParam:= ParamIXB EndIf Do Case Case cParam == "ALTERA_FILTRO" MsgInfo("Entrou no ponto de entrada 'ALTERA_FILTRO'.") Case cParam == "PAGOU_DESPESAS" If cCodDesp == "400" lLoop := .T. EndIf Case cParam == "ALTERA_FRETE" conout("ALTERA_FRETE") If cAlias == "SW7" .And. !Empty(M->W6_VLFREPP) nTotFreGeral:= M->W6_VLFREPP + M->W6_VLFRECC EndIf Case cParam == "APOS_GRAVA_WORKTP" conout("APOS_GRAVA_WORKTP") If ZPDesp == "102" WorkTP->WKVLPAGTO2:= 0 EndIf End Case Return Nil | |||||||||||||||||||||||||||||||||||
Preview | ||||||||||||||||||||||||||||||||||||
Veja também | ||||||||||||||||||||||||||||||||||||
Idioma | Português(Brasil) | |||||||||||||||||||||||||||||||||||
Versões | Microsiga_Protheus11 | |||||||||||||||||||||||||||||||||||
Sistemas Operacionais Suportados | Todos | |||||||||||||||||||||||||||||||||||
Compatível com as Bases de Dados | Todas | |||||||||||||||||||||||||||||||||||
Updates | ||||||||||||||||||||||||||||||||||||
Parâmetros |
| |||||||||||||||||||||||||||||||||||
Retorno | () | |||||||||||||||||||||||||||||||||||
Eventos de chamada do Ponto de Entrada | ||||||||||||||||||||||||||||||||||||
Variáveis |
| |||||||||||||||||||||||||||||||||||
Programa Fonte | EICPT252 .PRW |