subroutine calling for diff internal table n corr work area!!

Hi

i have to call a subroutine for diff internal table and their corr work area ...what shud b the syntax?

for example:

 IF not S_KUNNR[] IS INITIAL.
    IF NOT I_SALES_OPEN[] IS INITIAL.
      SELECT * FROM VBPA
      INTO TABLE I_SHIPTO_VBPA
      FOR ALL ENTRIES IN I_SALES_OPEN
      WHERE VBELN = I_SALES_OPEN-VBELN
      and POSNR = '00000'
      and PARVW = V_PARVW_SH.
    ENDIF.
    LOOP AT I_SHIPTO_VBPA INTO WA_VBPA.
      READ TABLE I_SALES_OPEN INTO WA_SALES_OPEN
                        WITH KEY VBELN =  WA_VBPA-VBELN
                                 POSNR =  '000000' BINARY SEARCH.
      IF SY-SUBRC NE 0.
        DELETE I_SALES_OPEN WHERE VBELN = WA_VBPA-VBELN AND
                                  POSNR = WA_VBPA-POSNR .

        MOVE WA_VBPA-KUNNR TO WA_SALES_OPEN-KUNNR.
        APPEND WA_SALES_OPEN TO I_SALES_OPEN.
        CLEAR WA_SALES_OPEN.
      ENDIF.
    ENDLOOP.
  ENDIF.

in the above eg , i_sales_open and wa_sales_open will vary based on the perform calling it..

pls provide the syntax

Regards

Gunjan