Joined: 03 Dec 2020
I have recently deleted and created a new IMS DB file and its IMS Index file using the current image copy file.
below is the sample jcl used for Loading the IMS file
//STEP02 EXEC PGM=DFSRRC00,REGION=1024K,
//STEPLIB DD DISP=SHR,DSN=IMSVS.WT.TEST.PGMLIB
// DD DISP=SHR,DSN=IMSVS.WT.TEST.RESLIB
//DFSRESLB DD DISP=SHR,DSN=IMSVS.WT.TEST.RESLIB
//IMS DD DISP=SHR,DSN=SYSD.WT.TEST.IMSDBDL
//DFSVSAMP DD DISP=SHR,DSN=SYSD.WT.TEST.IMSCNTL(DFSVSAMP)
//DFSUCUM DD DUMMY
//DFSULOG DD DUMMY
//SYSPRINT DD SYSOUT=Y
//DBIMSXX1 DD DSN=TEST.IC.IMSDB1,DISP=SHR
//DFSUDUMP DD DISP=SHR,DSN=TEST.IMSU.ICIMSXX1.IMGECOPY(+0
//SYSIN DD *
S DBIMSXX DBIMSXX1
Though the IMS has been created successfully with proper record counts as same as the source.
When I run a job using these ims db and index files, some of the segments of the IMS files are misread, for instance, CURR-BUS-DAY which has to be read in 9(5) julian format (YYDDD) like below
PREV-YYDDD 9(5) : 21119
CURR-YYDDD 9(5) : 21120
but it misreads the data as
PREV-YYDDD 9(5) : 20211
CURR-YYDDD 9(5) :20202.
if the segments are not read properly, where I have to start my analysis and what could be the reason for the same.
is there anything else I have to do in the LOAD JCL I have mentioned above.
Please advise. Thank you in advance.