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

Package: Consult Request Tracking

Routine: GMRCSUBS


Information

GMRCSUBS ;SLC/dee - Routine to check if a Service has more that one parient service ;1/18/00

Source Information

Source file <GMRCSUBS.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 1 BMES^XPDUTL  
VA Fileman 1 ENALL^DIK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Consult Request Tracking 1 GMRC DUPLICATE SUB-SERVICE  

Entry Points

Name Comments DBIA/ICR reference
CLEANAE ;Post-init for patch GMRC*3*7
EN ;Check the service hierarchy (file #123.5) for services
; that have more than are in more than one grouper.
POST ;Post install routine for patch 7

External References

Name Field # of Occurrence
ENALL^DIK CLEANAE+7
BMES^XPDUTL POST+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Service ",$P(^GMR(123.5,SERVICE,0),"^",1)," is a sub service of:"
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !," ",$P(^GMR(123.5,PARENT,0),"^",1)
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !!,"No Services are sub-services for more than one service."
  • Line Location: EN+18
Function Call: WRITE
  • Prompt: !!,"There is ",NUMBER," service that is a sub-service for more than one service."
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: !!,"There are ",NUMBER," services that are sub-services for more than one service."
  • Line Location: EN+20

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(123 - [#123] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(123 - [#123] CLEANAE+5!
^GMR(123.5 - [#123.5] EN+6, EN+9, EN+13, EN+15

Label References

Name Line Occurrences
CLEANAE POST+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
COUNT EN+2~, EN+9*, EN+12
DIK CLEANAE+4~, CLEANAE+6*
DIK(1 CLEANAE+6*
NUMBER EN+2~, EN+3*, EN+16*, EN+18, EN+19, EN+20
PARENT EN+2~, EN+7*, EN+9*, EN+14*, EN+15*
SERVICE EN+2~, EN+5*, EN+6*, EN+9, EN+13, EN+15
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