Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | |
Função: | ATFA125 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46030 |
Ponto de entrada para manipulação dos e-mails que receberão o aviso de efetivação/negação da transferência.
If ExistBlock( "A125EMRT" ) cEmailRet := ExecBlock( "A125EMRT", .F., .F., { cEmailUsr, cCodSol } ) //Retorna lista de emails para retorno da aprovacao If ValType( cEmailRet ) == "C" cEmailUsr := cEmailRet EndIf EndIf |
User Function A125EMRT() // E-mail do solicitante e código da solicitação Local cEmailUsr := PARAMIXB[1] Local cCodSol := PARAMIXB[2] // Verifica o retorno e envia um e-mail para os destinatários definidos If ValType(cEmailUsr) == "C" //validacao do cliente EndIf Return cEmailUsr |
|