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

Package: Fee Basis

Routine: FBCHPRC


Information

FBCHPRC ;AISC/DMK-PRINT ROC FOR CONTRACT HOSPITAL ;15AUG90

Source Information

Source file <FBCHPRC.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 IX^DIC  ^DIWP  ^DIWW  
Fee Basis 2 ($$DATX,CLOSE,SITEP,ZIS)^FBAAUTL  ^FBCHPRC1  
Registration 1 6^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: 2

Package Total Caller Graph
Fee Basis 2 FBCH PRINT REPORT OF CONTACT  FBCHPRC1  

Entry Points

Name Comments DBIA/ICR reference
ROC
EN
START
END
VEN ;GET VENDOR DEMOGRAPHICS
USER ;GET USER IN FILE 200
RPTC ;RETRIEVE DATE,USER AND NARRATIVE OF ROC
GETNAR
DATE

External References

Name Field # of Occurrence
IX^DIC ROC
^DIWP GETNAR+2
^DIWW GETNAR+3
$$DATX^FBAAUTL START+7, START+8
CLOSE^FBAAUTL END
SITEP^FBAAUTL START+5
ZIS^FBAAUTL EN
^FBCHPRC1 START+9
6^VADPT START+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DATE: ",FB("DATE"),?53,"USER: ",$E(FB("USER"),1,22)
  • Line Location: GETNAR+1
Function Call: WRITE
  • Prompt: @IOF,!,?70,"Page ",FB("PG"),!!?25,"REPORT OF CONTACT CONTINUED",!,?24,$E(Q,1,29),!,?1,"For: ",VADM(1),!,Q,!
  • Line Location: GETNAR+4
Routine Call
  • DIC
  • Line Location:
    • ROC

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAA(161.5 - [#161.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DATE
^DGBT(392.4 - [#392.4] START+6
^DIC(5 - [#5] VEN+4
^FBAA(161.5 - [#161.5] START+1, RPTC+2, GETNAR+2
^FBAAV - [#161.2] VEN+1, VEN+2
^UTILITY($J GETNAR!
^VA(200 - [#200] USER+1

Label References

Name Line Occurrences
DATE START+5, GETNAR
END ROC, EN, START+1
GETNAR RPTC+2
ROC ROC
USER GETNAR
VEN START+9

Naked Globals

Name Field # of Occurrence
^( GETNAR+2
^(0 START+1, START+6, VEN+1, VEN+4, USER+1, RPTC+2
^(1 START+1, VEN+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BOT END!
BT END!
D ROC*!
DFN START+5*, END!
DIC ROC*!
DIC("A" ROC*
DIC("W" ROC*
DIC(0 ROC*
DIWF END!, RPTC+1*
DIWL END!, RPTC+1*
DIWR END!, RPTC+1*
FB END!
FB( START+2*, START+3*, START+4*
FB("DATE" RPTC+2*, GETNAR*, GETNAR+1
FB("DUZ" USER+1, RPTC+2*
FB("PG" START*, GETNAR+4*
FB("USER" USER+1*, GETNAR+1
FB(0 START+1*, START+2
FB(17 START+6*
FB(19 START+8*
FB(2 VEN+1, VEN+2
FB(3 START+5
FB(4 START+5*
FB(5 START+7*
FB1 END!
FB1(0 START+1*, START+3, START+4
FBI END!, RPTC+2*, GETNAR+2
FBIFN ROC*, EN, START+1, END!, RPTC+2, GETNAR+2
>> FBPOP EN
FBRR END!, GETNAR+2*
FBSITE START+5*, END!
FBSITE(0 START+5
FBVEN END!, VEN+1*, VEN+2*
FBVEN(0 VEN+1*, VEN+2, VEN+3, VEN+4, VEN+5, VEN+6!
FBVEN(1 VEN+3*
FBVEN(2 VEN+3*
FBVEN(3 VEN+3*
FBVEN(4 VEN+4*
FBVEN(5 VEN+5*
FBVEN(6 VEN+2*
FBXX GETNAR+2*, GETNAR+3!
I START+3*, END!
IO START
IOF START, GETNAR+4
IOSL GETNAR+4
IOST START
J START+2*, START+3, START+4, END!
L START*, END!
PGM EN*, END!
Q START*, END!, GETNAR+4
VA END!
VADM END!
VADM(1 GETNAR+4
VAEL END!
VAERR END!
VAL EN*, END!
VAPA END!
VAPA("P" START+5*
VAR EN*, END!
X ROC, END!, GETNAR+2*
Y ROC, START+5*, END!, GETNAR*
Z END!
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