The END statement must be the last statement in every FORTRAN DDL subschema source program. The END statement cannot be continued. No statements or comment lines can appear after the END state ment. The format of the END statement is shown in figure 4-16.
SUBSCHEMA COMPILATION AND SUBSCHEMA LIBRARY MAINTENANCE
The FORTRAN DDL subschema source program is com piled by the FORTRAN DDL (DDLF) compiler. The DDLF compiler generates a subschema directory or object subschema from the subschema source program. A s u b s c h e m a d i r e c t o r y i s o f t e n s i m p l y c a l l e d t h e subschema.
END
Figure 4-16. END Statement Format
T h e D D L F c o m p i l e r i s a m u l t i f u n c t i o n a l c o m p i l e r.
I n a d d i t i o n t o g e n e r a t i n g a s u b s c h e m a d i r e c t o r y, t h e c o m p i l e r s t o r e s t h e d i r e c t o r y i n a s u b s c h e m a library and performs maintenance operations on the subschema library. A subschema can be used with a | FORTRAN 5 application program, depending on the l a n g u a g e v e r s i o n s p e c i fi e d i n t h e D D L F c o n t r o l statement. More than one subschema can be compiled w i t h o n e c o n t r o l s t a t e m e n t c a l l t o t h e D D L F c o m p i l e r. T h e p a r t i c u l a r o p e r a t i o n t o b e p e r f o r m e d b y the DDLF compiler is selected by a parameter in the DDLF control statement.
60485200 E 4-13
The field length requirements for subschema compi lation are indicated in appendix G.
F5
Sp e c ifi e s a s u b s ch e m a fo r u s e wi th a FORTRAN 5 application program.
SUBSCHEMA LIBRARY
One or more compiled subschemas are stored in a p e r m a n e n t fi l e c a l l e d t h e s u b s c h e m a l i b r a r y. T h e l i b r a r y i s c r e a t e d w h e n t h e fi r s t s u b s c h e m a i s s t o r e d i n i t . S u b s c h e m a s f o r b o t h l a n g u a g e v e r
s i o n s c a n r e s i d e i n t h e s a m e s u b s c h e m a l i b r a r y.
Subsequent subschemas can be added to the library or can replace existing subschemas in the library.
A subschema can be deleted from the library with a purge parameter on the DDLF control statement. A subschema library that has had subschemas replaced or purged can be transferred to a n«w, compacted subschema library.
Data security can be maintained by creating more than one subschema library in order to control the a v a i l a b i l i t y o f t h e s u b s c h e m a s t o t h e F O R T R A N programs.
S u b s c h e m a s p r o v i d i n g a c c e s s t o d a t a t h a t i s r e s t r i c t e d t o s p e c i fi c a p p l i c a t i o n s c a n b e s t o r e d i n o n e s u b s c h e m a l i b r a r y w h i l e s u b s c h e m a s f o r g e n e r a l u s e c a n b e s t o r e d i n a d i f f e r e n t l i b r a r y.
E a c h l i b r a r y i s i d e n t i fi e d b y a u n i q u e p e r m a n e n t fi l e n a m e . W h e n t h e a p p l i c a t i o n p r o g r a m i s c o m
p i l e d , a s u b s c h e m a l i b r a r y m u s t b e a t t a c h e d b y specifying the permanent file name of the library.
Subschemas stored in other libraries are not avail able to the program.
The SB parameter identifies the local file name of t h e s u b s c h e m a l i b r a r y fi l e . T h i s p a r a m e t e r i s i nt er pr ete d a s f ol l ow s :
omitted
Local file SBLFN is assumed to contain the subschema library.
SB=lfn
T h e l o c a l fi l e n a m e s p e c i fi e d I d e n t i fi e s t h e fi l e t h a t c o n t a i n s t h e s u b s c h e m a l i b r a r y .
The A, N, NL=lfn, P and R parameters along with a d e f a u l t o p e r a t i o n s e l e c t s u b s c h e m a l i b r a r y m a i n t e n a n c e o p e r a t i o n s . I f n o n e o f t h e s e p a r a m e t e r s i s s e l e c t e d , t h e f o l l o w i n g l i b r a r y m a i n t e n a n c e o p e r a
tion is assumed: adding the compiled subschema to the subschema library. Only one of the operations selected by these parameters can be performed in a s i n g l e e x e c u t i o n o f t h e D D L F c o m p i l e r. I f m o r e t h a n o n e o f t h e s e p a r a m e t e r s i s s p e c i fi e d , a c o n t r o l s t a t e m e n t e r r o r i s i s s u e d . I f a l i b r a r y m a n i p u l a t i o n f u n c t i o n i s a t t e m p t e d o n a n o n e m p t y fi l e t h a t d o e s n o t c o n t a i n a l i b r a r y, a d i a g n o s t i c i s i s s u e d a n d t h e j o b i s a b o r t e d . T h e p a r a m e t e r s are interpreted as follows:
DDLF CONTROL STATEMENT
The DDLF control statement calls the DDLF compiler f o r e x e c u t i o n . I t p r o v i d e s t h e D D L F c o m p i l e r w i t h information related to a specific subschema, speci fi e s t h e l i s t i n g s t o b e g e n e r a t e d , a n d s p e c i fi e s the subschema library maintenance operations to be p e r f or m ed. Th e for ma t o f the D D LF c ontro l stat e m e n t i s s h o w n i n fi g u r e 4 - 1 7 . O p t i o n a l l y , t h e comma immediately following DDLF can be replaced by a l e f t p a r e n t h e s i s ; t h e t e r m i n a t i n g p e r i o d c a n b e replaced by a right parenthesis.
Al l th e parameters o f th e D D LF c ontr ol sta te m ent are optional.
I T h e F 5 p a r a m e t e r s e l e c t s l a n g u a g e v e r s i o n . T h i sparameter is interpreted as follows:
omitted
I F 5 i s t h e d e f a u l t t h a t i s a s s u m e d .
omitted
Each subschema source program in the job s t r e a m i s c o m p i l e d a n d a d d e d t o t h e s u b s c h e m a l i b r a r y i d e n t i fi e d b y t h e S B parameter.
A u d i t p a r a m e t e r. A l i s t o f t h e s u b s c h e m a s a n d t h e i r c o r r e s p o n d i n g s c h e m a s , t o g e t h e r with their creation dates, is produced from the subschema library identified by the SB parameter.
Compile parameter. Each subschema source program in the job stream is compiled but not added to the subschema library identi fied by the SB parameter.
DDLF [C,F53] C,SB=lfn]
/ A ,N
, N L = l f n C,SC=lfn]C,I=lfn]C,L=lfn3C,L0=op],
Figure 4-17. DDLF Control Statement Format for FORTRAN Subschemas
.^•SSv
NL=lfn L=0
0 ^ \
N e w l i b r a r y p a r a m e t e r. T h e s p e c i fi e d l o c a l fi l e n a m e i d e n t i fi e s a n e w s u b s c h e m a l i b r a r y t o w h i c h t h e a c t i v e s u b s c h e m a s i n the subschema library, identified by the SB p a r a m e t e r , a r e t r a n s f e r e d . I f t h e N L p a r a m e t e r i s s p e c i fi e d w i t h n o fi l e n a m e i n d i c a t e d , l o c a l fi l e n a m e N E W L I B i s assumed.
Purge parameter. A subschema specified In the job stream is purged from the subschema l i b r a r y i d e n t i fi e d b y t h e S B p a r a m e t e r. N o compilation takes place.
Replace parameter. Each subschema source program in the job stream is compiled and replaces the existing subschema (identified by the SUBSCHEMA statement) in the sub schema library (identified by the SB param eter) . Replacement takes place only if no c o m p i l a t i o n e r r o r s o t h e r t h a n i n f o r m a t i v e diagnostics are encountered.
T h e S C p a r a m e t e r i d e n t i fi e s t h e l o c a l fi l e t h a t c o n t a i n s t h e s c h e m a d i r e c t o r y. A s p e c i fi e d l f n overrides the default file name determined from the SUBSCHEMA statement. The parameter is interpreted as follows:
omitted
T h e fi r s t s e v e n c h a r a c t e r s o f t h e s c h e m a name specified in the SUBSCHEMA statement of the subschema source program is assumed t o i d e n t i f y t h e l o c a l fi l e t h a t c o n t a i n s the schema directory.
SC=lfn
T h e s p e c i fi e d l o c a l fi l e n a m e i d e n t i fi e s the file that contains the schema directory.
T h e I p a r a m e t e r i d e n t i fi e s t h e l o c a l fi l e t h a t contains source input for the DDLF compiler. This parameter is interpreted as follows:
omitted
The local file INPUT is assumed to contain the source input for the DDLF compiler.
1=1 fn
T h e s p e c i fi e d l o c a l fi l e n a m e i d e n t i fi e s t h e fi l e t h a t c o n t a i n s s o u r c e i n p u t f o r t h e DDLF compiler.
T h e L p a r a m e t e r i d e n t i fi e s t h e l o c a l fi l e t h a t receives listings and diagnostics generated by the D D L F c o m p i l e r. T h i s p a r a m e t e r i s i n t e r p r e t e d a s f o l l o w s :
omitted
The local file OUTPUT receives the listings a n d d i a g n o s t i c s g e n e r a t e d b y t h e D D L F compiler.
T h e l o c a l fi l e O U T P U T r e c e i v e s o n l y t h e diagnostics generated by the DDLF compiler.
L = l f n
T h e s p e c i fi e d l o c a l fi l e n a m e i d e n t i fi e s t h e fi l e t h a t r e c e i v e s t h e l i s t i n g s a n d diagnostics generated by the DDLF compiler.
T h e L O p a r a m e t e r s e l e c t s t h e l i s t i n g p r o d u c e d b y the DDLF compiler. Two listing options (op) can be s p e c i fi e d : a s o u r c e l i s t i n g ( S o p t i o n ) a n d a n o b j e c t l i s t i n g ( 0 o p t i o n ) . S o u r c e a n d o b j e c t l i s t i n g s a r e w r i t t e n t o t h e fi l e s p e c i fi e d b y t h e L p a r a m e t e r . I f L = 0 i s s p e c i fi e d , n o l i s t i n g i s produced except for error messages regardless of LO s p e c i fi c a t i o n . T h e p a r a m e t e r i s i n t e r p r e t e d a s f o l l o w s :
omitted
Same as L0=S; a source listing is produced.
LO
S a m e a s L 0 = S ; a s o u r c e l i s t i n g o n l y i s produced.
L0=op L0=opit/op2
T h e s p e c i fi e d l i s t i n g o p t i o n s e l e c t s t h e l i s t i n g p r o d u c e d . T h e l i s t i n g o p t i o n s a r e as follows:
S S o u r c e l i s t i n g 0 O b j e c t l i s t i n g SUBSCHEMA COMPILATION AND LIBRARY MAINTENANCE OPERATIONS
The FORTRAN subschema must be coded according to t h e s p e c i fi c a t i o n s i n t h i s m a n u a l . S u b s c h e m a s o u r c e c o d e c a n b e e n t e r e d t h r o u g h a t e r m i n a l , processed by a text editor, and stored in a file.
The DDLF compiler can be executed from a terminal a n d t h r o u g h a b a t c h j o b i n t h e f o l l o w i n g w a y s . When executed from a terminal, the subschema pro gram must reside on a file whose name is indicated by the I parameter of the DDLF control statement.
In a batch job in which the input file for the DDLF compiler is assumed to be local file INPUT, the job s t r e a m m u s t b e s t r u c t u r e d s o t h a t t h e c o n t r o l statements precede the subschema source program.
An end-of-record indicator must immediately precede the first line of subschema source code to separate the subschema program from the control statements.
C o n t r o l s t a t e m e n t s i n t h e j o b s t r e a m a n d t h e resulting subschema source program are used by the DDLF compiler either to compile the subschema and to store it in the subschema library or to perform a subschema library maintenance operation such as replacing or deleting subschemas, generating a new, compacted subschema library, or producing an audit listing. The parameters in the DDLF control state m e n t s e l e c t t h e o p e r a t i o n t o b e p e r f o r m e d . O t h e r c o n t r o l s t a t e m e n t s p r o v i d e i n f o r m a t i o n f o r t h e o p e r a t i n g s y s t e m t o m a k e n e c e s s a r y i n f o r m a t i o n available for the DDLF compiler.
60485200 E 4-15
T h e f o l l o w i n g p a r a g r a p h s i n d i c a t e t h e p a r a m e t e r s required in the DDLF control statement to accom plish compilation of FORTRAN subschemas and to perform subschema library maintenance operations.
Examples of batch jobs that accomplish the opera tions are shown. The DDLF control statements used
| in the examples indicate FORTRAN 5 subschemas.
Control statements are shown for both the NOS and NOS/BE operating systems.