Creazione di una Tabella |
  
|
Creazione di una Tabella |
|
La prima operazione da fare è creare la .CPY e la .FD della tabella.
Occorre fare attenzione alla definizione dei vari campi inserendo le corrette specifiche XFD per le tipologie speciali, es. le date.
Qui di seguito un esempio in cui sono definiti un campo data ed un campo "time":
$xfd date=YYYYMMDD
02 rcit-ass-data pic 9(08).
$xfd date=HHNNSS
02 rcit-ass-ora pic 9(06).
In questo esempio invece viene definito un campo gruppo per il codice merce, (il fatto che la merce sia o meno gruppo dipende da come deve essere trattato dall'applicazione esterna che usa il Database)
$xfd use group
03 bmer-codice.
04 bmer-gru pic x(02).
04 bmer-sot pic x(02).
04 bmer-cod pic 9(05).
L'FD deve contenere la variabile in cui viene definito il nome fisico della tabella ed obbligatoriamente dovrà essere:
w-nome-nometabella
dove appunto nometabella= nome logico della tabella
es.
select arpintes assign to random w-nome-arpintes
organization is indexed
access mode is dynamic
record key is rcit-chia1
file status stato.
.