Create mail from file in Powerbuilder

I want to send mailaddresses from a file and open mailsession in Outlook


mailSession lmail_Ses
mailReturnCode lmail_RCode
mailMessage lmail_Msg
mailRecipient lmail_Recipient


FileOpen(ls_epostfil, StreamMode!, Read!, LockRead!, Replace!)
li_filkoll = FileRead(li_filenum,ls_eposter)
IF li_filkoll < 1 THEN
MessageBox("Mail", "File failedl")
ELSE      
//        **** Create a mail session **
lmail_Ses = CREATE mailSession

//         **** Log on to the session **
lmail_RCode = lmail_Ses.mailLogon(mailNewSession!)
IF lmail_RCode <> mailReturnSuccess! THEN
MessageBox("Mail", 'Logon failed.')
ELSE
lmail_RCode = lmail_Ses.MailAddress()
IF lmail_RCode = mailReturnUserAbort! Then
MESSAGEBOX('', "User Cancelled send Mail")
ELSE
//            **** Create Recipints ***

lmail_recipient.Address = ls_eposter
lmail_recipient.RecipientType = mailTo!
lmail_msg.Recipient[1] = lmail_recipient
lmail_Ses.MailAddress(lmail_msg)
FileClose(li_FileNum)
            
IF lmail_RCode <> mailReturnSuccess! THEN
MessageBox("Mail", 'Addressing faild.')
ELSE

//            **** Send the mail
lmail_RCode = lmail_Ses.MailSend()
IF lmail_RCode <> mailReturnSuccess! THEN
MessageBox("Mail", 'Sending mail failed.')
END IF
END IF
END IF      
END IF
                  
lmail_Ses.MailLogoff()
DESTROY lmail_Ses
                  
END IF