Ì € i 2
main
[urn]
*(S)SSA[ssa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 10 PINT R ssa
acct.number 12 FREE L *(S)SSA[ssa]P|1
archived 10 PINT R *(S)SSA[ssa]|3
computed.dob 10 BDATE L *(S)SSA[ssa]P|4
date 8 DATE L
deindexed 10 PINT R *(S)SSA[ssa]|4
description 50 FREE L *(S)SSA[ssa]|6
discharge.date 8 DATE L *(S)SSA[ssa]P|6
donor 30 URN L LAB.B.DONOR *(S)SSA[ssa]|1
first.name 25 FREE L
last.name 25 FREE L
name 30 FREE L *(S)SSA[ssa]P|0
patient 30 FREE L LAB.C.PAT *(S)SSA[ssa]|0
patient.status 7 FREE L *(S)SSA[ssa]P|3
purged 10 PINT R *(S)SSA[ssa]|5
registration.date 8 DATE L *(S)SSA[ssa]P|5
state 1 CHOICE L VAL=IF{@purged "P";@deindexed "D";@archived "A";"R"}
status 2 FREE L VAL=IF{@archived "A";" "}_IF{@purged "P"}
time 4 HHMM L
unit 10 URN L LAB.B.UNIT *(S)SSA[ssa]|2
unit.number 10 FREE L *(S)SSA[ssa]P|2
yn 1 YN L
Ì € i 2
messages
[urn, message.q]
*(S)SSA[ssa]M[ssaM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
message.q 3 PINT R ssaM
message.line 200 FREE L *(S)SSA[ssa]M[ssaM]
Index Files Subscripts/Physical Base
acct.x [acct.number,patient,urn]
?(S)SSAA[ssaA,aa,ssa]
activity.x [date,time,urn] = activity.status
?(S)SSAX[ssaD,ssaT,ssa]
bbk.donor.name.x [last.name,first.name,donor,urn]
?(S)SSAF[ssaL,ssaF,sbb,ssa]
bbk.donor.num.x [donor.number,urn]
?(S)SSAC[sbbnu,ssa]
bbk.unit.donor.x [bbk.unit.donor,unit,urn]
?(S)SSAH[sbb,sbu,ssa]
bbk.unit.num.x [bbk.unit.number,bbk.unit.source,bbk.unit.product,unit,urn]
?(S)SSAB[sbuN,sbr,sbp,sbu,ssa]
name.x [last.name,first.name,patient,urn]
?(S)SSAN[ssaL,ssaF,aa,ssa]
patient.x [patient,urn]
?(S)SSPT[aa,ssa]
unit.x [unit.number,patient,urn]
?(S)SSAU[ssaU,aa,ssa]
|
|
|