在JCL中向字符串添加零填充

Question

在JCL中，如何在字符串中添加“0”填充，以便我的字符串长度始终为 10？ 我正在为jcl使用TSSUtil v3工具。

If input "10541", 5 padding is added = 0000010541

Answer 1

如果您无法通过TSSUTIL获得解决方案，请按照以下方式使用SORT产品：

//STEP001  EXEC PGM=SORT                           
//SORTIN DD *                                      
24567                                              
1456                                              
47865                                              
24875                                              
1                                              
//SORTOUT DD SYSOUT=*                              
//SYSIN DD *                                       
  OPTION COPY                                      
  INREC BUILD=(1,10,UFF,M11,LENGTH=10)             
//SYSOUT DD SYSOUT=* 

<强>输出

0000024567
0000001456
0000047865
0000024875
0000000001