SAP/ABAP 코드

(ABAP 코드) EWM Document Info Get( Class )

haramang 2022. 9. 4. 19:32


DATAls_read_options TYPE /scwm/dlv_query_contr_str,
      ls_include_data  TYPE /scwm/dlv_query_incl_str_prd,
      lt_items_prd    TYPE /scwm/dlv_item_out_prd_tab,
      ls_items_prd    TYPE /scwm/dlv_item_out_prd_str,
      ls_docid_itemid TYPE /scwm/dlv_docid_item_str,
      lt_docid_itemid TYPE /scwm/dlv_docid_item_tab,
      ls_material     TYPE /scwm/s_pack_stock.


DATAlt_docid        TYPE /scwm/dlv_docid_item_tab,
      ls_docid        TYPE /scwm/dlv_docid_item_str.

DATAlo_prd          TYPE REF TO /scwm/cl_dlv_management_prd.




  " DLV Management Class Instantiated
  lo_prd /scwm/cl_dlv_management_prd=>get_instance).



  ls_read_options-item_part_select        abap_true.
*  ls_read_options-head_part_select        = abap_true.
  ls_read_options-data_retrival_only      abap_true.
  ls_read_options-mix_in_object_instances abap_true.

  " Setting
  " Header
*  ls_include_data-head_partyloc             = abap_true.
*  ls_include_data-head_date                 = abap_true.
*  ls_include_data-head_addmeas              = abap_true.
*  ls_include_data-head_status               = abap_true.
*  ls_include_data-head_refdoc               = abap_true.
**  ls_include_data-head_transport            = abap_true.
*  ls_include_data-head_text                 = abap_true.
*  ls_include_data-head_textline             = abap_true.


  " Header
  ls_include_data-ITEM_PARTYLOC             abap_true.
  ls_include_data-ITEM_DATE                 abap_true.
  ls_include_data-ITEM_ADDMEAS              abap_true.
  ls_include_data-ITEM_STATUS               abap_true.
** ls_include_datas-ITEM_STATUS_DYN_DETAIL    = abap_true.
*  ls_include_data-ITEM_REFDOC               = abap_true.
*  ls_include_data-ITEM_SPLITTAB             = abap_true.
*  ls_include_data-ITEM_HIERARCHY            = abap_true.
*  ls_include_data-ITEM_SERIALN              = abap_true.
*  ls_include_data-ITEM_DOCFLOW              = abap_true.
*  ls_include_data-ITEM_TEXT                 = abap_true.
*  ls_include_data-ITEM_TEXTLINE             = abap_true.
*  ls_include_data-ITEM_OD                   = abap_true.
*  ls_include_data-ITEM_BATCHID              = abap_true.
** ls_include_data-ITEM_ADDMEAS_DETAIL       = abap_true.
*  ls_include_data-ITEM_CHVAL                = abap_true.
*  ls_include_data-ITEM_PRODUCT_EXT          = abap_true.
*  ls_include_data-ITEM_PRCODE               = abap_true.
*  ls_include_data-ITEM_ACCOUNT              = abap_true.
*  ls_include_data-ITEM_DG                   = abap_true.


  " Document Info Setting
  ls_docid-docid  '42010A02B0231EDD8AB233EE4F5D8DE7'.  " ls_material-qdocid.
*  ls_docid-itemid = '42010A02B0231EDD8AB233EE4F5FADE7'.  " ls_material-qitmid.
  ls_docid-doccat 'PDO'.                               " ls_material-qdoccat.
  APPEND ls_docid TO lt_docid.

*  ls_docid-docid  = '42010A02B0231EDD8AB233EE4F5D8DE7'.  " ls_material-qdocid.
*  ls_docid-itemid = '42010A02B0231EDD8AB233EE4F600DE7'.  " ls_material-qitmid.
*  ls_docid-doccat = 'PDO'.                               " ls_material-qdoccat.
*  APPEND ls_docid TO lt_docid.
*
*  ls_docid-docid  = '42010A02B0231EDD8AB233EE4F5D8DE7'.  " ls_material-qdocid.
*  ls_docid-itemid = '42010A02B0231EDD8AB233EE4F606DE7'.  " ls_material-qitmid.
*  ls_docid-doccat = 'PDO'.                               " ls_material-qdoccat.
*  APPEND ls_docid TO lt_docid.



  TRY.
    CALL METHOD lo_prd->query
      EXPORTING
        it_docid                    =   lt_docid
        iv_doccat                   =   ls_material-qdoccat
        is_read_options             =   ls_read_options
        is_include_data             =   ls_include_data
      IMPORTING
        et_items                    =   lt_items_prd
        .
   CATCH /scdl/cx_delivery.
     EXIT.
  ENDTRY.


  BREAK-POINT.