MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

INSERTING DB SEG INTO A NEW DB...getting ims stat code -- AL

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> IMS
View previous topic :: View next topic  
Author Message
coolsrini1981
Beginner


Joined: 01 Jun 2006
Posts: 8
Topics: 3

PostPosted: Thu Jun 01, 2006 10:23 am    Post subject: INSERTING DB SEG INTO A NEW DB...getting ims stat code -- AL Reply with quote

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
View user's profile Send private message
Bithead
Advanced


Joined: 03 Jan 2003
Posts: 550
Topics: 23
Location: Michigan, USA

PostPosted: Thu Jun 01, 2006 11:04 am    Post subject: Reply with quote

What PROCOPTS are on the PCB?
Back to top
View user's profile Send private message
ANIL SARATHY
Beginner


Joined: 30 Aug 2005
Posts: 88
Topics: 3
Location: Syracuse,New york

PostPosted: Thu Jun 01, 2006 1:08 pm    Post subject: Reply with quote

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
Back to top
View user's profile Send private message Send e-mail Yahoo Messenger
coolsrini1981
Beginner


Joined: 01 Jun 2006
Posts: 8
Topics: 3

PostPosted: Thu Jun 01, 2006 2:43 pm    Post subject: Reply with quote

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
View user's profile Send private message
Bithead
Advanced


Joined: 03 Jan 2003
Posts: 550
Topics: 23
Location: Michigan, USA

PostPosted: Thu Jun 01, 2006 3:34 pm    Post subject: Reply with quote

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
View user's profile Send private message
coolsrini1981
Beginner


Joined: 01 Jun 2006
Posts: 8
Topics: 3

PostPosted: Thu Jun 01, 2006 3:57 pm    Post subject: Reply with quote

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
View user's profile Send private message
coolsrini1981
Beginner


Joined: 01 Jun 2006
Posts: 8
Topics: 3

PostPosted: Thu Jun 01, 2006 4:00 pm    Post subject: Reply with quote

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
View user's profile Send private message
Bithead
Advanced


Joined: 03 Jan 2003
Posts: 550
Topics: 23
Location: Michigan, USA

PostPosted: Fri Jun 02, 2006 9:32 am    Post subject: Reply with quote

Are you running the program as a BMP or DLI?
Back to top
View user's profile Send private message
Bithead
Advanced


Joined: 03 Jan 2003
Posts: 550
Topics: 23
Location: Michigan, USA

PostPosted: Fri Jun 02, 2006 11:57 am    Post subject: Reply with quote

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
View user's profile Send private message
coolsrini1981
Beginner


Joined: 01 Jun 2006
Posts: 8
Topics: 3

PostPosted: Fri Jun 02, 2006 12:05 pm    Post subject: Reply with quote

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
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> IMS All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
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


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group