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

Package: Consult Request Tracking

Routine: GMRCP85


Information

GMRCP85 ;WAT - Post-install for GMRC*3.0*85 ;12/22/15 07:21

Source Information

Source file <GMRCP85.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 (,$$S)^%ZTLOAD  ($$FMADD,$$FMTE,$$NOW)^XLFDT  ($$CJ,$$REPEAT)^XLFSTR  (BMES,MES)^XPDUTL  
MailMan 2 DES^XMA21  ^XMD  
Registration 1 (DEM,KVA)^VADPT  

Entry Points

Name Comments DBIA/ICR reference
RECIP ;RECIPIENTS
PRE ; pre-init
POST ; post init
RESTART ;index redux
QUEUE(GMRCMSG,ZTRTN,ZTDESC) ;CREATE A SPECIFIED TASK
ORDSRCH ;find rejected consult/procedure orders
FINDSVC(GMRCIFN) ; service not directly accessbile in the OR(100 entry, go find it
OUTPUT ;add data to message array
MAIL(XMTEXT,XMSUB,XMY,SUBSCR) ;SEND AN EMAIL
MAILOUT(MESSAGE) ;OUTPUT THE GMRCMSG ARRAY FROM MAIL LINE TAG
OUTPUT2 ;programmer mode write data to screen
HEADER ;header

External References

Name Field # of Occurrence
^%ZTLOAD QUEUE+8
$$S^%ZTLOAD ORDSRCH+31
DEM^VADPT ORDSRCH+26
KVA^VADPT ORDSRCH+29
$$FMADD^XLFDT RECIP+15, QUEUE+6, ORDSRCH+2, ORDSRCH+47
$$FMTE^XLFDT OUTPUT+18, OUTPUT2+14
$$NOW^XLFDT QUEUE+6, ORDSRCH+47
$$CJ^XLFSTR RECIP+2, RECIP+3
$$REPEAT^XLFSTR OUTPUT+10, OUTPUT+11, OUTPUT+21, OUTPUT2+16, HEADER+3, HEADER+4
DES^XMA21 RECIP+13
^XMD MAIL+20
BMES^XPDUTL QUEUE+5, QUEUE+10, QUEUE+14
MES^XPDUTL MAILOUT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("*** REJECTED CONSULT/PROCEDURE ORDERS REPORT ",80," "),!
  • Line Location: RECIP+2
Function Call: WRITE
  • Prompt: $$CJ^XLFSTR("DATE DEFAULT VALUE REPORT QUESTIONS ***",80," "),!
  • Line Location: RECIP+3
Function Call: WRITE
  • Prompt: !,"The post-install will create the REJECTED CONSULT/PROCEDURE ORDERS",!
  • Line Location: RECIP+4
Function Call: WRITE
  • Prompt: "REPORT, which contains orders rejected by Consults with the message:",!
  • Line Location: RECIP+5
Function Call: WRITE
  • Prompt: " Code not valid for Coding System",!!
  • Line Location: RECIP+6
Function Call: WRITE
  • Prompt: "The installer MUST include the site's local Clinical Application Coordinators",!
  • Line Location: RECIP+7
Function Call: WRITE
  • Prompt: "(CACs) or other identified points-of-contact as recipients of this report.",!!
  • Line Location: RECIP+8
Function Call: WRITE
  • Prompt: !!,"Please select the recipients for the REJECTED CONSULT/PROCEDURE ORDERS REPORT",!
  • Line Location: RECIP+9
Function Call: WRITE
  • Prompt: "below."
  • Line Location: RECIP+10
Function Call: WRITE
  • Prompt: !,"Queueing file 100 search..."
  • Line Location: RESTART+1
Function Call: WRITE
  • Prompt: "ERROR",!,"Unable to queue the "_GMRCMSG_"; file a Remedy ticket for assistance.",!
  • Line Location: QUEUE+11
Function Call: WRITE
  • Prompt: "DONE",!,"Task #"_ZTSK,!
  • Line Location: QUEUE+15
Function Call: WRITE
  • Prompt: MESSAGE(LINE),!
  • Line Location: MAILOUT+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+1
Function Call: WRITE
  • Prompt: "PATIENT",!
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: " SERVICE"_$$REPEAT^XLFSTR(" ",44)_" ORDER DATE ORDER #"
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",78)
  • Line Location: HEADER+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(123.3 - [#123.3] FINDSVC+11, FINDSVC+12
^GMR(123.5 - [#123.5] ORDSRCH+21, FINDSVC+8
^OR(100 - [#100] ORDSRCH+9, ORDSRCH+12, ORDSRCH+14, ORDSRCH+15, ORDSRCH+16, ORDSRCH+19, ORDSRCH+20, ORDSRCH+21, ORDSRCH+24, ORDSRCH+27
, FINDSVC+4, FINDSVC+5
^ORD(100.98 - [#100.98] ORDSRCH+5, ORDSRCH+6
^ORD(101.43 - [#101.43] FINDSVC+6, FINDSVC+7
^XMB("NETNAME" MAIL+19
^XTMP( MAIL+9, MAIL+10!, MAIL+11, MAIL+12!
^XTMP("GMRCP85" ORDSRCH+8, ORDSRCH+47*, ORDSRCH+48*
^XTMP("GMRCP85RECIPS" RECIP+1!, RECIP+15*, RECIP+16*
^XTMP("GMRCP85_ORDERS" ORDSRCH+1!, ORDSRCH+2*, ORDSRCH+28*, OUTPUT+1, OUTPUT+4, OUTPUT+13, OUTPUT+16, OUTPUT+17, OUTPUT+18, OUTPUT+19
, OUTPUT2+1, OUTPUT2+4, OUTPUT2+9, OUTPUT2+12, OUTPUT2+13, OUTPUT2+14, OUTPUT2+15

Label References

Name Line Occurrences
$$FINDSVC ORDSRCH+23
$$MAIL ORDSRCH+45
HEADER OUTPUT2+8
MAILOUT MAIL+18, MAIL+26
OUTPUT ORDSRCH+36
QUEUE POST+3, RESTART+2
RECIP PRE+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
COUNT ORDSRCH+3~, ORDSRCH+4*, ORDSRCH+28*
DCTXT ORDSRCH+3~, ORDSRCH+16*, ORDSRCH+17
DFN ORDSRCH+3~, ORDSRCH+25*
DIFROM MAIL+6~
DISPGRP ORDSRCH+3~, ORDSRCH+12*, ORDSRCH+13
DT RECIP+15, ORDSRCH+2
DUZ RECIP+12, MAIL+14
GMRCDATE ORDSRCH+3~, ORDSRCH+27*, ORDSRCH+28, OUTPUT+7~, OUTPUT+18*, OUTPUT+22, OUTPUT2+7~, OUTPUT2+14*, OUTPUT2+17
GMRCIDX ORDSRCH+9~*, ORDSRCH+10*, ORDSRCH+11, ORDSRCH+48
GMRCIFN ORDSRCH+3~, ORDSRCH+11*, ORDSRCH+12, ORDSRCH+14, ORDSRCH+15, ORDSRCH+16, ORDSRCH+19, ORDSRCH+20, ORDSRCH+21, ORDSRCH+23
, ORDSRCH+24, ORDSRCH+27, ORDSRCH+28, FINDSVC~, FINDSVC+4, FINDSVC+5
GMRCINC OUTPUT+7~, OUTPUT+8*, OUTPUT+16*, OUTPUT+17, OUTPUT+18, OUTPUT+19, OUTPUT2+7~*, OUTPUT2+12*, OUTPUT2+13, OUTPUT2+14
, OUTPUT2+15
GMRCMSG QUEUE~, QUEUE+5, QUEUE+10, QUEUE+11, MAIL+6~, MAIL+18, MAIL+21!, MAIL+26
GMRCMSG(1 MAIL+16*, MAIL+23*
GMRCMSG(2 MAIL+17*, MAIL+24*
GMRCMSG(3 MAIL+25*
GMRCNAME ORDSRCH+3~, ORDSRCH+24*, ORDSRCH+25, OUTPUT+7~, OUTPUT2+7~
GMRCODBL FINDSVC+1~, FINDSVC+5*, FINDSVC+6, FINDSVC+7*, FINDSVC+8, FINDSVC+9, FINDSVC+10
GMRCON ORDSRCH+3~, ORDSRCH+5*, ORDSRCH+13
GMRCONBR OUTPUT+7~, OUTPUT+19*, OUTPUT+22, OUTPUT2+7~, OUTPUT2+15*, OUTPUT2+17
GMRCPAT OUTPUT+7~, OUTPUT+8*, OUTPUT+13*, OUTPUT+14, OUTPUT+15, OUTPUT+16, OUTPUT+17, OUTPUT+18, OUTPUT+19, OUTPUT2+7~*
, OUTPUT2+9*, OUTPUT2+10, OUTPUT2+11, OUTPUT2+12, OUTPUT2+13, OUTPUT2+14, OUTPUT2+15
GMRCPOST POST+1~, POST+2*, QUEUE+10, QUEUE+13
GMRCPROC ORDSRCH+3~, ORDSRCH+6*, ORDSRCH+13, FINDSVC+1~, FINDSVC+10*, FINDSVC+11, FINDSVC+12
GMRCREP ORDSRCH+3~, ORDSRCH+38!
GMRCREP( OUTPUT+15*, OUTPUT+22*, OUTPUT+23*, OUTPUT+24*, OUTPUT+25*
GMRCREP(1 ORDSRCH+34*, ORDSRCH+39*
GMRCREP(2 ORDSRCH+35*, ORDSRCH+40*
GMRCREP(3 ORDSRCH+41*, OUTPUT+2*, OUTPUT+5*, OUTPUT+9*
GMRCREP(4 ORDSRCH+42*, OUTPUT+3*, OUTPUT+6*, OUTPUT+10*
GMRCREP(5 ORDSRCH+43*, OUTPUT+11*
GMRCREP(6 ORDSRCH+44*
GMRCSERV FINDSVC+1~*, FINDSVC+8*, FINDSVC+12*, FINDSVC+13, OUTPUT+7~, OUTPUT+17*, OUTPUT+20*, OUTPUT+21*, OUTPUT+22, OUTPUT2+7~
, OUTPUT2+13*, OUTPUT2+16*, OUTPUT2+17
GMRCSTAT ORDSRCH+3~, ORDSRCH+45*, ORDSRCH+46
GMRCSVC ORDSRCH+3~, ORDSRCH+18*, ORDSRCH+20*, ORDSRCH+21*, ORDSRCH+22, ORDSRCH+23*, ORDSRCH+28
GMRCTEMP OUTPUT+7~, OUTPUT2+7~
IOF HEADER+1
LINE MAILOUT+3~*
LINECNT OUTPUT+7~, OUTPUT+12*, OUTPUT+15*, OUTPUT+22*, OUTPUT+23*, OUTPUT+24, OUTPUT+25
LOOPCNT ORDSRCH+3~, ORDSRCH+4*, ORDSRCH+30*, ORDSRCH+31
MESSAGE MAILOUT~, MAILOUT+4
MESSAGE( MAILOUT+3
STRTDATE ORDSRCH+7~*, ORDSRCH+8*, ORDSRCH+9
SUBSCR MAIL~, MAIL+9, MAIL+10, MAIL+11, MAIL+12
TOTAL OUTPUT+7~, OUTPUT+8*, OUTPUT+22*, OUTPUT+25
U RECIP+15, ORDSRCH+2, ORDSRCH+12, ORDSRCH+15, ORDSRCH+16, ORDSRCH+21, ORDSRCH+24, ORDSRCH+27, ORDSRCH+28, ORDSRCH+47
, FINDSVC+7, FINDSVC+8, OUTPUT+17, OUTPUT+18, OUTPUT+19, MAIL+27, OUTPUT2+13, OUTPUT2+14, OUTPUT2+15
>> VA("BID" ORDSRCH+28
>> VADM(1 ORDSRCH+28
X RECIP+11~, ORDSRCH+31~*
XMDF RECIP+11~
XMDUZ RECIP+11~, RECIP+12*, MAIL+6~, MAIL+19*
XMERR MAIL+6~, MAIL+27
XMMG RECIP+11~, MAIL+6~, MAIL+22, MAIL+25, MAIL+27
XMOUT RECIP+11~
XMSUB MAIL~, MAIL+7
XMTEXT MAIL~, MAIL+7
XMY RECIP+11~, RECIP+14, RECIP+16, MAIL~, MAIL+8, MAIL+11*
XMY( MAIL+14*
XMZ MAIL+6~
>> XPDNM MAILOUT+2
ZTDESC QUEUE~
ZTDTH QUEUE+4~, QUEUE+6*
ZTIO QUEUE+4~, QUEUE+7*
>> ZTQUEUED MAIL+13
>> ZTREQ ORDSRCH+49*
ZTRTN QUEUE~
ZTSK QUEUE+4~, QUEUE+9, QUEUE+14, QUEUE+15
>> ZTSTOP ORDSRCH+10, ORDSRCH+31*, ORDSRCH+33, ORDSRCH+46
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All