Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: FBPCR3

Package: Fee Basis

Routine: FBPCR3


Information

FBPCR3 ;AISC/GRR,TET-PHARMACY POTENTIAL COST RECOVERY, SORT/PRINT ;6/30/2006

Source Information

Source file <FBPCR3.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Fee Basis 6 $$DATX^FBAAUTL  ($$CATC,HDR,VET)^FBPCR  (FBAUTH,KILL,PRTAUTH)^FBPCR2  ($$FILTER,$$INSURED)^FBPCR4  $$ADJLRA^FBRXFA  $$RRL^FBRXFR  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Fee Basis 2 FBPCR  FBPCR67  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point
SORT ;sort by date certified for payment, patient, invoice number ien, rx ien
KILL ;kill variables set in sort
SET ;set variables
SETTMP ;sort data by primary service facility, patient, fee program, vendor, date
VEN ;set variables for vendor
PRINT ;write output
EXIT ;kill and quit
HDR ;main header
HDR1
SH ;subheader - vendor, prints when name changes
CR ;read for display
PAGE ;new page
INSCK(FBDT,FBDA1,FBPI) ;possible cost recovery fcn call

External References

Name Field # of Occurrence
^DIR CR+1
$$DATX^FBAAUTL SET+20
$$CATC^FBPCR SET+12
HDR^FBPCR HDR+1
VET^FBPCR SORT+2
FBAUTH^FBPCR2 SET+24
KILL^FBPCR2 KILL+5
PRTAUTH^FBPCR2 PRINT+16
$$FILTER^FBPCR4 SETTMP+1
$$INSURED^FBPCR4 SET+14
$$ADJLRA^FBRXFA SET+6
$$RRL^FBRXFR SET+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $P(FBADJ,U,1),?30,$J($P(FBADJ,U,2),14)
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: $P(FBDATA,U,8),?30,$J($P(FBADJ,U,4),14)
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !?5,">>> Cost recover from "_$S(FBCATC:"means testing",FBINS:"insurance",1:"")
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: " and insurance"
  • Condition for execution: FBCATC&FBINS
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: "."
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: !!?(IOM-(13+$L(FBXPROG))/2),"NVC PROGRAM: ",FBXPROG
  • Line Location: HDR1+0
Function Call: WRITE
  • Prompt: !?4,"Fill Date",?64,"Date Certified"
  • Line Location: HDR1+1
Function Call: WRITE
  • Prompt: !,?15,"Drug Name",?44,"Strength",?60,"Quantity"
  • Line Location: HDR1+2
Function Call: WRITE
  • Prompt: !?2,"Claimed",?12,"Paid",?20,"Adj Code",?33,"Adj Amounts",?47,"Invoice #",?58,"Batch #",?66,"Remit Remarks",!,FBDASH
  • Line Location: HDR1+3
Function Call: WRITE
  • Prompt: !!,"Vendor: ",$P(FBVI,";"),?41,"Vendor ID: ",$P($P(FBVI,";",2),"/",1),?65,"Chain #: ",$P($G(^TMP($J,"FB",FBPSF,FBPT,FBPI,FBVI)),U)
  • Line Location: SH+2
Function Call: WRITE
  • Prompt: !?20,"Fee Basis Billing Provider NPI: ",$P(FBVI,"/",2)
  • Line Location: SH+3
Function Call: WRITE
  • Prompt: !
  • Line Location: CR+1
Routine Call
  • DIR
  • Line Location:
    • CR+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FBAA(161.27 - [#161.27] SET+18
^FBAA(161.7 - [#161.7] SET+17
^FBAA(162.1 - [#162.1] SORT+1, SORT+3, SET+2, SET+3, SET+4, SET+5
^FBAAA - [#161] INSCK+9
^FBAAA("AIC" INSCK+6, INSCK+7, INSCK+8
^FBAAV - [#161.2] VEN+1
^TMP($J SETTMP+2*, SETTMP+3*, SETTMP+4*, SETTMP+5*, PRINT+3, PRINT+4, PRINT+6, PRINT+7, SH+2

Label References

Name Line Occurrences
$$INSCK SET+14
HDR PRINT+1, SH+1, PAGE+1
HDR1 PRINT+2
PAGE PRINT+5
SET SORT+4
SETTMP SORT+4
SH PRINT+3, PAGE+1
VEN SET+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A1 KILL+1!, SET+19*, SETTMP+2
A2 KILL+1!, SET+19*, SETTMP+2
DFN SORT+2*, KILL+1!, SET+12, SET+14, SET+22, SET+24
DIR CR+1!
DIR(0 CR+1*
>> DTOUT CR+1
>> DUOUT CR+1
FBAAA KILL+1!, SET+11*, SET+14
FBAC KILL+1!, SET+17*, SET+19
>> FBADJ PRINT+7*, PRINT+11, PRINT+13, PRINT+14
FBADJLA KILL+3!, SET+8*, SETTMP+3
FBADJLR KILL+3!, SET+7*, SETTMP+3
>> FBADX1 SETTMP+4
>> FBADX2 SETTMP+4
>> FBADX3 SETTMP+4
>> FBAICD SETTMP+4
FBAP KILL+1!, SET+17*, SET+19
>> FBAREF SETTMP+4
>> FBARNPI SETTMP+4
FBAUTH KILL+4!, SET+23*, SET+24
>> FBAVND SETTMP+4
>> FBAVNPI SETTMP+4
>> FBAVTAX SETTMP+4
FBBATCH KILL+1!, SET+17*, SETTMP+2
>> FBBDATE SORT+1
FBCATC EN+1*, SORT+3*, SORT+4, KILL+1!, SET+12*, SET+15, SETTMP+2, PRINT+6*, PRINT+15
FBDA INSCK+5~, INSCK+8*, INSCK+9
FBDA1 KILL+1!, INSCK~, INSCK+6, INSCK+7, INSCK+8, INSCK+9
>> FBDASH HDR1+3
>> FBDATA PRINT+6*, PRINT+8, PRINT+9, PRINT+10, PRINT+13, PRINT+14
FBDOB KILL+2!, SETTMP+2, SETTMP+5
FBDRUG KILL+1!, SET+17*, SETTMP+2
FBDT PRINT+4*, PRINT+6, PRINT+7, INSCK~, INSCK+6*, INSCK+7, INSCK+8
>> FBEDATE SORT+1
FBFD KILL+1!, SET+11*, SET+12, SET+14, SET+20*, SET+21
FBFD1 KILL+1!, SET+21*, SETTMP+2
FBFLAG INSCK+5~, INSCK+6*, INSCK+9*, INSCK+10
FBIEN KILL+4!, SET+1~
FBIN KILL+1!
FBINS EN+1*, SORT+3*, SORT+4, KILL+1!, SET+14*, SET+15, SETTMP+2, PRINT+6*, PRINT+15, INSCK+5~
, INSCK+6*, INSCK+7*, INSCK+8, INSCK+10*, INSCK+11
FBINVN KILL+1!, SET+16*, SETTMP+2
FBLOC KILL+1!
>> FBOUT PRINT+1, PRINT+2, PRINT+3, PRINT+4, PRINT+5, HDR+1, SH+1, CR+1*, PAGE+1
FBPAT KILL+1!, SET+22*, SETTMP+2, SETTMP+3, SETTMP+4, SETTMP+5
FBPD KILL+1!, SET+17*, SET+20*, SETTMP+2
>> FBPG PRINT+1
FBPI SET+14, SETTMP+2, SETTMP+3, SETTMP+4, SETTMP+5, PRINT+3, PRINT+4, PRINT+6, PRINT+7, SH+2
, INSCK~, INSCK+9
FBPID KILL+2!
FBPNAME KILL+2!, SET+22
FBPSF EN+1*, SORT+3*, SORT+4, KILL+1!, SET+11*, SET+12, SETTMP+2, SETTMP+3, SETTMP+4, SETTMP+5
PRINT+3, PRINT+4, PRINT+6, PRINT+7, SH+2
>> FBPSV SORT+4, SET+12
>> FBPSV( SORT+4, SET+12
>> FBPT PRINT+3, PRINT+4, PRINT+6, PRINT+7, SH+2
FBPV KILL+1!, SET+19*, SET+21*
FBQTY KILL+1!, SET+19*, SETTMP+2
FBREIM KILL+1!, SET+19*, SET+21
FBRRMKL KILL+3!, SET+10*, SETTMP+3
FBRX KILL+1!, SET+17*, SET+21*, SETTMP+2
FBSC KILL+1!
FBSTR KILL+1!, SET+19*, SETTMP+2
FBSUSP KILL+1!, SET+17*, SET+18*, SETTMP+2
FBVCHAIN KILL+2!, SETTMP+2, SETTMP+5, VEN+1*
FBVEN KILL+1!, SET+22*, SETTMP+2, SETTMP+3, SETTMP+4, SETTMP+5
FBVI KILL+1!, PRINT+3*, PRINT+4, PRINT+6, PRINT+7, SH+2, SH+3
FBVID KILL+2!, SET+22, VEN+1*
FBVNAME KILL+2!, SET+22, VEN+1*
FBX KILL+4!, SET+1~, SET+6*, SET+7, SET+8
>> FBXPROG HDR1
I SORT+1*, SORT+3, KILL+1!, SETTMP+2, SETTMP+3, SETTMP+4
IOM HDR1
IOSL PRINT+1, PRINT+5, SH+1
J SORT+1*, SORT+2, SORT+3, KILL+1!
K SORT+3*, KILL+1!, SET+2, SET+3, SET+4, SET+5, SET+6, SET+10, SETTMP+2, SETTMP+3
SETTMP+4
L SORT+3*, KILL+1!, SET+2, SET+3, SET+5, SET+6, SET+10, SETTMP+2, SETTMP+3, SETTMP+4
PRINT+4*, PRINT+6, PRINT+7, PRINT+16
N KILL+1!
TAMT KILL+3!, SET+9*, SETTMP+3
U SET+2, SET+7, SET+8, SET+11, SET+16, SET+17, SET+18, SET+19, SET+21, SET+23
SETTMP+2, SETTMP+3, SETTMP+4, VEN+1, PRINT+6, PRINT+8, PRINT+9, PRINT+10, PRINT+11, PRINT+13
PRINT+14, SH+2, INSCK+9
V KILL+1!, VEN+1*
Y KILL+1!
Y(0 SET+2*, SET+9, SET+11, SET+17, SET+19
Y(1 SET+5*, SET+11, SET+21, SET+23
Y(2 SET+4*, SET+16, VEN+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All