RPGIV编程问题百解(26)V5R4 declaration overlay *next的算法
问题:
D DS
D EffDate
D EFDTCH overlay(EffDate)
D EFDTYH overlay(EffDate:*next)
D EFDTMH overlay(EffDate:*next)
D EFDTDH overlay(EffDate:*next)
D
D EFDTCR overlay(EffDate)
D EFDTYR overlay(EffDate:*next)
D EFDTMR overlay(EffDate:*next)
D EFDTDR overlay(EffDate:*next)
D
D EFDTCM overlay(EffDate)
D EFDTYM overlay(EffDate:*next)
D EFDTMM overlay(EffDate:*next)
D EFDTDM overlay(EffDate:*next)
每一组的第一个字段为1S 0,其它为2S 0。没有压缩数字类型。
EffDate的长度是多少?
回答:
EFDTCH 1-1
EFDTYH 2-3
EFDTMH 4-5
EFDTDH 6-7
EFDTCR 1-1
EFDTYR 8-9
EFDTMR 10-11
EFDTDR 12-13
EFDTCM 1-1
EFDTYM 14-15
EFDTMM 16-17
EFDTDM 18-19
阅读(718) | 评论(0) | 转发(0) |