Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 8499

Re: Need to generate output file in .xlsx format on application server

$
0
0

Hi Raymond,

 

Still i am unable to generate .xlsx file.

please help me as it is very critical.

i am not aware of zip file for abap2xlsx conversion.

 

following is the ABAP code i used to generate .xlsx file.

file is getting generated on Application server but when i download on system and trying to open with Excel it is giving me error as file is corrupted.

 

ABAP code:

___________________________________________________________________________________

DATA : wa_final_xls TYPE ztransactional_data_data.

   DATA : l_path(128) TYPE c VALUE 'H:\LIMS\MaterialMaster\Transaction',

          lv_line TYPE string.

 

   DATA : l_material_code       TYPE string,

          l_plant               TYPE string,

          l_date                TYPE string,

          l_grnqty              TYPE string,

          l_net_sales_qty       TYPE string,

          l_closing_qty         TYPE string,

          l_mfg_part_num        TYPE string,

          l_stock_in_tramsit    TYPE string,

          l_inst_hold_qty       TYPE string,

          l_quantity_hold       TYPE string,

          l_qahold              TYPE string,

          l_pending_sales_qty   TYPE string,

          l_open_salesin_hand   TYPE string,

          l_pending_order_value TYPE string,

          l_stock_value         TYPE string.

 

 

   CONCATENATE l_path '_' sy-datum '_' sy-uzeit INTO l_path.

   CONCATENATE l_path 'XLS' INTO l_path SEPARATED BY '.'.

   OPEN DATASET l_path FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.

   IF sy-subrc = 0.

 

     CONCATENATE  'SKU_Code' 'Node_Code' 'TransactionDate' 'GRN'

                  'Sales' 'Closing_Quantity' 'Supply_Node_Code' 'In_Transit'

                  'Inst_Hold' 'Quality_Hold' 'QA_Hold' 'Pending_Orders' 'Orders_in_Hand'

                  'Field1' 'Field2'

                  INTO lv_line SEPARATED BY cl_abap_char_utilities=>horizontal_tab.

 

     TRANSFER lv_line TO l_path.

     CLEAR : lv_line.

     LOOP AT ta_ztransactional_data_data INTO wa_final_xls.

 

       l_material_code       = wa_final_xls-material_code.

       l_plant               = wa_final_xls-plant.

       l_date                = wa_final_xls-date.

       l_grnqty              = wa_final_xls-grnqty.

       l_net_sales_qty       = wa_final_xls-net_sales_qty.

       l_closing_qty         = wa_final_xls-closing_qty.

       l_mfg_part_num        = wa_final_xls-mfg_part_num.

       l_stock_in_tramsit    = wa_final_xls-stock_in_tramsit.

       l_inst_hold_qty       = wa_final_xls-inst_hold_qty.

       l_quantity_hold       = wa_final_xls-quantity_hold.

       l_qahold              = wa_final_xls-qahold.

       l_pending_sales_qty   = wa_final_xls-pending_sales_qty.

       l_open_salesin_hand   = wa_final_xls-open_salesin_hand.

       l_pending_order_value = wa_final_xls-pending_order_value.

       l_stock_value         = wa_final_xls-stock_value.

 

       CONCATENATE wa_final_xls-material_code

                   wa_final_xls-plant

                   wa_final_xls-date

                   wa_final_xls-grnqty

                   wa_final_xls-net_sales_qty

                   wa_final_xls-closing_qty

                   wa_final_xls-mfg_part_num

                   wa_final_xls-stock_in_tramsit

                   wa_final_xls-inst_hold_qty

                   wa_final_xls-quantity_hold

                   wa_final_xls-qahold

                   wa_final_xls-pending_sales_qty

                   wa_final_xls-open_salesin_hand

                   wa_final_xls-pending_order_value

                   wa_final_xls-stock_value INTO lv_line SEPARATED BY cl_abap_char_utilities=>horizontal_tab.

       TRANSFER lv_line TO l_path.

 

       CLEAR wa_final_xls.

 

     ENDLOOP.

     CLOSE DATASET l_path.

   ENDIF.

___________________________________________________________________________________

 

Thanks,

Sagar Gujar


Viewing all articles
Browse latest Browse all 8499

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>