topic Re: help in perform tabls in Application Development and Automation Discussions

help in perform tabls

Former Member — Tue, 16 Oct 2007 17:20:06 GMT

hi,

i doing that perform and i wont to use table r_sel not only in the perform i try with perform tables but i have an erorr

this is my data and call perform



 DATA: BEGIN OF rtab ,
        sign(1)   TYPE c,
        option(2) TYPE c,
        low   TYPE datum,
        high  TYPE datum,
      END OF rtab .

 DATA: r_sel TYPE STANDARD TABLE  OF rtab.



  PERFORM define-periods USING date_from1 date_to1
                               date_from2  date_to2 TABLES r_sel.



"this is the form

*&---------------------------------------------------------------------*
*&      Form  define-periods
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_DATE_FROM1  text
*      -->P_DATE_TO1  text
*      -->P_DATE_FROM2  text
*      -->P_DATE_TO2  text
*      -->P_R_SEL  text
*----------------------------------------------------------------------*
FORM define-periods  USING    p_date_from1
                              p_date_to1
                              p_date_from2
                              p_date_to2
                     TABLES   p_r_sel .   "i think the problem is here i i try with structre rtab buti have eroor to 


  RANGES: r_per1 FOR sy-datum .
  RANGES: r_per2 FOR sy-datum .



  MOVE 'I' TO r_per1-sign .
  MOVE 'BT' TO r_per1-option .
  CONCATENATE p_date_from1 '01' INTO r_per1-low .
  IF p_date_to1 IS INITIAL .
    PERFORM last-day
       USING p_date_from1
       CHANGING r_per1-high .
  ELSE.
    PERFORM last-day
        USING p_date_to1
        CHANGING r_per2-high.

  ENDIF .
  APPEND r_per1 .

  MOVE 'I' TO r_per2-sign .
  MOVE 'BT' TO r_per2-option .
  CONCATENATE p_date_from2 '01' INTO r_per2-low .
  IF p_date_to2 IS INITIAL .
    PERFORM last-day
       USING p_date_from2
       CHANGING r_per2-high .
  ELSE.
    PERFORM last-day
      USING p_date_to2
      CHANGING r_per1-high.
  ENDIF .
  APPEND r_per2 .

"here i append r_sel 
  MOVE r_per1-sign TO r_sel-sign.
  MOVE r_per1-option TO r_sel-option .
  MOVE r_per1-low TO r_sel-low .
  MOVE r_per1-high TO r_sel-high .
  APPEND r_sel .
  MOVE r_per2-sign TO r_sel-sign .
  MOVE r_per2-option TO r_sel-option .
  MOVE r_per2-low TO r_sel-low .
  MOVE r_per2-high TO r_sel-high .
  APPEND r_sel .

ENDFORM.                    " define-periods

the first erorr is:

The field "R_SEL" is unknown, but there is a field with the similar name "P_R_SEL". "P_R_SEL".

when i change it to p_r_sel

i get erorr

The data object "P_R_SEL" has no structure and therefore no component called "SIGN". called "SIGN".

Regards

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:23:28 GMT

Hi,

Please try this.


 DATA: BEGIN OF rtab ,
        sign(1)   TYPE c,
        option(2) TYPE c,
        low   TYPE datum,
        high  TYPE datum,
      END OF rtab .
 
 DATA: r_sel TYPE STANDARD TABLE  OF rtab.
 
 DATA: wa_sel LIKE rtab.
 
 
 PERFORM define-periods TABLES r_sel
                        USING date_from1 date_to1
                              date_from2  date_to2. 
 
*&---------------------------------------------------------------------*
*&      Form  define-periods
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_DATE_FROM1  text
*      -->P_DATE_TO1  text
*      -->P_DATE_FROM2  text
*      -->P_DATE_TO2  text
*      -->P_R_SEL  text
*----------------------------------------------------------------------*
FORM define-periods  TABLES p_r_sel
                     USING  p_date_from1
                            p_date_to1
                            p_date_from2
                            p_date_to2. 
  RANGES: r_per1 FOR sy-datum .
  RANGES: r_per2 FOR sy-datum .
 
 
  MOVE 'I' TO r_per1-sign .
  MOVE 'BT' TO r_per1-option .
  CONCATENATE p_date_from1 '01' INTO r_per1-low .
  IF p_date_to1 IS INITIAL .
    PERFORM last-day
       USING p_date_from1
       CHANGING r_per1-high .
  ELSE.
    PERFORM last-day
        USING p_date_to1
        CHANGING r_per2-high.
 
  ENDIF .
  APPEND r_per1 .
 
  MOVE 'I' TO r_per2-sign .
  MOVE 'BT' TO r_per2-option .
  CONCATENATE p_date_from2 '01' INTO r_per2-low .
  IF p_date_to2 IS INITIAL .
    PERFORM last-day
       USING p_date_from2
       CHANGING r_per2-high .
  ELSE.
    PERFORM last-day
      USING p_date_to2
      CHANGING r_per1-high.
  ENDIF .
  APPEND r_per2 .
 
"here i append r_sel 
  MOVE r_per1-sign TO wa_sel-sign.
  MOVE r_per1-option TO wa_sel-option .
  MOVE r_per1-low TO wa_sel-low .
  MOVE r_per1-high TO wa_sel-high .
  APPEND wa_sel to p_r_sel .

  MOVE r_per2-sign TO wa_sel-sign .
  MOVE r_per2-option TO wa_sel-option .
  MOVE r_per2-low TO wa_sel-low .
  MOVE r_per2-high TO wa_sel-high .
  APPEND wa_sel to p_r_sel .
 
ENDFORM.                    " define-periods

Regards,

Ferry Lianto

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:26:03 GMT

Check this out -

I have modified your code -

PERFORM define-periods TABLES r_sel

uSING date_from1 date_to1

date_from2 date_to2 .

&----

*& Form define-periods

&----

text

----

-->P_DATE_FROM1 text
-->P_DATE_TO1 text
-->P_DATE_FROM2 text
-->P_DATE_TO2 text
-->P_R_SEL text

----

FORM define-periods TABLES P_R_SEL STRUCTURE rtab

USING P_DATE_FROM1

P_DATE_TO1

P_DATE_FROM2

P_DATE_TO2.

RANGES: r_per1 FOR sy-datum .
RANGES: r_per2 FOR sy-datum .

MOVE 'I' TO r_per1-sign .
MOVE 'BT' TO r_per1-option .
CONCATENATE p_date_from1 '01' INTO r_per1-low .
IF p_date_to1 IS INITIAL .
PERFORM last-day
USING p_date_from1
CHANGING r_per1-high .
ELSE.
PERFORM last-day
USING p_date_to1
CHANGING r_per2-high.

ENDIF .
APPEND r_per1 .

ENDFORM. " define-periods

Hope this helps. Check the sequence of TABLES and USING.

ashish

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:27:41 GMT

hi ferry

thankes for your replay

i cange it but i have erorr

The data object "R_SEL" has no structure and therefore no component

called "SIGN". called "SIGN".

Regards

Re: help in perform tabls

h_senden2 — Tue, 16 Oct 2007 17:28:03 GMT

Hi,

you can use the TABLES addition in the FORM definition, but what i usually do is define a table type and add it to the CHANGING parameters.

FORM just_do_it USING a type c

CHANGING pi_tt type tt_table.

where tt_table is a table type.

regards,

Hans

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:32:14 GMT

hi ashish

thankes

i try it but i have the same erorr

regards

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:32:21 GMT

You need to declare workarea explicitly for R_SEL.

And use this while inserting data to P_R_SEL.

DATA: r_sel TYPE STANDARD TABLE OF rtab,

wa_sel type rtab.

Later in FORM routine code -

append WA_SEL tp P_R_SEL.

This should solve your problem.

ashish

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:37:06 GMT

hi ashish

i try it but i have the erorr here

MOVE r_per1-sign TO r_sel-sign.

MOVE r_per1-option TO r_sel-option .

MOVE r_per1-low TO r_sel-low .

MOVE r_per1-high TO r_sel-high .

APPEND r_sel .

MOVE r_per2-sign TO r_sel-sign .

MOVE r_per2-option TO r_sel-option .

MOVE r_per2-low TO r_sel-low .

MOVE r_per2-high TO r_sel-high .

APPEND r_sel .

the erorr:

The field "R_SEL" is unknown, but there is a field with the similar name "P_R_SEL". "P_R_SEL".

and when i change it to

p_r_sel

i get this erorr

name "P_R_SEL". "P_R_SEL".

The data object "P_R_SEL" does not have a component called "SIGN".

Regards

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:39:27 GMT

Hi,

Please try this again.


 DATA: BEGIN OF rtab ,
        sign(1)   TYPE c,
        option(2) TYPE c,
        low   TYPE datum,
        high  TYPE datum,
      END OF rtab .
 
 DATA: r_sel TYPE STANDARD TABLE  OF rtab.
 
 DATA: wa_sel LIKE rtab.                "Add here
 
 
 PERFORM define-periods TABLES r_sel    "Change here
                        USING date_from1 date_to1
                              date_from2  date_to2. 
 
*&---------------------------------------------------------------------*
*&      Form  define-periods
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_DATE_FROM1  text
*      -->P_DATE_TO1  text
*      -->P_DATE_FROM2  text
*      -->P_DATE_TO2  text
*      -->P_R_SEL  text
*----------------------------------------------------------------------*
FORM define-periods  TABLES p_r_sel       "Change here
                     USING  p_date_from1
                            p_date_to1
                            p_date_from2
                            p_date_to2. 

  RANGES: r_per1 FOR sy-datum .
  RANGES: r_per2 FOR sy-datum .
 
 
  MOVE 'I' TO r_per1-sign .
  MOVE 'BT' TO r_per1-option .
  CONCATENATE p_date_from1 '01' INTO r_per1-low .
  IF p_date_to1 IS INITIAL .
    PERFORM last-day
       USING p_date_from1
       CHANGING r_per1-high .
  ELSE.
    PERFORM last-day
        USING p_date_to1
        CHANGING r_per2-high.
 
  ENDIF .
  APPEND r_per1 .
 
  MOVE 'I' TO r_per2-sign .
  MOVE 'BT' TO r_per2-option .
  CONCATENATE p_date_from2 '01' INTO r_per2-low .
  IF p_date_to2 IS INITIAL .
    PERFORM last-day
       USING p_date_from2
       CHANGING r_per2-high .
  ELSE.
    PERFORM last-day
      USING p_date_to2
      CHANGING r_per1-high.
  ENDIF .
  APPEND r_per2 .
 
  MOVE r_per1-sign TO wa_sel-sign.          "Change here
  MOVE r_per1-option TO wa_sel-option.      "Change here 
  MOVE r_per1-low TO wa_sel-low.            "Change here 
  MOVE r_per1-high TO wa_sel-high.          "Change here
  APPEND wa_sel to p_r_sel .                "Change here
  CLEAR wa_sel.                             "Add here 

  MOVE r_per2-sign TO wa_sel-sign .         "Change here
  MOVE r_per2-option TO wa_sel-option.      "Change here
  MOVE r_per2-low TO wa_sel-low.            "Change here
  MOVE r_per2-high TO wa_sel-high .         "Change here
  APPEND wa_sel to p_r_sel.                 "Change here
  CLEAR wa_sel.                             "Add here
 
ENDFORM.                    " define-periods

Regards,

Ferry Lianto

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:41:26 GMT

You should do this.

Declare a work area in your data declaration -

data: wa_sel type rtab.

In your FORM code, you need to assign values to this work area.

CLEAR WA_SEL.

MOVE r_per1-sign TO WA_sel-sign.

MOVE r_per1-option TO WA_sel-option .

MOVE r_per1-low TO WA_sel-low .

MOVE r_per1-high TO WA_sel-high .

APPEND WA_sel TO P_R_SEL.

MOVE r_per2-sign TO AW_sel-sign .

MOVE r_per2-option TO WA_sel-option .

MOVE r_per2-low TO WA_sel-low .

MOVE r_per2-high TO WA_sel-high .

APPEND WA_sel TO P_R_SEL.

This should help you out.

REMEMBER, R_SEL is named as P_R_SEL in the FORM so you need to use P_R_SEL.

ashish

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:43:32 GMT

hi ferry

thankes

i try exactly like u write and i have this erorr

Field "WA_SEL-SIGN" is unknown. It is neither in one of the specified tables nor defined by a "DATA" statement.

maybe becouse i do that in FM

i have to declare the data in other place

regards

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:47:51 GMT

Hi,

Did you declare this line? Please check my codes.


DATA: wa_sel LIKE rtab.                "Add here

Regards,

Ferry Lianto

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:50:14 GMT

hi ferry

yes i do that this is my new code


 DATA: BEGIN OF rtab ,
        sign(1)   TYPE c,
        option(2) TYPE c,
        low   TYPE datum,
        high  TYPE datum,
      END OF rtab .

 DATA: r_sel TYPE  TABLE  OF rtab,
       wa_sel LIKE rtab.



  PERFORM define-period TABLES r_sel USING date_from1 date_to1
                                           date_from2 date_to2 .


*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_R_SEL  text
*      -->P_DATE_FROM1  text
*      -->P_DATE_TO1  text
*      -->P_DATE_FROM2  text
*      -->P_DATE_TO2  text
*----------------------------------------------------------------------*
FORM define-period  TABLES   p_r_sel STRUCTURE rtab
                    USING    p_date_from1
                             p_date_to1
                             p_date_from2
                             p_date_to2.

  RANGES: r_per1 FOR sy-datum .
  RANGES: r_per2 FOR sy-datum .



  MOVE 'I' TO r_per1-sign .
  MOVE 'BT' TO r_per1-option .
  CONCATENATE p_date_from1 '01' INTO r_per1-low .
  IF p_date_to1 IS INITIAL .
    PERFORM last-day
       USING p_date_from1
       CHANGING r_per1-high .
  ELSE.
    PERFORM last-day
        USING p_date_to1
        CHANGING r_per2-high.

  ENDIF .
  APPEND r_per1 .

  MOVE 'I' TO r_per2-sign .
  MOVE 'BT' TO r_per2-option .
  CONCATENATE p_date_from2 '01' INTO r_per2-low .
  IF p_date_to2 IS INITIAL .
    PERFORM last-day
       USING p_date_from2
       CHANGING r_per2-high .
  ELSE.
    PERFORM last-day
      USING p_date_to2
      CHANGING r_per1-high.
  ENDIF .
  APPEND r_per2 .

  MOVE: r_per1-sign TO wa_sel-sign,
        r_per1-option TO wa_sel-option ,
        r_per1-low TO wa_sel-low ,
        r_per1-high TO wa_sel-high .
  APPEND wa_sel TO p_r_sel .

  MOVE r_per2-sign TO wa_sel-sign .
  MOVE r_per2-option TO wa_sel-option .
  MOVE r_per2-low TO wa_sel-low .
  MOVE r_per2-high TO wa_sel-high .
  APPEND wa_sel TO p_r_sel .

Best regards

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:54:15 GMT

So after this change, are you still getting an error?

If yes, what is the error?

ashish

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:55:49 GMT

hi ashish

thankes for your time

i get this erorr:

Field "WA_SEL-SIGN" is unknown. It is neither in one of the specified tables nor defined by a "DATA" statement.

regards

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:56:37 GMT

Hi,

Please change to this.


TYPES: BEGIN OF rtab ,
        sign(1)   TYPE c,
        option(2) TYPE c,
        low   TYPE datum,
        high  TYPE datum,
      END OF rtab .
 
DATA: r_sel TYPE  TABLE  OF rtab,
      wa_sel LIKE line of r_sel.
 ...

Regards,

Ferry Lianto

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:58:12 GMT

Are you sure - the code passes a syntax check.

Rob

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:58:29 GMT

hi ferry

i try it myself but its not working.

maybe the erorr is becouse i use fm and i do that perform in top include?

Regards

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 17:59:34 GMT

Do one thing. Declare WA_SEL in your FORM.

As you are using this only in your FORM, let it be declared as Local work area and try again.

I check my program but it is not giving an error.

ashish

Re: help in perform tabls

Former Member — Tue, 16 Oct 2007 18:01:41 GMT

Hi,

It is weird ... it is fine in my program.

Try to declare in top include. Then check and generate from main program.

Regards,

Ferry Lianto