首页 > 其他 > 详细

jcl sort Splitting Files based on a condition

时间:2020-06-29 16:33:21      阅读:73      评论:0      收藏:0      [点我收藏+]
//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

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

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!