Please:How to repeat the return values multiple times in sapscript

Question

Currently my subroutine is returning a value called TOQBSSHB single time and i am working with standard layout called RFFOUS_C.Please can anybody tell me if i want to show multiple times TOQBSSHB for different values of VBLNR .Is it possible if it is what are changes i should make on layout and subroutine.
PERFORM EXTRACT IN PROGRAM Y_MIT_TEST2
USING &REGUH-VBLNR&
USING &REGUH-NAME1&
CHANGING&TOTQBSHB&
ENDPERFORM
FORM EXTRACT TABLES IN_PAR STRUCTURE ITCSY OUT_PAR STRUCTURE ITCSY.
TABLES : REGUP,BSEG,REGUH,REGUD.
  DATA : BILL_NO LIKE REGUH-VBLNR.
  DATA : ITAB LIKE REGUP OCCURS 0 WITH HEADER LINE.
  DATA : JTAB LIKE REGUP OCCURS 0 WITH HEADER LINE.
  DATA : BELNR1 LIKE ITAB-BELNR.
  DATA : QBSHB1 LIKE REGUD-SWNES.
  DATA : QBSHB2 LIKE REGUD-SWNES.
  DATA : TOTOQBSHB LIKE REGUD-SWNES.
  READ TABLE IN_PAR WITH KEY NAME = 'REGUH-VBLNR'.
  IF SY-SUBRC = 0.
   BILL_NO = IN_PAR-VALUE.
  ENDIF.
SELECT * FROM REGUP INTO CORRESPONDING FIELDS OF TABLE ITAB WHERE VBLNR
= BILL_NO.
  READ TABLE ITAB INDEX 1.
  IF SY-SUBRC = 0.
  MOVE ITAB-QBSHB TO QBSHB1.
  MOVE ITAB-BELNR TO BELNR1.
  ENDIF.
SELECT * FROM BSEG INTO CORRESPONDING FIELDS OF TABLE JTAB WHERE BELNR
= BELNR1.
  LOOP AT JTAB.
  READ TABLE JTAB INDEX SY-TABIX.
  IF SY-SUBRC = 0.
  QBSHB2 = QBSHB2 + JTAB-QBSHB.
  ENDIF.
  ENDLOOP.
  TOTOQBSHB = QBSHB1 + QBSHB2.
  READ TABLE OUT_PAR WITH KEY NAME = 'TOTQBSHB'.
  IF SY-SUBRC = 0.
  MOVE TOTOQBSHB TO OUT_PAR-VALUE.
  MODIFY OUT_PAR INDEX SY-TABIX.
  ENDIF.
ENDFORM.

Answer 1

I said :
- A) you should copy the main program without to copy
     includes, so when the systems ask you which objects
     you want to copy: check all excluding INCLUDES.
So you'll have a new program which uses the same includes of the standard program.
- B) in your z-program you find the point where you should insert your code: you'll have two cases:
- you should insert code in a point that is writen in z-program;
- you should insert code in a point (for example a form) that isn't write in z-program, but in a standard include your z-program use.
In first case you only write your code, in second one before you should copy the include, than insert it in your z-program and so insert your code in the include.
For example:
- A) Copy RFFOUS_C in ZRFFOUS_C
- B) I should change the code of routine  
     SCHECKDATEN_EINGABE, it's defined in RFFORI01, so I copy it in ZRFFORI01, insert my code in it.
- C) found where my z-program call include RFFORI01:
subroutines for check print and prenumbered checks                  *
  INCLUDE RFFORI01.
now replace this with the call to my new include:
  INCLUDE RFFORI01.
  INCLUDE ZRFFORI01.
If you do in this way you copy only includes where you should change the code.
Message was edited by: max bianchi
Message was edited by: max bianchi