problem while calling subroutines in ECC 6.0 version

[Former Member]

Hi, here is some problem can you please try to solve.....

I have created three forms TOP_OF_PAGE,DOC_DISPLAY,END_OF_LIST and i have called them by passing to wa_events-form. Up to this every thing is fine, the problem is i am working witth ECC 6.0 so while doing Extended program check through SLIN it is giving some waring like

"FORM DO_DISPLAY_AT_USER_COMMAND not called directly

(check dynamic PERFORMs!!) " for all the three forms which i have created...Please help me out to over come this warning... For ur reference i am giving some code as mentioned below.......

LOOP AT i_events into wa_events.

CASE wa_events-name.

WHEN slis_ev_top_of_page.

wa_events-form = 'TOP_OF_PAGE'.

WHEN slis_ev_end_of_list.

wa_events-form = 'END_OF_LIST'.

WHEN slis_ev_user_command.

wa_events-form = 'DOC_DISPLAY_AT_USER_COMMAND'.

ENDCASE.

MODIFY i_events from wa_events.

ENDLOOP.

ENDFORM. " INIT_ALV_EVENTS

&----

---

*& Form DOC_DISPLAY

&----

---

FORM doc_display_at_user_command USING p_ucomm LIKE syst-ucomm

p_selfield TYPE slis_selfield.

CASE p_ucomm.

WHEN '&IC1'.

CLEAR i_out.

READ TABLE i_out into wa1_out INDEX p_selfield-tabindex.

IF sy-subrc EQ 0 .

IF wa1_out-belnr EQ space.

MESSAGE e016(kb).

ELSE.

SET PARAMETER ID 'BLN' FIELD wa1_out-belnr.

SET PARAMETER ID 'BUK' FIELD wa1_out-bukrs.

SET PARAMETER ID 'GJR' FIELD wa1_out-gjahr.

CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.

ENDIF.

ENDIF.

ENDCASE.

ENDFORM. "DOC_DISPLAY_AT_USER_COMMAND

----

---

• FORM TOP_OF_PAGE *

----

---

• ........ *

----

---

FORM top_of_page.

PERFORM std_header in program zstandrt

USING sy-cprog sy-title 'L' '1' ' ' 'confidential' 'restricted'.

ENDFORM. "TOP_OF_PAGE

----

---

• FORM END_OF_LIST *

----

---

• ........ *

----

---

FORM end_of_list.

• Begin of V04 comment >***********************************

• IF W_BDC_SESSION EQ 'X'.

• SKIP 2.

• IF P_NOUPD EQ 'X'.

• FORMAT COLOR COL_POSITIVE.

• WRITE :/20 ' Created BDC session : '(O02) , P_GROUP.

• WRITE :/25 ' Execute Using tcode SM35 ....'(O03).

• ELSE.

• FORMAT COLOR COL_NEGATIVE.

• WRITE :/20 ' Created BDC session For Error Transactions'(O04) ,

• P_GROUP.

• WRITE :/25 ' Execute Using tcode SM35 ....'(O03).

• ENDIF.

• FORMAT COLOR COL_NORMAL.

• ENDIF.

• SKIP 2.

• End of V04 comment >************************************

WRITE :/50 ' *** END OF REPORT *** '(o01).

PERFORM print_selections.

ENDFORM. "END_OF_LIST

Thanks & Regards.

Laxman.P

B'lore.

[Former Member]

Hi

Are you getting the output or not?

You can just ignore this warning in EPC

as this FORM USER_COMMAND is always called indirectly only

But check the Output and see?

<b>Reward points for useful Answers</b>

Regards

Anji