UPC UTAPI019 - envio de e-mail

Pessoal,

Utilizamos unix para nossos APP Server´s por questão de performance. Estou tento problemas na UPC da utapi019 (envio de e-mail). A upc se encontra cadastrada corretamente e a minha upc se encontra no diretório corretamente, inclusive compilei em char32/64 e mesmo assim não resolver.

Alguém sabe o que pode estar ocorrendo?

[16/11/29@08:23:43.992-0200] P-026941 T-2335340320 1 AS -- (Procedure: 'pi-UNIX utp/utapi019.p' Line:1871) ** "utp\utapi019-upc.p" was not found. (293)
28,054
[16/11/29@08:23:43.978-0200] P-026941 T-2335340320 2 AS 4GLTRACE Run utp\utapi019-upc.p "eMailUnix tt-epc" [pi-UNIX - utp/utapi019.p @ 1871]

Parece que não está encontrando o fonte... verifique se o caminho está no propath, inverta a barra e faça um teste...

Foi, era a barra invertida.

Show de bola!

Bom dia @lima, tudo bom ?
Estou começando a pesquisar o assunto, mas fiquei curioso com o fato de ter colocado uma UPC no utapi019.
Voce pode me explicar o motivo ?

@reissobr pelo que já vi, a upc serve pra inputar os dados do servidor de e-mail, usuário, senha, etc...

Segue exemplo que encontrei...

/********************************************************************************
** Datasul Technology
**
** Programa: utappi019-upc - UPC reponsavel para montar o comando de envio de email
**
** C½digo de Parametros Dispon¡veis:
** EmailFrom - Email remetente
** EmailTo - Email destino
** ServidorEmail - Servidor SMTP
** CorpoEmail - Arquivo com o texto do e-mail
** CommandEmail - Retorna o comando completo do e-mail
**
********************************************************************************/
{include/i-epc200.i1} /* defini‡Æo da temp-table tt-epc */

DEF INPUT PARAM p-ind-event AS CHAR NO-UNDO.
DEF INPUT-OUTPUT PARAM TABLE FOR tt-epc.

/******************************************************************************
* Vari vel Global que cont‚m o usu rio corrente,
* caso queira realizar alguma customiza‡Æo a n¡vel de usu rio.
******************************************************************************/
FIND FIRST param_email NO-LOCK NO-ERROR.

DEF VAR cComandoEmail AS CHAR NO-UNDO.

IF p-ind-event = "eMailJava" THEN DO:
FIND FIRST tt-epc
WHERE tt-epc.cod-event = "eMailJava"
AND tt-epc.cod-parameter = "CommandEmail"
EXCLUSIVE-LOCK NO-ERROR.
IF AVAIL tt-epc THEN ASSIGN cComandoEmail = tt-epc.val-parameter.

/*Define o parƒmetro servidor*/
ASSIGN cComandoEmail = cComandoEmail + " server=" + param_email.cod_servid_e_mail.

/*Define a autentifica‡Æo*/
ASSIGN cComandoEmail = cComandoEmail + " user=" + param_email.cod_usuar_email +
" password=" + param_email.cod_senha .

IF AVAIL tt-epc THEN ASSIGN tt-epc.val-parameter = cComandoEmail.

END.