|
View previous topic :: View next topic
|
| Author |
Message |
mbenaud
New User
Joined: 15 Jun 2009
Posts: 4
Location: Glasgow - Scotland - UK
|
|
|
|
This is my first post but I have been reading this forum for years.
I generally get all my issues fixed, but this one is confusing me.
I use a panel to enter TWS applications so I can clone them to another name for many environments. The REXX after using the panel submits a job using the following piece of code
| Code: |
DO
ADDRESS ISPEXEC
"FTOPEN TEMP"
"FTINCL TWSCLONE"
"FTCLOSE"
"VGET (ZTEMPF) SHARED"
dmy = OUTTRAP('resp.')
ADDRESS TSO; "SUBMIT '" || ZTEMPF || "'"
dmy = OUTTRAP('OFF')
SAY jobMsg()
END
|
But I am getting the following (an my second run - it works the first time)
| Code: |
23 *-* ADDRESS ISPEXEC
24 *-* "FTOPEN TEMP"
>L> "FTOPEN TEMP"
ISPF system data set allocation error - press Enter to continue.
Temporary control card data set cannot be allocated.
Data set 'MBENTLE.DEVA.SPFTEMP1.CNTL' in use by another user, try later.
ISPF102 No work file -/-Work file not open.
|
Even if I delete said SPFTEMP1 file
the output in SDSF at the top reads
| Code: |
IEF403I TWSCLO02 - STARTED - TIME=15.54.19
IEC331I 042-006(040B0425),TWSCLO02,STEP010 ,SCRT,IGG0CLH0
IEC331I VOL,TSOD92,NAME,RGILMOU.DEVA.SPFTEMP1.CNTL
IGD17060I DELETE/RENAME FAILED BECAUSE DATA SET IS OPEN 282
ON VOLUME TSOD92
DATA SET IS RGILMOU.DEVA.SPFTEMP1.CNTL
|
It doesn't make sense ?? Any idea's |
|
| Back to top |
|
 |
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
Have you tried "FTCLOSE TEMP" ???
I must admit that I always allocate and use ISPFILE for file tailoring |
|
| Back to top |
|
|
don.leahy
Active Member
Joined: 06 Jul 2010
Posts: 765
Location: Whitby, ON, Canada
|
|
|
|
| Does the job that you submitted use ISPF services? If so, it might be holding SPFTEMP1.CNTL |
|
| Back to top |
|
|
mbenaud
New User
Joined: 15 Jun 2009
Posts: 4
Location: Glasgow - Scotland - UK
|
|
|
|
Cheers expat but
| Code: |
| ISPS105 Invalid keyword -/-'TEMP' is not a valid keyword for this service. |
Cheers don.Leahy - The only ISPF it seems uses is the FT* File tailoring stuff - most of it is rexx |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley
|
|
|
|
Logoff then logon again.
Show us the traces of both the first time you run it and the second time. I do not think the first FTCLOSE worked. |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley
|
|
|
|
Also, issue TSO PROFILE MSGID before running the exec.
You did not show us the contents of TWSCLONE... does it refer to DEVA.SPFTEMP1.CNTL?
What prefix do you use? MBENTLE or RGILMOU? |
|
| Back to top |
|
|
mbenaud
New User
Joined: 15 Jun 2009
Posts: 4
Location: Glasgow - Scotland - UK
|
|
|
|
We have tried logging on and off, and Both MBENTLE and RGILMOU are doing the same jobs and it works once then not the secon time
I will get traces of the 1st and second run - when we run it laters |
|
| Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015
Posts: 712
Location: Denmark
|
|
|
|
| Your submitted job complains about rename or delete failure, why is the job allocating your temp file? If that job is still in the system then it could explain why the dataset is held. |
|
| Back to top |
|
|
|
|
