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

Package: Consult Request Tracking

Routine: GMRCCXDC


Information

GMRCCXDC ;ABV/MKN - Convert cancelled consults to discontinued after 31 days ;Dec 09, 2020@18:08

Source Information

Source file <GMRCCXDC.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 (,C)^%DTC  ($$GET1,GETS)^DIQ  ^DIR  
Consult Request Tracking 1 $$DC^GMRCGUIA  
Kernel 1 ($$FMADD,$$FMTE,$$NOW)^XLFDT  
Toolkit 1 ($$GET,GETLST,PUT)^XPAR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Consult Request Tracking 2 GMRC CHANGE STATUS X TO DC  GMRC CX TO DC PARAMETER EDIT  

Entry Points

Name Comments DBIA/ICR reference
EN ;Overnight Taskman job that runs from option GMRC CHANGE STATUS X TO DC
EX ;
CANC(GMRCIENX) ;check for multiple cancellations
UPDPARM ;Run with menu option GMRC CX TO DC PARAMETER EDIT
UPDACT ;
UPDDAY1 ;
UPDDAY2 ;
CONSCX ;Find cancelled consults
CONSCXST ;
CONSCXEN ;
TRYLST() ;

External References

Name Field # of Occurrence
^%DTC CONSCXEN+14
C^%DTC EN+6, EN+17, EN+18
$$GET1^DIQ EN+25, EN+28, EN+30, CANC+6, CANC+9, CONSCXEN+9
GETS^DIQ CONSCXEN+10
^DIR UPDACT+3, UPDDAY1+3, UPDDAY2+3, CONSCXST+2, CONSCXEN+2
$$DC^GMRCGUIA EN+32
$$FMADD^XLFDT UPDDAY1+6, UPDDAY2+7, UPDDAY2+12, UPDDAY2+13
$$FMTE^XLFDT EN+7, EN+34, EX+1, UPDDAY1+6, UPDDAY2+7, UPDDAY2+12, UPDDAY2+13, CONSCXST+5, CONSCXEN+5
$$NOW^XLFDT EN+6, EN+17, EN+18, EN+31
$$GET^XPAR EN+3, EN+12, EN+14
GETLST^XPAR UPDPARM+3, UPDDAY2+8, TRYLST+2
PUT^XPAR UPDACT+4, UPDDAY1+5, UPDDAY2+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Update the three fields in the CSLT CANCELLED TO DISCONTINUED parameter",!!
  • Line Location: UPDPARM+2
Function Call: WRITE
  • Prompt: !,"Unable to retrieve values in parameter CSLT CANCELLED TO DISCONTINUED"
  • Line Location: UPDPARM+4
Function Call: WRITE
  • Prompt: " ",$$FMTE^XLFDT(Y,"5PZ")
  • Line Location: UPDDAY1+6
Function Call: WRITE
  • Prompt: !,"The end day number cannot be earlier than the start day number"
  • Line Location: UPDDAY2+4
Function Call: WRITE
  • Prompt: " ",$$FMTE^XLFDT(Y,"5PZ")
  • Line Location: UPDDAY2+7
Function Call: WRITE
  • Prompt: !,"Unable to retrieve values in parameter CSLT CANCELLED TO DISCONTINUED"
  • Line Location: UPDDAY2+9
Function Call: WRITE
  • Prompt: !!,"New contents of parameter:",!
  • Line Location: UPDDAY2+10
Function Call: WRITE
  • Prompt: !,$P(OUT(D1),U)," = ",$P(OUT(D1),U,2)
  • Line Location: UPDDAY2+11
Function Call: WRITE
  • Prompt: !,$P(OUT(D2),U)," = ",$P(OUT(D2),U,2)
  • Line Location: UPDDAY2+12
Function Call: WRITE
  • Prompt: " ",$$FMTE^XLFDT(Y,"5PZ")
  • Line Location: UPDDAY2+12
Function Call: WRITE
  • Prompt: !,$P(OUT(D3),U)," = ",$P(OUT(D3),U,2)
  • Line Location: UPDDAY2+13
Function Call: WRITE
  • Prompt: " ",$$FMTE^XLFDT(Y,"5PZ")
  • Line Location: UPDDAY2+13
Function Call: WRITE
  • Prompt: !,"Search for cancelled consults"
  • Line Location: CONSCX+2
Function Call: WRITE
  • Prompt: !,"""CANCELLED"" status in file #123.1 (REQUEST ACTION TYPES) not found"
  • Line Location: CONSCX+4
Function Call: WRITE
  • Prompt: " ",$$FMTE^XLFDT(GMRCDT1,"5PZ")
  • Line Location: CONSCXST+5
Function Call: WRITE
  • Prompt: !,"End date may not be earlier than Start date"
  • Line Location: CONSCXEN+4
Function Call: WRITE
  • Prompt: " ",$$FMTE^XLFDT(+Y,"5PZ")
  • Line Location: CONSCXEN+5
Routine Call
  • DIR
  • Line Location:
    • UPDACT+3
    • UPDDAY1+3
    • UPDDAY2+3
    • CONSCXST+2
    • CONSCXEN+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(123 - [#123] GET1^DIQ,  GETS^DIQ
123.02 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(123 - [#123] EN+23, EN+24, EN+29, CANC+4, CONSCXEN+7, CONSCXEN+8
^GMR(123.1 - [#123.1] EN+20, CONSCX+3
^XTMP("GMRCCXDC " EN+7

Label References

Name Line Occurrences
$$CANC EN+27
$$TRYLST EN+4
CONSCXEN CONSCXEN+4
CONSCXST CONSCXEN+3
EX EN+21
UPDACT UPDDAY1+3
UPDDAY1 UPDDAY2+3
UPDDAY2 UPDDAY2+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D1 UPDPARM+1~, UPDPARM+5*, UPDPARM+6*, UPDACT+2, UPDDAY2+11
D2 UPDPARM+1~, UPDPARM+5*, UPDPARM+7*, UPDDAY1+2, UPDDAY2+12
D3 UPDPARM+1~, UPDPARM+5*, UPDPARM+8*, UPDDAY2+2, UPDDAY2+13
DA EN+1~, EN+6*, EN+7, EN+8, CONSCX+1~, CONSCXEN+7*, CONSCXEN+8
DAY1 UPDPARM+1~, UPDDAY1+4*, UPDDAY1+6, UPDDAY2+1, UPDDAY2+4
DAY2 UPDPARM+1~, UPDDAY2+5*, UPDDAY2+7
DIR UPDPARM+1~, UPDACT+1!, UPDDAY1+1!, UPDDAY2+1!, CONSCX+1~
DIR("A" UPDACT+1*, UPDDAY1+1*, UPDDAY2+1*, CONSCXST+1*, CONSCXEN+1*
DIR("B" UPDACT+2*, UPDDAY1+2*, UPDDAY2+2*
DIR(0 UPDACT+1*, UPDDAY1+1*, UPDDAY2+1*, CONSCXST+1*, CONSCXEN+1*
DIRUT UPDPARM+1~, UPDACT+1!, UPDACT+3, UPDDAY1+3, UPDDAY2+3
DT EX+1, UPDDAY1+6, UPDDAY2+7, UPDDAY2+12, UPDDAY2+13, CONSCXEN+14
DTOUT CONSCX+1~, CONSCXST+3, CONSCXEN+3
DUOUT UPDACT+1!, UPDACT+3, UPDDAY1+3, UPDDAY2+3, CONSCX+1~, CONSCXST+3, CONSCXEN+3
ERR UPDPARM+1~, UPDPARM+3, UPDPARM+4, UPDDAY2+8, UPDDAY2+9, CONSCX+1~, TRYLST+1~, TRYLST+2, TRYLST+3
GMRCACT EN+1~, EN+29*, EN+30
GMRCACTX CANC+1~, CANC+2*, CANC+4*, CANC+6, CANC+9
GMRCCANX CANC+1~, CANC+2*, CANC+12*, CANC+13
GMRCCOM EN+1~, EN+32
GMRCCOM(1 EN+19*
GMRCCT EN+1~, EN+17*, EN+21*, EN+22*, EN+34*, EX+2, EX+3, EX+4
GMRCCX EN+1~, EN+20*, EN+21, EN+24, EN+29, CONSCX+1~, CONSCX+3*, CONSCX+4, CONSCXEN+7, CONSCXEN+8
, CONSCXEN+12
GMRCDA EN+1~, EN+17*, EN+23*, EN+24, EN+29, EN+31, EN+33*, EN+34
GMRCDAX EN+2~, EN+17*, CANC+9
GMRCDT1 EN+1~, EN+12*, EN+13, EN+15, EN+17, EN+19, CONSCX+1~, CONSCXST+4*, CONSCXST+5, CONSCXEN+4
, CONSCXEN+7
GMRCDT2 EN+1~, EN+14*, EN+15*, EN+18, CONSCX+1~, CONSCXEN+6*, CONSCXEN+7
GMRCDTMP EN+1~, EN+31*, EN+33
GMRCHITX CANC+1~, CANC+2*, CANC+4, CANC+9*, CANC+12*
GMRCIEN EN+1~, EN+24*, EN+25, EN+27, EN+28, EN+29, EN+30, EN+32, EN+34, EN+35
GMRCIENX EN+2~, CANC~, CANC+4, CANC+6, CANC+9
GMRCNA EN+1~, EN+28*, EN+34, EN+35
GMRCNOW EN+1~, EN+31*, EN+32
GMRCORN EN+1~, EN+28*
GMRCPROV EN+2~, EN+30*, EN+32
GMRCSTOP EN+2~, EN+18*, EN+23
I UPDPARM+1~, UPDPARM+5*, UPDPARM+6, UPDPARM+7, UPDPARM+8, CONSCX+1~, CONSCXEN+11*, CONSCXEN+12, CONSCXEN+13, CONSCXEN+14
IEN CONSCX+1~, CONSCXEN+7*, CONSCXEN+8, CONSCXEN+9, CONSCXEN+10, CONSCXEN+13
IENACT CONSCX+1~, CONSCXEN+8*
N UPDPARM+1~, UPDPARM+5*, UPDPARM+6, UPDPARM+7, UPDPARM+8, TRYLST+1~, TRYLST+4*
OUT UPDPARM+1~, UPDPARM+3, UPDDAY2+8, CONSCX+1~, CONSCXEN+10!, TRYLST+1~, TRYLST+2
OUT( UPDPARM+5, UPDPARM+6, UPDPARM+7, UPDPARM+8, UPDACT+2, UPDDAY1+2, UPDDAY2+2, UPDDAY2+11, UPDDAY2+12, UPDDAY2+13
, CONSCXEN+11, CONSCXEN+12, CONSCXEN+13, CONSCXEN+14, TRYLST+4
OUT(123 CONSCXEN+13
R TRYLST+1~, TRYLST+4*, TRYLST+5
U EN+8, UPDACT+2, UPDDAY1+2, UPDDAY2+2, UPDDAY2+11, UPDDAY2+12, UPDDAY2+13, TRYLST+4
X EN+2~, EN+3*, EN+4*, EN+5, EN+8, EN+9*, EN+10, EN+11, EN+17*, EN+18*
, UPDPARM+1~, UPDACT+2*, CONSCX+1~, CONSCXEN+12*, CONSCXEN+14
X1 EN+2~, EN+6*, EN+17*, EN+18*, UPDPARM+1~, CONSCX+1~, CONSCXEN+14*
X2 EN+2~, EN+6*, EN+17*, EN+18*, UPDPARM+1~, CONSCX+1~, CONSCXEN+14*
XTMP EN+2~, EN+7*, EN+8, EN+10, EN+13, EN+15, EN+21, EN+22, EN+34, EN+35
, EX+1, EX+2, EX+3, EX+4
XTMPCT EN+2~, EN+13*, EN+15*, EN+20*, EN+21*, EN+22*, EN+34*, EN+35*, EX+1*, EX+2
, EX+3, EX+4
Y EN+2~, EN+32*, EN+34, EN+35, UPDPARM+1~, UPDACT+4*, UPDACT+5, UPDDAY1+4, UPDDAY1+5, UPDDAY1+6*
, UPDDAY2+4, UPDDAY2+5, UPDDAY2+6, UPDDAY2+7*, UPDDAY2+12*, UPDDAY2+13*, CONSCXST+4, CONSCXEN+4, CONSCXEN+5, CONSCXEN+6
>> ZTQUEUED EN+9
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