Regarding Conversion of Binary to Base64 for Mail attachemnt

[SatishR]

We have successfully migrated our SAS email functionality from SMTP with Basic Authentication to an OAuth2-based approach using Microsoft Azure Portal and Microsoft Graph API.

Currently, we are able to trigger emails successfully using OAuth2. However, we are facing an issue while sending Excel file attachments.

As part of the OAuth2-based email implementation, we are converting the Excel (.xlsx) file into Base64 format and attaching it using the content Bytes attribute in the Graph API request. Although the email is delivered successfully with the attachment, the Excel file fails to open when downloaded from the email and shows an error indicating that the file is corrupted or the format is invalid.

We have attached the following for your reference:

• SAS code used for converting the Excel file into Base64
• SAS log generated during the Base64 conversion and email trigger process
  
  

  /* 1. Set options for long strings */
  options noquotelenmax;
  %let report_date = %sysfunc(intnx(day,%sysfunc(today()),-1),date11.);

  /* 2. Define filenames */
  filename excel_in "/home/sas/DO Efficiency Report.xlsx" recfm=n;
  filename json_req temp lrecl=32767;

  /* 3. Convert Excel to Base64 and build JSON */
  data _null_;
  file json_req;
  
  infile excel_in;
  length file_content $10547;
  input file_content $char10547.;
  
  length b64_val $14064;
  b64_val = put(file_content, $base64x14064.);

  /* Build the JSON payload with your specific draft */
  put '{'
  / ' "message": {'
  / ' "subject": "Daily Reports of &report_date",'
  / ' "body": {'
  / ' "contentType": "Text",'
  / ' "content": "Dear Sir,\n\nPlease find below daily reports of &report_date for your reference,\n\n1. Call Summary Report (Rural & Urban)\n2. Call Summary Report\n3. Do Efficiency Report\n4. ERV Efficiency Report\n5. ERV Tracking Report\n6. Women Related Call summary\n\nThanks & Regards,\nMahindra Defence"'
  / ' },'
  / ' "toRecipients": ['
  / ' { "emailAddress": { "address": "rahane.satish@mahindra.com" } }'
  / ' ],'
  / ' "attachments": ['
  / ' {'
  / ' "@odata.type": "#microsoft.graph.fileAttachment",'
  / ' "name": "DO Efficiency Report.xlsx",'
  / ' "contentType": "application/vnd.openxmlformats-officedocument.spreadsheetml.sheet",'
  / ' "contentBytes": "' b64_val +(-1) '"'
  / ' }'
  / ' ]'
  / ' }'
  / '}';
  run;

  /* 4. Send the mail */
  filename resp temp;
  proc http
  method="POST"
  url="https://graph.microsoft.com/v1.0/me/sendMail"
  in=json_req
  out=resp;
  headers
  "Authorization"="Bearer &access_token" /* Ensure this matches your token variable name */
  "Content-Type"="application/json";
  run;

  /* 5. Check log for Success */
  data _null_;
  infile resp;
  input;
  put _infile_;
  run;