View previous topic :: View next topic |
Author |
Message |
coolsrini1981 Beginner
Joined: 01 Jun 2006 Posts: 8 Topics: 3
|
Posted: Thu Jun 01, 2006 10:23 am Post subject: INSERTING DB SEG INTO A NEW DB...getting ims stat code -- AL |
|
|
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 |
|
Back to top |
|
 |
Bithead Advanced

Joined: 03 Jan 2003 Posts: 550 Topics: 23 Location: Michigan, USA
|
Posted: Thu Jun 01, 2006 11:04 am Post subject: |
|
|
What PROCOPTS are on the PCB? |
|
Back to top |
|
 |
ANIL SARATHY Beginner

Joined: 30 Aug 2005 Posts: 88 Topics: 3 Location: Syracuse,New york
|
|
Back to top |
|
 |
coolsrini1981 Beginner
Joined: 01 Jun 2006 Posts: 8 Topics: 3
|
Posted: Thu Jun 01, 2006 2:43 pm Post subject: |
|
|
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 |
|
Back to top |
|
 |
Bithead Advanced

Joined: 03 Jan 2003 Posts: 550 Topics: 23 Location: Michigan, USA
|
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. |
|
Back to top |
|
 |
coolsrini1981 Beginner
Joined: 01 Jun 2006 Posts: 8 Topics: 3
|
Posted: Thu Jun 01, 2006 3:57 pm Post subject: |
|
|
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 |
|
Back to top |
|
 |
coolsrini1981 Beginner
Joined: 01 Jun 2006 Posts: 8 Topics: 3
|
Posted: Thu Jun 01, 2006 4:00 pm Post subject: |
|
|
Can u pls elaborate in the point on IO pCB since i am using it in the PROCEDURE DIVISON USING IO-PCB,
PCB-XC2H |
|
Back to top |
|
 |
Bithead Advanced

Joined: 03 Jan 2003 Posts: 550 Topics: 23 Location: Michigan, USA
|
Posted: Fri Jun 02, 2006 9:32 am Post subject: |
|
|
Are you running the program as a BMP or DLI? |
|
Back to top |
|
 |
Bithead Advanced

Joined: 03 Jan 2003 Posts: 550 Topics: 23 Location: Michigan, USA
|
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. |
|
Back to top |
|
 |
coolsrini1981 Beginner
Joined: 01 Jun 2006 Posts: 8 Topics: 3
|
Posted: Fri Jun 02, 2006 12:05 pm Post subject: |
|
|
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 |
|
Back to top |
|
 |
|
|