Value are not coming (tcode cm50)

Question

hi expert ,
in below code values are not comes into ITAB_TXTLINES (  WA_DATA ) . we use a standard program cm50 tcode . into
customize program  memory but values is not coming into wa.
values(arbpl ,werks,kapar,planr)
this is my first time i use standard progarm
so plz help
REPORT  ZPP_CM50  LINE-SIZE 170..
TYPE-POOLS : SLIS.
DATA : INT_CAT TYPE SLIS_FIELDCAT_ALV,
       INT_FCAT TYPE SLIS_T_FIELDCAT_ALV.
DATA : LS_LINE TYPE SLIS_LISTHEADER,
       VN_TOP  TYPE SLIS_T_LISTHEADER,
       IT_SORT TYPE  SLIS_T_SORTINFO_ALV,
       WA_SORT LIKE LINE OF IT_SORT.
DATA : LAYOUT TYPE SLIS_LAYOUT_ALV.
DATA: BEGIN OF SLIST_LISTLINE,
      LINE(1024)      TYPE   C,
      END OF SLIST_LISTLINE.
DATA: ITAB_TXTLINES LIKE SLIST_LISTLINE OCCURS 0 WITH HEADER LINE.
TABLES : CRHD , KAKO .
DATA: BEGIN OF ITAB_DATA OCCURS 0,
      AA(20),LEVEL(20),ITEM(20),OBJ(20),OBJID(20),
      OBJDES(20),OVRFLW(20),QTY(20),UOM(20),ICT(20),
      END OF ITAB_DATA.
DATA : WA_DATA LIKE ITAB_DATA.
DATA: TEXT TYPE C LENGTH 10,
      RSPAR_TAB  TYPE TABLE OF RSPARAMS,
      RSPAR_LINE LIKE LINE OF RSPAR_TAB,
      RANGE_TAB  LIKE RANGE OF TEXT,
      RANGE_LINE LIKE LINE OF RANGE_TAB.
*DATA: TEXT TYPE C LENGTH 10,
     RSPAR_TAB  TYPE TABLE OF RSPARAMS,
     RSPAR_LINE LIKE LINE OF RSPAR_TAB.
     RANGE_TAB  LIKE RANGE OF TEXT,
     RANGE_LINE LIKE LINE OF RANGE_TAB.
DATA  : LIST_TAB TYPE TABLE OF ABAPLIST.
SELECTION-SCREEN : BEGIN OF BLOCK ABC WITH FRAME TITLE TLT.
SELECTION-SCREEN   SKIP 1.
*SELECT-OPTIONS     ARBPL FOR CRHD-ARBPL.
SELECT-OPTIONS     WERKS FOR CRHD-WERKS.
SELECT-OPTIONS     KAPAR FOR KAKO-KAPAR.
SELECT-OPTIONS     PLANR FOR KAKO-PLANR.
SELECTION-SCREEN   SKIP 2.
SELECTION-SCREEN : END OF BLOCK ABC.
START-OF-SELECTION.
*RSPAR_LINE-SELNAME = 'TRUST_ID'.
RSPAR_LINE-KIND    = 'P'.
RSPAR_LINE-LOW     = 'RPF1'."'VD06011013'.
APPEND RSPAR_LINE TO RSPAR_TAB.
CLEAR RSPAR_LINE.
RSPAR_LINE-SELNAME = 'YEAR'.
RSPAR_LINE-KIND    = 'P'.
RSPAR_LINE-LOW     = '2009'.
APPEND RSPAR_LINE TO RSPAR_TAB.
CLEAR RSPAR_LINE.
RSPAR_LINE-SELNAME = 'REPONAME'.
RSPAR_LINE-KIND    = 'P'.
RSPAR_LINE-LOW     = 'FORM3A'.
APPEND RSPAR_LINE TO RSPAR_TAB.
CLEAR RSPAR_LINE.
SUBMIT RCCRY000 EXPORTING LIST TO MEMORY
USING SELECTION-SCREEN '1000'
                WITH CRHARBPL-LOW EQ ARBPL
                 WITH CRHWERKS-LOW EQ WERKS
                 WITH KAKKAPAR-LOW EQ KAPAR
                 WITH KAKPLANR-LOW EQ PLANR
                  AND  RETURN.
  CALL FUNCTION 'LIST_FROM_MEMORY'
    TABLES
      LISTOBJECT = LIST_TAB
    EXCEPTIONS
      NOT_FOUND  = 1
      OTHERS     = 2.
  CALL FUNCTION 'LIST_TO_ASCI'
    EXPORTING
      LIST_INDEX         = -1
      WITH_LINE_BREAK    = ' '
    TABLES
      LISTASCI           = ITAB_TXTLINES
      LISTOBJECT         = LIST_TAB
    EXCEPTIONS
      EMPTY_LIST         = 1
      LIST_INDEX_INVALID = 2
      OTHERS             = 3.
  LOOP AT ITAB_TXTLINES .                                   "from 5.
    CLEAR WA_DATA.
    SPLIT ITAB_TXTLINES AT '|' INTO: WA_DATA-AA
                                     WA_DATA-LEVEL
                                     WA_DATA-ITEM
                                     WA_DATA-OBJ
                                     WA_DATA-OBJID
                                     WA_DATA-OBJDES
                                     WA_DATA-OVRFLW
                                     WA_DATA-QTY
                                     WA_DATA-UOM
                                     WA_DATA-ICT.
   IF ITAB_TXTLINE-SY-INDEX .
then
     DO 4 TIMES.
       REPLACE '.' IN WA_DATA-LEVEL WITH SPACE.
     ENDDO.
*DELETE ITAB_DATA-INDEX=1." WHERE WA_DATA = ITAB_DATA.
     CONDENSE WA_DATA-LEVEL.
     IF NOT WA_DATA-LEVEL IS INITIAL and not WA_DATA-LEVEL cp 'Emp*'.
        APPEND WA_DATA TO ITAB_DATA.
     ENDIF.
   ENDIF.
  ENDLOOP.
thanks.

Answer 1

Hi,
CM50 is generated from CM10 main program for parameter 'M'. It generates it on the runtime and exports values into memory. It's less likely you will be able to generate the whole set into a Z Program.
I didn't find a function module to do so. But, with your consultants help you can create your own function module that gives results similar to CM50, it's merely calculation of capacity of workcenters for a period using the sales order booked against the work centers in that period. If you try a bit you can create it.
Good luck.
Also remember, before you post a code, use  ...