Ì 2
main
[mnemonic]
&(SB)SBG[sbg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 10 FREE L sbg
active 1 CHOICE L &(SB)SBG[sbg]|0
branch 0 FREE L VAL=IF{@Z.lastkey=@Z.special.fcn @Z.enter^@Z.lastkey,I
VAL=F{@.new @Z.bell^#;%Z.branch(@Pgm.trans("%LAB.B.RFM
VAL=T.ee"))^@.new^@.new.ext ""^@.old^@.old.ext;99^@Z.l
VAL=astkey}}
desc 30 FREE L &(SB)SBG[sbg]|1
last.update 50 FREE L &(SB)SBG[sbg]UPD
product.col.width 2 PINT R &(SB)SBG[sbg]|3
rpt.abnormal.hilite 3 CHOICE L &(SB)SBG[sbg]R|7
rpt.cdate.hdr.lines 2 PINT R &(SB)SBG[sbg]HF|4
rpt.cdate.header 70 FREE L &(SB)SBG[sbg]HF|1
rpt.cdate.header.phys 20 FREE L &(SB)SBG[sbg]HFA|3
rpt.date.for.products 1 YN L &(SB)SBG[sbg]R|21
rpt.gray.bars 1 CHOICE L &(SB)SBG[sbg]R|0
rpt.incl.cell.panels 1 YN L &(SB)SBG[sbg]R|16
rpt.incl.delta.results 1 YN L &(SB)SBG[sbg]R|5
rpt.incl.new.flags 1 YN L &(SB)SBG[sbg]R|3
rpt.incl.review.flags 1 YN L &(SB)SBG[sbg]R|4
rpt.iss.trans.hdr.lines 2 PINT R &(SB)SBG[sbg]HFA|1
rpt.iss.trans.header 70 FREE L &(SB)SBG[sbg]HFA|0
rpt.iss.trans.header.phys 20 FREE L &(SB)SBG[sbg]HFA|5
rpt.issue.cds 15 FREE L MIS.SCREEN &(SB)SBG[sbg]R|12
rpt.issue.cds.or.queries 1 CHOICE L &(SB)SBG[sbg]R|11
rpt.least.incomp.hilite 3 CHOICE L &(SB)SBG[sbg]R|17
rpt.new.page.for.prod 1 YN L &(SB)SBG[sbg]R|19
rpt.note.site 4 CHOICE L &(SB)SBG[sbg]R|20
rpt.panic.hilite 3 CHOICE L &(SB)SBG[sbg]R|6
rpt.print.products 5 CHOICE L &(SB)SBG[sbg]R|15
rpt.print.tx.reactions 1 YN L &(SB)SBG[sbg]R|23
rpt.prod.as.header 1 YN L &(SB)SBG[sbg]R|18
rpt.prod.name.size 1 CHOICE L &(SB)SBG[sbg]R|10
rpt.prod.result.line 70 FREE L &(SB)SBG[sbg]RF|1
rpt.prod.result.line.phys 20 FREE L &(SB)SBG[sbg]RF|3
rpt.prod.sum.hdr.lines 2 PINT R &(SB)SBG[sbg]HF|5
rpt.prod.sum.header 70 FREE L &(SB)SBG[sbg]HF|2
rpt.prod.sum.header.phys 20 FREE L &(SB)SBG[sbg]HFA|4
rpt.product.hdr.lines 2 PINT R &(SB)SBG[sbg]HF|3
rpt.product.header 70 FREE L &(SB)SBG[sbg]HF|0
rpt.product.header.phys 20 FREE L &(SB)SBG[sbg]HFA|2
rpt.product.indent 2 PINT R &(SB)SBG[sbg]R|22
rpt.result.format 1 CHOICE L &(SB)SBG[sbg]R|2
rpt.result.line 70 FREE L &(SB)SBG[sbg]RF|0
rpt.result.line.phys 20 FREE L &(SB)SBG[sbg]RF|2
rpt.test.hdrs.hilite 3 CHOICE L &(SB)SBG[sbg]R|8
rpt.test.name.size 1 CHOICE L &(SB)SBG[sbg]R|9
rpt.tx.cds 15 FREE L MIS.SCREEN &(SB)SBG[sbg]R|14
rpt.tx.cds.or.queries 1 CHOICE L &(SB)SBG[sbg]R|13
rpt.vertical.lines 1 YN L &(SB)SBG[sbg]R|1
type 4 CHOICE L &(SB)SBG[sbg]|2
Ì € 2
product.fields
[mnemonic, prod.field.q]
&(SB)SBG[sbg]PF[sbgPF]
Field Name Len Dat Typ J DPM Offset/Local/VAL
prod.field.q 2 PINT R sbgPF
prod.field 10 FREE L &(SB)SBG[sbg]PF[sbgPF]|0
prod.field.justify 1 CHOICE L &(SB)SBG[sbg]PF[sbgPF]|3
prod.field.len 2 PINT R &(SB)SBG[sbg]PF[sbgPF]|2
prod.field.space 2 PINT R &(SB)SBG[sbg]PF[sbgPF]|4
prod.field.std.len 2 PINT R &(SB)SBG[sbg]PF[sbgPF]|1
prod.field.value 70 FREE L &(SB)SBG[sbg]PF[sbgPF]|5
|
|