I am getting the file from Unix to Mainframes for every 15
minutes. The mainframe job get abended with bad records
coming from unix. I recovered that by deleting the bad data.
I need permenant solution how to fix the issue? The record
is getting characters in in first 9 positions which it
should not.
Please provide me the solution how to skip the records if
it finds the charcters in the first 9 positions.
K

Answer Posted / amy

TRY OUT SORT UTILITY---
//STEP1 EXEC PGM=SORT
//SORTIN DD DSN=INPUT.FROM.UNIX
//SORTOUT DD DSN=OUTPUT.AT.MAINFRM.
//SORTWRK DD ------
//SYSIN DD *
SORT FIELDS=COPY
INREC FIELDS=(1:10,71)
/*
//* ASSUMING LRECL=80.OTHERWISE CHANGE 71 TO (LRECL-9)

Is This Answer Correct ?    0 Yes 2 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Which dd parameters are required?

695


How to do automated restart when a job abend?

791


Must tape dataset definitions include vol=ser specifications?

983


What is the function of a dd statement?

709


Where can program checkpoints be stored for use in a restart?

851






What is the use of symbol // in jcl?

930


How can an in-stream dataset be terminated?

849


Name the parameters which can be used to limit the number of records written to a sysout dataset?

654


how do you access an uncataloged dataset in a jcl?

841


what sort card you will use to copy the data from one dataset to another dataset?

731


how you will the direct the data to spool using sysout option?

1765


Name the statement which can be used to send data to another mvs jes3 node?

605


What methodology can be adapted to transfer data to a program that is coded using the exec statement?

612


Explain about ISPF/TSO Commands

1313


I want to JCL sort for Non-COMP and COMP-3 fields SORT FIELDS=(1,5,A,6,11,A,12,11,A,19,1,A,20,1,A),FORMAT=BI,EQUALS Length of comp bytes is 11 bytes which start at 6byte and 12 byte considering 11 bytes in comp-3 is 6 bytes. Can anyone tell if the above sort work SORT FIELDS=(1,5,A,6,6,A,12,6,A,19,1,A,20,1,A),FORMAT=BI,EQUALS does not works OK

1486