Fujitsu UDS/SQL V2.5 사용자 설명서

다운로드
페이지 324
Subschema DDL
Reference section
260
  
 U929-J-Z125-9-76
9.3.3
RECORD SECTION 
 
   RECORD SECTION.
        
⎧COPY ALL RECORDS.           ⎫
       [
⎨                            ⎬]
        
⎩{COPY record-name-1,...}....⎭
   [01  record-name-2.
        {level-number record-element-name[ PICTURE IS mask-string]
                                 
 [ GROUP-USAGE IS NATIONAL]
                                             
⎧DISPLAY          ⎫
                                             
                 
                                             
COMPUTATIONAL-3  
                                             
                 
                                             
COMPUTATIONAL    
                                  [ USAGE IS 
⎨                 ⎬]
                                              NATIONAL         
                                             
                 
                                              DATABASE-KEY     
                                                              
                                             
⎩DATABASE-KEY-LONG⎭
                                  [ OCCURS integer TIMES].}...
        [88 condition-name
             
⎧VALUE IS  ⎫
             
⎨          ⎬ {literal-1[ THROUGH literal-2]},... .]...]...
             
⎩VALUES ARE⎭
 
record-name-2
  
must not be identical with record-name-1 and must not be used in combination with 
COPY ALL RECORDS. 
level-number
  
must be an integer between 02 and 49. 
mask-string
  
See 
GROUP-USAGE  
If the GROUP-USAGE clause is specified, all lower-ranking record elements must 
be of the type NATIONAL.