step by step process of running imsdb-cics-cobol program?

kumar9972 · New User Joined: 05 May 2005 Posts: 3

haai

can any one working in ims-db real time environment please send me sample DBD,PSB and please explain the step by step process of how to compile and run imsdb-cics-cobol program.

kumar9972@yahoo.co.uk

thankx

kumar.

santhakumar · New User Joined: 16 May 2005 Posts: 4 Location: chennai

Hi Kumar,

Here you go for the samples:

DBD:
DBD NAME=OTAIDI1T,ACCESS=(INDEX,VSAM)
DS1 DATASET DD1=OTAII1DT,DEVICE=3380,SIZE=2048
SEGM NAME=OTAIINDX,BYTES=4
FIELD NAME=(OTAIXKEY,SEQ,U),BYTES=4,START=1
LCHILD NAME=(OTAISROT,OTAIDM1T),INDEX=OTAIROTK
DBDGEN
FINISH
END

PSB:

PCB TYPE=DB,DBDNAME=DJAADM1P,PROCOPT=AP,KEYLEN=16
SENSEG NAME=DJAASROT,PARENT=0

PCB TYPE=DB,DBDNAME=DJAPDM1P,PROCOPT=AP,KEYLEN=19
SENSEG NAME=DJAPSROT,PARENT=0
SENSEG NAME=DJAPSCLM,PARENT=DJAPSROT

PSBGEN LANG=COBOL,PSBNAME=OTADPSBP
END

Please go through the IMS db book so that you can understand how a DBD as well as PSB is being generated.

Thanks ,
Santha Kumar