FWIW, here his my example:

//STEP00   EXEC PGM=IDCAMS
//FILEIN   DD DSN=&DSNENV..DEMAND.DMDMTC.CICS,
//            DISP=SHR
//FILEOUT  DD DSN=&DSNENV..DEMAND.DMDMTC,
//            DISP=SHR
//SYSIN    DD *
 REPRO INFILE (FILEIN)-
       OUTFILE (FILEOUT) REUSE
//SYSPRINT DD SYSOUT=*
//STEP01   EXEC PGM=SORT,COND=(4,LT)
//SORTIN   DD DSN=&DSNENV..DEMAND.DMDMTC,
//            DISP=SHR
//         DD DSN=&DSNENV..DEMAND.DDGENMT,
//            DISP=SHR
//         DD DSN=&DSNENV..DEMAND.DRTNMTC,
//            DISP=SHR
//         DD DSN=&DSNENV..DEMAND.DDMNTXX,
//            DISP=SHR
//         DD DSN=&DSNENV..DEMAND.DBKPGMT,
//            DISP=SHR
//         DD DSN=&DSNENV..DEMAND.DDMTCE,
//            DISP=SHR
//         DD DSN=&DSNENV..DEMAND.DDGMTC,
//            DISP=SHR
//         DD DSN=&DSNENV..DEMAND.MTCE.SAVE04,
//            DISP=SHR
//SORTOUT  DD DSN=&DSNENV..DEMAND.DDAMTC,
//            DISP=SHR
//DFSPARM  DD *
 SORT FIELDS=(1,10,PD,A,13,4,PD,A,17,4,PD,A,11,2,PD,A),EQUALS
//SYSOUT   DD SYSOUT=*


________________________________
From: IBM Mainframe Discussion List <[email protected]> on behalf of Sri 
h Kolusu <[email protected]>
Sent: Wednesday, August 31, 2016 12:20 PM
To: [email protected]
Subject: Re: DFSORT mixed VSAM & sequential.

John,

As Bill mentioned it is the access methods that is preventing the
concatenation of the VSAM files.

 If you can send your existing job and  control cards may be I can suggest
an alternative to copying VSAM to sequential file

Thanks,
Kolusu
DFSORT Development
IBM Corporation



From:   John McKown <[email protected]>
To:     [email protected]
Date:   08/31/2016 08:11 AM
Subject:        DFSORT mixed VSAM & sequential.
Sent by:        IBM Mainframe Discussion List <[email protected]>



I can't find a way to do the following. Basically a programmer want to
create an output data set which is the sorted input from a sequential data
set and a VSAM file. I don't see any way to do this easily. We plan to
unload the VSAM to sequential, then sort it with the other sequential data
set. But that is just more work. I wonder why DFSORT doesn't have a way to
handle this.

--
Unix: Some say the learning curve is steep, but you only have to climb it
once. -- Karl Lehenbauer
Unicode: http://xkcd.com/1726/

Maranatha! <><
John McKown

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN






----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to