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

Package: Registration

Routine: DGPMV0


Information

DGPMV0 ;ALB/MRL/MIR - SPECIAL LOOK-UP FOR LODGERS; 10 MAR 89

Source Information

Source file <DGPMV0.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIR  
Registration 1 (DEM,KVAR)^VADPT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGPMV  

Entry Points

Name Comments DBIA/ICR reference
WRITE ;write out identifiers
COHELP ;help for check-out lodgers...list patients to choose from
SPCLU ;Special (quick) look-up for check-out lodgers

External References

Name Field # of Occurrence
^DIC SPCLU+3
^DIR WRITE+1
DEM^VADPT COHELP+3
KVAR^VADPT COHELP+4

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Check-out PATIENT: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: SPCLU+1
Function Call: WRITE
  • Prompt: !?5,"Patient was never a lodger ??"
  • Line Location: SPCLU+4
Function Call: WRITE
  • Prompt: !," ANSWER WITH PATIENT, OR SOCIAL SECURITY NUMBER, OR WARD LOCATION, OR",!," ROOM-BED",!,"CHOOSE FROM:"
  • Line Location: COHELP+1
Function Call: WRITE
  • Prompt: !?4,VADM(1)," ",VA("PID")," "
  • Line Location: WRITE+2
Function Call: WRITE
  • Prompt: $E(VADM(3),4,5),"-",$E(VADM(3),6,7),"-",$E(VADM(3),2,3)
  • Line Location: WRITE+2
Routine Call
  • DIC
  • Line Location:
    • SPCLU+3
Routine Call
  • DIR
  • Line Location:
    • WRITE+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM("APTT4" SPCLU+4, COHELP+3
^DPT - [#2] COHELP+3

Label References

Name Line Occurrences
COHELP SPCLU+2
SPCLU SPCLU+2, SPCLU+3, SPCLU+4
WRITE COHELP+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN SPCLU+5*, COHELP+3*, COHELP+4!
DGCT COHELP+2*, COHELP+3*, COHELP+4!, WRITE+1
>> DGER SPCLU+1*
DGFL COHELP+2*, COHELP+3, COHELP+4!, WRITE+1*
>> DIC SPCLU+1*
>> DIC(0 SPCLU+1*
DIR COHELP+4!
DIR(0 WRITE+1*
DTIME SPCLU+1
IOSL WRITE+1
>> VA("PID" WRITE+2
>> VADM(1 COHELP+3, WRITE+2
>> VADM(3 WRITE+2
X SPCLU+1*, SPCLU+2, COHELP+4!
Y SPCLU+3, SPCLU+4, SPCLU+5, COHELP+4!, WRITE+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 |  Local Variables |  All