Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • EICNU400 - Solicitação de Numerário
  • Criado por Usuário desconhecido (aline), última alteração por admin em 23 jun, 2012

Ponto-de-Entrada: EICNU400 - Solicitação de Numerário
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)
Descrição: 
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.
Eventos
 
Programa Fonte 
EICNU400.prw
Sintaxe

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

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
"EMAIL_LIBERA_ADI" Caracter Possibilitará alterar a variável lParamOk para falso, desabilitando o envio de email ao despachante no momento da liberação do adiantamento.
"TELA_MANUT" Array of Record É executado antes da tela principal ser ativada, possibilitando alterar a variável lParamOk para habilitar o envio de email para as demais opções.
"CANCEL_EFETI" caracter Possibilitará alterar a variável lCancel para verdadeiro, desabilitando o cancelamento da efetivação.
Retorno
    lCancel(logico)
  • Variavel com o conteúdo para habilitar ou não do cancelamento da efetivação.
Observações
 
Exemplos 
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
Variáveis
Nome Tipo Escopo Pode Alterar descrição
lParamOk Lógico Privado Sim Quando alterado para falso desabilita o envio de email. Deve ser alterado no ponto de entrada EICNU400 parâmetro "EMAIL_LIBERA_ADI" para desabilitar o envio de email na liberação de adiantamento.
lCancel Lógico Global Sim Quando alterado para verdadeiro desabilita o cancelamento de efetivação.