English Deutsch Français Italiano Español Português 繁體中文 Bahasa Indonesia Tiếng Việt ภาษาไทย
All categories

1 answers

01 TABLE.
03 LEVEL OCCURS 10.
05 CODE1 PIC S9(4) COMP.
05 CODE2 PIC X(20).

PROCEDURE DIVISION.

MOVE CODE2 (I) TO DATASTORE.

2007-07-06 07:31:46 · answer #1 · answered by AnalProgrammer 7 · 0 0

fedest.com, questions and answers