About script

Question

i am print the item details in main window. for this i can write the external subroutine using itcsy structure.
   but my problem is in which position i can call this subroutine in main window text editor.
(this script for rfq create , i was modify the Medruck layout set)

Answer 1

I am not sure about MEDRUCK ( I am a HR person).  But you can call this subroutine anywhere (any window) before you access the variable from the subroutine.
Please find the sample coding which I used in HR to get the benefit area passing Personnel number.
Calling the subroutine from the main window:
/: PERFORM GET_BENEFIT_AREA IN PROGRAM ZHBNF_BEN_ENROLL  
/: USING &P0001-PERNR&                                   
/: CHANGING &P_BAREA&&                                   
/: ENDPERFORM                                            
/: IF &P_BAREA& EQ 'H1'                                  
/: INCLUDE ZHEX-MACRO-H1LOGO OBJECT TEXT ID ST           
/: ELSEIF &P_BAREA& EQ 'H2'                              
/: INCLUDE ZHEX-MACRO-H2LOGO OBJECT TEXT ID ST           
/: ELSEIF &P_BAREA& EQ 'H3'                              
/: INCLUDE ZHEX-MACRO-H3LOGO OBJECT TEXT ID ST           
/: ELSEIF &P_BAREA& EQ 'U1'                              
/: INCLUDE ZHEX-MACRO-U1LOGO OBJECT TEXT ID ST           
/: ENDIF                                                 
Coding inthe external program:
*&      Form  get_benefit_area
      This subroutine is used to determine benefit area
FORM get_benefit_area TABLES intab STRUCTURE  itcsy
                             outtab STRUCTURE itcsy.
  DATA: l_pernr TYPE p0001-pernr,
        l_barea TYPE p0171-barea.
  READ TABLE intab WITH KEY 'P0001-PERNR'.
  CHECK sy-subrc = 0.
  l_pernr = intab-value.
  SELECT SINGLE barea INTO l_barea
                         FROM pa0171
                         WHERE pernr = l_pernr
                           AND begda <= sy-datum
                           AND endda >= sy-datum.
  READ TABLE outtab WITH KEY 'P_BAREA'.
  CHECK sy-subrc = 0.
  IF sy-subrc = 0.
    outtab-value+0(2) = l_barea.
    MODIFY outtab INDEX sy-tabix.
  ENDIF.
ENDFORM.                    "get_benefit_area