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

Package: Fee Basis

Routine: FBAADEM


Information

FBAADEM ;AISC/DMK-DISPLAY PATIENT DEMOGRAPHICS ;2/12/2003

Source Information

Source file <FBAADEM.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Fee Basis 4 $$CCADR^FBAACO0  ^FBAADEM1  $$GETICN^FBAAUTL  ^FBUINS  
Registration 2 (DIS,INS)^DGRPDB  (6,KVA)^VADPT  
VA FileMan 2 DT^DIQ  ^DIR  
Kernel 1 HOME^%ZIS  

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

Package Total Caller Graph
Fee Basis 11 FBAAAUT  FBAAPH  FBAAPI  FBAAPP  FBAATIC  FBAAUTL1  FBAUTHP  FBNHEAUT  
FBPHON2  FBSHAUT  FBUCEN  

Entry Points

Name Comments DBIA/ICR reference
END
ELIG

External References

Name Field # of Occurrence
HOME^%ZIS FBAADEM+3
DIS^DGRPDB FBAADEM+20
INS^DGRPDB FBAADEM+22
DT^DIQ ELIG+1
^DIR FBAADEM+21, FBAADEM+24
$$CCADR^FBAACO0 FBAADEM+19
^FBAADEM1 FBAADEM+26
$$GETICN^FBAAUTL FBAADEM+10
^FBUINS FBAADEM+23
6^VADPT FBAADEM+5
KVA^VADPT END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FBAADEM+7
Function Call: WRITE
  • Prompt: !
  • Line Location: FBAADEM+8
Function Call: WRITE
  • Prompt: !,$E(VADM(1),1,32)," (",$P($P(VADM(2),"^",2),"-",3),")",?41,"ICN: ",$$GETICN^FBAAUTL(DFN)
  • Line Location: FBAADEM+10
Function Call: WRITE
  • Prompt: !,VADM(1),?39,"Pt.ID: ",$P(VADM(2),"^",2)
  • Line Location: FBAADEM+11
Function Call: WRITE
  • Prompt: !,VAPA(1),?41,"DOB: ",$P(VADM(3),"^",2)
  • Line Location: FBAADEM+12
Function Call: WRITE
  • Prompt: !,VAPA(2)
  • Line Location: FBAADEM+13
Function Call: WRITE
  • Prompt: !,VAPA(3)
  • Line Location: FBAADEM+14
Function Call: WRITE
  • Prompt: !,VAPA(4),?41,"TEL: ",$S(VAPA(8)]"":VAPA(8),1:"Not on File")
  • Line Location: FBAADEM+15
Function Call: WRITE
  • Prompt: !?38,"COUNTY: ",FBCOUNTY
  • Line Location: FBAADEM+18
Function Call: WRITE
  • Prompt: !
  • Line Location: FBAADEM+21
Function Call: WRITE
  • Prompt: !
  • Line Location: FBAADEM+24
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FBAADEM+25
Function Call: WRITE
  • Prompt: " "
  • Line Location: ELIG+1
Function Call: WRITE
  • Prompt: !?21
  • Condition for execution: I1>1
  • Line Location: ELIG+2
Function Call: WRITE
  • Prompt: $P(VAEL(1,I),"^",2)
  • Line Location: ELIG+2
Function Call: WRITE
  • Prompt: "NO ADDITIONAL ELIGIBILITIES IDENTIFIED"
  • Line Location: ELIG+3
Routine Call
  • %ZIS
  • Line Location:
    • FBAADEM+3
Routine Call
  • DIR
  • Line Location:
    • FBAADEM+21
    • FBAADEM+24

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] ELIG+1
^FBAAA - [#161] FBAADEM+26

Label References

Name Line Occurrences
ELIG FBAADEM+20
END FBAADEM+5, FBAADEM+21, FBAADEM+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN FBAADEM+4, FBAADEM+10, FBAADEM+26, ELIG+1
DIR FBAADEM+21!, FBAADEM+24!
DIR(0 FBAADEM+21*, FBAADEM+24*
>> DIRUT FBAADEM+21, FBAADEM+24
>> FBAAOUT FBAADEM+6*, FBAADEM+21*, FBAADEM+24*
FBCCADR FBAADEM+19~*, FBAADEM+21
FBCOUNTY FBAADEM+17*, FBAADEM+18, END!
FBDEL END!
>> FBPHOUT FBAADEM+23, FBAADEM+24
>> FBSSNRF FBAADEM+10, FBAADEM+11
I ELIG~, ELIG+2*
I1 ELIG~, ELIG+2*
IOF FBAADEM+6*, FBAADEM+7, FBAADEM+25
IOSL FBAADEM+3
IOST FBAADEM+7, FBAADEM+21, FBAADEM+24, FBAADEM+25
U FBAADEM+16
>> VADM(1 FBAADEM+10, FBAADEM+11
>> VADM(2 FBAADEM+10, FBAADEM+11
>> VADM(3 FBAADEM+12
>> VADM(6 FBAADEM+9
>> VAEL(1 ELIG, ELIG+2
>> VAEL(7 FBAADEM+16
>> VAEL(8 ELIG, ELIG+1
>> VAERR FBAADEM+5
>> VAPA("P" FBAADEM+5*
>> VAPA(1 FBAADEM+12
>> VAPA(11 FBAADEM+16
>> VAPA(2 FBAADEM+13
>> VAPA(3 FBAADEM+14
>> VAPA(4 FBAADEM+15
>> VAPA(5 FBAADEM+16
>> VAPA(6 FBAADEM+16
>> VAPA(7 FBAADEM+17
>> VAPA(8 FBAADEM+15
>> Y ELIG+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All