IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Error using SYSIN DD DUMMY


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
hikaps14

Active User


Joined: 02 Sep 2005
Posts: 189
Location: Noida

PostPosted: Fri Aug 03, 2007 12:30 pm
Reply with quote

Hi,

I just wanted to initialize an empty file.
I tried using :

Code:

//STEP0010 EXEC PGM=SORT,COND=(0,NE)           
//SORTIN   DD DUMMY                                 
//SORTOUT  DD DSN=&&DUMMY1,                     
//            DISP=(NEW,PASS),                 
//            UNIT=SYSDA,SPACE=(TRK,(1,1),RLSE),
//            RECFM=FB,LRECL=80                 
//SYSIN    DD DUMMY                             
//SYSOUT   DD  SYSOUT=*                         
//SYSPRINT DD  SYSOUT=*                         


I received the following error message:

ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 - 23:52 ON THU AUG
ICE010A 0 NO SORT OR MERGE CONTROL STATEMENT
ICE751I 0 C5-K90007 C6-K90007 E7-K11698
ICE052I 3 END OF DFSORT

can't we use DUMMY in sysin ?

-Kapil.
Back to top
View user's profile Send private message
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1436
Location: Bangalore,India

PostPosted: Fri Aug 03, 2007 12:38 pm
Reply with quote

Kapil,

Quote:
can't we use DUMMY in sysin ?

SORT expects you to provide some control statements in SYSIN.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Fri Aug 03, 2007 1:16 pm
Reply with quote

why not?
Code:

//DELLOAD  EXEC PGM=IEFBR14
//LOADMOD  DD  DSN=&&DUMM1,
//             DISP=(NEW,PASS),
//             UNIT=SYSDA,SPACE=(TRK,(1,1),RLSE),
//             RECFM=FB,LRECL=80
Back to top
View user's profile Send private message
hikaps14

Active User


Joined: 02 Sep 2005
Posts: 189
Location: Noida

PostPosted: Fri Aug 03, 2007 1:56 pm
Reply with quote

SORT expects you to provide some control statements in SYSIN.


ya, I understand that but can't we code a dummy sysin statement.

I browsed thru previous threads on this forum and found a similar statement being used.
So why am I not able to use it.

Thanks,
-Kapil.
Back to top
View user's profile Send private message
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1436
Location: Bangalore,India

PostPosted: Fri Aug 03, 2007 2:01 pm
Reply with quote

Kapil,

Quote:
ya, I understand that but can't we code a dummy sysin statement.

What does DUMMY stand for? Could you let us know.

Quote:
I browsed thru previous threads on this forum and found a similar statement being used.

Please post the link.
Back to top
View user's profile Send private message
hikaps14

Active User


Joined: 02 Sep 2005
Posts: 189
Location: Noida

PostPosted: Fri Aug 03, 2007 4:46 pm
Reply with quote

hi,

Please have a look at this:
ibmmainframes.com/viewtopic.php?t=9683&highlight=dummy

Dummy:
lets take an example of a prog A which uses 2 input file and 1 output file.
Now lets assume that out of 2 inputs 1st file always has records and the 2nd file may or may not have records.

later on if the requirements change and now on we do not require the 2nd input file.

If we remove the DD statement for 2nd I/P file, then we will have to modify the code accordingly.
Else
We will have an abend

So, here the dummy statement plays its role.

If we code DUMMY statement on the 2nd I/P file then the original code will work fine without requiring any modifications.

Thanks,
-Kapil.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Fri Aug 03, 2007 8:27 pm
Reply with quote

Quote:
SORT expects you to provide some control statements in SYSIN.

ya, I understand that but can't we code a dummy sysin statement.


No. DFSORT needs you to tell it whether you want to do a SORT, MERGE or COPY.

You could use //SYSIN DD DUMMY with IEBGENER (or DFSORT's ICEGENER) which knows you want to do a COPY. But you'll need to specify the RECFM and LRECL for the SYSUT1 DD (input):

Code:

//S1 EXEC PGM=IEBGENER                           
//SYSPRINT DD  SYSOUT=*                                               
//SYSUT1   DD DUMMY,RECFM=FB,LRECL=80           
//SYSUT2   DD DSN=&&DUMMY2,                     
//            DISP=(NEW,PASS),                   
//            UNIT=SYSDA,SPACE=(TRK,(1,1),RLSE) 
//SYSIN    DD DUMMY                             
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Error to read log with rexx CLIST & REXX 11
No new posts Error when install DB2 DB2 2
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
No new posts Error while running web tool kit REXX... CLIST & REXX 5
No new posts Getting Error while trying to establi... DB2 3
Search our Forums:

Back to Top