Create a report Z_SHIPPING_LABELS_4 and paste below code into it (For clarity, the difference from Z_SHIPPING_LABELS marked in red color):

REPORT z_shipping_labels_4.

* declare the context

DATA:

gs_line TYPE zcontext_shipping_label ,

gt_context TYPE zcontext_shipping_labels ,

gv_document_rawdata TYPE mime_data .

* fill the context

gs_line-to_name = 'Dan Tedford' .

gs_line-to_street = '811 Alworth Avenue' .

gs_line-to_town = 'Middlefield' .

gs_line-to_state = 'CA' .

gs_line-to_zip = '98567' .

APPEND gs_line TO gt_context .

gs_line-to_name = 'Shane Hamby' .

gs_line-to_street = '852 Ocean View Rd.' .

gs_line-to_town = 'Bayshore' .

gs_line-to_state = 'CA' .

gs_line-to_zip = '94123' .

APPEND gs_line TO gt_context .

gs_line-to_name = 'Dr.Henry Albrecht' .

gs_line-to_street = '522 Ravenswood' .

gs_line-to_town = 'East Bayshore' .

gs_line-to_state = 'CA' .

gs_line-to_zip = '93327' .

APPEND gs_line TO gt_context .

gs_line-to_name = 'Hugh Molotsi' .

gs_line-to_street = '1980 N.Stonecrest Rd.' .

gs_line-to_town = 'West Middlefield' .

gs_line-to_state = 'CA' .

gs_line-to_zip = '12384' .

APPEND gs_line TO gt_context .

* call the form

CALL FUNCTION 'ZXLWB_CALLFORM'

EXPORTING

iv_formname = 'SHIPPING_LABELS'

iv_context_ref = gt_context[]

iv_viewer_suppress = 'X'

IMPORTING

ev_document_rawdata = gv_document_rawdata

EXCEPTIONS

OTHERS = 2 .

IF sy-subrc NE 0 .

MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno

WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4 .

ENDIF .

* mailing

PERFORM send_mail USING gv_document_rawdata .

*&---------------------------------------------------------------------*

*& Form send_mail

*&---------------------------------------------------------------------*

FORM send_mail USING pv_document_rawdata TYPE mime_data .

DATA:

lv_attachment_size TYPE sood-objlen ,

lv_subject TYPE so_obj_des ,

lv_document_size TYPE i ,

lt_document_table TYPE solix_tab .

DATA:

lr_send_request TYPE REF TO cl_bcs ,

lr_mail_message TYPE REF TO cl_document_bcs ,

lr_recipient TYPE REF TO if_recipient_bcs ,

lr_error TYPE REF TO i_oi_error ,

ls_retcode TYPE soi_ret_string ,

lv_attachment_type TYPE soodk-objtp VALUE 'XLS' .

CALL FUNCTION 'SCMS_XSTRING_TO_BINARY'

EXPORTING

buffer = pv_document_rawdata

IMPORTING

output_length = lv_document_size

TABLES

binary_tab = lt_document_table.

lr_send_request = cl_bcs=>create_persistent( ) .

lv_subject = 'test mail' .

lr_mail_message = cl_document_bcs=>create_document(

i_type = 'RAW'

i_subject = lv_subject ) .

lv_attachment_size = lv_document_size .

TRY .

lr_mail_message->add_attachment(

i_attachment_type = lv_attachment_type

i_attachment_subject = space

i_attachment_size = lv_attachment_size

i_att_content_hex = lt_document_table ) .

CATCH cx_document_bcs .

ENDTRY .

lr_send_request->set_document( lr_mail_message ) .

lr_recipient = cl_sapuser_bcs=>create( sy-uname ).

lr_send_request->set_send_immediately( abap_on ) .

lr_send_request->add_recipient(

i_recipient = lr_recipient

i_express = abap_on ) .

lr_send_request->send( i_with_error_screen = abap_on ) .

COMMIT WORK .

ENDFORM . "send_mail

Result of the printing program execution: