IBM Mainframe Forum

SYNCSORT FOR Z/OS  1.4.0.1R
SYSIN :                                                 
  SORT FIELDS=COPY                                       
  OUTFIL REMOVECC,NODETAIL,                             
  HEADER1=(3:'OPTION COPY',/,                           
           3:'OUTFIL FNAMES=(FILE1,FILE2),SPLIT1R=',JP1)
                                                    *   
WER131I  PARM FIELD ERROR - JP1"5000                     
WER268A  OUTFIL STATEMENT  : SYNTAX ERROR               
WER211B  SYNCSMF  CALLED BY SYNCSORT; RC=0000           
WER449I  SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE           

// SET REGION='TEST'                           
//*
//STEP1    EXEC PGM=SORT,PARM='JP1"&REGION"'   
//SYSOUT   DD SYSOUT=*                         
//SORTIN   DD *                               
//SORTOUT  DD SYSOUT=*                         
//SYSIN    DD *                               
  SORT FIELDS=COPY                             
  OUTFIL REMOVECC,NODETAIL,                   
  HEADER1=(3:'SELECT * FROM',/,               
           3:JP1,'.EMPLOYEE',/,               
           3:'FOR FETCH ONLY WITH UR;')       
//*                                           

SELECT * FROM
TEST.EMPLOYEE
FOR FETCH ONLY WITH UR;