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

Package: Problem List

Routine: GMPLBLCK


Information

GMPLBLCK ;SLC/JFR/TC - check selection list ICD codes ;Oct 29, 2018@08:17

Source Information

Source file <GMPLBLCK.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$DT,$$FMTE)^XLFDT  
Problem List 4 $$VALLIST^GMPLBLD2  PAGE^GMPLSLRP  SEND^GMPLUTL4  WRAP^GMPLX  
VA FileMan 2 $$GET1^DIQ  ^DIR  
DRG Grouper 1 ($$CODECS,$$HIST,$$STATCHK)^ICDEX  

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

Package Total Caller Graph
Problem List 3 GMPL SELECTION LIST CSV CHECK  GMPL SELECTION LIST CSV EVENT  GMPLY53  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
CSVPEP ;called from protocol GMPL SELECTION LIST CSV EVENT
CSVOPT ; called from option GMPL SELECTION LIST CSV CHECK
QUEUE ; entry point for tasked report
CKLISTS ; loop lists and see if any inactive problems
CKCODES ; check probs on lists for future inactivation dates

External References

Name Field # of Occurrence
^%ZIS CSVOPT+3
HOME^%ZIS CSVOPT+4, QUEUE+65
^%ZISC CSVOPT+4, QUEUE+64
^%ZTLOAD CSVOPT+8
$$GET1^DIQ CSVPEP+39, QUEUE+44, CKCODES+21, CKCODES+31
^DIR QUEUE+11
$$VALLIST^GMPLBLD2 CKLISTS+9
PAGE^GMPLSLRP QUEUE+6, QUEUE+26, QUEUE+36, QUEUE+43, QUEUE+50, QUEUE+56, QUEUE+60
SEND^GMPLUTL4 CSVPEP+65
WRAP^GMPLX CSVPEP+25, QUEUE+31
$$CODECS^ICDEX CKCODES+15
$$HIST^ICDEX CKCODES+17
$$STATCHK^ICDEX CKCODES+16
$$DT^XLFDT CKCODES+8
$$FMTE^XLFDT CSVPEP+50, CKCODES+22

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Unable to task report"
  • Line Location: CSVOPT+9
Function Call: WRITE
  • Prompt: !,"No Problems Selection List corrections/review required"
  • Line Location: QUEUE+8
Function Call: WRITE
  • Prompt: !,"The following Problem Selection List(s) contain one or more problems that have"
  • Line Location: QUEUE+15
Function Call: WRITE
  • Prompt: !,"inactive SNOMED and/or ICD codes attached to them. Any current users or clinics"
  • Line Location: QUEUE+16
Function Call: WRITE
  • Prompt: !,"using these Selection Lists, will not be able to add the problems with inactive"
  • Line Location: QUEUE+17
Function Call: WRITE
  • Prompt: !,"codes, until the list and the inactive codes are updated. The list may not be"
  • Line Location: QUEUE+18
Function Call: WRITE
  • Prompt: !,"assigned to any additional users or clinics until updated.",!
  • Line Location: QUEUE+19
Function Call: WRITE
  • Prompt: !!," "_GMPLST_":"
  • Line Location: QUEUE+22
Function Call: WRITE
  • Prompt: !," "_GMPLCAT_":"
  • Line Location: QUEUE+24
Function Call: WRITE
  • Prompt: !,$S(GMPLK>1:" "_GMPLTEXT(GMPLK),1:GMPLTEXT(GMPLK))
  • Line Location: QUEUE+33
Function Call: WRITE
  • Prompt: !,"The following Problem Selection List categories contain problems with ICD"
  • Line Location: QUEUE+37
Function Call: WRITE
  • Prompt: !,"codes that have a future inactivation date. These Categories should be updated"
  • Line Location: QUEUE+38
Function Call: WRITE
  • Prompt: !,"as soon as possible after the inactivation date to reduce the interruption of"
  • Line Location: QUEUE+39
Function Call: WRITE
  • Prompt: !,"use of the selection list(s) by users or clinics.",!
  • Line Location: QUEUE+40
Function Call: WRITE
  • Prompt: !!!," Category name: "_$$GET1^DIQ(125.11,CAT,.01),!
  • Line Location: QUEUE+44
Function Call: WRITE
  • Prompt: !," Problems with ICD codes due to be inactivated:",!
  • Line Location: QUEUE+45
Function Call: WRITE
  • Prompt: !," Problem text: "_$P(TXT,U)
  • Line Location: QUEUE+51
Function Call: WRITE
  • Prompt: !," Display text: "_$P(TXT,U,2)
  • Line Location: QUEUE+52
Function Call: WRITE
  • Prompt: !," Code: "_$P(TXT,U,3)
  • Line Location: QUEUE+53
Function Call: WRITE
  • Prompt: !," Inactive Date: "_$P(TXT,U,4),!
  • Line Location: QUEUE+54
Function Call: WRITE
  • Prompt: !!," This Category is part of the following Problem Selection Lists:",!
  • Line Location: QUEUE+57
Function Call: WRITE
  • Prompt: !," "_^TMP("GMPLSL",$J,"F",CAT,"L",LIST)
  • Line Location: QUEUE+61
Routine Call
  • %ZIS
  • Line Location:
    • CSVOPT+3
Routine Call
  • %ZIS
  • Line Location:
    • CSVOPT+4
    • QUEUE+65
Routine Call
  • DIR
  • Line Location:
    • QUEUE+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMPL(125 - [#125] GET1^DIQ
^GMPL(125.11 - [#125.11] GET1^DIQ
125.111 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMPL(125 - [#125] CKLISTS+7, CKLISTS+15, CKCODES+28, CKCODES+30
^GMPL(125.11 - [#125.11] CKCODES+9, CKCODES+10, CKCODES+11, CKCODES+12, CKCODES+14
^TMP( CSVPEP+4!, CSVPEP+6*, CSVPEP+9*, CSVPEP+10*, CSVPEP+11*, CSVPEP+12*, CSVPEP+13*, CSVPEP+16*, CSVPEP+17*, CSVPEP+19*
, CSVPEP+27*, CSVPEP+30*, CSVPEP+31*, CSVPEP+32*, CSVPEP+33*, CSVPEP+34*, CSVPEP+35*, CSVPEP+36*, CSVPEP+39*, CSVPEP+40*
, CSVPEP+41*, CSVPEP+42*, CSVPEP+47*, CSVPEP+48*, CSVPEP+49*, CSVPEP+50*, CSVPEP+51*, CSVPEP+53*, CSVPEP+54*, CSVPEP+55*
, CSVPEP+58*, CSVPEP+59*, CSVPEP+60*
^TMP("GMPLSL" CSVPEP+5, CSVPEP+8, CSVPEP+15, CSVPEP+18, CSVPEP+20, CSVPEP+22, CSVPEP+29, CSVPEP+38, CSVPEP+45, CSVPEP+46
, CSVPEP+52, CSVPEP+57, CSVPEP+58, CSVPEP+66!, QUEUE+7, QUEUE+14, QUEUE+21, QUEUE+23, QUEUE+25, QUEUE+28
, QUEUE+35, QUEUE+42, QUEUE+48, QUEUE+49, QUEUE+55, QUEUE+59, QUEUE+61, QUEUE+66!, CKLISTS+4!, CKLISTS+15*
, CKCODES+6!, CKCODES+22*, CKCODES+27, CKCODES+31*

Label References

Name Line Occurrences
CKCODES CSVPEP+2, QUEUE+4
CKLISTS CSVPEP+2, QUEUE+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS CSVOPT+2~, CSVOPT+3*
CAT CSVPEP+1~, CSVPEP+37*, CSVPEP+38*, CSVPEP+39, CSVPEP+45, CSVPEP+46, CSVPEP+52, CSVPEP+57, CSVPEP+58, QUEUE+3~
, QUEUE+41*, QUEUE+42*, QUEUE+44, QUEUE+48, QUEUE+49, QUEUE+55, QUEUE+59, QUEUE+61, CKCODES+7~, CKCODES+26*
, CKCODES+27*, CKCODES+28, CKCODES+30, CKCODES+31
DIR QUEUE+10~
DIR(0 QUEUE+11*
DIRUT QUEUE+10~
DTOUT QUEUE+10~
DUOUT QUEUE+10~
GMPADT CKCODES+13~, CKCODES+18*, CKCODES+19, CKCODES+20, CKCODES+22
GMPARY CKCODES+13~, CKCODES+17*
GMPARY( CKCODES+18, CKCODES+20
GMPCAT CKCODES+7~, CKCODES+8*, CKCODES+9*, CKCODES+10, CKCODES+11, CKCODES+12, CKCODES+14, CKCODES+21, CKCODES+22
GMPCSPTR CKCODES+13~, CKCODES+15*, CKCODES+16, CKCODES+17
GMPDA CKCODES+7~, CKCODES+8*, CKCODES+11*, CKCODES+12, CKCODES+14, CKCODES+21, CKCODES+22
GMPDT CKCODES+7~, CKCODES+8*, CKCODES+15, CKCODES+16, CKCODES+18
GMPICD CKCODES+13~, CKCODES+14*, CKCODES+15, CKCODES+16, CKCODES+17, CKCODES+22
GMPL0 CKCODES+13~, CKCODES+14*, CKCODES+22
GMPLCAT CSVPEP+1~, CSVPEP+14*, CSVPEP+18*, CSVPEP+19, CSVPEP+20, CSVPEP+22, QUEUE+3~, QUEUE+20*, QUEUE+23*, QUEUE+24
, QUEUE+25, QUEUE+28
GMPLCLST CKLISTS+8~, CKLISTS+11
GMPLCLST( CKLISTS+12, CKLISTS+13, CKLISTS+14
GMPLCNME CKLISTS+5~, CKLISTS+6*, CKLISTS+12*, CKLISTS+13, CKLISTS+14, CKLISTS+15
GMPLCNT CKLISTS+5~, CKLISTS+10*, CKLISTS+14*, CKLISTS+15
GMPLCSYS CSVPEP+21~, CSVPEP+23*, CSVPEP+24, QUEUE+27~, QUEUE+29*, QUEUE+30
GMPLDTXT CSVPEP+21~, CSVPEP+23*, CSVPEP+24, QUEUE+27~, QUEUE+29*, QUEUE+30
GMPLFROM CSVPEP+1~, CSVPEP+63*, CSVPEP+65
GMPLI CSVPEP+1~, CSVPEP+14*, CSVPEP+20*, CSVPEP+22, QUEUE+3~, QUEUE+20*, QUEUE+25*, QUEUE+28
GMPLICD CSVPEP+21~, CSVPEP+23*, CSVPEP+24, QUEUE+27~, QUEUE+29*, QUEUE+30
GMPLK CSVPEP+21~, CSVPEP+22*, CSVPEP+26*, CSVPEP+27, QUEUE+27~, QUEUE+28*, QUEUE+32*, QUEUE+33
GMPLPROB CSVPEP+21~, CSVPEP+24*, CSVPEP+25, QUEUE+27~, QUEUE+30*, QUEUE+31
GMPLREC CSVPEP+21~, CSVPEP+22*, CSVPEP+23, QUEUE+27~, QUEUE+28*, QUEUE+29, CKLISTS+5~, CKLISTS+14*, CKLISTS+15
GMPLSEQ CKLISTS+5~, CKLISTS+6*, CKLISTS+13*, CKLISTS+14
GMPLST CSVPEP+1~, CSVPEP+14*, CSVPEP+15*, CSVPEP+17, CSVPEP+18, CSVPEP+20, CSVPEP+22, QUEUE+3~, QUEUE+20*, QUEUE+21*
, QUEUE+22, QUEUE+23, QUEUE+25, QUEUE+28
GMPLTEXT CSVPEP+21~, CSVPEP+25, QUEUE+27~, QUEUE+31
GMPLTEXT( CSVPEP+26, CSVPEP+27, QUEUE+32, QUEUE+33
GMPLTITL QUEUE+3~, QUEUE+5*, QUEUE+6, QUEUE+26, QUEUE+36, QUEUE+43, QUEUE+50, QUEUE+56, QUEUE+60
GMPLTO CSVPEP+1~, CSVPEP+65
GMPLTO("G.GMP L CODE SET VERSION UPDATES" , CSVPEP+64*
GMPPROB CKCODES+13~, CKCODES+21*, CKCODES+22
GMPPSQ CKCODES+7~, CKCODES+8*, CKCODES+10*, CKCODES+11
GMPXMSUB CSVPEP+1~, CSVPEP+62*, CSVPEP+65
IO QUEUE+2
IO("Q" CSVOPT+4
ION CSVOPT+7
IOSL QUEUE+26, QUEUE+43, QUEUE+50, QUEUE+56, QUEUE+60
IOST QUEUE+9, QUEUE+64
LIST CSVPEP+1~, CSVPEP+56*, CSVPEP+57*, CSVPEP+58, QUEUE+3~, QUEUE+58*, QUEUE+59*, QUEUE+61, CKCODES+7~, CKCODES+29~*
, CKCODES+30*, CKCODES+31
LN CSVPEP+1~, CSVPEP+3*, CSVPEP+6, CSVPEP+9*, CSVPEP+10*, CSVPEP+11*, CSVPEP+12*, CSVPEP+13*, CSVPEP+16*, CSVPEP+17*
, CSVPEP+19*, CSVPEP+27*, CSVPEP+30*, CSVPEP+31*, CSVPEP+32*, CSVPEP+33*, CSVPEP+34*, CSVPEP+35*, CSVPEP+36*, CSVPEP+39*
, CSVPEP+40*, CSVPEP+41*, CSVPEP+42*, CSVPEP+47*, CSVPEP+48*, CSVPEP+49*, CSVPEP+50*, CSVPEP+51*, CSVPEP+53*, CSVPEP+54*
, CSVPEP+55*, CSVPEP+58*, CSVPEP+59*, CSVPEP+60*, QUEUE+3~
LST CKLISTS+5~, CKLISTS+6*, CKLISTS+7*, CKLISTS+9, CKLISTS+15
PAGE QUEUE+3~, QUEUE+6*, QUEUE+21, QUEUE+23, QUEUE+25, QUEUE+26, QUEUE+36, QUEUE+43, QUEUE+48, QUEUE+50
, QUEUE+56, QUEUE+59, QUEUE+60
POP CSVOPT+2~, CSVOPT+3
PROB CSVPEP+43~, CSVPEP+44*, CSVPEP+45*, CSVPEP+46, QUEUE+46~, QUEUE+47*, QUEUE+48*, QUEUE+49
SUB CSVPEP+1~, CSVPEP+3*, CSVPEP+4, CSVPEP+6, CSVPEP+9, CSVPEP+10, CSVPEP+11, CSVPEP+12, CSVPEP+13, CSVPEP+16
, CSVPEP+17, CSVPEP+19, CSVPEP+27, CSVPEP+30, CSVPEP+31, CSVPEP+32, CSVPEP+33, CSVPEP+34, CSVPEP+35, CSVPEP+36
, CSVPEP+39, CSVPEP+40, CSVPEP+41, CSVPEP+42, CSVPEP+47, CSVPEP+48, CSVPEP+49, CSVPEP+50, CSVPEP+51, CSVPEP+53
, CSVPEP+54, CSVPEP+55, CSVPEP+58, CSVPEP+59, CSVPEP+60, CSVPEP+65
TXT CSVPEP+43~, CSVPEP+46*, CSVPEP+47, CSVPEP+48, CSVPEP+49, CSVPEP+50, QUEUE+46~, QUEUE+49*, QUEUE+51, QUEUE+52
, QUEUE+53, QUEUE+54
U CSVPEP+23, CSVPEP+47, CSVPEP+48, CSVPEP+49, CSVPEP+50, QUEUE+29, QUEUE+51, QUEUE+52, QUEUE+53, QUEUE+54
, CKLISTS+15, CKCODES+12, CKCODES+14, CKCODES+22
X QUEUE+10~
Y QUEUE+10~
ZTDESC CSVOPT+5~, CSVOPT+6*
ZTDTH CSVOPT+5~, CSVOPT+7*
ZTIO CSVOPT+5~, CSVOPT+7*
>> ZTQUEUED QUEUE+1
>> ZTREQ QUEUE+1*
ZTRTN CSVOPT+5~, CSVOPT+7*
ZTSK CSVOPT+5~, CSVOPT+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