代码之家 › 专栏 › 技术社区 › Huzo

如何删除前导零并将整数变量中的数字移到最左边

cobol integer format

Huzo · 技术社区 · 6 年前

所以假设我有一个存储两位数的变量。 01 my-int PIC 99 . 但是什么时候 my-int 采用一个数字值,例如 01 ,我想把它做成 1 打印时,数字总是在最左边,而空格在右边。关于我应该如何定义的任何想法 我的int 为了达到这个目的?
谢谢!

1 回复 | 直到 6 年前

Simon Sobisch 6 年前

定义我的int以存储数据 01 my-int PIC 99 ,然后使用已编辑的 01 my-edit PIC z9 使用 MOVE my-int TO my-edit 和 DISPLAY FUNCTION TRIM (my-edit LEADING) 或者(在只有一个空格的特殊情况下):

IF my-int > 9
  DISPLAY my-int
ELSE
  DISPLAY my-int (2:)
END-IF

推荐文章

sunleo · 这是否可以使用java将EBCDIC Comp-3文件转换为ASCII文件值?

7 年前

Bruce Martin · 如何为Cobol copybook生成java~jrecord代码

7 年前

SaggingRufus · 是否需要在我的JCL中指定所有文件?

7 年前

JOHN · 如何解决CICS中的PROG753错误?

8 年前

MC Emperor · 如何处理作为CALL语句参数的文字?

9 年前

Lena · 将字母转换为包含数字的字符串中的数字

9 年前

Sridhar · 用于cobol显示和解包数字字段的Java映射

9 年前

raz_user · 由尾随空格分隔的Cobol字符串

9 年前

Benjer · 有没有一种方法可以用现代Cobol写评论?[副本]

10 年前

user3401335 · 用cobol计算变量的长度字符串

11 年前