Posted: Sat Jun 25, 2011 11:13 pm Post subject: HIDAM primary index not populated
I am trying to learn IMS on my own. In my company we don't have IMS DBA to assist me.
I tried to create a HIDAM database and load 2 records into it.
The DBD generation, PSB generation, HIDAM & HIDAM index dataset creation are all ok. I ran a program to load 2 records into it. I am able to see the data in the HIDAM ESDS file, but no record is present in the index file(KSDS).
Am I missing some thing? Please help me understand why there is no record in the index file.
Code:
000001 PRINT NOGEN
000002 DBDNAME DBD NAME=HIDAMDBD,ACCESS=(HIDAM,VSAM)
000003 DATASET DD1=CORPDD,DEVICE=3390
000004 SEGM NAME=CORPSEG,PARENT=0,BYTES=105
000005 LCHILD NAME=(POINTER,HIDAMIDX),POINTER=INDX
000006 FIELD NAME=(CORPID,SEQ,U),START=1,BYTES=15,TYPE=C
000007 FIELD NAME=CORPNAM,START=16,BYTES=40,TYPE=C
000008 FIELD NAME=CORPADS,START=56,BYTES=50,TYPE=C
000009 SEGM NAME=SERVPSEG,PARENT=CORPSEG,BYTES=35
000010 FIELD NAME=(SERVPID,SEQ,U),START=1,BYTES=10
000011 FIELD NAME=SERVPNM,START=11,BYTES=25,TYPE=C
000012 SEGM NAME=CONECSEG,PARENT=SERVPSEG,BYTES=67
000013 FIELD NAME=(EMPID,SEQ,U),START=1,BYTES=10,TYPE=C
000014 FIELD NAME=SCHMTYP,START=11,BYTES=10,TYPE=C
000015 FIELD NAME=CALLTYP,START=21,BYTES=05,TYPE=C
000016 FIELD NAME=SRTTIME,START=26,BYTES=10,TYPE=C
000017 FIELD NAME=ENDTIME,START=36,BYTES=10,TYPE=C
000018 FIELD NAME=TOTCALS,START=46,BYTES=10,TYPE=P
000019 FIELD NAME=TOTCHRG,START=56,BYTES=12,TYPE=P
000020 DBDGEN
000021 FINISH
000022 END
Code:
000001 PRINT NOGEN
000002 DBDNAME DBD NAME=HIDAMDBI,ACCESS=(INDEX,VSAM)
000003 DATASET DD1=CORPDDI,DEVICE=3390
000004 SEGM NAME=POINTER,PARENT=0,BYTES=15
000005 LCHILD NAME=(CORPSEG,HIDAMDBD),INDEX=CORPID
000006 FIELD NAME=(INDEXFLD,SEQ),BYTES=15,START=1
000007 DBDGEN
000008 FINISH
000009 END
Your topic may well help another who gets stuck one day.
Just as a suggestion, when experimenting, i'd use very few "pieces" and save a bunch of typing and potential errors<g>. _________________ All the best,
di
Last edited by papadi on Mon Jul 04, 2011 1:51 pm; edited 1 time in total
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum