Fujitsu UDS/SQL V2.5 Manual Do Utilizador

Página de 324
User interface
Subschema DDL (example)
U929-J-Z125-9-76
  
195
D
ok
us
c
h
abl
on
en
 1
9x
24 V
e
rs
ion
 7
.3
us
 f
ü
r F
ram
eM
ak
er
 V
7
.x
v
o
m
 1
4.
02
.2
00
7
©
 c
o
gni
tas
 Gm
b
H
 20
01-
20
07
18
. Ok
tobe
r 20
07
  S
ta
nd
 1
1:
29
.4
9
P
fa
d:
 G
:\
v
og
t\
fs
c
\ud
s
\M
anu
al
e
\e
n\
ud
s
e
nt
_e\
u
ds
ent
.k
0
6
6.1.8
Comprehensive example of subschema DDL 
IDENTIFICATION DIVISION.                                                                                       
SUB-SCHEMA NAME IS ADMIN OF SCHEMA MAIL-ORDERS                                                             
PRIVACY KEY FOR COPY IS "SHIP-KEY".                                                                        
*                                                                                                               
*                                                                                                               
*                                                                                                               
DATA DIVISION.                                                                                                 
*                                                                                                               
AREA SECTION.                                                                                                  
COPY ALL AREAS.                                                                                            
*                                                                                                               
RECORD SECTION.                                                                                                
COPY ALL RECORDS.                                                                                          
*                                                                                                               
SET SECTION.                                                                                                   
COPY ALL SETS.                                                                                             
*                                                                                                               
*