Registered: Jun 2001
Location: USA
Posts: 19

Using EXTRACT with USERPROGRAM(DFH0CBDC)

Tried using DFHCSDUP in batch using the extract command. I compiled program DFHOCBDC as it comes from IBM (no changes). When I run the batch program I get a RC=16 SYSTEM COMPLETION CODE=0C4 REASON CODE=00000010.

Am I missing something?

__________________
An expert is anyone from out of town.

Report this post to a moderator | IP: Logged

Registered: Jun 2001
Location: USA
Posts: 4

I did (with 4.1) recall that a field definition was missing/incorrect in one of the supplied programs....A little debugging and I fixed it...

FWIW, shouldn't your reference to DFHOCBDC actually be DFH0CBDC (DFH zero CBDC)?

Report this post to a moderator | IP: Logged

Registered: Jun 2001
Location: USA
Posts: 19

zero is correct, sorry. I typed it here and got carried away. I'll check on that missing field. Thanks.

__________________
An expert is anyone from out of town.

Report this post to a moderator | IP: Logged

Registered: Aug 2001
Location: Netherlands
Posts: 1

The S0C4 is caused by a STOP RUN in the DFH0DBDC coding,
change it to GOBACK (or replace the complete IF ..... with GOBACK) compile and link again and the problems are gone.

Report this post to a moderator | IP: Logged

Registered: Jun 2001
Location: USA
Posts: 19

OK. Compiled under IBM COBOL for MVS & VM 1.2.2 and Linked under DFSMS/MVS V1 R4.0 BINDER. Both with a RC=0.

When I run it now in batch, I get: IEA995I SYMPTOM DUMP OUTPUT SYSTEM COMPLETION CODE=0C1 REASON CODE=00000001.


Still

__________________
An expert is anyone from out of town.

Report this post to a moderator | IP: Logged

Registered: Jun 2001
Location: USA
Posts: 4

Well, it looks like it is time to make sure the compile listing (with the procedure map) is current and matching the executing program and just debug the dump....

It is probably something simple, but you just have to find it....;-)

Report this post to a moderator | IP: Logged

Registered: Jun 2001
Location: USA
Posts: 19

OK, Thanks.

__________________
An expert is anyone from out of town.

Report this post to a moderator | IP: Logged