Ì i 2
main
[urn]
*(S)SRSD[srsd]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 10 URN L srsd
client 10 FREE L MIS.DOC *(S)SRSD[srsd]|0
client.name 30 FREE L VAL=@MIS.DOC.DICT.name[@client]
dist.date 8 DATE L *(S)SRSD[srsd]|1
enter.date 8 DATE L *(S)SRSD[srsd]|4
enter.time 4 HHMM L *(S)SRSD[srsd]|5
enter.user 10 FREE L MIS.USER *(S)SRSD[srsd]|3
last.edit.date 8 DATE L *(S)SRSD[srsd]|7
last.edit.time 4 HHMM L *(S)SRSD[srsd]|8
last.edit.user 10 FREE L MIS.USER *(S)SRSD[srsd]|9
num.part 5 PINT R VAL=@number#"1-"?1NN+0
number 8 FREE L *(S)SRSD[srsd]|2
requester 30 FREE L *(S)SRSD[srsd]|6
year 4 PINT R VAL=@LAB.R.SUPL.DIST.dist.date$4
Ì i 2
comments
[urn, comment.q]
*(S)SRSD[srsd]C[srsdK]
Field Name Len Dat Typ J DPM Offset/Local/VAL
comment.q 2 PINT R srsdK
comment 60 TEXT L *(S)SRSD[srsd]C[srsdK]
Ì i 2
containers
[urn, container]
*(S)SRSD[srsd]CON[sck]
Field Name Len Dat Typ J DPM Offset/Local/VAL
container 10 FREE L LAB.C.CONTAINERsck
container.cnt 4 PINT R *(S)SRSD[srsd]CON[sck]|0
temp.last.count 4 PINT R VAL=/LC[container]|1
temp.last.date 8 DATE L VAL=/LC[container]|0
temp.last.number 8 FREE L VAL=/LC[container]|2
Index Files Subscripts/Physical Base
client.x [client,dist.date,number] = urn
?(S)SRSDC[ggg,srsdd,srsdN]
number.x [year,client,num.part] = urn
?(S)SRSDN[srsdY,ggg,srsdn]
|
|
| |