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

Package: Authorization Subscription

Routine: USRLM


Information

USRLM ; SLC/JER - User Class Membership functions and proc's ; 11/25/09

Source Information

Source file <USRLM.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 3 (,$$FIND1)^DIC  ^DIE  $$GET1^DIQ  
Authorization Subscription 2 (WHOIS1,WHOISTMP)^USRLM1  ($$MIXED,$$SIGNAME)^USRLS  
Kernel 2 $$NOW^XLFDT  $$UP^XLFSTR  
List Manager 1 RESET^VALM4  
RPC Broker 1 $$BROKER^XWBLIB  

Caller Graph

Caller Graph Total: 72

Package Total Caller Graph
Text Integration Utility 31 TIUADD  TIUCNSLT  TIUEDIM  TIUEDIT  TIUEN234  TIUEPN10  TIUFLF2  TIUHL7U2  
TIULA2  TIULA3  TIULC1  TIULD  TIULP  TIULP3  TIUPREF  TIUPS177  
TIUPXAP1  TIURA  TIURA3  TIURB  TIURB2  TIURM  TIURS  TIURVBC  
TIUSRVA  TIUSRVF1  TIUSRVP1  TIUSRVT  TIUSRVT1  TIUSRVT2  TIUT  
Authorization Subscription 18 USR BUSINESS RULE MENU  USR CLASS ACTION MENU  USR CLASS MEMBER USER MENU  USR CLASS MEMBERSHIP MENU  USR SHOW CLASS MEMBERSHIP MENU  USR SHOW USER MEMBERSHIP MENU  USR USER TERMINATE  USRAEDT  
USRLA  USRLM1  USRM  USRMEMBR  USRMLST  USRP2INI  USRPROV  USRULST  
USRUM  USRUMMBR  
Order Entry Results Reporting 6 OREV3  ORPRPM  ORQQPX  ORWDAL33  ORWGAPIA  ORWU2  
Scheduling 3 SCAPU1  SCMCPR1  SCUTBK12  
Clinical Reminders 2 PXRMASU  PXRMCVRL  
Consult Request Tracking 2 GMRCAU  GMRCDIS  
Kernel 2 ^DIC(19  ^ORD(101  
MailMan 2 XMVGROUP  XMXGRP  
Care Management 1 ORRCLNP  
Emergency Department Integration Software 1 EDPFAA  
Enterprise Health Management Platform 1 HMPCRPC1  
Health Summary 1 GMTSXAW3  
Patient Assessment Documentation 1 NUPABCL1  
Surgery 1 SROESPR  

Entry Points

Name Comments DBIA/ICR reference
TERM ;USR actions to be taken when a user is terminated. Invoked by
ISTERMX ;
CURRENT(MEMBER,USRDT) ; Boolean - Is Membership current?
CANDEL(USRCLDA,NAME01) ; Evaluate whether user can delete a class. Can't find where it's used.
; NAME01 is optional. If NAME01>0 use .01 Class Name in returned data.
WHOIS2(MEMBER,USRCLASS,NAME01) ;Given a Class, return list of CURRENT members
; Uses WHOISTMP^USRLM1 (and XREF ACU)
; USRCLASS is pointer to file 8930
; MEMBER is name of array (local or global) in which members are
; returned in alphabetical order by name - indexed by number
; i.e. @MEMBER@(1 ...n)
; @member@(0) = ien of8930^usr class name^count of members
; @member@(1..n)=
; 1 2 3 4 5 6 7 8
; p200^p8930.3^classname^effectdate^inactdate^username^title^mailcode
; Note: For pieces 2,4 & 5 - Only one of potentially many is returned
; NAME01 is optional. If NAME01>0 use .01 Class Name in returned data.
ISTERM(USER,ERR) ;Return true if USER (DUZ or IEN in file 200) has a termination date
; and that date is less than the current date and time.
CLNAME(CLASS,NAME01) ; Given a class, return the Display Name or
; NAME01 is optional. If NAME01>0 use .01 Class Name in returned data.
ISA(USER,CLASS,ERR,USRDT) ; Boolean - Is USER a Member of CLASS?
PUT(USER,CLASS) ; Make user a member of a given class
WHATIS(USER,CLASS,NAME01) ; Given a User, set array of classes USER belongs to
; USER is pointer to file 200
; CLASS is name of the array (local or global) to be set.
; Array is set in alpha order
; by name(display name or class name)in uppercase. Numeric indicator is appended to name
; to accomodate multiple memberships over time in the same class.
; ARRAY(Uppername_indicator)=UserClassIEN^MembershipIEN^name^EffectDt^ExpireDt
; NAME01 is optional. If NAME01>0 use .01 Class Name
; Otherwise, use Display Name
ISAWM(USER,CLASS) ; Boolean - Is USER a Member of CLASS, with message.
ISAX
RESIZE(LONG,SHORT,SHRINK) ; Resizes list area
SUBCLASS(DA,CLASS) ; Evaluate whether a given USER CLASS is a DESCENDENT
; of another class
; Receives DA = record # of possible subclass in 8930, and
; CLASS = record # of possible descendent class in 8930
WHOIS(MEMBER,CLASS,NAME01) ; Given a Class, set array of CURRENT members. Used in CANDEL.
; CLASS is pointer to file 8930
; MEMBER is name of array (local or global) in which members are
; returned in alphabetical order by name
; NAME01 is optional. If NAME01>0 use .01 Class Name in returned data.

External References

Name Field # of Occurrence
^DIC PUT+2
$$FIND1^DIC ISA+4
^DIE PUT+4
$$GET1^DIQ ISTERM+4
WHOIS1^USRLM1 WHOIS+5, CANDEL+3
WHOISTMP^USRLM1 WHOIS2+14
$$MIXED^USRLS CLNAME+4
$$SIGNAME^USRLS WHATIS+34
RESET^VALM4 RESIZE+4
$$NOW^XLFDT ISTERM+9
$$UP^XLFSTR WHATIS+20
$$BROKER^XWBLIB ISTERM+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Already a member of this class"
  • Line Location: ISAWM+2
Function Call: WRITE
  • Prompt: !,"Warning: bad data. ",+USER," does not exist in file 200!"
  • Line Location: ISTERM+8
Function Call: WRITE
  • Prompt: " There are members of the class ",$$CLNAME(USRCLDA,+$G(NAME01))
  • Line Location: CANDEL+4
Routine Call
  • DIE
  • Line Location:
    • PUT+4
Routine Call
  • DIC
  • Line Location:
    • ISA+4
Routine Call
  • DIC
  • Line Location:
    • PUT+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] FIND1^DIC,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("USRWHATIS" WHATIS+10!, WHATIS+22*, WHATIS+23, WHATIS+25, WHATIS+28, WHATIS+30, WHATIS+32, WHATIS+35!
^TMP("USRWHO" WHOIS2+16, WHOIS2+17, WHOIS2+19, WHOIS2+20, WHOIS2+22!
^USR(8930 - [#8930] ISA+2, ISA+6, ISA+18, ISA+19, CLNAME+3, SUBCLASS+5, SUBCLASS+6, SUBCLASS+7
^USR(8930.3 - [#8930.3] ISA+10, ISA+13, CURRENT+3, CURRENT+4, TERM+6, TERM+7, TERM+9*, WHATIS+12, WHATIS+14, WHATIS+16
, WHATIS+17

Label References

Name Line Occurrences
$$CLNAME WHATIS+20, CANDEL+4
$$CURRENT ISA+14
$$ISA ISA+20, ISAWM+1
$$SUBCLASS SUBCLASS+9
ISAX ISA+2
ISTERMX ISTERM+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CLASS ISA~, ISA+2, ISA+6*, ISA+7, ISA+10, ISA+13, ISA+18, ISA+19, ISAWM~, ISAWM+1
, WHOIS~, WHOIS+5, WHATIS~, WHATIS+32, WHATIS+34, CLNAME~, CLNAME+3, PUT~, PUT+3, SUBCLASS~
, SUBCLASS+6*, SUBCLASS+8, SUBCLASS+9
CLASSCNT WHATIS+9~, WHATIS+11*, WHATIS+33*, WHATIS+34
CLASSNM WHATIS+9~, WHATIS+20*, WHATIS+21
DA PUT+1~, PUT+3*, SUBCLASS~, SUBCLASS+5*, SUBCLASS+7
DIC PUT+1~, PUT+2*, PUT+3
DIC(0 PUT+2*
DIE PUT+1~, PUT+3*
DLAYGO PUT+1~, PUT+2*
DR PUT+1~, PUT+3*
DT CURRENT+2, TERM+4, WHATIS+16, WHATIS+18, WHATIS+19, PUT+3
EFFCTV WHOIS2+13~, WHATIS+9~, WHATIS+16*, WHATIS+18, WHATIS+19, WHATIS+21, WHATIS+22, WHATIS+27*, WHATIS+28*, WHATIS+30
, WHATIS+32
EFFCTV1 WHATIS+9~, WHATIS+15*, WHATIS+16*, WHATIS+22
ERR ISA~, ISA+5*, ISA+7*, ISTERM~, ISTERM+6*
ERR("DIERR" ISTERM+5
EXPIRES WHOIS2+13~, WHATIS+9~, WHATIS+17*, WHATIS+18, WHATIS+21, WHATIS+22, WHATIS+29*, WHATIS+30*, WHATIS+32
GROUP WHATIS+9~, WHATIS+11*, WHATIS+12*, WHATIS+14, WHATIS+20, WHATIS+21
HUSH ISTERM+2~, ISTERM+7*, ISTERM+8
IENS ISTERM+2~, ISTERM+4*
IND TERM+3~, TERM+5*, TERM+6*, TERM+7, TERM+9, WHATIS+9~, WHATIS+11*, WHATIS+31*, WHATIS+32
LONG RESIZE~, RESIZE+1
MEMBER CURRENT~, CURRENT+3, CURRENT+4, WHOIS~, WHOIS+5, WHOIS2~, WHOIS2+19, WHOIS2+20, WHOIS2+21*
NAME01 WHOIS~, WHOIS+5, WHOIS2~, WHOIS2+14, WHATIS~, WHATIS+11*, WHATIS+20, CLNAME~, CLNAME+4, CANDEL~
, CANDEL+3, CANDEL+4
NOW TERM+3~, TERM+4*, TERM+8, TERM+9
OLDTERM TERM+3~, TERM+7*, TERM+8
SHORT RESIZE~, RESIZE+1
SHRINK RESIZE~, RESIZE+1
TERM ISTERM+2~, ISTERM+3*, ISTERM+9*, ISTERMX+1
TERMDATE ISTERM+2~, ISTERM+3*, ISTERM+4*, ISTERM+9
TMPDATA WHATIS+9~, WHATIS+21*, WHATIS+22
U CURRENT+3, CURRENT+4, TERM+7, TERM+9, WHOIS2+21, WHATIS+16, WHATIS+17, WHATIS+21, WHATIS+34, CLNAME+4
, CANDEL+4
UPCLASNM WHATIS+9~, WHATIS+20*, WHATIS+22, WHATIS+24*, WHATIS+25*, WHATIS+28, WHATIS+30, WHATIS+32
USER ISA~, ISA+4*, ISA+5, ISA+10, ISA+13, ISA+20, ISAWM~, ISAWM+1, ISTERM~, ISTERM+4
, ISTERM+8, WHOIS2+13~, WHOIS2+17*, WHOIS2+19, WHATIS~, WHATIS+12, WHATIS+14, WHATIS+34, PUT~, PUT+2
USRBM RESIZE+1~*, RESIZE+2, RESIZE+3
USRCLASS WHOIS2~, WHOIS2+14
USRCLDA CANDEL~, CANDEL+3, CANDEL+4
USRCUR WHATIS+9~, WHATIS+15*, WHATIS+18*, WHATIS+19*, WHATIS+22, WHATIS+26*, WHATIS+28, WHATIS+30, WHATIS+32
USRDA WHOIS2+13~, WHATIS+9~, WHATIS+13*, WHATIS+14*, WHATIS+16, WHATIS+17, WHATIS+21
USRDT ISA~, ISA+14, ISA+20, CURRENT~, CURRENT+2*, CURRENT+5
USRERR ISA+4!
USRI ISA+1~, ISA+17*, ISA+18*, ISA+19, WHOIS2+13~, SUBCLASS+4~*, SUBCLASS+7*, SUBCLASS+8, SUBCLASS+9
USRIN CURRENT+1~, CURRENT+3*, CURRENT+5
USRMDA ISA+11~, ISA+12*, ISA+13*, ISA+14
USRMLST CANDEL+2~
USRMLST(0 CANDEL+4
USRNDX WHOIS2+13~, WHOIS2+15*, WHOIS2+18*, WHOIS2+19, WHOIS2+21
USRNM WHOIS2+13~, WHOIS2+15*, WHOIS2+16*, WHOIS2+17
USROUT CURRENT+1~, CURRENT+4*, CURRENT+5
USRREC CLNAME+2~, CLNAME+3*, CLNAME+4
USRSUB ISA+19~*, ISA+20
USRY ISA+1~, ISA+2*, ISA+9*, ISA+13, ISA+14*, ISA+15, ISA+18, ISA+20*, ISAX, CURRENT+1~
, CURRENT+5*, CURRENT+6*, CURRENT+7, CLNAME+2~, SUBCLASS+4~*, SUBCLASS+7, SUBCLASS+8*, SUBCLASS+9*, SUBCLASS+10, CANDEL+2~*
, CANDEL+4*, CANDEL+5
>> VALM("BM" RESIZE+2, RESIZE+3*
>> VALM("LINES" RESIZE+3*
>> VALM("TM" RESIZE+3
>> VALMBCK RESIZE+2*
>> VALMCC RESIZE+4
>> VALMMENU RESIZE+1
X PUT+1~, PUT+2*
>> XUIFN TERM+6
Y PUT+1~, PUT+2, PUT+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