MVSFORUMS.com

kolusu · Posted: Thu Feb 15, 2007 10:28 am Post subject:

Kingo,

You keep asking the same question over and over. LOAD utility DOES check the primary key and if duplicate found it routes them to SYSDISC dataset. It is the programmer responsbility to check the sysdisc and abend if it is NO empty. why do you want your job to fail for duplicates?

If the job were to fail , then it would put the table in Lock status which means no one can access the table. This does NOT work for regular business processing.

If you feel that the Job needs to abend in case of duplicates you can open an APAR with IBM and force the abend.

kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

kingo · Posted: Thu Feb 15, 2007 10:21 pm Post subject:

Thanks Kolusu

Regds,
Kingo
_________________
IF YOU ARE NOT FOCUSSED ON GOAL ALL YOU SEE IS OBSTACLE.

CZerfas · Intermediate Joined: 31 Jan 2003 Posts: 211 Topics: 8

To my knowledge, if there is NO sysdisc dataset allocated and there are duplicates found by the utility, the job does what is wanted: it abends.

regards
Christian

videlord · Beginner Joined: 09 Dec 2004 Posts: 147 Topics: 19

use DISCARD n in you LOAD control
if discarded records exceed n, LOAD abnormal terminated

the default is 0 if you do not specify, no maximum value, the job will normal termnitate regardless of how many records discarded

kingo · Posted: Thu Feb 22, 2007 10:30 pm Post subject:

Thanks videlord

Regds,
Kingo
_________________
IF YOU ARE NOT FOCUSSED ON GOAL ALL YOU SEE IS OBSTACLE.

kingo · Posted: Thu Mar 01, 2007 11:47 pm Post subject:

Hi,

Actually I acheived this requirement by unloading then sorted the records where in outrec i included XYZ and loaded to the table.Its fine.I am doing it in three steps?Is there anyway or anyother method to optimise this?

Regds,
Kingo
_________________
IF YOU ARE NOT FOCUSSED ON GOAL ALL YOU SEE IS OBSTACLE.

Nic Clouston · Posted: Fri Mar 02, 2007 4:15 am Post subject:

delete the table and redefine it to use a default then you do not need to massage the data. Or you could change the program that creates the data to stick the value into the record or.....
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

kingo · Posted: Fri Mar 02, 2007 5:01 am Post subject:

Is there anyother method to do without deleting the table?

Regds,
Kingo
_________________
IF YOU ARE NOT FOCUSSED ON GOAL ALL YOU SEE IS OBSTACLE.

Nic Clouston · Posted: Fri Mar 02, 2007 5:16 am Post subject:

why do you not want to delete the table? all you have to do is unload the data - which you do anyway - and redefine the table, reload your data - end of problem and I gave you an alternative method and you could use DFSORT/ICETOOL (look at the manuals and postings to find out hoe to add data using these tools)
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

kingo · Posted: Fri Mar 02, 2007 5:33 am Post subject:

Thanks Nic Very Happy

Regds,
Kingo
_________________
IF YOU ARE NOT FOCUSSED ON GOAL ALL YOU SEE IS OBSTACLE.