MVSFORUMS.com

coolsrini1981 · Beginner Joined: 01 Jun 2006 Posts: 8 Topics: 3

Hi I am getting an abend U3803 with a staus code of IMS---AL
while trying to insert a segment into a new db from scratch...any views on wat the prob cud be ..
PSB
SSA
DBD def

note the db in which seg need to b inserted is also a new one ..new DBD new PSB

Pls help

Bithead · Posted: Thu Jun 01, 2006 11:04 am Post subject:

What PROCOPTS are on the PCB?

ANIL SARATHY · Posted: Thu Jun 01, 2006 1:08 pm Post subject:

Srini
I think Bithead is looking for below thing from you. Mr. Green

what function code in IMS is used for loading and inserting segments ????

ISRT for both.

PROCOPT determines loading by L,LS.. and inserting by I.

is it 'AI' or 'AL'.

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DFSMC1F6/E.2.2?SHELF=&DT=20050208142243&CASE=
_________________
Anil Sarathy

coolsrini1981 · Beginner Joined: 01 Jun 2006 Posts: 8 Topics: 3

yes I am using ISRT call for inserting the segs to db in program

and Procopt in my PSB is A..tried with L and LS too..still getting the same abend

Bithead · Posted: Thu Jun 01, 2006 3:34 pm Post subject:

A status code of AL might suggest that you are inserting into the IO PCB. Check that there is not an IO PCB defined in the PSB before your database PCB.

A database must be "initialized" before it can be used for the first time to create the bitmaps. I usually use DLT0 to insert a dummy record using PROCOPT L then I delete it again.

coolsrini1981 · Beginner Joined: 01 Jun 2006 Posts: 8 Topics: 3

This is how my SB looks like..

PRINT NOGEN
*
PCB TYPE=TP,MODIFY=YES
*
*PCB #1
*
PCB TYPE=DB,DBDNAME=XC2H01DD,KEYLEN=50,PROCOPT=A
SENSEG NAME=XCS2H000,PARENT=0
*
PSBGEN LANG=COBOL,PSBNAME=XC470000,CMPAT=YES
END

XC2H01DD is the dbd created afresh and i am trying to insert data into this new db.

Also yes am following the process of using DLT0 and then deleting it ..bforee inserting this data

coolsrini1981 · Beginner Joined: 01 Jun 2006 Posts: 8 Topics: 3

Can u pls elaborate in the point on IO pCB since i am using it in the PROCEDURE DIVISON USING IO-PCB,
PCB-XC2H

Bithead · Posted: Fri Jun 02, 2006 9:32 am Post subject:

Are you running the program as a BMP or DLI?

Bithead · Posted: Fri Jun 02, 2006 11:57 am Post subject:

coolsrini1981,

Try this. The CMPAT=YES is probably adding an IOPCB to the PSB. Add an IOPCB to the linkage section of your program and as the first entry in the USING clause on the PROCEDURE DIVISION statement.

coolsrini1981 · Beginner Joined: 01 Jun 2006 Posts: 8 Topics: 3

wel i have been unknowingly running it so far with io-pcb added ijtself in the proc div. see my post above...do i chng the cmpat option if iremove the io-pcb from pgm?
its a btch pgm so i guess its a bmp