/*  ----------------------------------------------  */
/*  TEMPTABLE für SendMail                          */
/*  ----------------------------------------------  */
DEFINE TEMP-TABLE ttSendMail NO-UNDO
    FIELD cFrom         AS CHARACTER
    FIELD cTo           AS CHARACTER
    FIELD cCC           AS CHARACTER
    FIELD cBC           AS CHARACTER
    FIELD cSubject      AS CHARACTER
    FIELD cBody         AS CHARACTER
    FIELD cAttachedName AS CHARACTER
    FIELD cAttachedFile AS CHARACTER
    
    FIELD cMailServer   AS CHARACTER
    FIELD cMailPort     AS CHARACTER
    FIELD cMailKonto    AS CHARACTER
    FIELD cMailPassw    AS CHARACTER
    FIELD cDomaine      AS CHARACTER
    
    FIELD lMailAuth     AS LOG
    FIELD cAuthUsername AS CHARACTER 
    FIELD cAuthPasswort AS CHARACTER
    FIELD lSSLEnabled   AS LOGICAL
    FIELD cTargetName   AS CHARACTER 
    .

DEFINE VARIABLE httSendMail   AS HANDLE    NO-UNDO.

DEFINE VARIABLE cSendMailLog  AS CHARACTER NO-UNDO INIT 'C:\TEMP\'.
DEFINE VARIABLE cMailServer   AS CHARACTER NO-UNDO INIT 'smtp.gmail.com'.
DEFINE VARIABLE cMailPort     AS CHARACTER NO-UNDO INIT '587'.
DEFINE VARIABLE cMailKonto    AS CHARACTER NO-UNDO INIT 'anadatprime.info@gmail.com'.
DEFINE VARIABLE cMailPassw    AS CHARACTER NO-UNDO INIT 'Retlaw.7591'.
DEFINE VARIABLE cMailDomaine  AS CHARACTER NO-UNDO INIT ''.
DEFINE VARIABLE lMailAuth     AS LOGICAL   NO-UNDO INIT TRUE.
DEFINE VARIABLE cAuthUserName AS CHARACTER NO-UNDO INIT 'anadatprime.info@gmail.com'.
DEFINE VARIABLE cAuthPasswort AS CHARACTER NO-UNDO INIT 'lqln scxp gxxu quca'.
DEFINE VARIABLE cMailFrom     AS CHARACTER NO-UNDO INIT 'anadatprime.info@gmail.com'.
DEFINE VARIABLE lSSLEnable    AS LOGICAL   NO-UNDO INIT TRUE.