Chinaunix首页 | 论坛 | 博客
  • 博客访问: 23339
  • 博文数量: 14
  • 博客积分: 480
  • 博客等级: 中士
  • 技术积分: 250
  • 用 户 组: 普通用户
  • 注册时间: 2011-07-28 00:07
文章分类

全部博文(14)

文章存档

2011年(24)

我的朋友
最近访客

分类: IT业界

2011-07-30 21:19:08

unpack lv1 to lv2
 
After the assignments,char1 and char2 contain the values "123.456" and "0000123456".
DATA: pack  TYPE p LENGTH 8 DECIMALS 3 VALUE '123.456',
      char1 TYPE c LENGTH 10,
      char2 TYPE c LENGTH 10.
MOVE   pack TO char1.
UNPACK pack TO char2.
阅读(218) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~