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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: FBLTCAR2

Package: Fee Basis

Routine: FBLTCAR2


Information

FBLTCAR2 ;WOIFO/SS-LTC AUTHORIZATIONS REPORTS ;11/20/02

Source Information

Source file <FBLTCAR2.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
VA FileMan 7 DD^%DT  NOW^%DTC  ^DIC  $$GET1^DIQ  ^DIR  ^DIWP  ^DIWW  
Fee Basis 4 $$GETICN^FBAAUTL  DAYS^FBAAUTL1  ($$LTCRPT,PRNVIS)^FBLTCAR  $$DOC^FBSHUTL  
Kernel 4 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  ($$FMADD,$$FMTE)^XLFDT  
Registration 1 (DEM,KVA)^VADPT  

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: 1

Package Total Caller Graph
Fee Basis 1 FBLTCAR  

Entry Points

Name Comments DBIA/ICR reference
EN ;ask program
QEN ; queued entry
GATHER ; collect and sort data
PRINT ; report data
EXIT ;
HD ; page header
HDPOV ; page header for continued POV
HDVEN ; page header for continued Vendor
HDPAT ; page header for continued Patient

External References

Name Field # of Occurrence
DD^%DT PRINT+2
NOW^%DTC PRINT+2
^%ZIS EN+38
HOME^%ZIS EN+42
^%ZISC PRINT+91
^%ZTLOAD EN+42
$$S^%ZTLOAD HD+1
^DIC EN+4, EN+16
$$GET1^DIQ GATHER+5, PRINT+8, PRINT+21, PRINT+28
^DIR EN+9, EN+23, EN+29, EN+34, PRINT+90, HD+2
^DIWP PRINT+67
^DIWW PRINT+68
$$GETICN^FBAAUTL PRINT+57
DAYS^FBAAUTL1 EN+27
$$LTCRPT^FBLTCAR GATHER+17
PRNVIS^FBLTCAR PRINT+70
$$DOC^FBSHUTL PRINT+52
DEM^VADPT PRINT+45
KVA^VADPT PRINT+71
$$FMADD^XLFDT EN+22
$$FMTE^XLFDT EN+22, EN+28, PRINT+7, PRINT+59

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Select one or more LTC Purpose of Visits"
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !,"No authorizations found during period."
  • Line Location: PRINT+24
Function Call: WRITE
  • Prompt: !!,"POV: ",FBPOV("E")
  • Line Location: PRINT+30
Function Call: WRITE
  • Prompt: !!," Vendor: ",FBVN,!
  • Line Location: PRINT+36
Function Call: WRITE
  • Prompt: !,?4,FBPNAME,?35,$P(VADM(2),U,2)
  • Line Location: PRINT+56
Function Call: WRITE
  • Prompt: !,?4,$E(FBPNAME,1,20)," (",$P($P(VADM(2),U,2),"-",3),")",?34,$$GETICN^FBAAUTL(FBDFN)
  • Line Location: PRINT+57
Function Call: WRITE
  • Prompt: ?53,$$FMTE^XLFDT($P(FBA,U)),?67,$$FMTE^XLFDT($P(FBA,U,2))
  • Line Location: PRINT+59
Function Call: WRITE
  • Prompt: !,?6,"DOB: ",$P(VADM(3),U,2)
  • Line Location: PRINT+60
Function Call: WRITE
  • Prompt: ?25,"*** Patient Died on ",$P(VADM(6),U,2)
  • Line Location: PRINT+61
Function Call: WRITE
  • Prompt: !,?32,"----"
  • Line Location: PRINT+76
Function Call: WRITE
  • Prompt: !," Vendor Subtotal:",?25,"Count: ",$J(FBC("VEN"),4)
  • Line Location: PRINT+78
Function Call: WRITE
  • Prompt: !,?32,"===="
  • Line Location: PRINT+83
Function Call: WRITE
  • Prompt: !,"POV Subtotal: ",?25,"Count: ",$J(FBC("POV"),4)
  • Line Location: PRINT+85
Function Call: WRITE
  • Prompt: !!,"REPORT STOPPED AT USER REQUEST"
  • Line Location: PRINT+88
Function Call: WRITE
  • Prompt: !!,FBC("TOT")," Authorization",$S(FBC("TOT")=1:"",1:"s")," on report"
  • Line Location: PRINT+89
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !,$S(FBLTCRT=1:"ENDING ",1:"ACTIVE "),"AUTHORIZATIONS by POV, Vendor, Patient"
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: ?49,FBDTR,?72,"page ",FBPG
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !,FBHDT(FBI)
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: !!,?4,"VETERAN",?35,"Pt. ID"
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: !!,?4,"VETERAN",?34,"ICN"
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: ?56,"AUTHORIZATION"
  • Line Location: HD+11
Function Call: WRITE
  • Prompt: !,?53,"FROM DATE",?67,"TO DATE"
  • Line Location: HD+12
Function Call: WRITE
  • Prompt: !,FBDL
  • Line Location: HD+13
Function Call: WRITE
  • Prompt: !,"POV:",FBPOV("E")," (continued)"
  • Line Location: HDPOV+1
Function Call: WRITE
  • Prompt: !," Vendor: ",FBVN," (continued)"
  • Line Location: HDVEN+1
Function Call: WRITE
  • Prompt: !," Patient: ",FBPNAME," (continued)"
  • Line Location: HDPAT+1
Routine Call
  • DIC
  • Line Location:
    • EN+4
    • EN+16
Routine Call
  • DIR
  • Line Location:
    • EN+9
    • EN+23
    • EN+29
    • EN+34
    • PRINT+90
    • HD+2
Routine Call
  • %ZIS
  • Line Location:
    • EN+38
Routine Call
  • %ZIS
  • Line Location:
    • EN+42

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAAA - [#161] GET1^DIQ
^FBAA(161.8 - [#161.8] Classic Fileman Calls,  GET1^DIQ
^FBAA(161.82 - [#161.82] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FBAA(161.82 - [#161.82] GATHER+14
^FBAAA - [#161] GATHER+4, GATHER+8, GATHER+9, GATHER+11, PRINT+63, PRINT+67
^FBAAV - [#161.2] GATHER+19
^TMP($J GATHER+2!, GATHER+22*, PRINT+24, PRINT+27, PRINT+34, PRINT+41, PRINT+48, PRINT+51, EXIT+2!
^UTILITY($J PRINT+65!

Label References

Name Line Occurrences
EXIT EN+4, EN+9, EN+11, EN+23, EN+29, EN+34, EN+38, EN+39
HD PRINT+23, PRINT+29, PRINT+35, PRINT+55, PRINT+67, PRINT+75, PRINT+82
HDPAT PRINT+67
HDPOV PRINT+35, PRINT+55, PRINT+67, PRINT+75, PRINT+82
HDVEN PRINT+55, PRINT+67, PRINT+75

Naked Globals

Name Field # of Occurrence
^( PRINT+67

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PRINT+2
>> %ZIS EN+38*
DFN PRINT+45~*
DIC EN+3*, EN+4!, EN+14*, EN+17!, EXIT+5!
DIC("B" EN+2*
DIC("S" EN+3*, EN+14*
DIC(0 EN+3*, EN+14*
DIR EN+9!, EN+23!, EN+29!, EN+34!, PRINT+90!, EXIT+5!, HD+2!
DIR("A" EN+8*, EN+20*, EN+25*, EN+33*
DIR("B" EN+8*, EN+22*, EN+28*, EN+33*
DIR(0 EN+8*, EN+20*, EN+25*, EN+33*, PRINT+90*, HD+2*
DIROUT EXIT+5!
DIRUT EN+9, EN+23, EN+29, EN+34, EXIT+5!
DIWF PRINT+64~, PRINT+65*
DIWL PRINT+64~, PRINT+65*
DIWR PRINT+64~, PRINT+65*
DT EN+22
DTOUT EXIT+5!
DUOUT EXIT+5!
FBA GATHER+9*, GATHER+10, GATHER+12, GATHER+13, GATHER+14, GATHER+17, GATHER+19, GATHER+22, PRINT+51*, PRINT+52
, PRINT+59, PRINT+70, EXIT+3!
FBAR EN+35*, PRINT+63, EXIT+3!
FBAU GATHER+8*, GATHER+9, GATHER+11, GATHER+22, PRINT+50*, PRINT+63, PRINT+67, PRINT+70, EXIT+3!
FBAUT PRINT+47*, PRINT+48*, PRINT+49, PRINT+50, PRINT+51, EXIT+3!
FBC PRINT+12*, PRINT+14, PRINT+16*, PRINT+17, PRINT+18*, EXIT+3!
FBC("POV" PRINT+31*, PRINT+73*, PRINT+81, PRINT+85
FBC("TOT" PRINT+25*, PRINT+81*, PRINT+89
FBC("VEN" PRINT+37*, PRINT+53*, PRINT+73, PRINT+78
FBD PRINT+1~
FBD("POV" PRINT+32*, PRINT+74*, PRINT+86
FBD("VEN" PRINT+38*, PRINT+54*, PRINT+74, PRINT+79
FBDAYS PRINT+52*, PRINT+54, PRINT+58, EXIT+3!
FBDD PRINT+21*, PRINT+32, PRINT+38, PRINT+52, PRINT+54, PRINT+58, PRINT+74, PRINT+77, PRINT+79, PRINT+84
, PRINT+86, EXIT+3!, HD+10
FBDFN GATHER+4*, GATHER+5, GATHER+8, GATHER+9, GATHER+11, GATHER+22, PRINT+43*, PRINT+45, PRINT+57, PRINT+63
, PRINT+67, PRINT+70, EXIT+3!
FBDL PRINT+3!*, EXIT+3!, HD+13
FBDT1 EN+24*, EN+25, EN+27, EN+28, GATHER+17, PRINT+7, PRINT+52, PRINT+70, EXIT+3!
FBDT2 EN+30*, GATHER+17, PRINT+7, PRINT+52, PRINT+70, EXIT+3!
FBDTF PRINT+49*, EXIT+3!
FBDTR PRINT+2*, EXIT+4!, HD+6
FBHDT PRINT+6!, EXIT+4!
FBHDT( PRINT+11*, PRINT+13, PRINT+14*, PRINT+16*, PRINT+17*, HD+7
FBHDT(1 PRINT+7*, PRINT+8*
FBHDT(2 PRINT+9*
FBI PRINT+12*, PRINT+13, PRINT+17, EXIT+4!, HD+7*
FBL PRINT+11*, PRINT+13, PRINT+14, PRINT+15*, PRINT+16, PRINT+17, EXIT+4!
FBLTCAR EN+1~
>> FBLTCPR EN+2
>> FBLTCRT GATHER+16, GATHER+17, PRINT+70, HD+5
FBPAT PRINT+40*, PRINT+41*, PRINT+42, PRINT+43, PRINT+48, PRINT+51, EXIT+4!
FBPG PRINT+2*, EXIT+4!, HD+2, HD+3, HD+4*, HD+6
FBPNAME GATHER+5*, GATHER+6*, GATHER+22, PRINT+42*, PRINT+56, PRINT+57, EXIT+4!, HDPAT+1
FBPOV EN+10*, EN+11*, EN+12!, GATHER+13, PRINT+9, PRINT+10, PRINT+27*, PRINT+28, PRINT+34, PRINT+41
, PRINT+48, PRINT+51, EXIT+4!
FBPOV( EN+16*, GATHER+13, PRINT+12, PRINT+13, PRINT+17
FBPOV("E" PRINT+28*, PRINT+30, HDPOV+1
FBPROG EN+5*, GATHER+10, PRINT+8, PRINT+21, EXIT+4!
FBQUIT PRINT+2*, PRINT+27, PRINT+29, PRINT+34, PRINT+35, PRINT+41, PRINT+48, PRINT+55, PRINT+67, PRINT+68
, PRINT+72, PRINT+75, PRINT+80, PRINT+82, PRINT+88, PRINT+90, EXIT+4!, HD+1*, HD+2*
FBRR PRINT+64~, PRINT+66*, PRINT+67*
FBSSN EXIT+4!
>> FBSSNRF PRINT+56, PRINT+57, HD+8, HD+9
FBVN GATHER+1~, GATHER+19*, GATHER+20*, GATHER+22, PRINT+1~, PRINT+34*, PRINT+36, PRINT+41, PRINT+48, PRINT+51
, PRINT+70, HDVEN+1
FBX EN+41*, EXIT+4!
IO QEN+1
IO("Q" EN+39
IOF HD+3
IOM PRINT+3, PRINT+65
IOSL PRINT+29, PRINT+35, PRINT+55, PRINT+67, PRINT+75, PRINT+82
IOST PRINT+90, HD+2, HD+3
POP EN+38, EXIT+5!
U EN+16, GATHER+10, GATHER+11, GATHER+12, GATHER+13, GATHER+14, GATHER+17, GATHER+19, GATHER+22, PRINT+42
, PRINT+43, PRINT+49, PRINT+50, PRINT+52, PRINT+56, PRINT+57, PRINT+59, PRINT+60, PRINT+61, PRINT+70
VADM EXIT+5!
VADM(2 PRINT+56, PRINT+57
VADM(3 PRINT+60
VADM(6 PRINT+61
X EN+27*, EN+28, PRINT+66*, PRINT+67*, EXIT+5!
Y EN+4, EN+5, EN+10, EN+15, EN+16, EN+24, EN+30, EN+35, PRINT+2*, EXIT+5!
, HD+2
ZTDESC EN+40*, EN+42!
ZTQUEUED EN+42!, EXIT+1, HD+1
ZTREQ EN+42!, EXIT+1*
ZTRTN EN+40*, EN+42!
ZTSAVE EN+42!
ZTSAVE( EN+41*
ZTSK EN+42!
ZTSTOP EN+42!, HD+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All