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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: GMPLPRF1

Package: Problem List

Routine: GMPLPRF1


Information

GMPLPRF1 ; SLC/MKB -- Problem List User Prefs cont ;;9-5-95 11:54am

Source Information

Source file <GMPLPRF1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Problem List 1 $$MSG^GMPLPREF  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Problem List 6 GMPL UP ADD ITEM  GMPL UP DELETE VIEW  GMPL UP REMOVE ITEM  GMPL UP SAVE VIEW  GMPL UP SWITCH  GMPLPREF  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
ADD ; -- add item(s) to view
ADD1
ADD2
REMOVE ; -- delete item(s) from view
INCLCHLD(IFN) ; Returns 1 or 0, to include 'child' services in selection
SELECT() ; Select item(s) from list
DIFFRENT() ; -- Returns 1 if view has changed, else 0
SAVE ; -- save new view in File #200/Field #125
SWITCH ; -- change preferred views (service <--> clinic)
SW1
DELETE ; -- delete preferred view (no view)

External References

Name Field # of Occurrence
^DIR INCLCHLD+6, SELECT+8, SWITCH+10, DELETE+4
$$MSG^GMPLPREF ADD2+9, REMOVE+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"You may not have more than 60 "_I_"s included in your view!"
  • Line Location: ADD1+3
Function Call: WRITE
  • Prompt: !!,"Adding "_(GMPLNO-1)_" "_I_"(s) ..."
  • Line Location: ADD2+0
Function Call: WRITE
  • Prompt: "."
  • Line Location: ADD2+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: ADD2+7
Function Call: WRITE
  • Prompt: !!,"Removing "_(GMPLNO-1)_" "_$S(GMPLMODE="S":"service",1:"clinic")_"(s) ..."
  • Line Location: REMOVE+4
Function Call: WRITE
  • Prompt: "."
  • Line Location: REMOVE+8
Function Call: WRITE
  • Prompt: "."
  • Line Location: REMOVE+11
Function Call: WRITE
  • Prompt: !!,">>> This action will clear your current view of problems by "
  • Line Location: SWITCH+7
Function Call: WRITE
  • Prompt: $S(GMPLMODE="S":"service",1:"clinic")
  • Line Location: SWITCH+8
Function Call: WRITE
  • Prompt: !?5,"and present a list of "_$S(GMPLMODE="S":"clinics",1:"services")
  • Line Location: SWITCH+9
Function Call: WRITE
  • Prompt: " to replace it with.",!
  • Line Location: SWITCH+10
Function Call: WRITE
  • Prompt: !!,"Deleting preferred view of "_$S(GMPLMODE="S":"services",1:"clinics")_" ..."
  • Line Location: DELETE+5
Function Call: WRITE
  • Prompt: " done."
  • Line Location: DELETE+7
Routine Call
  • DIR
  • Line Location:
    • INCLCHLD+6
    • SELECT+8
    • SWITCH+10
    • DELETE+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(49 - [#49] ADD2+5, ADD2+6, REMOVE+9, REMOVE+10, INCLCHLD+1
^TMP("GMPLIST" ADD1+2, ADD1+4, ADD1+5, ADD2+2, ADD2+3*, ADD2+4*, ADD2+7, ADD2+8*, REMOVE+6*, REMOVE+7*
, REMOVE+8!, REMOVE+11, REMOVE+12*!, SELECT+2, DIFFRENT+2, SAVE+2, DELETE+6!*
^VA(200 - [#200] DIFFRENT+4, SAVE+1, SAVE+4*

Label References

Name Line Occurrences
$$INCLCHLD ADD2+6, REMOVE+10
$$SELECT ADD1, REMOVE+2
@( SW1+2
ADD1 ADD1+2
SAVE DELETE+7
SW1 SWITCH+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNUM ADD+1~, ADD2+7*, ADD2+8, REMOVE+1~, REMOVE+11*, REMOVE+12
DIR INCLCHLD+1~, SELECT+1~, SWITCH+1~, DELETE+1~
DIR("?" INCLCHLD+3*, INCLCHLD+4*, INCLCHLD+5*, SELECT+7*, SWITCH+4*, SWITCH+5*, SWITCH+6*, DELETE+3*
DIR("A" INCLCHLD+2*, SELECT+4*, SELECT+5*, SELECT+6*, SWITCH+3*, DELETE+2*
DIR("B" INCLCHLD+1*, SELECT+6*, SWITCH+3*, DELETE+1*
DIR(0 INCLCHLD+2*, SELECT+3*, SWITCH+3*, DELETE+1*
>> DTOUT INCLCHLD+6, SELECT+8
DUZ DIFFRENT+4, SAVE+1, SAVE+4
>> GMPLMODE ADD1+1, ADD2+5, REMOVE+4, REMOVE+9, SELECT+4, SELECT+7, DIFFRENT+3, SAVE+1, SWITCH+8, SWITCH+9
, SW1+1*, SW1+2, DELETE+5, DELETE+6*
GMPLNO ADD+1~, ADD1+1*, ADD1+2, ADD2, ADD2+1, REMOVE+1~, REMOVE+3*, REMOVE+4, REMOVE+5
GMPLSEL ADD+1~, ADD1*, ADD1+1, ADD2+1, REMOVE+1~, REMOVE+2*, REMOVE+3, REMOVE+5
>> GMPLVIEW SWITCH+2, SW1+1*
>> GMPSAVED SAVE+4*
I ADD+1~, ADD1+1*, ADD1+3, ADD1+4, ADD1+5, ADD2!, ADD2+1*, REMOVE+1~, REMOVE+5*, DIFFRENT+1~
, DIFFRENT+2*, SAVE+1~, SAVE+2*
IFN ADD+1~, ADD2+2*, ADD2+4, ADD2+5, ADD2+6, REMOVE+1~, REMOVE+6*, REMOVE+7, REMOVE+8, REMOVE+9
, REMOVE+10, INCLCHLD~, INCLCHLD+1
J ADD+1~, ADD2+6*, ADD2+7, ADD2+8, REMOVE+1~, REMOVE+10*, REMOVE+11, REMOVE+12
MAX SELECT+1~, SELECT+2*, SELECT+3, SELECT+5, SELECT+6
NAME INCLCHLD+1~*, INCLCHLD+2
NUM ADD+1~, ADD2+1*, ADD2+2, ADD2+3, REMOVE+1~, REMOVE+5*, REMOVE+6
TEMP DIFFRENT+1~*, DIFFRENT+2*, DIFFRENT+3*, DIFFRENT+4, SAVE+1~*, SAVE+2*, SAVE+3*, SAVE+4
TMP ADD2+3*, ADD2+8*, SAVE+1~*, SAVE+4
U ADD2+3, INCLCHLD+1, DIFFRENT+4, SAVE+1, SAVE+4
>> VALMBCK ADD+1*, ADD2+9*, REMOVE+1*, REMOVE+13*, SWITCH+1*, SW1+1*, DELETE+1*, DELETE+6*
>> VALMCC ADD+1, REMOVE+1, SWITCH+1, DELETE+1
VALMHDR ADD2+9!, REMOVE+13!, SW1+2!
>> VALMSG ADD2+9*, REMOVE+13*
X INCLCHLD+1~, SELECT+1~, SELECT+8, SWITCH+1~, DELETE+1~
Y INCLCHLD+1~, INCLCHLD+6*, INCLCHLD+7, SELECT+1~, SELECT+8*, SELECT+9, SWITCH+1~*, SW1, DELETE+1~, DELETE+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All