Use IFTHEN clauses if you want to insert, rearrange, delete or overlay fields in different ways for different records. If clause 1 is not satisfied, its overlay item is not applied and processing continues. If clause 2 is satisfied, its build items are applied and processing continues. If clause 2 is not satisfied, its build items are not applied and processing continues. If clause 3 is satisfied, its build items are applied and processing continues.
|Published (Last):||27 February 2013|
|PDF File Size:||15.12 Mb|
|ePub File Size:||1.92 Mb|
|Price:||Free* [*Free Regsitration Required]|
Convert data to hexadecimal representation. Convert case. Convert numeric values to another format. Perform arithmetic operations. Insert sequence number. Change record Length. In short operation will be performed on the input file. It will be in position 1 of the output record. The second field begins in byte 40 of the input record and is a byte ZD field. The field will be converted to PD. It will be in position 21 of the output record. The third field begins in byte 60 of the input record and is 5 bytes long.
It will be in position 29 of the output record. IN the above example we used absolute positioning using ":". We can also just specify the position in input file and it will create fields back to back. In short Operation will be performed on the output file. Delete or repeat segments of the input records. Insert character strings between data fields. Insert binary zeros. Create a sequence number field.
Convert numeric data to printable format or to another numeric data format. Perform arithmetic operations multiply, divide, add, subtract and minimum and maximum functions with numeric fields and constants. Convert data to printable hexadecimal format. Select, realign, and reorder data fields. Convert a variable length record input file to a fixed length record output file. The number nn will be used as fileid.
z/OS : Débuter avec DFSORT
DFSORT Best Example for Multiple Overlay
DFSORT – Skip and read selective records – SKIPREC and STOPAFT
IBM MAINFRAME & MVS FORUM