Histórico da Página

Disponibilizado no programa EICNU400.PRW o ponto de entrada EICNU400 com os parâmetros:"EMAIL_LIBERA_ADI", que possibilitará alterar a variável lParamOk para falso, desabilitando o envio de e-mail ao despachante no momento da liberação do adiantamento."TELA_MANUT", é executado antes da tela principal ser ativada, possibilitando alterar a variável lParamOk para habilitar o envio de e-mail para as demais opções."CANCEL_EFETI", é executado ao clicar no botão cancela efetivação na solicitação de numerário.     

EICNU400.prw

EICNU400 - Solicitação de Numerário ( [ "EMAIL_LIBERA_ADI" ], [ "TELA_MANUT" ], [ "CANCEL_EFETI" ] ) --> lCancel

lCancel(logico)
• Variavel com o conteúdo para habilitar ou não do cancelamento da efetivação.

User Function EECNU400()   If ValType(ParamIXB) == "A"   cParam:= ParamIXB[1]Else   cParam:= ParamIXBEndIfDo Case   Case cParam == "CANCEL_EFETI"           lCancel := .T.      MsgInfo("Parâmetro habilitado! Não pode cancelar.")EndCaseReturn lCancelUser Function EICNU400()Local cParamIf ValType(ParamIXB) == "C"      cParam:= ParamIXBEndIfIf cParam == "EMAIL_LIBERA_ADI"   lParamOk := .F.EndIf If cParam == "TELA_MANUT"      lParamOk := .T.EndIf                   Return