Histórico da Página
...
AVCRW -
...
Envio de
...
Descrição |
---|
AVCRW - |
Envio de |
Observações | Utilizado para a |
---|
manipulação da tela de envio de email Easy Export Control | |
Exemplos | User Function |
---|
AVCRW() Local cParam |
Local cOpcao
Local lRet
:= |
If(Type("ParamIxb") = |
"A" |
cParam:= ParamIXB
,ParamIxb[1] |
Else
cParam:= ParamIXB
EndIf
IF cParam == "VALID_GRAVACAO"
IF ParamIXB[2] == 3
cOpcao := "INCLUIR"
ElseIF ParamIXB[2] == 4
cOpcao := "ALTERAR"
EndIF
EndIF
Do Case
Case cParam == "VALID_GRAVACAO"
MSGINFO("ENTROU NO PONTO 'VALID_GRAVACAO' NA OPCAO : " + cOpcao )
lRetPE := .T.
Case cParam == "ANTES_CONFIRMA_EXCLUSAO"
MSGINFO("ENTROU NO PONTO 'ANTES_CONFIRMA_EXCLUSAO'")
lValExclusao := .F.
,If(Type("ParamIxb") = "C",ParamIxb,"")) If cParam == "EMAIL" cTitAux := 'Título do email' EndIf Return .T. |
Preview |
---|
Veja também |
lRet := .T.
EndCase
Return lRet
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 |
---|
AVCRW.PRW |