WEB8

경고
  박우범허락 없이는 상업적 사용을 금합니다.


 
2.4.12  MULTIPLY statement
          ( 곱셈 문 )
 
  
  [형식 1] 
                 
  MULTIPLY { 데이터명-1 } BY 데이터명-2 [ ROUNDED ]  
  리터랄-1
                 
      [ 데이터명-3  [ ROUNDED ] ]  
                 
            [ ON SIZE ERROR  무조건 명령 ]  
                 
 
 BY 앞의 데이터명의 값과 BY 뒤의 데이터명의 값을 곱하여,
BY 뒤의 데이터명에 기억시킵니다.
  
 [예문 1] 
MULTIPLY A BY B.
( B = B × A )
MULTIPLY 5 BY B C.
( B = B × 5 , C = C × 5 )
 
  
 [예문 2] 
MULTIPLY A BY B ROUNDED D.
( B = B × A , D = D × A )
 
 B의 결과 값은 반올림된 값이 기억됩니다.
 
 
  
  [형식 2] 
                       
  MULTIPLY { 데이터명-1 } BY { 데이터명-2 } GIVING 데이터명-3  
  리터랄-1 리터랄-2  
                       
    [ ROUNDED ]   [ 데이터명-4  [ ROUNDED ] ]  
                       
              [ ON SIZE ERROR  무조건 명령 ]  
                       
 
 BY 앞과 뒤의 값을 곱하여 GIVING 뒤의 데이터명에 기억시킵니다.
 ROUNDED와 ON SIZE ERROR 구는 앞의 내용과 동일합니다.
  
 [예문 1] 
MULTIPLY A BY J GIVING K.
( K = A × J )
MULTIPLY 20 BY J GIVING K ROUNDED.
( K = 20 × J )
 
 [예문 2] 
MULTIPLY  A   BY  B  GIVING  C  ON SIZE ERROR  GO TO  K-RTN.
해설)
 C에 결과 값이 기억되며,
SIZE(크기) ERROR가 발생하면 K-RTN으로 분기합니다.
 
 
 
지적 소유권을 보호합시다.
 
 

sqCLOUD17 sqCLOUD13