码迷,mamicode.com
首页 > 其他好文 > 详细

jcl sort Splitting Files based on a condition

时间:2020-06-29 17:02:54      阅读:58      评论:0      收藏:0      [点我收藏+]

标签:href   mes   rto   ase   read   http   tin   col   htm   

//SORT1 EXEC PGM=SORT   
//SORTIN  DD *           
02CAR                   
2370000000000000 SMPL1   
2370000000000000 SMPL2   
2370000000000000 SMPL3   
9201007160000000         
02BIKE                   
2370000000000000 SMPL4   
2370000000000000 SMPL5   
2370000000000000 SMPL6   
9201007160000000         
//SORTOF01 DD SYSOUT=*   
//SORTOF02 DD SYSOUT=*   
//SYSOUT   DD SYSOUT=*         
//SYSIN    DD *                                               
 INREC IFTHEN=(WHEN=GROUP,BEGIN=(1,1,CH,EQ,C0),PUSH=(81:3,4))
 SORT FIELDS=COPY                                             
 OUTFIL FILES=01,                                             
        INCLUDE=(81,4,CH,EQ,CCAR ,AND,1,1,CH,EQ,C2),       
        BUILD=(1,80)                                           
 OUTFIL FILES=02,                                             
        INCLUDE=(81,4,CH,EQ,CBIKE,AND,1,1,CH,EQ,C2),       
        BUILD=(1,80)                                           
/*      

 

 

Read more: http://ibmmainframes.com/about51182.html#ixzz6Qk0akaB7

jcl sort Splitting Files based on a condition

标签:href   mes   rto   ase   read   http   tin   col   htm   

原文地址:https://www.cnblogs.com/kakaisgood/p/13208619.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!