Error in DB2

casjar · New User Joined: 11 Apr 2006 Posts: 2

Hello,

I Have a Procedure for Deleting fields in several DB2 Tables, and im getting:

** FATAL DATABASE ERROR WAS ENCOUNTERED **
DB LAST STATUS = Q6

Does anyone know what this error can be ? This is a CoolGen Procedure.

Thank You

Casjar.

martin9 · Posted: Tue Apr 11, 2006 10:31 pm

hy casjar,

pls provide how you are doing this...

martin9

casjar · New User Joined: 11 Apr 2006 Posts: 2

Hi,

The Procedure is very long to post here, but here's an example:

"MOVE SPACES TO ERROR-ENCOUNTERED-SW OF GLOBDATA
CALL XXXXXX-ID USING IEF-RUNTIME-PARM1
IEF-RUNTIME-PARM2
GLOBDATA
IN-GRP-SVR-ER-SEL-0001RG IN-SVR-0006EV
IN-SVR-0007EV
OUT-AB-0001EV
END-CALL
IF STATUS-FLAG OF GLOBDATA NOT = SPACES OR
ERROR-ENCOUNTERED-SW OF GLOBDATA NOT = SPACES OR
VIEW-OVERFLOW-SW OF GLOBDATA NOT = SPACES
GOBACK
END-IF
MOVE '0088795244' TO CUR-AB-ID OF GLOBDATA
MOVE 'XXXXXX_ELIMINAR_ELEMENTOS_REDE' TO CUR-AB-NAME OF
GLOBDATA
COMPUTE LAST-STATEMENT-NUM = 0000000003
COMPUTE COD-ERRO-0008 = COD-ERRO-0001
MOVE STRING-A-0001XX TO STRING-A-0008XX
MOVE STRING-B-0001XX TO STRING-B-0008XX"

Im really trying to understand What "Last Status = Q6" means.

Regards

Casjar.

martin9 · Posted: Tue Apr 11, 2006 11:05 pm

hy casjar,

i see you wrote a cobol program...
but to determine the error,
pls provide the jcl, joblog respectivley...
the messages you get as error message may be
self written, check your program for this string or check
all called programs, which include any sql query,
for this specific string...
maybe you also receive any sql code...?

martin9

prakash271082 · New User Joined: 09 Sep 2005 Posts: 53

Hi,
It might be that your Tablespace / Database might have gone to Check Pending State. In case check with your DB2 administrator.