IBACUS2 ;ALB/CPM - TRICARE FISCAL INTERMEDIARY RX CLAIMS ;02-AUG-96
Source file <IBACUS2.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 14 | $$CUS^IBACUS ERRMSG^IBACVA2 (ERR,PAT)^IBAERR1 $$SERV^IBARX1 GVAR^IBCBB ARRAY^IBCBB1 EN^IBCD3 $$ADDRC^IBCRBF $$SC^IBCU3 $$CHECK^IBECEAU $$PT^IBEFUNC SET^IBR $$FILE^IBRXUTL CLOSE^IBSDU |
Accounts Receivable | 4 | ^PRCASER1 REL^PRCASVC STATUS^PRCASVC1 ^PRCASVC6 |
MailMan | 1 | ^XMD |
Outpatient Pharmacy | 1 | $$TRANS^PSOCPTRI |
VA FileMan | 1 | ^DIE |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 1 | IBACUS |
Name | Comments | DBIA/ICR reference |
---|---|---|
BILL(IBKEY,IBCHTRN) | ; Create the TRICARE claim for the Fiscal Intermediary.
; Input: IBKEY -- 1 ; 2, where ; 1 = Pointer to the prescription in file #52 ; 2 = Pointer to the refill in file #52.1, or ; 0 for the original fill ; IBCHTRN -- Pointer to the transaction entry in file #351.5 |
|
BILLQ | ||
CANC(IBCHTRN) | ; Cancel the claim to the Fiscal Intermediary.
; Input: IBCHTRN -- Pointer to the transaction entry in file #351.5 |
|
CANCQ | ||
BULL | ; Generate a bulletin if there is an error in canceling the claim.
|
Name | Field # of Occurrence |
---|---|
^DIE | BILL+65, BILL+85, BILL+86, BILL+93, CANC+10 |
$$CUS^IBACUS | BILL+61 |
ERRMSG^IBACVA2 | BILLQ |
ERR^IBAERR1 | BULL+16 |
PAT^IBAERR1 | BULL+11 |
$$SERV^IBARX1 | BILL+17 |
GVAR^IBCBB | BILL+89 |
ARRAY^IBCBB1 | BILL+89 |
EN^IBCD3 | BILL+57 |
$$ADDRC^IBCRBF | BILL+81 |
$$SC^IBCU3 | BILL+47 |
$$CHECK^IBECEAU | BILL+15 |
$$PT^IBEFUNC | BULL+1 |
SET^IBR | BILL+20 |
$$FILE^IBRXUTL | BILL+10, BILL+36, BILL+53 |
CLOSE^IBSDU | BILL+58 |
^PRCASER1 | CANC+20 |
REL^PRCASVC | BILL+89 |
STATUS^PRCASVC1 | BILL+97 |
^PRCASVC6 | BILL+89 |
$$TRANS^PSOCPTRI | BILL+40 |
^XMD | BULL+21 |
FileNo | Call Tags |
---|---|
^IBA(351.5 - [#351.5] | Classic Fileman Calls |
^DGCR(399 - [#399] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399 - [#399] | CANC+5, CANC+14 |
^DGCR(399.3 - [#399.3] | BILL+38 |
^DIC(36 - [#36] | BILL+68 |
^DPT - [#2] | BILL+63 |
^IBA(351.5 - [#351.5] | BILL+11, CANC+3 |
^IBE(350.1 - [#350.1] | BILL+16 |
^IBE(350.9 - [#350.9] | BILL+69, BILL+72, BILL+74, BULL+5 |
^IBE(363.1 - [#363.1] | BILL+69, BILL+72 |
^PRCA(430 - [#430] | CANC+15 |
^XMB("NETNAME" | BULL+6 |
^XMB(3.8 - [#3.8] | BULL+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | BILL+64*, BILL+65!, BILL+85*!, BILL+86*!, BILL+93*!, CANC+9*, CANC+10! |
DFN | BILL+36*, BILL+37, BILL+47, BILL+61, BILL+63, CANC+13*, CANCQ!, BULL+1 |
DGRVRCAL | BILL+65! |
DIE | BILL+64*, BILL+65!, BILL+85*!, BILL+86*!, BILL+93*!, CANC+9*, CANC+10! |
DR | BILL+64*, BILL+65!, BILL+85*!, BILL+86*!, BILL+93*!, CANC+9*, CANC+10! |
DT | BILL+86, CANC+19 |
DUZ | CANC+19, BULL+4, BULL+11 |
>> I | CANC+5* |
IB | BILL+35!, BILLQ+2!, CANCQ! |
IB( | BILL+36*, BILL+38*, BILL+39, BILL+43*, BILL+44*, BILL+45*, BILL+46*, BILL+47*, BILL+48*, BILL+49* , BILL+50*, BILL+53*, CANC+5* |
IB("S" | CANC+7 |
IB("U1" | CANC+14*, CANC+16 |
IB(0 | CANC+6, CANC+13 |
IB(151 | BILL+50* |
IB(152 | BILL+50* |
IBAA | BILL+76*, BILL+81, BILLQ+1! |
IBAMT | BILL+11*, BILL+12, BILL+81, BILLQ+1! |
IBBS | BILL+72*, BILL+81, BILLQ+1! |
IBC | BULL+10*, BULL+12*, BULL+13*, BULL+14*, BULL+15*, BULL+17*, BULL+18*, BULL+19*, BULL+22! |
IBCDFN | BILL+61*, BILL+62, BILL+63, BILL+64, BILLQ+2! |
IBCHG | CANC+16*, CANC+19, CANCQ! |
IBCHTRN | BILL~, BILL+11, BILL+93, CANC~, CANC+3 |
IBCPT | BILL+74*, BILL+81, BILLQ+1! |
IBCRES | CANC+17*, CANC+19, CANCQ! |
IBDFN | BILL+36*, BILLQ+2! |
IBDIV | BILL+75*, BILL+81, BILLQ+1! |
IBDRX | BILL+8!, BILL+40, BILLQ+2! |
IBDRX("FDT" | BILL+50, BILL+53 |
IBDRX("NDC" | BILL+53 |
IBDRX("QTY" | BILL+53 |
IBDRX("RX#" | BILL+53 |
IBDRX("SUP" | BILL+53 |
IBDUZ | BULL+11*, BULL+22! |
IBFAC | BILLQ+2! |
IBGRP | BULL+5*, BULL+6, BULL+22! |
IBIDS | BILLQ+2! |
IBIFN | BILL+42*, BILL+64, BILL+81, BILL+85, BILL+86, BILL+93, BILLQ+2!, CANC+3*, CANC+4, CANC+5 , CANC+9, CANC+14, CANC+15, CANCQ! |
IBIL | CANC+15*, CANC+19, CANCQ!, BULL+12 |
IBINS | BILL+63*, BILL+68, BILLQ+2! |
IBITEM | BILL+78*, BILL+81, BILLQ+1! |
IBKEY | BILL~, BILL+9, BILL+10, BILL+36, BILL+40, BILL+53 |
IBPT | BULL+1*, BULL+22! |
IBQUERY | BILL+7~, BILL+57, BILL+58 |
IBRVCD | BILL+68*, BILL+69*, BILL+70, BILL+81, BILLQ+1! |
IBSERV | BILL+16*, BILL+17, BILLQ+2! |
IBSITE | BILLQ+2! |
IBT | BULL+1!, BULL+22! |
IBT( | BULL+12*, BULL+13*, BULL+14*, BULL+15*, BULL+17*, BULL+18*, BULL+19* |
IBT(1 | BULL+8* |
IBT(2 | BULL+9* |
IBT(3 | BULL+10* |
IBTYPE | BILL+77*, BILL+81, BILLQ+1! |
IBUNITS | BILL+73*, BILL+81, BILLQ+1! |
IBY | BILL+8*, BILL+15*, BILL+17*, BILL+20, BILL+37*, BILL+39*, BILL+40*, BILL+62*, BILL+82*, BILL+90* , BILLQ, CANC+21*, CANCQ! |
PRCAERR | BILLQ+3! |
PRCASV | BILLQ+3! |
PRCASV("ARBIL" | BILL+43 |
PRCASV("ARREC" | BILL+42 |
PRCASV("OKAY" | BILL+89, BILL+90 |
PRCASV("STATUS" | BILL+96* |
U | BILL+69, BILL+72, CANC+7 |
X | BILL+70*, BILL+81*, BILL+82, CANC+19*, CANCQ! |
XMDUZ | BULL+3*, BULL+22! |
XMSUB | BULL+2*, BULL+22! |
XMTEXT | BULL+3*, BULL+22! |
XMY | BULL+22! |
XMY( | BULL+4* |
XMY("G." | BULL+6* |
Y | CANC+21, CANCQ! |