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: 1532
Location: Chennai

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: 1532
Location: Chennai

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: 1532
Location: Chennai

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 File Tailoring -- Temporary dataset i... samzee71 CLIST & REXX 3 Fri Dec 01, 2017 3:12 am
No new posts Copy 4 byte of data from the last rec... arunsoods DFSORT/ICETOOL 9 Fri Oct 06, 2017 12:15 pm
No new posts opening a dataset after reading it fr... arunsoods DFSORT/ICETOOL 5 Wed Oct 04, 2017 3:54 pm
No new posts Updating the Trailer count in variabl... satheshbabur DFSORT/ICETOOL 6 Wed Aug 30, 2017 9:49 pm
No new posts Mainframe dataset split purushottam DFSORT/ICETOOL 13 Tue Aug 29, 2017 12:28 pm

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