°æ°í
¹Ú¿ì¹ü
ÀÇ
Çã¶ô ¾øÀÌ´Â »ó¾÷Àû »ç¿ëÀ» ±ÝÇÕ´Ï´Ù.
2.4.8.2
MOVE CORRESPONDING statement
( Áý´Ü Ç׸ñÀÇ ÀÌ¼Û )
[
Çü½Ä
]
MOVE
{
CORRESPONDING
}
µ¥ÀÌ
ÅÍ
¸í-1
TO
µ¥ÀÌ
ÅÍ
¸í-2
CORR
¢Ñ
µ¥ÀÌ
ÅÍ
¸í-1(±×·ì¸í)¿¡ Á¾¼ÓµÈ Ç׸ñÀÇ °ªÀÌ µ¥ÀÌ
ÅÍ
¸í-2(±×·ì¸í)¿¡
°°Àº À̸§ÀÇ Ç׸ñÀ¸·Î µ¥ÀÌ
ÅÍ
°¡ Àü¼Û
µË´Ï´Ù.
[
¿¹¹® 1
]
01
A-R.
03
A
PIC
9(3).
03
B
PIC
9(3).
03
C
PIC
X(2).
01
B-R.
03
A
PIC
9(3).
03
B
PIC
9(3).
03
C
PIC
X(2).
:
MOVE
CORR
A-R
TO
B-R.
MOVE
A IN
A-R
TO
A IN
B-R.
<
Çؼ³
>
¢Ñ
°³º°ÀûÀÎ Ç׸ñ³¢¸® Àü¼Û
,
AÇ׸ñ¸¸ Àü¼Û
µË´Ï´Ù.
[
¿¹¹® 2
]
01
C-R.
03
A
PIC
9.
03
B
PIC
X.
03
C
PIC
9(5).
03
D
PIC
A(3).
03
E
PIC
X(4).
01
D-R.
03
C
PIC
9(5).
03
B
PIC
X.
03
D
PIC
A(3).
:
MOVE
CORR
C-R
TO
D-R.
<
Çؼ³
>
¢Ñ
Ç׸ñÀÇ ¼ø¼°¡ ´Þ¶óµµ C-RÀÇ B¡¤C¡¤D´Â D-RÀÇ B¡¤C¡¤D·Î °¢°¢ Àü¼Û
µË´Ï´Ù.
ÁöÀû ¼ÒÀ¯±ÇÀ» º¸È£ÇսôÙ.
µÚ·Î
óÀ½
´ÙÀ½