|
View previous topic :: View next topic
|
| Author |
Message |
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10903
Location: italy
|
|
|
|
| Quote: |
SYS09092.T023428.RA000.AB60399R.R0204269 was preallocated (no free was done).
...
...
because of this my output is not coming correct even my job is getting over with cc 00. |
ISPF normally allocates dynamically some datasets ( ISPCTL*, ... )
if it determines that those datasets were allocated thru jcl it simple gives an informatory message on the fact
is your output not correct, or is it not coming at all ??
in case 1 ( not correct ) the issue is not related to the allocation/deallocation
in case 2 there is mismatch/misunderstanding on the ddname beig used for Your output
but anyway to be sure treat case 1 as case 2 |
|
| Back to top |
|
 |
pradeepkit
Warnings : 1
New User
Joined: 25 Jun 2008
Posts: 60
Location: chennai
|
|
|
|
Hi . I am getting the output but the problem is some times i am getting the correct output but after first run it is not giving the correct output .
So i think this is because of this preallocation error . let me know if i am wrong. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10903
Location: italy
|
|
|
|
Yes 
never had any problem with preallocated datasets
if it is not too big post Your rexx script ( use the bbcode tags ) |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2624
Location: Silicon Valley
|
|
|
|
| Quote: |
29 *-* EXIT
SYS09092.T023428.RA000.AB60399R.R0204269 was preallocated (no free was done).
READY
PROFILE MSGID
READY
END |
Please put the PROFILE MSGID before the message that you need to look up. (that is, you should be looking it up yourself, but you seem to want us to guess the message number and want us look up our guess). |
|
| Back to top |
|
|
pradeepkit
Warnings : 1
New User
Joined: 25 Jun 2008
Posts: 60
Location: chennai
|
|
|
|
Hi ,
these datasets for which this prealocation message are coming is generated by ISPLOG .
I removed ISPLOG from JCL and ran it it shows contention with AB60399.SPFLOG1.LIST datasets
ISPF system data set allocation error - press Enter to continue.
Log file allocation error - ISPF will operate without a log data set.
Data set 'AB60399.SPFLOG1.LIST' in use by another user, try later.
but i got the correct output .
but sometime this message is not coming and that time i am not getting the correct output .
Means if there is not contention then the output is not correct .
I have also tried to
//ISPLOG DD SYSOUT=A,
// DCB=(LRECL=125,BLKSIZE=129,RECFM=VA)
then for the first time it gave the corrcet output but for the next time
i got the message
AB60399.AB60399R.JOB04008.D0000102.? was preallocated (no free was done).
and the output is incorrect .
could you please help me to come out of this situation.... |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10903
Location: italy
|
|
|
|
| Quote: |
| could you please help me to come out of this situation.... |
not until You post what was requested
post also the procedure used to run the rexx script |
|
| Back to top |
|
|
pradeepkit
Warnings : 1
New User
Joined: 25 Jun 2008
Posts: 60
Location: chennai
|
|
|
|
Sorry please find it
| Code: |
//JOBNAMER JOB (00017),'REXX',CLASS=A,REGION=4500K,
// MSGCLASS=Z,NOTIFY=&SYSUID,TIME=NOLIMIT
//***********************************************************
//ISPFBACK EXEC PGM=IKJEFT01,DYNAMNBR=25,REGION=1024K
//***********************************************************
//ISPPROF DD DISP=(,DELETE),UNIT=SYSDA,SPACE=(TRK,(5,5,10)),
// DCB=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=3120)
//ISPPLIB DD DSN=WLP0.SYSC.ISRPLIB,DISP=SHR
// DD DSN=WLP0.WLPPLIB,DISP=SHR
// DD DSN=WLP1.ISRPLIB,DISP=SHR
// DD DSN=SPPP.FILEAID.IMS.ISPPLIB,DISP=SHR
// DD DSN=ISP.SISPPENU,DISP=SHR
// DD DSN=WLP1.CAI.CAIISPP,DISP=SHR
// DD DSN=USER.ISP.ISPPLIB,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.OPSPLIB,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.COMMON.ISPPLIB,DISP=SHR
// DD DSN=CBC.SCBCPNL,DISP=SHR
// DD DSN=GDDM.SADMPNL,DISP=SHR
// DD DSN=EOY.SEOYPENU,DISP=SHR
// DD DSN=SYS1.SBPXPENU,DISP=SHR
// DD DSN=SPPP.TBASE.V510.PANELS,DISP=SHR
//ISPMLIB DD DSN=WLP0.SYSC.ISRMLIB,DISP=SHR
// DD DSN=ISP.SISPMENU,DISP=SHR
// DD DSN=SPPP.FILEAID.IMS.ISPMLIB,DISP=SHR
// DD DSN=WLP1.CAI.CAIISPM,DISP=SHR
// DD DSN=WLP1.ISRMLIB,DISP=SHR
// DD DSN=USER.ISP.ISPMLIB,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.OPSMLIB,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.COMMON.ISPMLIB,DISP=SHR
// DD DSN=CBC.SCBCIMG,DISP=SHR
// DD DSN=GDDM.SADMMSG,DISP=SHR
// DD DSN=EOY.SEOYMENU,DISP=SHR
// DD DSN=SYS1.SBPXMENU,DISP=SHR
// DD DSN=SPPP.TBASE.V510.MESSAGES,DISP=SHR
//ISPSLIB DD DSN=WLP0.SYSC.ISRSLIB,DISP=SHR
// DD DSN=ISP.SISPSLIB,DISP=SHR
// DD DSN=SPPP.FILEAID.IMS.ISPSLIB,DISP=SHR
// DD DSN=ISP.SISPSENU,DISP=SHR
// DD DSN=WLP1.CAI.CAIISPS,DISP=SHR
// DD DSN=WLP1.ISRSLIB,DISP=SHR
// DD DSN=USER.ISP.ISPSLIB,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.OPSSLIB,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.COMMON.ISPSLIB,DISP=SHR
// DD DSN=CBC.SCBCSKL,DISP=SHR
// DD DSN=SPPP.TBASE.V510.SKELETON,DISP=SHR
//ISPTLIB DD DSN=WLP0.SYSC.ISRTLIB,DISP=SHR
// DD DSN=WLP1.ISP.SISPTENU,DISP=SHR
// DD DSN=SPPP.FILEAID.IMS.ISPTLIB,DISP=SHR
// DD DSN=ISP.SISPTENU,DISP=SHR
// DD DSN=WLP1.CAI.CAIISPT,DISP=SHR
// DD DSN=WLP1.ISRTLIB,DISP=SHR
// DD DSN=USER.ISP.TABLELIB,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.OPSTLIB,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.COMMON.ISPTLIB,DISP=SHR
// DD DSN=EOY.SEOYTENU,DISP=SHR
// DD DSN=SYS1.SBPXTENU,DISP=SHR
// DD DSN=SPPP.TBASE.V510.TABLE,DISP=SHR
//*
//ISPLOG DD DISP=(,DELETE),UNIT=SYSDA,SPACE=(TRK,(5,5,10)),
// DCB=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=3120)
//*
//ISPLLIB DD DISP=SHR,DSN=WLP0.SYSC.ISRLLIB
// DD DISP=SHR,DSN=SPPP.FILEAID.IMS.LOAD
// DD DISP=SHR,DSN=WLP1.ISRLLIB
// DD DISP=SHR,DSN=USER.ISP.ISPLOAD
// DD DISP=SHR,DSN=SYS3.NDM.LINKLIB
//SYSEXEC DD DISP=SHR,DSN=WLP0.SYSC.ISREXEC
// DD DISP=SHR,DSN=WLP1.ISREXEC
// DD DISP=SHR,DSN=WLP1.OPSMVS.WLP1.REXX
// DD DISP=SHR,DSN=WLP1.OPSMVS.WLP1.COMMON.USERREXX
// DD DISP=SHR,DSN=WLP1.OPSMVS.WLP1.COMMON.ISPREXX
// DD DISP=SHR,DSN=SYS1.SBPXEXEC
// DD DISP=SHR,DSN=USER.TEST.JCLCHEK1.TOOL
// DD DISP=SHR,DSN=ISP.SISPEXEC
//SYSPROC DD DSN=WLP0.SYSC.ISRCLIB,DISP=SHR
// DD DSN=WLP1.ISRCLIB,DISP=SHR
// DD DSN=ISP.SISPCLIB,DISP=SHR
// DD DSN=USER.ISP.CLIST,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.FBCLIST,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.COMMON.FBCLIST,DISP=SHR
// DD DSN=WLP1.CAI.CAICLIB,DISP=SHR
// DD DSN=CBC.SCBCUTL,DISP=SHR
// DD DSN=GDDM.SADMSAM,DISP=SHR
// DD DSN=EOY.SEOYCLIB,DISP=SHR
// DD DSN=SPPP.TBASE.V510.CLIST,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
PROFILE PREFIX(AB60399)
ISPSTART CMD(%JJCHECK3 ) -
AB60399.PACKAGE.JCFILE.S9253
/*
//*
//***********************************************************
//STEP02 EXEC PGM=IEFBR14
//***********************************************************
//DD02 DD DSN=USER.TEST.JCLCHECK.REPORT,
// DISP=(MOD,DELETE,DELETE),
// UNIT=TESTDA,
// SPACE=(TRK,1)
//* |
this is the jcl used by me to run the rexx code ,
here
ISPSTART CMD(%JJCHECK3 ) -
AB60399.PACKAGE.JCFILE.S9253
is replaced by the ISPSTART CMD(%JJCHECK3 dataset1 dataset 2)
thru rexx program i am using to invoke this jcl.... |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10903
Location: italy
|
|
|
|
one of the reason for the error is that the isplog is a sequential dataset,
Your commented out allocation is for PO
| Code: |
//* //ISPLOG DD DISP=(,DELETE),UNIT=SYSDA,SPACE=(TRK,(5,5,10)),
// DCB=(DSORG=P,RECFM=FB,LRECL=80,BLKSIZE=3120)
//* |
try changing to a PS dataset |
|
| Back to top |
|
|
pradeepkit
Warnings : 1
New User
Joined: 25 Jun 2008
Posts: 60
Location: chennai
|
|
|
|
Hi ,
as suggested by you i changed the DSORG as PS and then try to tun my code
but still i am getting this error
SYS09095.T062738.RA000.AB60399R.R0723564 was preallocated (no free was done).
READY
END
I think this is the only problem why i am getting not correct output as when this message is not coming the macro i am using giving correct result.
please let me know if i am wrong.... |
|
| Back to top |
|
|
pradeepkit
Warnings : 1
New User
Joined: 25 Jun 2008
Posts: 60
Location: chennai
|
|
|
|
Hi ,
I have a doubt please let me know the correct logic behind it .
i have seen one thing in my code i am assigning this dataset AB60399.SPFTEMP1.CNTL and when this dataset is getting deleted after execution then my output is coming correct but when this is not getting deleted then output is not correct the macro is returning wrong code .
this is a childish question but is there any link of this to getting correc output it is always assigned to a ddname ISP0*
please give me the reason.... |
|
| Back to top |
|
|
pradeepkit
Warnings : 1
New User
Joined: 25 Jun 2008
Posts: 60
Location: chennai
|
|
|
|
Hi ,
Please provede me a solution as i am still stuck in this tool .
This is working fine in the online mode only concern is batch.
Now i am using isplog as
//ISPLOG DD DISP=NEW,DSN=&TEMP,UNIT=3390
when i used this first time it worked fine for 3 , 4 times after that it stopeed working fine .
Jcl is not giving any error . I this JCL is not able to invoke the macro properly as only the macro is not giving correct solution ... it is giving RC as 16.
please help me..... |
|
| Back to top |
|
|
MBabu
Active User
Joined: 03 Aug 2008
Posts: 400
Location: Mumbai
|
|
|
|
You may need to preallocate ISPCTL0 and ISPCTL1 also. See the ISPF planning and customization guide. The message about the data set not being freed probably has no bearing on if the macros work, but you can always create cataloged temporary data sets in a previous step and allocate them old,delete in the ISPF step
You said you start the program with
| Code: |
ISPSTART CMD(%JJCHECK3 ) -
AB60399.PACKAGE.JCFILE.S9253 |
This will be invalid because the command is %JJCHECK3 and the AB60399.PACKAGE.JCFILE.S9253 will be an invalid parameter to ISPSTART. Put the data set name inside the parenthesis. |
|
| Back to top |
|
|
pradeepkit
Warnings : 1
New User
Joined: 25 Jun 2008
Posts: 60
Location: chennai
|
|
|
|
Hi MBabu ,
Can you please tell me how to preallocate ISPCTL0 and ISPCTL1 .
I am searching in the ISPF planning and customizing guide it is taking much time . Can you help me .... |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10903
Location: italy
|
|
|
|
| Quote: |
| I am searching in the ISPF planning and customizing guide it is taking much time |
why do You think that Your time is more valuable than our' s
You are getting paid to do your job,
the help You are getting here is on our time and free of charge |
|
| Back to top |
|
|
|
|
  |
All times are GMT + 6 Hours |
|
