Subroutines in BSP

Question

Hi all,
I know that we need to place the routines in a include program and use it in BSP.
But i am not quite sure where to call the include program.
Below is my piece of code.
****************start of code***********************
LOOP AT gt_result INTO gs_result.
        IF sy-tabix EQ 1.
          CASE gs_result-value.
            WHEN 1.
              gt_output = gt_output1.
            WHEN 2.
              gt_output = gt_output2.
WHEN OTHERS.
do nothing.
          ENDCASE.
       endif.
        ELSE.
          CASE gs_result-value.
            WHEN 1.
              PERFORM compare TABLES gt_output
                                     gt_output1.
            WHEN 2.
              PERFORM compare TABLES gt_output
                                     gt_output2.
        ENDCASE.
        ENDIF.
      ENDLOOP.
      ***********************end of code**********************************
With the above code ,its giving me error " missing 'ENDMETHOD' ".
On searching the forum i learnt that below is the logic to call the include program.
DATA: progname(12) TYPE c VALUE  'ZINCLUDE' .
PERFORM test_include IN PROGRAM (progname) IF FOUND.
So, I created the include program "ZINCLUDE" for that perform "compare"
But I am not quite sure where to implement the above logic.
Please do throw some light on this.
Thanks & Regards,
Bhargav.

Answer 1

Hi Bhargav,
You are right, a sub-routine can be called that way. But please find the similar thread discussed in the forums...
Re: Subroutines in BSP ??????
As it is discussed in the above thread, in order to execute the sub-routine successfully, it was actually written in a ABAP report and not in the include.
The answer to the question where it should be implemented/called depends on your requirement/design/aim of the program.
You can just use this report, in order to execute the sub-routine where ever you want. It can be included any where in BSP like,
     - Layout
     - Event Handlers
For example, please find my code below, which uses a simple subroutine in the layout of BSP.
Page with flow logic:
Layout code:
<%@page language="ABAP" %>
<%
  data: a type int2 value 1,
  b type int2 value 2,
  c type int2.
  DATA: progname(4) TYPE c VALUE 'ZADD' .
  PERFORM add IN PROGRAM (progname) using a b changing c  IF FOUND.
%>
<%= c %>
Report code.
report zadd.
FORM add USING a b
         CHANGING c.
  c = a + b.
ENDFORM.
Hope it helps!
Regards,
Maheswaran