View previous topic :: View next topic
|
Author |
Message |
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
Hi All,
When i try to insert data into database it says AI( status code). Can anyone guide me how to solve this Error??? |
|
Back to top |
|
|
murmohk1
Senior Member
Joined: 29 Jun 2006 Posts: 1436 Location: Bangalore,India
|
|
|
|
Anirudh,
Did you bother to refer manual? From QW -
Quote: |
Programmer Response: These kinds of problems often require the help of a
system programmer or system administrator. But before you go to one of
these specialists, some things you can do are:
o Check the DD statements. Make sure that the ddname is the same as the
name specified on the DATASET statement of the DBD. The segment name
area in the DB PCB (call level), or in the DIB (command level) has the
ddname of the data set that could not be opened.
o Check the PSB and make sure that the appropriate processing options
have been specified for each of the DB PCBs that your program uses. |
|
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
I did check the manuals. But cidnt trace the error. I guess my DD names are correct in my DBD. I have given PROCOPT = A in my PSB. |
|
Back to top |
|
|
Srihari Gonugunta
Active User
Joined: 14 Sep 2007 Posts: 295 Location: Singapore
|
|
|
|
Hope you made sure that the DB vsam files are fine. Do a verify on those files. Even in this case, we end up in AI status code sometimes. |
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
Yeah will check that out. Thanks! |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Can you post the DFS0730I message from the job log? |
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
Bitneuker wrote: |
Can you post the DFS0730I message from the job log? |
DFS0730I UNABLE TO OPEN DATA SET WITH DDNAME DBDAPL FOR REASON I,08, DATAB
ASE DBDAPL TRN APPL001 .
and the reason is as follows:
I,08
Explanation: An attempt was made to open a VSAM data set for which there was no DD statement, or for dynamically allocated data sets, the data set is not yet allocated. The message indicates the ddname associated with the data set that was opened. |
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
Bitneuker wrote: |
Can you post the DFS0730I message from the job log? |
DBDAPL is my database name. |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
anirudh1985 wrote: |
Bitneuker wrote: |
Can you post the DFS0730I message from the job log? |
DBDAPL is my database name. |
I assume this is a new defined VSAM-file. Did you ever initiate it; causing an EOF mark to be written? May be done using IDCAMS repro with input dummy.
I also notice the TRN APPL001; is it an MPP? Did you perform the ACBGEN? |
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
Bitneuker wrote: |
anirudh1985 wrote: |
Bitneuker wrote: |
Can you post the DFS0730I message from the job log? |
DBDAPL is my database name. |
I assume this is a new defined VSAM-file. Did you ever initiate it; causing an EOF mark to be written? May be done using IDCAMS repro with input dummy.
I also notice the TRN APPL001; is it an MPP? Did you perform the ACBGEN? |
I have created VSAM file using IDCAMS utility. Regarding Trans ID it is an MPP i have done ACBGEN also... |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Just defining the VSAM-file using IDCAMS is not enough. You have to open/close is before you can use it. |
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
Bitneuker wrote: |
Just defining the VSAM-file using IDCAMS is not enough. You have to open/close is before you can use it. |
How do i do that? IS it thru COBOL program??? IT would be helpful if u could explain.. |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Use IDCAMS
//indd dd dummy
//outdd dd dsn=yourvsamfile,disp=shr
//sysin dd *
repro infile(indd) outfile(outdd)
/*
This causes the vsamfile to be opened/closed and write an EOF mark. Yust a verify won't write the EOF.
I will be out for the afternoon; check later on |
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
Bitneuker wrote: |
Use IDCAMS
//indd dd dummy
//outdd dd dsn=yourvsamfile,disp=shr
//sysin dd *
repro infile(indd) outfile(outdd)
/*
This causes the vsamfile to be opened/closed and write an EOF mark. Yust a verify won't write the EOF.
I will be out for the afternoon; check later on |
I have opened and closed the database as per ur JCL but still the same story... |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
What is displayed when you type:
If is tells INVALID your database is not defined in the online DLI-region. |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Here a part of the stage-step we use for the definition:
Code: |
//STEP4 EXEC PGM=ASMA90,REGION=0M,
// PARM=(OBJECT,NODECK,NODBCS,NOLIST,NOTERM,
// 'SIZE(MAX,ABOVE)',NOUSING,FLAG(NOPUSH))
//SYSLIB DD DSN=SYS.IMS.V810.OPTIONS,DISP=SHR
// DD DSN=SYS.IMS.V810.ADFSMAC,DISP=SHR
// DD DSN=SYS1.MACLIB,DISP=SHR
// DD DSN=SYS1.MODGEN,DISP=SHR
//SYSLIN DD DISP=OLD,
// DSN=SYS.IMS.V810.OBJDSETJ(DFSDDIRJ)
//SYSPRINT DD SYSOUT=X,
// DCB=(BLKSIZE=605),
// SPACE=(605,(100,50),RLSE,,ROUND)
//SYSUT1 DD UNIT=SYSDA,DISP=(,DELETE),
// DCB=BLKSIZE=13024,
// SPACE=(CYL,(72,15))
//SYSIN DD *
DFSDMD DAGENTE,0000,1
DFSDMD DAUPREM,0000,1
DFSDMD DBHDMNL1,0000,3
DFSDMD DBHDMNL2,0000,3
DFSDMD DBHDMNL5,0000,3
DFSDMD DBHISTNL,0000,3
DFSDMD DBHPOLNL,0000,3
DFSDMD DBNLAGT,0000,3
DFSDMD DBNLBGEG,0000,3
DFSDMD DBNLBND,0000,3
DFSDMD DBNLHIHO,0000,3
|
Check with your DBA if he staged the databases. |
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
Bitneuker wrote: |
What is displayed when you type:
If is tells INVALID your database is not defined in the online DLI-region. |
We get the following
DATABASE TYPE TOTAL UNUSED TOTAL UNUSED ACC CONDITIONS
DBDAPL DL/I UP NOTOPEN, ALLOCS
*07332/160016* |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
What happens next? |
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
Bitneuker wrote: |
What happens next? |
/sta db dbdapl
DFS058I 16:25:23 START COMMAND IN PROGRESS |
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
anirudh1985 wrote: |
Bitneuker wrote: |
What happens next? |
/sta db dbdapl
DFS058I 16:25:23 START COMMAND IN PROGRESS |
this is from joblog
.DFS058I 16.25.23 START COMMAND IN PROGRESS NODE TCP00329.
DFS0488I STA COMMAND COMPLETED. DBN= DBDAPL RC= 0. |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Any change when you type
? |
|
Back to top |
|
|
anirudh1985 Currently Banned New User
Joined: 22 Aug 2007 Posts: 66 Location: bangalore
|
|
|
|
Bitneuker wrote: |
Any change when you type
? |
no change
do u have a gmail id?? |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
I will investigate further and get back to you. You may use PM to contact me. |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Well..........IDCAMS dummy repro doesn't do the trick as it appears.
Quote: |
I take it this is an ESDS? It needs to be initially loaded with PROCOPT=L.
An open/close for EOF-mark using IDCAMS repro (dummy) is not sufficient.
If you have an HD load utility from one of those other companies, you can "initialize" it first by running it with a DUMMY input. After that, you can do an ISRT with PROCOPT=A.
An initial load with PROCOPT=L or initializing it with a load utility does things like set up the bit map. Without that, you get an AI on an ISRT if PROCOPT is not L.
|
Talk to your DBA and take advantage of this quote |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Or check for this:
Quote: |
If you have the BMC utilities, you can define the input data set as DD DUMMY and it will properly initialize the data set. Unfortunately, the IBM Load lacks that extremely useful functionality.
|
|
|
Back to top |
|
|
|