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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: FBCNHCEN

Package: Fee Basis

Routine: FBCNHCEN


Information

FBCNHCEN ;AISC/CMR-CNH/CH CENSUS DATA ;1/13/98

Source Information

Source file <FBCNHCEN.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Fee Basis 5 ($$SSN,CLOSE,ZIS)^FBAAUTL  $$PSA^FBAAUTL5  $$NAME^FBCHREQ2  $$VID^FBNHEXP  ^FBVDISP  
VA FileMan 2 ^%DT  ^DIR  
Kernel 1 $$FMTE^XLFDT  

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 FBCH CENSUS REPORT  FBCNH CENSUS REPORT  

Entry Points

Name Comments DBIA/ICR reference
START
END
GOT
PRINT
HED
HED1
ASIH ;Checks to see if vet has been transferred ASIH on specified date.

External References

Name Field # of Occurrence
^%DT FBCNHCEN+6
^DIR FBCNHCEN+7, PRINT, HED1
$$SSN^FBAAUTL PRINT+2
CLOSE^FBAAUTL END+1
ZIS^FBAAUTL FBCNHCEN+8
$$PSA^FBAAUTL5 PRINT+2
$$NAME^FBCHREQ2 GOT+2
$$VID^FBNHEXP HED1+3
^FBVDISP HED1+2
$$FMTE^XLFDT PRINT+2, HED

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Inpatient type is not identified."
  • Line Location: FBCNHCEN+4
Function Call: WRITE
  • Prompt: !!,"****CENSUS DATE SELECTION****"
  • Line Location: FBCNHCEN+5
Function Call: WRITE
  • Prompt: !
  • Line Location: FBCNHCEN+6
Function Call: WRITE
  • Prompt: !
  • Line Location: FBCNHCEN+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !?4,FBNAME,?32,$$FMTE^XLFDT(FBDOB),?46,$$SSN^FBAAUTL(DFN),?60,$$PSA^FBAAUTL5(FBPSA),?67,$$FMTE^XLFDT(FBAFD)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !?20,"FEE BASIS ",$S(FBI=6:"CIVIL HOSPITAL",FBI=7:"CONTRACT NURSING HOME",1:"UNKNOWN")," CENSUS",!?31,$$FMTE^XLFDT(FBDT),!?20,$S(FBI=6:$E(QQ,1,31),1:QQ)
  • Line Location: HED+0
Function Call: WRITE
  • Prompt: !!,"VENDOR NAME",?40,"VENDOR ID",!?4,"VETERAN NAME",?36,"DOB",?46,"VETERAN ID",?60,"PSA",?67,"AUTH FROM",!,Q
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HED1+1
Function Call: WRITE
  • Prompt: !!!,FBVNAME
  • Line Location: HED1+2
Function Call: WRITE
  • Prompt: ?40,$$VID^FBNHEXP(FBVIEN)
  • Line Location: HED1+3
Routine Call
  • DIR
  • Line Location:
    • FBCNHCEN+7
    • PRINT
    • HED1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] GOT+2
^FB7078 - [#162.4] START+2, START+4
^FB7078("AC" START+3
^FB7078("AD" START+1
^FBAAA - [#161] GOT+4
^FBAAA("AG" GOT+4
^FBAACNH - [#162.3] ASIH+3, ASIH+4, ASIH+5
^FBAACNH("AC" ASIH+4
^FBAACNH("AG" ASIH+1, ASIH+2
^FBAAV - [#161.2] GOT+3
^TMP($J START!, START+6, START+7, END!, GOT+5*

Label References

Name Line Occurrences
ASIH GOT+1, ASIH+3
END FBCNHCEN+6, FBCNHCEN+8
GOT START+2, START+4
HED START, PRINT+1, HED1+1
HED1 START+6, PRINT+1
PRINT START+7

Naked Globals

Name Field # of Occurrence
^(0 START+2, START+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT FBCNHCEN+6*!
%DT("A" FBCNHCEN+6*
DFN START+7*, END!, GOT*, GOT+2, GOT+4, GOT+5, PRINT+2, ASIH+1, ASIH+2
DIR FBCNHCEN+7!, PRINT!
DIR("A" FBCNHCEN+7*
DIR("B" FBCNHCEN+7*
DIR(0 FBCNHCEN+7*, PRINT*, HED1*
>> DIRUT FBCNHCEN+7
FB7078 START+2*, START+4*, START+7*, END!, GOT, GOT+2
FBAAOUT START*, START+6, END!, PRINT*, HED1*
FBACT END!, ASIH+1*, ASIH+2, ASIH+3
FBADDCK FBCNHCEN+7*, FBCNHCEN+8, END!, HED1+2
FBAFD START+7*, END!, GOT+2*, GOT+5, PRINT+2
FBAFDT START+2*, START+4*, END!, GOT+1
FBCKDT END!, GOT+1*, ASIH+1, ASIH+3*
FBDOB START+7*, END!, GOT+2*, GOT+5, PRINT+2
FBDT FBCNHCEN+6*, FBCNHCEN+8, START+1, START+2, START+4, END!, HED, ASIH+6, ASIH+7, ASIH+8
FBI FBCNHCEN+4, FBCNHCEN+8, START+1, START+4, END!, GOT+1, HED
FBIEN END!, ASIH+2*, ASIH+3, ASIH+4
FBJ START+1*, START+4*, END!, ASIH+1
FBK START+1*, START+2, START+3*, START+4, END!, GOT+4, GOT+5
FBL START+3*, END!
FBNAME START+6*, START+7, END!, GOT+2*, GOT+5, PRINT+2
FBOUT END!, GOT+1!, ASIH+1*, ASIH+2*, ASIH+6*, ASIH+7*, ASIH+8!
>> FBPOP FBCNHCEN+8
FBPSA START+7*, END!, GOT+4*, GOT+5, PRINT+2
FBREC END!, ASIH+5*
FBTRAN END!, ASIH+4*, ASIH+5
FBTRDT END!, ASIH+5*, ASIH+6, ASIH+7, ASIH+8
FBTRTYP END!, ASIH+5*, ASIH+6, ASIH+7, ASIH+8
>> FBVIEN START+5*, START+6*, START+7, HED1+2, HED1+3
FBVNAME START+5*, START+6*, START+7, END!, GOT+3*, GOT+5, HED1+2
FBZ END!, GOT*, GOT+3, GOT+5, ASIH+1, ASIH+2
IO START
IOF START, PRINT+1, HED1+1
IOSL PRINT, PRINT+1, HED1, HED1+1
IOST START, PRINT, HED1
JJ END!, GOT+4*
>> PGM FBCNHCEN+8*
Q START*, END!, HED+1
QQ START*, END!, HED
U START+2, START+4
>> VAL FBCNHCEN+8*
>> VAR FBCNHCEN+8*
X END!
Y FBCNHCEN+6, FBCNHCEN+7, END!, PRINT, HED1, HED1+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All