RFC call results in StORAGE_PARAM_WRONG_SET

Question

I'm in trouble with a RFC call, the process is as following: SAP system A calls a report. This report selects FI documents via LDB SDF. After user selects one or more documents from the list I call a RFC to read the payroll posting results from system B. The call of the RFC takes place for each FI document separatly what means user selects e.g. 10 FI documents, so I have 10 RFC calls with one result list. After each RFC call I add the result table of the RFC to the output table within the report. Before calling the RFC I of course clear all relevant tables again and additionaly I also use the 'FREE' statement within the RFC to set free all the memory, so there is no data stored in internal tables. But when the user selects a great no. of FI documents to read the payroll postings sometimes the RFC cancels in system B telling me that the storage parameters were set wrong. Calling the RFC step by step by selecting the FI document in single mode from the list I don't receive this dump. Do you have an idea what to do to avoid the dump? One problem: I don't have access to system B to test there, I only can do testing in system A and therefore I have no possibility to debugg this.
This is the code of the RFC module:
FUNCTION y_rfc_read_payroll_postings.
*"*"Local interface:
*"  IMPORTING
*"     VALUE(I_AWKEY) TYPE  AWKEY
*"     VALUE(I_CHECKNO) TYPE  XFELD
*"     VALUE(I_TAX) TYPE  XFELD
*"  EXPORTING
*"     VALUE(E_PPDHD) TYPE  PPDHD
*"  TABLES
*"      T_PPDIT STRUCTURE  PPDIT
*"      T_PPOIX STRUCTURE  PPOIX
*"      T_PPDIX STRUCTURE  PPDIX
*"      T_PAYR STRUCTURE  PAYR OPTIONAL
*"      T_HRPAY STRUCTURE  PC209 OPTIONAL
*"      T_REGUTA STRUCTURE  REGUTA OPTIONAL
*"      T_VALUES STRUCTURE  YSHR_RFC_PAYROLL_POSTING OPTIONAL
*"      T_CSKA STRUCTURE  CSKA
*"      RETURN STRUCTURE  BAPIRET2
* local data
  TYPE-POOLS: pptgs.
  TYPES: BEGIN OF type_helpval,
         pernr TYPE p_pernr,
         lgart TYPE lgart,
         rel   TYPE xfeld,
        END OF type_helpval.
  TYPES: BEGIN OF type_cluster,
         pernr TYPE p_pernr,
         seqno TYPE cdseq,
         abrj TYPE pnppabrj,
         abrp TYPE pnppabrp,
         actual TYPE srtza,
         betrg TYPE ppoix-betrg,
         waers TYPE ppoix-waers,
         END OF type_cluster.
  DATA: BEGIN OF lt_ppoix_key OCCURS 0,
         pernr    LIKE ppoix-pernr,
         seqno    LIKE ppoix-seqno,
         actsign  LIKE ppoix-actsign,
         runid    LIKE ppoix-runid,
         postnum  LIKE ppoix-postnum,
        END OF lt_ppoix_key.
  FIELD-SYMBOLS: <payroll> TYPE yshr_rfc_payroll_posting.
  DATA ht_ppoix TYPE TABLE OF ppoix.
  DATA productive_runs LIKE hrpp_pernr_runtab OCCURS 0 WITH HEADER LINE.
  DATA t_rgdir TYPE TABLE OF pc261.
  DATA wa_rgdir TYPE pc261.
  DATA t_helpval TYPE TABLE OF type_helpval.
  DATA t_cluster TYPE TABLE OF type_cluster.
  DATA wa_helpval TYPE type_helpval.
  DATA wa_cluster TYPE type_cluster.
  DATA h_molga TYPE molga.
  DATA h_ltext TYPE t5utz-ltext.
  DATA wa_t512w TYPE t512w.
  DATA wa_return TYPE bapiret2.
  DATA par1 TYPE syst-msgv1.
  DATA par2 TYPE syst-msgv2.
  DATA par3 TYPE syst-msgv3.
  DATA wa_ppoix TYPE ppoix.
  FIELD-SYMBOLS: <wa_ppdit> TYPE ppdit.
  DATA wa_ppdix TYPE ppdix.
  DATA result_tab_us TYPE payus_result.
  DATA result_tab_in TYPE payin_result.
  DATA t_bt TYPE hrpay99_bt.
  DATA t_rt TYPE hrpay99_rt.
  DATA wa_bt TYPE pc209.
  DATA wa_rt TYPE pc207.
  DATA h_time(6) TYPE c.
  DATA t_inter TYPE TABLE OF pay99_international WITH HEADER LINE.
  DATA t_tax TYPE hrpayus_tax.
  DATA wa_tax TYPE pc22t.
  DATA wa_payr TYPE payr.
  DATA wa_reguta TYPE reguta.
  DATA wa_payroll TYPE yshr_rfc_payroll_posting.
  DATA t_ppopx TYPE TABLE OF ppopx.
  DATA wa_ppopx TYPE ppopx.
  DATA wa_t001 TYPE t001.
  FREE: t_ppdit, t_ppoix, t_ppdix, t_payr, t_hrpay, t_reguta,
        t_values, t_helpval, t_cluster, t_ppopx.
* read general information
  SELECT SINGLE * FROM ppdhd INTO e_ppdhd WHERE
                       docnum EQ i_awkey.
  CASE syst-subrc.
* everthing ok, continue
    WHEN 0.
* get the company code and assign US flag
      SELECT SINGLE * FROM t001 INTO wa_t001 WHERE
                                bukrs EQ e_ppdhd-bukrs.
* exit and set err. mess.
    WHEN OTHERS.
      CALL FUNCTION 'BALW_BAPIRETURN_GET2'
        EXPORTING
          type             = 'E'
          cl               = 'HR3PRNA'
          number           = '704'
*         PAR1             = ' '
*         PAR2             = ' '
*         PAR3             = ' '
*         PAR4             = ' '
*         LOG_NO           = ' '
*         LOG_MSG_NO       = ' '
*         PARAMETER        = ' '
*         ROW              = 0
*         FIELD            = ' '
        IMPORTING
          return           = wa_return
      wa_return-field = 'PPDHD'.
      APPEND wa_return TO return.
      EXIT.
  ENDCASE.
* read table PPDIT
  SELECT  * FROM  ppdit INTO TABLE t_ppdit
      FOR ALL ENTRIES IN t_cska
      WHERE  docnum  = i_awkey AND
             hkont   = t_cska-kstar.
  CASE syst-subrc.
* everthing ok, continue
    WHEN 0.
* exit and set err. mess.
    WHEN OTHERS.
      par1 = 'PPDIT'.
      par2 = 'document'.
      par3 = i_awkey.
      CALL FUNCTION 'BALW_BAPIRETURN_GET2'
        EXPORTING
          type             = 'E'
          cl               = '5G'
          number           = '58'
          par1             = par1
          par2             = par2
          par3             = par3
*         PAR4             = ' '
*         LOG_NO           = ' '
*         LOG_MSG_NO       = ' '
*         PARAMETER        = ' '
*         ROW              = 0
*         FIELD            = ' '
        IMPORTING
          return           = wa_return
      wa_return-field = 'PPDIT'.
      APPEND wa_return TO return.
      EXIT.
  ENDCASE.
* read table PPDIX
  SELECT * FROM ppdix INTO TABLE t_ppdix
      FOR ALL ENTRIES IN t_ppdit
      WHERE evtyp  EQ e_ppdhd-evtyp AND
            runid  EQ e_ppdhd-runid AND
            docnum EQ e_ppdhd-docnum AND
            doclin =  t_ppdit-doclin.
  CASE syst-subrc.
* everthing ok, continue
    WHEN 0.
* exit and set err. mess.
    WHEN OTHERS.
      par1 = 'PPDIX'.
      par2 = 'runid'.
      par3 = e_ppdhd-runid.
      CALL FUNCTION 'BALW_BAPIRETURN_GET2'
        EXPORTING
          type             = 'E'
          cl               = '5G'
          number           = '58'
          par1             = par1
          par2             = par2
          par3             = par3
*         PAR4             = ' '
*         LOG_NO           = ' '
*         LOG_MSG_NO       = ' '
*         PARAMETER        = ' '
*         ROW              = 0
*         FIELD            = ' '
        IMPORTING
          return           = wa_return
      wa_return-field = 'PPDIX'.
      APPEND wa_return TO return.
      EXIT.
  ENDCASE.
* read detail values on accounting level
  SELECT * FROM ppoix INTO TABLE t_ppoix
                      FOR ALL ENTRIES IN t_ppdix WHERE
                           runid EQ t_ppdix-runid AND
                           tslin EQ t_ppdix-linum.
* read reposted documents from ppopx
  SELECT * FROM ppopx INTO TABLE t_ppopx
                      FOR ALL ENTRIES IN t_ppdix WHERE
                           runid EQ t_ppdix-runid AND
                           tslin EQ t_ppdix-linum.
  IF syst-subrc EQ 0.
* append corresponding lines to T_ppoix
    LOOP AT t_ppopx INTO wa_ppopx.
      MOVE-CORRESPONDING wa_ppopx TO productive_runs.
      CLEAR productive_runs-runid.
      COLLECT productive_runs.
    ENDLOOP.
* get run table
    CALL FUNCTION 'HR_EVAL_PROD_A_RUN_GET_TABLE'
      TABLES
        result_table = productive_runs.
    LOOP AT productive_runs.
      IF productive_runs-runid IS INITIAL.
        DELETE productive_runs.
      ENDIF.
    ENDLOOP.
* fill ppoix-keys for needed ppoix
    LOOP AT productive_runs.
      LOOP AT t_ppopx INTO wa_ppopx.
        IF wa_ppopx-pernr EQ productive_runs-pernr AND
           wa_ppopx-seqno EQ productive_runs-seqno.
* built key
          CLEAR lt_ppoix_key.
          MOVE-CORRESPONDING productive_runs TO lt_ppoix_key.
          lt_ppoix_key-postnum = wa_ppopx-postnum.
          lt_ppoix_key-actsign = 'A'.
          COLLECT lt_ppoix_key.
        ENDIF.
      ENDLOOP.
    ENDLOOP.
* any values to append?
    READ TABLE lt_ppoix_key INDEX 1.
    IF syst-subrc EQ 0.
      SELECT * FROM ppoix INTO TABLE ht_ppoix
               FOR ALL ENTRIES IN lt_ppoix_key
                               WHERE pernr = lt_ppoix_key-pernr
                               AND   seqno = lt_ppoix_key-seqno
                               AND actsign = 'A'
                               AND   runid = lt_ppoix_key-runid
                               AND   postnum = lt_ppoix_key-postnum.
      IF syst-subrc EQ 0.
        LOOP AT t_ppopx INTO wa_ppopx.
          LOOP AT ht_ppoix INTO wa_ppoix WHERE
                  pernr EQ wa_ppopx-pernr AND
                  seqno EQ wa_ppopx-seqno AND
                  postnum EQ wa_ppopx-postnum.
            MOVE-CORRESPONDING wa_ppopx TO wa_ppoix.
            IF wa_ppoix-actsign <> 'A'.
              wa_ppoix-betrg = - wa_ppoix-betrg.
              wa_ppoix-anzhl = - wa_ppoix-anzhl.
            ENDIF.
            APPEND wa_ppoix TO t_ppoix.
            DELETE ht_ppoix.
          ENDLOOP.
        ENDLOOP.
      ENDIF.
    ENDIF.
  ENDIF.
* check for any entries in table T_PPOIX
  READ TABLE t_ppoix INTO wa_ppoix INDEX 1.
  CASE syst-subrc.
* everthing ok, continue
    WHEN 0.
* exit and set err. mess.
    WHEN OTHERS.
      par1 = 'PPOIX'.
      par2 = 'runid'.
      par3 = e_ppdhd-runid.
      CALL FUNCTION 'BALW_BAPIRETURN_GET2'
        EXPORTING
          type             = 'E'
          cl               = '5G'
          number           = '58'
          par1             = par1
          par2             = par2
          par3             = par3
*         PAR4             = ' '
*         LOG_NO           = ' '
*         LOG_MSG_NO       = ' '
*         PARAMETER        = ' '
*         ROW              = 0
*         FIELD            = ' '
        IMPORTING
          return           = wa_return
      wa_return-field = 'PPOIX'.
      APPEND wa_return TO return.
      EXIT.
  ENDCASE.
  CHECK i_checkno EQ 'X' OR
        i_tax     EQ 'X'.
  CLEAR t_values.
* read payroll results, determine values
  LOOP AT t_ppdit ASSIGNING <wa_ppdit>.
    LOOP AT t_ppdix INTO wa_ppdix WHERE
            evtyp = e_ppdhd-evtyp AND
            runid = e_ppdhd-runid AND
            doclin = <wa_ppdit>-doclin.
      LOOP AT t_ppoix INTO wa_ppoix WHERE
                   runid EQ e_ppdhd-runid AND
                   tslin EQ wa_ppdix-linum.
* append anywhere for checkno
        IF i_checkno EQ 'X'.
          wa_cluster-pernr = wa_ppoix-pernr.
          wa_cluster-seqno = wa_ppoix-seqno.
          wa_cluster-abrj = <wa_ppdit>-abper+0(4).
          wa_cluster-abrp = <wa_ppdit>-abper+4(2).
          wa_cluster-actual = wa_ppoix-actsign.
          wa_cluster-betrg = wa_ppoix-betrg.
          wa_cluster-waers = wa_ppoix-waers.
          IF <wa_ppdit>-abper IS INITIAL.
* write BONDT into field ZUONR
            CALL FUNCTION 'CU_READ_RGDIR'
              EXPORTING
                persnr   = wa_ppoix-pernr
              TABLES
                in_rgdir = t_rgdir.
            READ TABLE t_rgdir INTO wa_rgdir WITH KEY
                             seqnr = wa_ppoix-seqno.
            IF syst-subrc EQ 0.
              <wa_ppdit>-zuonr+0(10) = wa_rgdir-bondt.
            ENDIF.
          ENDIF.
          APPEND wa_cluster TO t_cluster.
        ENDIF.
        IF i_tax EQ 'X'.
* check if LGART is relevant
          READ TABLE t_helpval INTO wa_helpval WITH KEY
                             pernr = wa_ppoix-pernr
                             lgart = wa_ppoix-lgart.
          CASE syst-subrc.
            WHEN 0.
* relevant or not
              CASE wa_helpval-rel.
                WHEN 'X'.
                  wa_cluster-pernr = wa_ppoix-pernr.
                  wa_cluster-seqno = wa_ppoix-seqno.
                  wa_cluster-abrj = <wa_ppdit>-abper+0(4).
                  wa_cluster-abrp = <wa_ppdit>-abper+4(2).
                  wa_cluster-actual = wa_ppoix-actsign.
                  wa_cluster-betrg = wa_ppoix-betrg.
                  wa_cluster-waers = wa_ppoix-waers.
                  IF <wa_ppdit>-abper IS INITIAL.
                    CALL FUNCTION 'CU_READ_RGDIR'
                      EXPORTING
                        persnr   = wa_ppoix-pernr
                      TABLES
                        in_rgdir = t_rgdir.
                    READ TABLE t_rgdir INTO wa_rgdir WITH KEY
                                     seqnr = wa_ppoix-seqno.
                    IF syst-subrc EQ 0.
                      <wa_ppdit>-zuonr+0(10) = wa_rgdir-bondt.
                    ENDIF.
                  ENDIF.
                  APPEND wa_cluster TO t_cluster.
* save values
                  MOVE-CORRESPONDING wa_ppoix TO wa_payroll.
                  wa_payroll-betrg = ABS( wa_payroll-betrg ).
                  APPEND wa_payroll TO t_values.
                WHEN ' '.
                  CONTINUE.
              ENDCASE.
            WHEN OTHERS.
* determine values
              CALL FUNCTION 'HR_COUNTRYGROUPING_GET'
                EXPORTING
                  pernr           = wa_ppoix-pernr
*              TCLAS           = 'A'
                  begda           = e_ppdhd-bldat
                  endda           = e_ppdhd-bldat
*              WERKS           =
                IMPORTING
                  molga           = h_molga
                EXCEPTIONS
                  not_found       = 1
                  OTHERS          = 2
              IF sy-subrc NE 0.
                WRITE wa_ppoix-pernr TO par1.
                CALL FUNCTION 'BALW_BAPIRETURN_GET2'
                  EXPORTING
                    type   = 'E'
                    cl     = 'HRPAYBR94'
                    number = '278'
                    par1   = par1
                  IMPORTING
                    return = wa_return.
                wa_return-field = wa_ppoix-pernr.
                APPEND wa_return TO return.
                CONTINUE.
              ENDIF.
              SELECT * FROM  t512w INTO wa_t512w
                     WHERE  molga  = h_molga
                     AND    lgart  = wa_ppoix-lgart
                     AND    endda  GE e_ppdhd-bldat
                     AND    begda  LE e_ppdhd-bldat.
                EXIT.
              ENDSELECT.
              IF syst-subrc EQ 0.
                IF wa_t512w-vklas+77(1) = '2'.
                  wa_helpval-pernr = wa_ppoix-pernr.
                  wa_helpval-lgart = wa_ppoix-lgart.
                  wa_helpval-rel   = 'X'.
                  APPEND wa_helpval TO t_helpval.
                  wa_cluster-pernr = wa_ppoix-pernr.
                  wa_cluster-seqno = wa_ppoix-seqno.
                  wa_cluster-abrj = <wa_ppdit>-abper+0(4).
                  wa_cluster-abrp = <wa_ppdit>-abper+4(2).
                  wa_cluster-actual = wa_ppoix-actsign.
                  wa_cluster-betrg = wa_ppoix-betrg.
                  wa_cluster-waers = wa_ppoix-waers.
                  IF <wa_ppdit>-abper IS INITIAL.
                    CALL FUNCTION 'CU_READ_RGDIR'
                      EXPORTING
                        persnr   = wa_ppoix-pernr
                      TABLES
                        in_rgdir = t_rgdir.
                    READ TABLE t_rgdir INTO wa_rgdir WITH KEY
                                     seqnr = wa_ppoix-seqno.
                    IF syst-subrc EQ 0.
                      <wa_ppdit>-zuonr+0(10) = wa_rgdir-bondt.
                    ENDIF.
                  ENDIF.
                  APPEND wa_cluster TO t_cluster.
                  MOVE-CORRESPONDING wa_ppoix TO wa_payroll.
                  wa_payroll-betrg = ABS( wa_payroll-betrg ).
                  APPEND wa_payroll TO t_values.
                ELSE.
                  wa_helpval-pernr = wa_ppoix-pernr.
                  wa_helpval-lgart = wa_ppoix-lgart.
                  wa_helpval-rel   = ''.
                  APPEND wa_helpval TO t_helpval.
                ENDIF.
              ENDIF.
          ENDCASE.
        ENDIF.
      ENDLOOP.
    ENDLOOP.
  ENDLOOP.
  SORT t_cluster.
  DELETE ADJACENT DUPLICATES FROM t_cluster.
  LOOP AT t_cluster INTO wa_cluster.
    CLEAR: result_tab_us, result_tab_in.
    CASE wa_t001-land1.
      WHEN 'US'.
        CALL FUNCTION 'PYXX_READ_PAYROLL_RESULT'
          EXPORTING
*       CLUSTERID                          = 'RU'
            employeenumber                     = wa_cluster-pernr
            sequencenumber                     = wa_cluster-seqno
*       READ_ONLY_BUFFER                   = ' '
*       READ_ONLY_INTERNATIONAL            = ' '
*       ARC_GROUP                          = ' '
            check_read_authority               = ''
            filter_cumulations                 = ''
*       CLIENT                             =
*     IMPORTING
*       VERSION_NUMBER_PAYVN               =
*       VERSION_NUMBER_PCL2                =
          CHANGING
            payroll_result                     = result_tab_us
          EXCEPTIONS
            illegal_isocode_or_clusterid       = 1
            error_generating_import            = 2
            import_mismatch_error              = 3
            subpool_dir_full                   = 4
            no_read_authority                  = 5
            no_record_found                    = 6
            versions_do_not_match              = 7
            error_reading_archive              = 8
            error_reading_relid                = 9
            OTHERS                             = 10
      WHEN OTHERS.
        CALL FUNCTION 'PYXX_READ_PAYROLL_RESULT'
          EXPORTING
*       CLUSTERID                          = 'RU'
            employeenumber                     = wa_cluster-pernr
            sequencenumber                     = wa_cluster-seqno
*       READ_ONLY_BUFFER                   = ' '
*       READ_ONLY_INTERNATIONAL            = ' '
*       ARC_GROUP                          = ' '
            check_read_authority               = ''
            filter_cumulations                 = ''
*       CLIENT                             =
*     IMPORTING
*       VERSION_NUMBER_PAYVN               =
*       VERSION_NUMBER_PCL2                =
          CHANGING
            payroll_result                     = result_tab_in
          EXCEPTIONS
            illegal_isocode_or_clusterid       = 1
            error_generating_import            = 2
            import_mismatch_error              = 3
            subpool_dir_full                   = 4
            no_read_authority                  = 5
            no_record_found                    = 6
            versions_do_not_match              = 7
            error_reading_archive              = 8
            error_reading_relid                = 9
            OTHERS                             = 10
    ENDCASE.
    IF sy-subrc NE 0.
      CLEAR wa_return.
      wa_return-field = wa_ppoix-pernr.
      CASE syst-subrc.
        WHEN '1'.
          wa_return-message = 'ILLEGAL_ISOCODE_OR_CLUSTERID'.
        WHEN '2'.
          wa_return-message = 'ERROR_GENERATING_IMPORT'.
        WHEN '3'.
          wa_return-message = 'IMPORT_MISMATCH_ERROR'.
        WHEN '4'.
          wa_return-message = 'SUBPOOL_DIR_FULL'.
        WHEN '5'.
          wa_return-message = 'NO_READ_AUTHORITY'.
        WHEN '6'.
          wa_return-message = 'NO_RECORD_FOUND'.
        WHEN '7'.
          wa_return-message = 'VERSIONS_DO_NOT_MATCH'.
        WHEN '8'.
          wa_return-message = 'ERROR_READING_ARCHIVE'.
        WHEN '9'.
          wa_return-message = 'ERROR_READING_RELID'.
        WHEN OTHERS.
          wa_return-message = 'OTHERS'.
      ENDCASE.
      APPEND wa_return TO return.
      CONTINUE.
    ELSE.
      CASE wa_t001-land1.
        WHEN 'US'.
          t_inter = result_tab_us-inter.
        WHEN OTHERS.
          t_inter = result_tab_in-inter.
      ENDCASE.
      APPEND t_inter.
      t_tax = result_tab_us-nat-tax.
      LOOP AT t_inter.
        t_bt = t_inter-bt.
        t_rt = t_inter-rt.
      ENDLOOP.
      LOOP AT t_values ASSIGNING <payroll> WHERE
                                       pernr EQ wa_cluster-pernr.
        CLEAR wa_rt.
        LOOP AT t_rt INTO wa_rt WHERE
                     lgart EQ <payroll>-lgart.
          wa_rt-betrg = ABS( wa_rt-betrg ).
          IF wa_rt-betrg EQ <payroll>-betrg AND NOT
             wa_rt-cntr1 IS INITIAL.
            IF wa_t001-land1 EQ 'US'.
              LOOP AT t_tax INTO wa_tax WHERE
                    cntr1 EQ wa_rt-cntr1.
                EXIT.
              ENDLOOP.
              IF syst-subrc EQ 0.
                <payroll>-cntr1 = wa_tax-cntr1.
                <payroll>-taxau = wa_tax-taxau.
* determine long text
                SELECT SINGLE ltext FROM  t5utz INTO h_ltext
                       WHERE  taxau  = wa_tax-taxau.
                IF syst-subrc EQ 0.
                  <payroll>-ltext = h_ltext.
                ENDIF.
              ENDIF.
            ENDIF.
          ENDIF.
        ENDLOOP.
      ENDLOOP.
* check table BT abd determine check no.
      IF i_checkno EQ 'X'.
        LOOP AT t_bt INTO wa_bt.
          APPEND wa_bt TO t_hrpay.
          CASE wa_bt-zlsch.
* check
            WHEN  'C'.
              SELECT * FROM payr INTO wa_payr WHERE
                             rzawe = 'C' AND
                             laufd = wa_bt-dtadt AND
                             pernr = wa_cluster-pernr AND
                             seqnr = wa_cluster-seqno AND
                             btznr = wa_bt-btznr.
                EXIT.
              ENDSELECT.
              IF syst-subrc EQ 0.
* store period in a field to find correlation later
                wa_payr-znme4+0(4) = wa_cluster-abrj.
                wa_payr-znme4+4(2) = wa_cluster-abrp.
              ELSE.
                CLEAR wa_payr.
                wa_payr-pernr = wa_cluster-pernr.
                wa_payr-rwbtr = wa_cluster-betrg.
                wa_payr-waers = wa_cluster-waers.
                APPEND wa_payr TO t_payr.
              ENDIF.
              APPEND wa_payr TO t_payr.
* bank transfer
            WHEN OTHERS.
              h_time = wa_bt-dtati+0(5).
              h_time+5(1) = 'P'.
              SELECT * FROM reguta INTO wa_reguta WHERE
                             laufd = wa_bt-dtadt AND
                             laufi = h_time.
                EXIT.
              ENDSELECT.
              IF syst-subrc EQ 0.
                APPEND wa_reguta TO t_reguta.
              ENDIF.
          ENDCASE.
        ENDLOOP.
      ENDIF.
    ENDIF.
  ENDLOOP.
ENDFUNCTION.

Answer 1

Hi Sudhir,
These settings need to be done by basis people. Anyhow, you can go to the tcode RZ11 and put in these parameters mentioned in the error message. There will be documentation available for these parameters. Try to see if the defaults are not met for any of these parameters. If you find something strange, report it to the basis. The documentations in this are very helpful. Hope this helps.
Thanks and Regards
Subray Hegde