Ì € i 2
prv.batch.txn (transactions)
[urn, txn.urn]
:HFN[hfn]T[hfnT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
txn.urn 4 PINT R hfnT
patient 30 URN L PRV.PAT :HFN[hfn]T[hfnT]|0
procedure 10 FREE L PRV.CR.PROC :HFN[hfn]T[hfnT]|2
procedure.type 1 CHOICE L VAL=@PRV.CR.PROC.type[@procedure]#0
receipt.no 12 FREE L VAL=000000'$L(urn)_urn_"-"_txn.urn
service.date 8 DATE L :HFN[hfn]T[hfnT]|1
txn.amount 9 SMONEY R :HFN[hfn]T[hfnT]|3
txn.cd.screen 15 FREE L MIS.SCREEN VAL=@PRV.CR.PROC.cd.screen[@PRV.BATCH.procedure]
txn.comment 27 FREE L :HFN[hfn]T[hfnT]|4
txn.print.cd.screen 0 FREE L VAL=%MIS.SCREEN.print.hl(@txn.cd.screen,^@transactions
VAL=.cds,"",45,"",@Z.rpt.font.cmd[""],@Z.rpt.font.cmd[
VAL="b"]),""
txn.ptr 12 PINT R :HFN[hfn]T[hfnT]|6
txn.user 10 FREE L MIS.USER :HFN[hfn]T[hfnT]|5
Ì € i 2
prv.batch.txn.cds.queries (transactions.cds.queries)
[urn,txn.urn, txn.cd.query]
:HFN[hfn]T[hfnT]CD[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
txn.cd.query 10 FREE L MIS.QUERY ggv
txn.cd.response 75 FREE L :HFN[hfn]T[hfnT]CD[ggv]|0
Ì € i 2
prv.batch.txn.cds.queries.mult (transactions.cds.q.mult)
[urn,txn.urn,txn.cd.query, txn.cdm.seq.no]
:HFN[hfn]T[hfnT]CD[ggv]M[ggvN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
txn.cdm.seq.no 3 PINT R ggvN
txn.cdm.response 75 QRY.RESP L :HFN[hfn]T[hfnT]CD[ggv]M[ggvN]|0
Ì € i 2
prv.batch.txn.items (transactions.items)
[urn,txn.urn, item.seq]
:HFN[hfn]T[hfnT]I[hfnTI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
item.seq 5 PINT R hfnTI
item.amount 9 SMONEY R :HFN[hfn]T[hfnT]I[hfnTI]|1
item.enc 10 PINT R PRV.ENC :HFN[hfn]T[hfnT]I[hfnTI]|0
item.post.ptr 12 FREE L :HFN[hfn]T[hfnT]I[hfnTI]|2
Ì € i 2
prv.batch.txn.procs (transactions.items.procs)
[urn,txn.urn,item.seq, proc.seq.no]
:HFN[hfn]T[hfnT]I[hfnTI]P[hfnTP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.seq.no 5 PINT R hfnTP
enc.proc.urn 15 FREE L :HFN[hfn]T[hfnT]I[hfnTI]P[hfnTP]|4
proc.amount 9 SMONEY R :HFN[hfn]T[hfnT]I[hfnTI]P[hfnTP]|1
proc.id 10 FREE L PRV.PROC :HFN[hfn]T[hfnT]I[hfnTI]P[hfnTP]|0
proc.post.ptr 12 FREE L :HFN[hfn]T[hfnT]I[hfnTI]P[hfnTP]|2
proc.queue.ptr 3 PINT R :HFN[hfn]T[hfnT]I[hfnTI]P[hfnTP]|3
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
prv.batch.billing.queue [date.sent.to.bar,urn]
billing.queue :HFNBQ[hfnD,hfn]
prv.batch.index [date,cash.drawer,number] = urn
id.x :HFNA[hfnB,hfs,hfnA]
prv.batch.open.drawer.index [practice,cash.drawer,urn,date]
open.x :HFNO[ggh,hfs,hfn,hfnB]
prv.batch.pt.txn.index [patient,urn,txn.urn]
patient.txn.x :HFNB[aa,hfn,hfnT]
prv.batch.pt.txn.data.index [patient,service.date,procedure,procedure.type,urn,txn.urn]
patient.x :HFNC[aa,hfnSD,hfo,hfoT,hfn,hfnT]
prv.batch.practice.x [date,practice,cash.drawer,number] = urn
practice.x :HFND[hfnB,ggh,hfs,hfnA]
|
|
| | | |