Error in module RSQL of the database interface! Please Help.

Question

I am getting the error "Error in module RSQL of the database interface" in my program. Below is the code snippet in which the above error is:
=================================
FORM UPLOAD_PA_PB USING NB_LINE ID.
  DATA: TOT_LINES TYPE I.
IF ID <> 'PA' and ID <> 'PB'.           "UPG060507 - RY
  only PA and PB tables
    CHECK ID CP 'PA*'
       OR ID CP 'PB*'.
    DO NB_LINE TIMES.
      READ DATASET DSN INTO IPREL_DB.
      IF IPREL_DB+0(3) = P_FROM.
        IPREL_DB+0(3) = P_TO.
      ENDIF.
      RP-CHECK-VALID-PAPB IPREL_DB S_BEGDA-LOW S_BEGDA-HIGH.
      IF FLAG = 0. CONTINUE. ENDIF.
      APPEND IPREL_DB.
    ENDDO.
Begin of change - UPG060507 - RY
    DELETE ADJACENT DUPLICATES FROM IPREL_DB.
End of change - UPG060507 - RY
    IF TEST = SPACE.
      IF ID = 'PA2010' or ID = 'PA0014' or ID = 'PA0015'.
        PERFORM CLEAR_COST_ASSIGNMENT.                  "PUNM0002
      ENDIF.
      delete previous values
      DELETE FROM (ID) WHERE PERNR IN PERS
                         AND BEGDA <= S_BEGDA-HIGH
                         AND ENDDA => S_BEGDA-LOW.
    WRITE: / SY-DBCNT LEFT-JUSTIFIED, 'entrie(s) deleted from', ID.
      insert the new ones
      INSERT (ID) FROM TABLE IPREL_DB.
      WRITE: / SY-DBCNT LEFT-JUSTIFIED, 'entrie(s) imported in', ID.
      CALL FUNCTION 'DB_COMMIT'.
      SKIP.
    ELSE.
      DESCRIBE TABLE IPREL_DB LINES TOT_LINES.
      WRITE:/ TOT_LINES LEFT-JUSTIFIED, 'Entries Will Be Imported in',ID.
    ENDIF.
    REFRESH IPREL_DB.
ENDIF.                                          "UPG060507 - RY
ENDFORM.
===============
Your help will be greatly appreciated and all the answers will be rewarded.
Thanks.
Mithun

Answer 1

Hi Mithun,
Can you please tell at which line the error is shown.
Regards,
Atish