首页 > 其他 > 详细

sort sign numeric

时间:2018-11-26 19:00:47      阅读:325      评论:0      收藏:0      [点我收藏+]

//JS001   EXEC PGM=SORT                                 
//*                                                     
//SYSOUT   DD SYSOUT=*                                 
//*                                                     
//SORTIN   DD *                                         
-190000                                                 
    200                                                 
   -200                                                 
/*                                                     
//SORTOUT   DD DSN=TEMP.TLM.FTBDATE.OUT,               
//             DISP=(NEW,CATLG),                       
//             SPACE=(CYL,(1,1),RLSE),UNIT=TSTDA       
//*                                                     
//SYSIN    DD *                                         
  OPTION COPY                                           
  OUTREC OVERLAY=(15:1,7,FS,EDIT=(STTTTTTT),SIGNS=(+,-))

Read more: http://ibmmainframes.com/about50634.html#ixzz5Xx8ppiID

 

//S1    EXEC  PGM=ICEMAN                                 
//SYSOUT    DD  SYSOUT=*                                 
//SORTIN DD DSN=...  input file (FB)                     
//SORTOUT DD DSN=...  output file (FB)                                   
//SYSIN    DD    *                                       
  INREC OVERLAY=(139:139,8,UFF,TO=ZD,LENGTH=8)           
  SORT FIELDS=(01,9,CH,A)                               
  SUM FIELDS=(139,8,ZD)                                 
  OUTREC OVERLAY=(139:139,8,ZD,EDIT=(TTTTT.TT))

Read more: http://ibmmainframes.com/about33926.html#ixzz5XxBsibCw

sort sign numeric

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

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