Author: ballaswaroop
Subject: Continuation Character
Posted: Thu Aug 25, 2016 4:46 pm (GMT 5.5)
//S010 EXEC PGM=SORT
//SORTIN DD DSN=BILLN1.TESTP.AHS.HEADER.ONE,DISP=SHR
//SORTOUT DD DSN=BILLN1.TESTP.AHS.HEADER.ONE,DISP=SHR
//* DISP=(NEW,CATLG,CATLG),
//* SPACE=(CYL,(50,50),RLSE),
//* DCB=*.SORTIN
//SYSOUT DD SYSOUT=*
//SYSIN DD *
----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
SORT FIELDS=COPY
OUTREC FIELDS=(1,550,C'NST_NBR,RECORD,MNTN_DATE,MNTN_TIME,TIEBRK,AIX *
*_TIEBRK,AIX2_INST,AIX2_APPL_CODE,AIX2_ACCT_NBR,AIX2_MNT*
*_DATE,AIX2_MNTN_TIME,AIX2_TIEBRK,REC_FLDS,REGION,TYPE,U*
*ER_CODE_4,SVC_CODE,ORIG_CODE,FUNCTION,BATCH_FORM,INFC_C*
*ST_SHRT,EXPIRE_DATE,BATCH_FIELD,AMT_REC_CODE,AMT_APPL_C*
*DE,FIELD_NBR,PANEL_ID,FIELD_NAME,OLD_EDIT,NEW_EDIT,RPT_*
*FFECT_DATE,RPT_MNTN_DATE,RPT_HIST_DATE,,RPT_MNTN_TIME,D*
*RECT_CODE,DATE_IND,PRICE_LIST_NBR,TAX_REGION,')
/*
//*
Getting the following error
SYSIN :
SORT FIELDS=COPY
OUTREC FIELDS=(1,550,C'NST_NBR,RECORD,MNTN_DATE,MNTN_TIME,TIEBRK,AIX *
*
*_TIEBRK,AIX2_INST,AIX2_APPL_CODE,AIX2_ACCT_NBR,AIX2_MNT*
*_DATE,AIX2_MNTN_TIME,AIX2_TIEBRK,REC_FLDS,REGION,TYPE,U*
*ER_CODE_4,SVC_CODE,ORIG_CODE,FUNCTION,BATCH_FORM,INFC_C*
*ST_SHRT,EXPIRE_DATE,BATCH_FIELD,AMT_REC_CODE,AMT_APPL_C*
*DE,FIELD_NBR,PANEL_ID,FIELD_NAME,OLD_EDIT,NEW_EDIT,RPT_*
*FFECT_DATE,RPT_MNTN_DATE,RPT_HIST_DATE,,RPT_MNTN_TIME,D*
*RECT_CODE,DATE_IND,PRICE_LIST_NBR,TAX_REGION,')
WER813I INSTALLATION OPTIONS IN MFX LOAD LIBRARY WILL BE USED
WER268A OUTREC STATEMENT : SYNTAX ERROR
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
Subject: Continuation Character
Posted: Thu Aug 25, 2016 4:46 pm (GMT 5.5)
//S010 EXEC PGM=SORT
//SORTIN DD DSN=BILLN1.TESTP.AHS.HEADER.ONE,DISP=SHR
//SORTOUT DD DSN=BILLN1.TESTP.AHS.HEADER.ONE,DISP=SHR
//* DISP=(NEW,CATLG,CATLG),
//* SPACE=(CYL,(50,50),RLSE),
//* DCB=*.SORTIN
//SYSOUT DD SYSOUT=*
//SYSIN DD *
----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
SORT FIELDS=COPY
OUTREC FIELDS=(1,550,C'NST_NBR,RECORD,MNTN_DATE,MNTN_TIME,TIEBRK,AIX *
*_TIEBRK,AIX2_INST,AIX2_APPL_CODE,AIX2_ACCT_NBR,AIX2_MNT*
*_DATE,AIX2_MNTN_TIME,AIX2_TIEBRK,REC_FLDS,REGION,TYPE,U*
*ER_CODE_4,SVC_CODE,ORIG_CODE,FUNCTION,BATCH_FORM,INFC_C*
*ST_SHRT,EXPIRE_DATE,BATCH_FIELD,AMT_REC_CODE,AMT_APPL_C*
*DE,FIELD_NBR,PANEL_ID,FIELD_NAME,OLD_EDIT,NEW_EDIT,RPT_*
*FFECT_DATE,RPT_MNTN_DATE,RPT_HIST_DATE,,RPT_MNTN_TIME,D*
*RECT_CODE,DATE_IND,PRICE_LIST_NBR,TAX_REGION,')
/*
//*
Getting the following error
SYSIN :
SORT FIELDS=COPY
OUTREC FIELDS=(1,550,C'NST_NBR,RECORD,MNTN_DATE,MNTN_TIME,TIEBRK,AIX *
*
*_TIEBRK,AIX2_INST,AIX2_APPL_CODE,AIX2_ACCT_NBR,AIX2_MNT*
*_DATE,AIX2_MNTN_TIME,AIX2_TIEBRK,REC_FLDS,REGION,TYPE,U*
*ER_CODE_4,SVC_CODE,ORIG_CODE,FUNCTION,BATCH_FORM,INFC_C*
*ST_SHRT,EXPIRE_DATE,BATCH_FIELD,AMT_REC_CODE,AMT_APPL_C*
*DE,FIELD_NBR,PANEL_ID,FIELD_NAME,OLD_EDIT,NEW_EDIT,RPT_*
*FFECT_DATE,RPT_MNTN_DATE,RPT_HIST_DATE,,RPT_MNTN_TIME,D*
*RECT_CODE,DATE_IND,PRICE_LIST_NBR,TAX_REGION,')
WER813I INSTALLATION OPTIONS IN MFX LOAD LIBRARY WILL BE USED
WER268A OUTREC STATEMENT : SYNTAX ERROR
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
