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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: GMRCPOR

Package: Consult Request Tracking

Routine: GMRCPOR


Information

GMRCPOR ;SLC/DCM,DLT - Get DOC,LOC,TS in interactive defaults ;5/20/98 14:20

Source Information

Source file <GMRCPOR.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Registration 1 (INP,OERR,SDE)^VADPT  

Entry Points

Name Comments DBIA/ICR reference
DEM ;Similiar to load of variables done by ORUDPA
DOC ;Get the requesting clinician
DOC1 ;Display Requesting Clinician
LOC ;GET PT. LOCATION
LOC1 ;Check for patient location

External References

Name Field # of Occurrence
INP^VADPT LOC+1
OERR^VADPT DEM+3
SDE^VADPT LOC+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Primary Care Physician is "_X,!
  • Line Location: DOC+3
Function Call: WRITE
  • Prompt: !,?5,"Requesting CLINICIAN : ",$S($L(DOC):DOC,1:"****** missing required information ******")
  • Line Location: DOC1+1
Function Call: WRITE
  • Prompt: !!,"Currently enrolled in the following clinics: ",!
  • Line Location: LOC+2
Function Call: WRITE
  • Prompt: !?17
  • Condition for execution: (CT#2)
  • Line Location: LOC+3
Function Call: WRITE
  • Prompt: C=-1
  • Condition for execution: '(CT#2) ?47 W $P(^UTILITY("VAEN",$J,I,"E"),"^") S C=C+1,C(1)=$P(^("E"),"^") S:C'=1
  • Line Location: LOC+3
Function Call: WRITE
  • Prompt: "****** missing required information ******"
  • Line Location: LOC1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] DEM+8
^ORD(100.99 - [#100.99] DOC+2
^SC - [#44] DEM+8
^UTILITY("VAEN" LOC+2, LOC+3
^VA(200 - [#200] DEM+5, DOC+2, DOC+3
^XUSEC("PROVIDER" DEM+6

Label References

Name Line Occurrences
DOC DEM+9
DOC1 DEM+9
LOC DEM+9
LOC1 LOC+2

Naked Globals

Name Field # of Occurrence
^("E" LOC+3
^(0 DEM+8, DOC+2, DOC+3
^(44 DEM+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C LOC+2*, LOC+3*
>> C(1 LOC+3*
>> CT LOC+2*, LOC+3*
>> DFN DEM+2
DIC DEM+10!
>> DOC DOC+1*, DOC+2*, DOC1+1
>> GMRCAGE DEM+3*
>> GMRCDOB DEM+3*
>> GMRCPNM DEM+3*
>> GMRCRB DEM+4*
>> GMRCSN DEM+3*
>> GMRCWARD DEM+4*
I LOC+3*, LOC+4!
O DEM+10!, LOC+2*
>> ORATTEND DEM+7*, DOC+3
>> ORL DEM+4*, DEM+8*
ORL(0 DEM+4*, DEM+8*, DEM+10!
>> ORL(1 DEM+4*
>> ORL(2 DEM+4*, DEM+8*
>> ORNP DEM+4*, DEM+5*, DEM+6, DEM+7, DOC+2
>> ORPV DEM+6*
>> ORTS DEM+4*
>> ORVP DEM+2*
>> ORWARD DEM+4*, DEM+8
>> SEX DEM+3*
VA DEM+10!
VA("PID" DEM+3
>> VA200 DEM+2*
VADM DEM+10!
VADM(1 DEM+3
VADM(3 DEM+3
VADM(4 DEM+3
VADM(5 DEM+3
VAERR DEM+10!
VAIN DEM+10!, LOC+4!
VAIN(2 DEM+4
VAIN(3 DEM+4
VAIN(4 DEM+4, LOC+2, LOC1+1
VAIN(5 DEM+4
VAINDT DEM+3!
>> X DEM+8*, DOC+2*, DOC+3*
Y DEM+10!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All