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

Package: Consult Request Tracking

Routine: GMRCDPCK


Information

GMRCDPCK ;SLC/DCM - Check for a duplicate Consult/Request that has a status of active, pending or scheduled ;5/20/98 14:20

Source Information

Source file <GMRCDPCK.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA FileMan 1 C^%DTC  

Entry Points

Name Comments DBIA/ICR reference
EN(PTN,GMRCPRC,GMRCSVC) ;Main entry point

External References

Name Field # of Occurrence
C^%DTC EN+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Multiple Orders ("_GMRCDUP_") For a/an "_$S($D(^ORD(101,+GMRCPRI,.1)):^(.1),GMRCPR]"":GMRCPR,1:"")_" Exist."
  • Line Location: EN+18
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: !!,"Do You Want To Continue - And Complete - This Order Anyway? N// "
  • Line Location: EN+19

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN+10
^GMR(123 - [#123] EN+9
^GMR(123.5 - [#123.5] EN+6
^ORD(101 - [#101] EN+11, EN+18
^VA(200 - [#200] EN+13

Naked Globals

Name Field # of Occurrence
^( EN+11, EN+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DT EN+7
DTIME EN+19
>> GMRC(0 EN+9*, EN+10, EN+13, EN+14*, EN+20!
GMRCDATE EN+8*, EN+9*, EN+10, EN+20!
GMRCDUP EN+6*, EN+10*, EN+11, EN+18, EN+19, EN+20!
GMRCIEN EN+9*, EN+20!
GMRCMDT EN+7*, EN+9, EN+20!
>> GMRCPR EN+11, EN+18
GMRCPRC EN~, EN+10
>> GMRCPRI EN+11, EN+18
GMRCQUT EN+5!, EN+19*
GMRCSVC EN~, EN+4, EN+6
GMRCTO EN+6*, EN+9, EN+20!
PTN EN~, EN+10
STS EN+5~, EN+8*, EN+9, EN+12
>> X EN+7
>> X1 EN+7*
>> X2 EN+7*
>> Y EN+10*, EN+11, EN+19*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All