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

Package: Prosthetics

Routine: RMPRPAT5


Information

RMPRPAT5 ;PHX/RFM-DISPLAY/PRINT CRITICAL COMMENTS ;8/29/1994

Source Information

Source file <RMPRPAT5.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Prosthetics 3 EN^RMPRDIS  (ASK1,EXIT)^RMPRPAT  GETPAT^RMPRUTIL  
VA FileMan 3 YN^DICN  ^DIE  EN^DIWE  

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
Prosthetics 1 RMPRPAT  

Entry Points

Name Comments DBIA/ICR reference
CRI
WRI
EDIT
DIS
DISP ;DISPLAY DISABILITY CODES
WRI1
NPC ;CHECK ALL DISABILITY CODES MARKED DELETED

External References

Name Field # of Occurrence
YN^DICN CRI
^DIE EDIT
EN^DIWE EDIT+1
EN^RMPRDIS DIS+2
ASK1^RMPRPAT CRI
EXIT^RMPRPAT CRI
GETPAT^RMPRUTIL RMPRPAT5+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"PATIENT: ",$P(^DPT(RMPRDFN,0),U),?60,"CRITICAL COMMENTS",!!,"No Patient Critical Comments Recorded for this patient!",!!
  • Line Location: RMPRPAT5+3
Function Call: WRITE
  • Prompt: !,"PATIENT: ",$P(^DPT(RMPRDFN,0),U),?60,"CRITICAL COMMENTS",!!
  • Line Location: RMPRPAT5+4
Function Call: WRITE
  • Prompt: !!,"Would you like to Add/Edit Patient Critical Comments"
  • Line Location: CRI+0
Function Call: WRITE
  • Prompt: !,"Enter `YES or `NO`"
  • Condition for execution: %=0
  • Line Location: CRI+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CRI+0
Function Call: WRITE
  • Prompt: !,^RMPR(665,RMPRDFN,8,RO,0)
  • Line Location: WRI+0
Function Call: WRITE
  • Prompt: $C(7),$C(7),!!,"Disability Code has not been entered for this Patient! You must enter a"
  • Line Location: DIS+1
Function Call: WRITE
  • Prompt: !!,"Current Disability Codes are: "
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: !!,"*More Disability Codes on File, See Screen 1"
  • Line Location: WRI1+0
Function Call: WRITE
  • Prompt: !,$P(^(0),U,1)
  • Line Location: WRI1+1
Function Call: WRITE
  • Prompt: ?50,"Deleted..."
  • Line Location: WRI1+7
Function Call: WRITE
  • Prompt: !!,$C(7),?5,"The Patient's Disability Codes have been Marked as Deleted.",!,?5,"No Purchasing may be done for this patient"
  • Line Location: NPC+2
Routine Call
  • DIE
  • Line Location:
    • EDIT

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPR(665 - [#665] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] RMPRPAT5+3, RMPRPAT5+4
^RMPR(662 - [#662] WRI1+1
^RMPR(665 - [#665] RMPRPAT5+3, RMPRPAT5+5, WRIDIS+2, DIS+3, DISP+1, DISP+3, WRI1+1, WRI1+2, WRI1+4
WRI1+5, WRI1+7, NPC+1

Label References

Name Line Occurrences
CRI RMPRPAT5+3, CRI
EDIT CRI
RMPRPAT5 EDITEDIT+1
WRI RMPRPAT5+5
WRI1 DISP+3

Naked Globals

Name Field # of Occurrence
^( NPC+1
^(0 DIS+3, DISP+1, WRI1+1, WRI1+4, NPC+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CRI*
>> DA EDIT*
DIC EDIT+1!*
>> DIE EDIT*
>> DR EDIT*
>> DTOUT CRI
>> I DISP+3*, WRI1
IOF RMPRPAT5+3, CRI
IOST RMPRPAT5+3
>> J WRI1+2*, WRI1+3, WRI1+5*, WRI1+6
RA NPC+1!*, NPC+2
>> RI NPC+1*
>> RMPRCCO RMPRPAT5+3*, EDIT
RMPRDD DIS!
>> RMPRDFN RMPRPAT5+2, RMPRPAT5+3, RMPRPAT5+4, RMPRPAT5+5, WRIEDITDISDIS+2, DIS+3, DISP+1
DISP+3, WRI1+1, WRI1+2, WRI1+4, WRI1+5, WRI1+7, NPC+1
>> RMPRKILL DIS+2*, DIS+3*, NPC+2*
>> RMPRQ DISP+3, WRI1*
>> RO RMPRPAT5+5*, WRIDISP+3*, WRI1+1, WRI1+2, WRI1+4, WRI1+5, WRI1+7
U RMPRPAT5+3, RMPRPAT5+4, WRI1+1, WRI1+2, WRI1+4, WRI1+5, WRI1+7, NPC+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