Element# : 1 + 100*(Nj-1) ; Nj=IBUF(9) of bank "Data_Type" Contents : Contain the job informations. Format : I*4 & Character mixed, 17 I*4 words length fixed.
IBUF(1-2)=Job start date(yymmnn) and time(msec from 0:00). (3:6)=16 characters, ``FULL_ANALYSIS''. (7)=Version# *100 + Level# (8:11)=16 Characters of name of FLANLI, those set bythe subroutine. PRPDSC in FLANLI. (12)=Version number of FLANLI. Those set by subroutine. in FLANLI. (13)=Version date of FLANLI. Those set by subroutine. in FLANLI. (14-15)=8 characters : CPU name who processed data. ('KEKFACOM')
Element# : 2 + 100*(Nj-1) ; Nj=IBUF(9) of bank "Data_Type". Contents : Full module information. Format : IBUF(7,i) I*4 & Character mixed, i=# of module.
IBUF(1-3,i)=12 characters, module name. (4,i)=Éxecution level. (5,i)=Version level of module. (6,i)=Version date of module. (7,i)=Ánalysis quit level
Module name, version level, version date, should be set
by sub. PRPVRS which should be called at job initialization module.
Calling sequence of this routine is,
2cm
where
Element# : 3 + 100*(Nj-1) ; Nj=IBUF(9) of bank "Data_Type".
Contents : Constants version # ( only for TOPAZ use.)
Element# : 4 + 100*(Nj-1) ; Nj=IBUF(9) of bank "Data_Type". Contents : Input data read from FT05F001 Comment lines ( @! lines ) are not stored. Format : Character, Length = 20 * (# of lines) I*4 words.