program-id. TwilioSMSExample. configuration section. repository. class jTwilio as "com.twilio.Twilio" class jMessage as "com.twilio.rest.api.v2010.account.Message" class jPhoneNumber as "com.twilio.type.PhoneNumber" class jString as "java.lang.String" . working-storage section. 77 errMsg pic x(512). 77 Twilio object reference jTwilio. 77 smsMessage object reference jMessage. 77 toPhoneNumber object reference jPhoneNumber. 77 fromPhoneNumber object reference jPhoneNumber. 77 sidStr object reference jString. 77 tokenStr object reference jString. 77 msgBody object reference jString. procedure division. send-msg. *> These are the credentiales provided by Twilio for each account set sidStr to "abcde" set tokenStr to "1234567890" try Twilio:>init(sidStr, tokenStr) catch exception set errMsg to exception-object:>toString() display message "Error on Twilio.init: ", errMsg end-try. try set toPhoneNumber to jPhoneNumber:>new("+50276871390") set fromPhoneNumber to jPhoneNumber:>new("+15078943561") catch exception set errMsg to exception-object:>toString() display message "Error on set phones: ", errMsg end-try. set msgBody to "This message is from isCOBOL via Twilio!";; try set smsMessage to jMessage:>creator(toPhoneNumber, fromPhoneNumber, msgBody):>create() as jMessage catch exception set errMsg to exception-object:>toString() display message "Error on set smsMessage: ", errMsg end-try. goback.