Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
SAS - Temp dataset with DISP=MOD

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
View previous topic :: :: View next topic  
Author Message
vasanthz

Global Moderator


Joined: 28 Aug 2007
Posts: 1628
Location: Oregon

PostPosted: Tue Jun 24, 2014 2:00 am    Post subject: SAS - Temp dataset with DISP=MOD
Reply with quote

Hi,

There is a JCL DD statement which allocates a TEMP file with DISP=MOD.
Code:
//TEMP     DD DSN=&&TEMP,DISP=(MOD,PASS),SPACE=(TRK,(5,2)),
//       DCB=(RECFM=VB,LRECL=2500,BLKSIZE=27998)
I need to convert this into SAS FILENAME statement.

Tried the below code as given in http://support.sas.com/documentation/cdl/en/hosto390/61886/HTML/default/viewer.htm#mvs-allexf-ufs.htm
Code:
FILENAME TEMP '&TEMP' DISP=NEW SPACE=(TRK,(3,1))
         LRECL = 2500 RECFM = VB BLKSIZE = 27998;
FILENAME TEMP '&TEMP' DISP=MOD;

But this file is still being written in DISP=OLD.

Test program:
Code:
FILENAME TEMP '&TEMP' DISP=NEW SPACE=(TRK,(3,1))
         LRECL = 2500 RECFM = VB BLKSIZE = 27998;
FILENAME TEMP '&TEMP' DISP=mod;
/* this step writes one record into temp file */
data think;
file temp;
put ' hello';
run;
/* this step writes second record into temp file */
data next;
file temp;
put 'world';
run;
/* this step reads the temp file and wrrites it into log */
data _null_;
infile temp;
input;
put _infile_;
run;


Expected output in SAS log:
Code:
hello
world

Actual output in SAS log:
Code:
world


Could you please let me know how to allocate a TEMP file with DISP=MOD in SAS. I cannot use JCL since there are a lot of TEMP files and the number of temp datasets are dynamic.
Thanks & Regards,
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7314

PostPosted: Tue Jun 24, 2014 2:23 am    Post subject: Reply to: SAS - Temp dataset with DISP=MOD
Reply with quote

What about coding a disposition for termination? KEEP?
Back to top
View user's profile Send private message
vasanthz

Global Moderator


Joined: 28 Aug 2007
Posts: 1628
Location: Oregon

PostPosted: Tue Jun 24, 2014 11:59 am    Post subject:
Reply with quote

Hello Bill,
Yup tried coding termination parameter as well. Still the same issue.
The file is being treated as disp = old.

Thanks,
Back to top
View user's profile Send private message
vasanthz

Global Moderator


Joined: 28 Aug 2007
Posts: 1628
Location: Oregon

PostPosted: Tue Jun 24, 2014 7:19 pm    Post subject:
Reply with quote

Hello,
This method worked.

Mentioning MOD in the FILE statement.

Code:
FILENAME TEMP '&TEMP' DISP=NEW SPACE=(TRK,(3,1))
         LRECL = 2500 RECFM = VB BLKSIZE = 27998;
/* this step writes one record into temp file */
data think;
file temp mod;
put 'hello';
run;
/* this step writes second record into temp file */
data next;
file temp mod;
put 'world';
run;
/* this step reads the temp file and wrrites it into log */
data _null_;
infile temp;
input;
put _infile_;
run;


Regards,
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Placement of an LPALIB dataset for IPL Alan Playford JCL & VSAM 3 Sun May 12, 2019 5:50 pm
No new posts Need to strip off first line - ascii ... harisukumaran DFSORT/ICETOOL 7 Thu May 02, 2019 12:35 am
No new posts Unpack 'PACK ON' dataset via job? Auryn TSO/ISPF 2 Thu Mar 14, 2019 4:09 pm
No new posts how to copy a sequential dataset by u... javen777 JCL & VSAM 3 Thu Feb 21, 2019 11:37 pm
No new posts How to substring a new dataset name f... javen777 JCL & VSAM 6 Tue Feb 19, 2019 12:00 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us