Issue in COBK TABLE "DUPLICATE_COBK:

Question

HI SAP GURUS,
While posting FI transactions with cost element transaction it is saying doucment saved, but in FB03, it is showing document
Document 100000003 HC01 does not exist in fiscal year 2011
Message no. F5A397
System Response
The required document either does not exist in the fiscal year or is still being posted.
When the document is read, archived documents are also considered.
But  when i am posting any transaction without cost element it is posing and display record perfectly.
I went and chcked in SM13 Transaction the error is coming in K_DOCUMENT_UPDATE functional module.
Short text of error message:
DUPLICATE_COBK
Long text of error message:
Technical information about the message:
Message class....... 00
Number.............. 208
Variable 1.......... "DUPLICATE_COBK"
I have check all number range objects both in FI and Co object it was mainted correctly.
Help me out of this issue.
Thanks
KISHORE

Answer 1

Dump for the above above
An exception occurred that is explained in detail below.
The exception, which is assigned to class 'CX_SY_OPEN_SQL_DB', was not caught
in
procedure "INS_GLPCA" "(FORM)", nor was it propagated by a RAISING clause.
Since the caller of the procedure could not have anticipated that the
exception would occur, the current program is terminated.
The reason for the exception is:
If you use an ABAP/4 Open SQL array insert to insert a record in
the database and that record already exists with the same key,
this results in a termination.
(With an ABAP/4 Open SQL single record insert in the same error
situation, processing does not terminate, but SY-SUBRC is set to 4.)
source code extraction
FORM INS_GLPCA                               "#EC CALLED
                 TABLES P_T_TABLE
                 USING  P_RECORD TYPE ANY
                        P_RENUMBER_OBJ TYPE BOOLE_D.      "#EC NEEDED
  DATA: T_GLPCA LIKE GLPCA OCCURS 0 WITH HEADER LINE.
  CLEAR T_GLPCA . REFRESH T_GLPCA .
  T_GLPCA[] = P_T_TABLE[].
  IF P_T_TABLE[] IS INITIAL.
    APPEND P_RECORD TO T_GLPCA .
  ENDIF.
  IF NOT P_RENUMBER_OBJ IS INITIAL.
    SORT T_GLPCA .
    CALL FUNCTION 'G_ADJUST_RECORD'
         EXPORTING
              TABELLENNAME = 'GLPCA '
              RENUMBER_OBJ = 'X'
         TABLES
              TABELLE = T_GLPCA .
  ENDIF.
  GET TIME.
  T_GLPCA-CPUDT = SY-DATUM. 1182   T_GLPCA-CPUTM = SY-UZEIT.
1183   MODIFY T_GLPCA TRANSPORTING CPUDT CPUTM
1184                    WHERE RCLNT = SY-MANDT OR RCLNT NE SY-MANDT.
>>>>   INSERT GLPCA FROM TABLE T_GLPCA .
1186   IF SY-SUBRC NE 0.
1187     MESSAGE X201 WITH 'GLPCA '.
1188   ENDIF.
1189 ENDFORM.
1190
1191 ----
1192 *         FORM INS_GLPCP
1193 ----
1194 FORM INS_GLPCP                               "#EC CALLED
1195                  TABLES P_T_TABLE
1196                  USING  P_RECORD TYPE ANY
1197                         P_RENUMBER_OBJ TYPE BOOLE_D.      "#EC NEEDED
1198   DATA: T_GLPCP LIKE GLPCP OCCURS 0 WITH HEADER LINE.
1199
1200   CLEAR T_GLPCP . REFRESH T_GLPCP .
1201   T_GLPCP[] = P_T_TABLE[].
Regards
KISHORE