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

Package: Problem List

Routine: GMPLBLD3


Information

GMPLBLD3 ; SLC/MKB,TC -- Bld PL Selection Lists cont ;08/22/17 14:15

Source Information

Source file <GMPLBLD3.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 4 EN^DDIOL  FILE^DIE  $$GET1^DIQ  ^DIR  
Problem List 3 $$LIST^GMPLBLD2  BUILD^GMPLMENU  PAUSE^GMPLX  
DRG Grouper 1 ($$CODECS,$$STATCHK)^ICDEX  
Kernel 1 $$DT^XLFDT  
Lexicon Utility 1 $$STATCHK^LEXSRC2  
Toolkit 1 ENVAL^XPAR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Problem List 2 GMPL DELETE LIST  GMPL LIST MENU  

Entry Points

Name Comments DBIA/ICR reference
DEL1
MENU ; -- init variables and list array for GMPL LIST MENU list template
; Expects GMPLSLST=selection list
DELQT
DELETE ; Delete Selection List

External References

Name Field # of Occurrence
EN^DDIOL DEL1+7, DEL1+22
FILE^DIE DEL1+6, DEL1+18
$$GET1^DIQ DELETE+17, DELETE+18, DELETE+19, DELETE+20, DEL1+14
^DIR DEL1+3
$$LIST^GMPLBLD2 DELETE+5
BUILD^GMPLMENU MENU+21
PAUSE^GMPLX DELQT
$$CODECS^ICDEX MENU+16
$$STATCHK^ICDEX MENU+18
$$STATCHK^LEXSRC2 MENU+14
$$DT^XLFDT MENU+3
ENVAL^XPAR DELETE+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Cannot delete a National Selection List."
  • Line Location: DELETE+6
Function Call: WRITE
  • Prompt: !!,"Checking the Default Problem Selection List parameter for use of this list ..."
  • Line Location: DELETE+7
Function Call: WRITE
  • Prompt: !!,"Error: "_$P(GMPLERR,U,2)
  • Line Location: DELETE+9
Function Call: WRITE
  • Prompt: "."
  • Line Location: DELETE+13
Function Call: WRITE
  • Prompt: !!,"CANNOT DELETE",!,"This list is currently assigned to the following entities:",!!
  • Line Location: DELETE+15
Function Call: WRITE
  • Prompt: ?7,"User: "_$$GET1^DIQ(200,$P(GMPLENTY,";"),.01),!
  • Line Location: DELETE+17
Function Call: WRITE
  • Prompt: ?7,"Clinic: "_$$GET1^DIQ(44,$P(GMPLENTY,";"),.01),!
  • Line Location: DELETE+18
Function Call: WRITE
  • Prompt: ?7,"System: "_$$GET1^DIQ(4.2,$P(GMPLENTY,";"),.01),!
  • Line Location: DELETE+19
Function Call: WRITE
  • Prompt: ?7,"Division: "_$$GET1^DIQ(4,$P(GMPLENTY,";"),.01),!
  • Line Location: DELETE+20
Function Call: WRITE
  • Prompt: !,"No other parameter settings found."
  • Line Location: DELETE+22
Function Call: WRITE
  • Prompt: !!,"Deleting "_$P(GMPLSLST,U,2)_" selection list ..."
  • Line Location: DEL1+4
Function Call: WRITE
  • Prompt: !,"DONE."
  • Line Location: DEL1+9
Function Call: WRITE
  • Prompt: !!,"Checking the NEW PERSON file for any pointers to this list and removing them..."
  • Line Location: DEL1+11
Function Call: WRITE
  • Prompt: !,"No pointers found."
  • Line Location: DEL1+23
Function Call: WRITE
  • Prompt: !,"DONE."
  • Line Location: DEL1+24
Function Call: WRITE
  • Prompt: !
  • Line Location: DELQT+0
Function Call: WRITE
  • Prompt: !!,"Retrieving list of "_$P(GMPLSLST,U,2)_" problems ..."
  • Line Location: MENU+4
Function Call: WRITE
  • Prompt: !!,"No items available. Returning to Problem List ..."
  • Line Location: MENU+20
Routine Call
  • DIE
  • Line Location:
    • DEL1+6
    • DEL1+18
Routine Call
  • DIR
  • Line Location:
    • DEL1+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ
^DIC(4.2 - [#4.2] GET1^DIQ
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMPL(125 - [#125] DEL1+10*, MENU+5, MENU+6, MENU+7
^GMPL(125.11 - [#125.11] MENU+9, MENU+10, MENU+11
^TMP("GMPLMENU" MENU+3!, MENU+8*, MENU+19*, MENU+20
^VA(200 - [#200] DEL1+12, DEL1+13

Label References

Name Line Occurrences
DELQT DELETE+6, DELETE+9, DELETE+21, DEL1+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA DELETE+1~
DIK DELETE+1~
DIR DELETE+1~
DIR("?" DEL1+2*
DIR("A" DEL1+1*
DIR("B" DEL1*
DIR(0 DEL1*
GCNT MENU+2~, MENU+3*, MENU+8*, MENU+19
GMI MENU+16~, MENU+17*, MENU+18
GMPCNT DELETE+2~, DELETE+4*, DELETE+13*, DELETE+14
GMPDT MENU+2~, MENU+3*, MENU+14, MENU+16, MENU+18
GMPICD MENU+2~, MENU+12*, MENU+15, MENU+16, MENU+17, MENU+18
GMPLCPTR MENU+2~, MENU+16~*, MENU+18
GMPLDA DELETE+1~
GMPLDUZ DELETE+3~, DELETE+4*, DEL1+13*, DEL1+14, DEL1+17
GMPLENT DELETE+2~, DELETE+4*, DELETE+11*, DELETE+12, DELETE+13
GMPLENTY DELETE+2~, DELETE+4*, DELETE+16*, DELETE+17, DELETE+18, DELETE+19, DELETE+20
GMPLERR DELETE+2~, DELETE+8, DELETE+9
GMPLERR("DIERR" DEL1+21
GMPLERR1 DELETE+3~, DEL1+19
GMPLFDA DELETE+1~
GMPLFDA(125 DEL1+5*
GMPLFDA(200 DEL1+17*
GMPLLST DELETE+3~, DEL1+14*, DEL1+15, DEL1+20
GMPLMSG DELETE+1~, DEL1+7
GMPLMSG("DIERR" DEL1+7
GMPLPAR DELETE+2~, DELETE+8, DELETE+10
GMPLPAR( DELETE+11, DELETE+12
GMPLPLST DELETE+2~
GMPLPLST( DELETE+13*, DELETE+16
GMPLSEQ DELETE+1~
GMPLSLST DELETE+1~, DELETE+5*, DELETE+6, DELETE+12, DEL1+4, DEL1+5, DEL1+15, MENU+4, MENU+5, MENU+6
, MENU+7
GMPLSUC DELETE+3~, DELETE+4*, DEL1+21*, DEL1+24
GMPLTXT DELETE+3~, DEL1+22
GMPLTXT(1 DEL1+20*
GMPLTXT(2 DEL1+21*
GMPLUCNT DELETE+3~, DELETE+4*, DEL1+16*, DEL1+23
GMPLUSR DELETE+3~, DELETE+4*, DEL1+12*, DEL1+13, DEL1+20
GMPLVIEW DELETE+2~, DELETE+12*
GMPQUIT DELETE+1~
GMPSCTC MENU+2~, MENU+12*, MENU+13, MENU+14
GROUP MENU+2~, MENU+7*, MENU+9, MENU+10, MENU+11
GSEQ MENU+2~, MENU+3*, MENU+5*, MENU+6
HDR MENU+2~, MENU+7*, MENU+8
IFN MENU+2~, MENU+6*, MENU+7, MENU+10*, MENU+11
ITEM MENU+2~, MENU+7*, MENU+11*, MENU+12, MENU+19
LCNT MENU+2~, MENU+3*
PCNT MENU+2~, MENU+8*, MENU+19*
PSEQ MENU+2~, MENU+8*, MENU+9*, MENU+10
TEXT MENU+2~, MENU+11*
U DELETE+6, DELETE+9, DEL1+4, DEL1+10, MENU+4, MENU+7, MENU+11, MENU+12, MENU+16, MENU+19
>> VALMBCK MENU+20*
>> VALMQUIT MENU+20*
X DELETE+1~
Y DELETE+1~, DEL1+3
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