
平台论坛博客文库

› 论坛 › 操作系统 › AS400 › 有个编程的问题想请教大家,不知用RPG 怎么处理?

有个编程的问题想请教大家,不知用RPG 怎么处理? [复制链接]

yorwee

白手起家

论坛徽章:: 0

1楼 [报告]

发表于 2007-04-26 22:18 |显示全部楼层

W0FD KLIST
         KFLD KD1
         KFLD KD2

MOVE A KD1
MOVE B KD2
W0FD CHAIN wk01pf    80
IN80* IFEQ *OFF
ADD 1 W0CNT
W0FD READE  WK01PF

....

参照2楼的原理

[ 本帖最后由 yorwee 于 2007-4-26 23:11 编辑 ]

返回列表

Chinaunix › 论坛 › 操作系统 › AS400 › 有个编程的问题想请教大家,不知用RPG 怎么处理?