FBPCR ;AISC/DMK,GRR,TET-POTENTIAL COST RECOVERY OUTPUT DRIVER ;5/23/2006
Source file <FBPCR.m>
Package | Total | Call Graph |
---|---|---|
Fee Basis | 6 | ($$DATX,$$SSN,CLOSE,DATE,ZIS)^FBAAUTL (EN,PRINT)^FBPCR2 (EN,PRINT)^FBPCR3 ($$ISLTC,$$LTCST,ERRHDL,MKARRLTC)^FBPCR4 EN^FBPCR67 PRINT^FBPCR671 |
Registration | 4 | $$CVEDT^DGCV $$BIL^DGMTUB ELIG^VADPT FIRST^VAUTOMA |
Integrated Billing | 2 | DISP^IBARXEU $$INSUR^IBBAPI |
Kernel | 2 | $$FMTE^XLFDT $$NPI^XUSNPI |
VA FileMan | 2 | ^DIC ^DIR |
Scheduling | 1 | CL^SDCO21 |
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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DOC | ;Refer to fbdoc, tag fbpcr, for documentation of fbpcr* routines
|
|
PSF | ;select one/many/all primary service failities
|
|
ARRAY | ;set fee program array for all programs
|
|
PREBL | ;Include Only Not Previously Billed NVC FB*3.5*163
|
|
DATE | ;select date range
|
|
Q | ||
DQ | ||
SORT | ;sort driver for payment output(s)
|
|
;print driver for payment output(s)
|
||
OUT | ||
EXCLINS | ;create list of insurance type to be excluded ; FB*3.5*135
|
|
EXIT | ;kill and quit
|
|
KILL | ;kill all variables set in the FBPCR* routines, other than fbx
|
|
WMSG | ;write message if no matches found
|
|
CATC(DFN,FBDT,FBPOV) | ;
|
|
VET | ;set vet name/ssn/dob info
|
|
STA | ;set station name & number
|
|
PAGE | ;form feed when new station/patient
|
|
CR | ;read for display
|
|
HDR | ;general header for potential recoveries
|
|
HDRUNK | ;Warning message if patient's insurance status is unknown
|
|
PATDEMO | ; Patient Demographics FB*3.5*163
|
|
GETSC | ||
GETSTA | ; Get Special Authority Eligibility FB*3.5*163
|
|
INS | ||
INSQ | ||
INSHDR | ;Print insurance header FB*3.5*163
|
|
INSDSP(FBVAL) | ;Print insurance display line FB*3.5*163
|
Name | Field # of Occurrence |
---|---|
$$CVEDT^DGCV | GETSTA+6 |
$$BIL^DGMTUB | CATC+14 |
^DIC | EXCLINS+4 |
^DIR | ARRAY+9, ARRAY+17, ARRAY+30, PREBL+6, EXCLINS+6, CR+1 |
$$DATX^FBAAUTL | WMSG+2, HDR+5, HDRUNK+5 |
$$SSN^FBAAUTL | VET+7 |
CLOSE^FBAAUTL | KILL+1 |
DATE^FBAAUTL | DATE+1 |
ZIS^FBAAUTL | Q+2 |
EN^FBPCR2 | SORT+2 |
PRINT^FBPCR2 | PRINT+7 |
EN^FBPCR3 | SORT+3 |
PRINT^FBPCR3 | PRINT+8 |
$$ISLTC^FBPCR4 | CATC+16 |
$$LTCST^FBPCR4 | CATC+19 |
ERRHDL^FBPCR4 | OUT |
MKARRLTC^FBPCR4 | ARRAY+4 |
EN^FBPCR67 | SORT+4 |
PRINT^FBPCR671 | PRINT+9 |
DISP^IBARXEU | PATDEMO+5 |
$$INSUR^IBBAPI | INS+4 |
CL^SDCO21 | GETSTA+4 |
ELIG^VADPT | PATDEMO+2 |
FIRST^VAUTOMA | PSF+3 |
$$FMTE^XLFDT | VET+7, INSQ+5, INSDSP+10, INSDSP+11, INSDSP+12 |
$$NPI^XUSNPI | STA+6 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^IBE(355.1 - [#355.1] | Classic Fileman Calls |
^DIC(4 - [#4] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(31 - [#31] | GETSC+8 |
^DIC(4 - [#4] | STA+4 |
^DPT - [#2] | VET+7, GETSC+6, GETSC+7, GETSC+8 |
^FBAA(161.8 - [#161.8] | ARRAY+1 |
^IBA(354 - [#354] | INSQ+4 |
^TMP($J | Q!, PRINT+1, PRINT+2, PRINT+5, PRINT+7, PRINT+8, PRINT+9, OUT, KILL+1!, HDR+12 |
Name | Line Occurrences |
---|---|
CR | PAGE+2 |
EXCLINS | ARRAY+35, EXCLINS+6 |
EXIT | PSF+3, ARRAY+2, ARRAY+11, ARRAY+19, ARRAY+33, Q+2, OUT+2, OUT+3 |
GETSC | PATDEMO+6 |
GETSTA | PATDEMO+7 |
HDR | PRINT+6, WMSG+1 |
HDRUNK | PRINT+1 |
INS | HDR+16 |
INSDSP | INS+12 |
INSHDR | INS+7 |
INSQ | INS+8, INS+9 |
OUT | PRINT+2 |
PAGE | HDR+1, HDRUNK+1 |
PATDEMO | HDR+11 |
PSF | DATE+1, OUT+3 |
STA | PRINT+5 |
VET | PRINT+5 |
WMSG | PRINT+2, OUT+1 |
Name | Field # of Occurrence |
---|---|
^( | ARRAY+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A1 | KILL+2! |
A2 | KILL+2! |
A3 | KILL+2! |
BEGDATE | DATE+2, KILL+2! |
C | KILL+2! |
D | KILL+2! |
D2 | KILL+2! |
DFN | PRINT+5*, KILL+2!, CATC~, CATC+14, CATC+19, VET+7, HDR+10, HDR+12, HDR+16, PATDEMO+5 , GETSC+6, GETSC+7, GETSC+8, GETSTA+4, GETSTA+6, INS+4, INSQ+4 |
DIC | PSF+3*!, Q!, EXCLINS+1~, EXCLINS+4*, KILL+2! |
DIC("S" | EXCLINS+4* |
DIC(0 | EXCLINS+4* |
DIR | ARRAY+6!, ARRAY+10!, ARRAY+18!, ARRAY+30!, PREBL+6!, EXCLINS+1~, KILL+2!, CR+1! |
DIR("?" | ARRAY+8*, ARRAY+16*, ARRAY+28*, PREBL+4* |
DIR("A" | ARRAY+7*, ARRAY+15*, ARRAY+27*, PREBL+3*, EXCLINS+6* |
DIR("B" | ARRAY+7*, ARRAY+15*, ARRAY+29*, PREBL+5*, EXCLINS+6* |
DIR("L" | ARRAY+8*, ARRAY+16* |
DIR(0 | ARRAY+7*, ARRAY+15*, ARRAY+29*, PREBL+5*, EXCLINS+6*, CR+1* |
DIROUT | EXCLINS+1~ |
DIRUT | ARRAY+31, EXCLINS+1~ |
DT | PATDEMO+5, GETSTA+3 |
DTOUT | EXCLINS+1~, KILL+2!, CR+1 |
DUOUT | EXCLINS+1~, KILL+2!, CR+1 |
ENDDATE | DATE+2, KILL+2! |
FBAAA | KILL+3! |
FBAACPTC | KILL+3! |
FBAC | KILL+3! |
FBADJ | PSF+1! |
FBADJR | PSF+1! |
FBADT | GETSTA+1~, GETSTA+3*, GETSTA+4, GETSTA+6 |
FBAP | KILL+3! |
FBARR | GETSTA+1~, GETSTA+4, GETSTA+13 |
FBARR(1 | GETSTA+7 |
FBARR(2 | GETSTA+8 |
FBARR(3 | GETSTA+5 |
FBARR(4 | GETSTA+9 |
FBARR(5 | GETSTA+11 |
FBARR(6 | GETSTA+12 |
FBARR(7 | GETSTA+6 |
FBARR(8 | GETSTA+10 |
FBARRLTC | PSF+2*, KILL+2! |
FBBATCH | KILL+3! |
FBBDATE | DATE+2*, DATE+3, KILL+3!, WMSG+2, HDR+5, HDRUNK+5 |
FBBEG | DATE+3*, DQ*, KILL+3! |
FBBILL | PSF+1! |
FBBN | KILL+3! |
FBCATC | KILL+3!, CATC+14*, CATC+15, CATC+17 |
FBCNT | KILL+3! |
FBCOPAY | ARRAY+13*, ARRAY+17*, ARRAY+19, KILL+2! |
FBCP | KILL+3!, PATDEMO+1~ |
FBCRT | DQ*, KILL+3!, PAGE+2, PAGE+3 |
FBD | GETSC+1~, GETSC+9*, GETSC+10 |
FBDA1 | KILL+3! |
FBDASH | DQ*, KILL+3!, HDR+14, HDRUNK+11, HDRUNK+19 |
FBDASH1 | DQ*, KILL+3! |
FBDATA | KILL+3! |
FBDOB | KILL+3!, VET+7*, HDR+7 |
FBDOS | KILL+3! |
FBDRUG | KILL+3! |
FBDT | KILL+3!, CATC~, CATC+14, CATC+15, CATC+19 |
FBDT1 | KILL+3! |
FBDX | KILL+3! |
FBDX1 | KILL+3! |
FBEDATE | DATE+2*, DATE+3, KILL+3!, WMSG+2, HDR+5, HDRUNK+5 |
FBEND | DATE+3*, KILL+3! |
FBEQL | INSHDR+1~, INSHDR+3* |
FBERR | KILL+3!, INS+1~, INS+6*, INS+8 |
FBFD | KILL+3! |
FBFD1 | KILL+3! |
FBFIRST | PRINT+4*, OUT+1, KILL+2!, HDR+9* |
FBHEAD | KILL+3! |
FBI | KILL+4!, GETSC+1~, GETSC+7*, GETSC+8 |
FBID | KILL+4! |
FBIEN | KILL+4! |
FBIN | KILL+4! |
FBINCUNK | ARRAY+22*, ARRAY+24*, ARRAY+31*, ARRAY+32*, ARRAY+33, KILL+2!, HDR+12, HDRUNK+12 |
FBINEXCL | ARRAY+34~, EXCLINS+2!*, EXCLINS+5* |
FBINEXCL( | EXCLINS+4* |
FBINEXCL("INS" | EXCLINS+4*, EXCLINS+5, EXCLINS+7! |
FBINEXCL(0 | EXCLINS+6 |
FBINS | KILL+4!, INS+1~, INS+10*, INSDSP+2 |
FBINS( | INS+12, INSDSP+3, INSDSP+4, INSDSP+6, INSDSP+7, INSDSP+8, INSDSP+10, INSDSP+11, INSDSP+12 |
FBINV | PSF+1! |
FBINVN | KILL+4! |
FBISLTC | CATC+13~, CATC+16*, CATC+17, CATC+18 |
FBIX | KILL+4! |
FBJ | KILL+4! |
FBLOC | KILL+4! |
FBLTC | CATC+13~, CATC+19*, CATC+20, CATC+21, CATC+22 |
FBM | KILL+4! |
FBMT | PATDEMO+1~, PATDEMO+3*, PATDEMO+4 |
FBNAME | KILL+4! |
FBNC | INSQ+1~, INSQ+4*, INSQ+5 |
FBNPB | PSF+1!, PREBL+7* |
FBOB | KILL+4! |
FBOPI | KILL+4! |
FBOUT | DQ*, PRINT+5, PRINT+6, OUT+2, KILL+4!, PAGE+2, CR+1*, HDR+1, HDRUNK+1 |
FBOV | KILL+4! |
FBP | KILL+4! |
FBPARTY | ARRAY+9*, ARRAY+11, ARRAY+14, ARRAY+23, KILL+2! |
FBPAT | KILL+4! |
FBPD | KILL+4! |
FBPDX | KILL+4! |
FBPDXC | KILL+2! |
FBPG | DQ*, KILL+4!, PAGE+2, PAGE+3, PAGE+4*, HDR+6, HDRUNK+6 |
FBPI | ARRAY+1*, SORT+1*, SORT+2, SORT+3, SORT+4*, PRINT+2*, PRINT+5*, PRINT+7, PRINT+8, PRINT+9 , KILL+4! |
FBPID | KILL+4!, VET+7*, HDR+7 |
FBPIN | ARRAY+1*, KILL+4! |
FBPNAME | KILL+4!, VET+7*, HDR+7 |
>> FBPOP | DATE+1, Q+2 |
FBPOV | CATC~, CATC+15, CATC+16 |
FBPROC | KILL+4! |
FBPROC1 | KILL+4! |
FBPROG | ARRAY+2, KILL+4! |
FBPROG( | ARRAY+1*, SORT+1, PRINT+5 |
FBPROG(7 | SORT+4 |
FBPSF | PRINT+5*, PRINT+6, PRINT+7, PRINT+8, PRINT+9, KILL+4!, WMSG+5*, STA+4, STA+6, PAGE+1 |
FBPSFNAM | KILL+4!, STA+4*, STA+5*, STA+6, HDR+3, HDRUNK+4 |
FBPSFNUM | KILL+4!, STA+4*, HDR+3, HDRUNK+4 |
FBPSV | KILL+4!, WMSG+3 |
FBPSV( | WMSG+5 |
FBPT | PRINT+5*, PRINT+6, PRINT+7, PRINT+8, PRINT+9, KILL+4!, PAGE+1 |
FBPV | KILL+4! |
FBPVL133 | PSF+1! |
FBPVLIST | PSF+1! |
FBQTY | KILL+4! |
FBREIM | KILL+4! |
FBRTN | INS+1~, INS+4 |
FBRTN("BUFFER" | INSQ+2, INSQ+3 |
FBRTN("IBBAPI" | INS+6, INS+8, INS+10 |
FBRX | KILL+4! |
FBSC | KILL+5!, GETSC+1~ |
FBSL | KILL+5! |
FBSTA | PRINT+3*, PRINT+6, KILL+5!, PAGE+1* |
FBSTANPI | KILL+5!, STA+6*, HDR+4 |
FBSTAT | INS+1~, INS+3*, INS+4 |
FBSTR | KILL+5! |
FBSUSP | KILL+5! |
FBTA | KILL+5! |
FBTYPE | KILL+5! |
FBV | KILL+5! |
FBVAL | INS+1~, INSDSP~, INSDSP+3, INSDSP+4, INSDSP+6, INSDSP+7, INSDSP+8, INSDSP+10, INSDSP+11, INSDSP+12 |
FBVCHAIN | KILL+5! |
FBVEN | KILL+5! |
FBVENID | KILL+5! |
FBVI | KILL+5! |
FBVID | KILL+5! |
FBVNAME | KILL+5! |
FBVP | KILL+5! |
FBX | GETSC+1~, GETSC+8*, GETSC+9, INS+1~, INS+11*, INS+12* |
FBXPROG | SORT+1*, PRINT+5*, KILL+5! |
FBXX | KILL+5! |
FBY | KILL+5!, GETSC+1~, GETSC+8*, GETSC+9, GETSTA+1~, INSDSP+1~, INSDSP+4*, INSDSP+5 |
FBYN | INS+1~, INS+4*, INS+5, INS+6, INS+9 |
FBZ | KILL+5!, INSDSP+1~, INSDSP+8*, INSDSP+9 |
I | KILL+5! |
IO | DQ |
IOF | PAGE+3 |
IOM | HDR+2, HDR+3, HDR+4, HDR+5, HDRUNK+2, HDRUNK+4, HDRUNK+5 |
IOP | Q+2*, KILL+5! |
IOST | DQ |
J | KILL+5! |
K | KILL+5! |
L | KILL+5! |
M | KILL+5! |
N | KILL+5!, VET+6~, VET+7* |
PGM | Q+2*, KILL+5! |
T | KILL+5! |
U | ARRAY+1, EXCLINS+4, VET+7, STA+4, STA+6, PATDEMO+3, GETSC+4, GETSC+5, GETSC+9, INSDSP+3 , INSDSP+8 |
V | KILL+5! |
VA | KILL+5! |
VAEL | PATDEMO+1~ |
VAEL(3 | GETSC+3, GETSC+4, GETSC+5 |
VAEL(9 | PATDEMO+3 |
VAERR | KILL+5! |
VAL | Q+2*, KILL+5! |
VAR | Q+2*, KILL+5! |
VAUTNI | PSF+3*, KILL+5! |
VAUTSTR | PSF+3*, KILL+5! |
VAUTVB | PSF+3*, KILL+5! |
X | ARRAY+9, ARRAY+17, ARRAY+25~, PREBL+1~, EXCLINS+1~, EXCLINS+2*, EXCLINS+4!, EXCLINS+5*, EXCLINS+6!, KILL+5! |
Y | PSF+1!, PSF+3, ARRAY+25~, ARRAY+32, PREBL+1~, PREBL+7, EXCLINS+1~, EXCLINS+4!, EXCLINS+6!, KILL+5! |
Y(0 | ARRAY+9, ARRAY+17 |
Z | DATE+3*, KILL+5! |
>> ZTQUEUED | OUT+2 |