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 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  
RPC Broker 1 $$BROKER^XWBLIB  
Registration 1 RESET^VALM4  

Caller Graph

Caller Graph Total: 76

Package Total Caller Graph
Text Integration Utility 30 TIUADD  TIUCNSLT  TIUE246  TIUEDIM  TIUEDIT  TIUEN234  TIUEPN12  TIUFLF2  
TIUHL7U2  TIULA2  TIULA3  TIULC1  TIULD  TIULP  TIUPREF  TIUPS177  
TIUPXAP1  TIURA  TIURA3  TIURB  TIURB2  TIURM  TIURS  TIURVBC  
TIUSRVF1  TIUSRVP1  TIUSRVT  TIUSRVT1  TIUSRVT2  TIUT  
Authorization Subscription 12 USR USER TERMINATE  USRAEDT  USRLA  USRLM1  USRM  USRMEMBR  USRMLST  USRP2INI  
USRPROV  USRULST  USRUM  USRUMMBR  
IHS Mods To Text Integration Utilities 8 BTIUEDIT  BTIULD  BTIURPT1  BTIURPT2  BTIURPT3  BTIURPT4  BTIURS  BTIUVSIT  
Order Entry Results Reporting 6 OREV3  ORPRPM  ORQQPX  ORWDAL33  ORWGAPIA  ORWU2  
iCare 6 BQIMUDPR  BQIMULST  BQIMUPRH  BQIMUPRV  BQIUTB  BQIUTB5  
Scheduling 3 SCAPU1  SCMCPR1  SCUTBK12  
Consult Request Tracking 2 GMRCAU  GMRCDIS  
MailMan 2 XMVGROUP  XMXGRP  
Patient Care Component Table Maintiance 2 APCM24E6  APCM25E6  
Care Management 1 ORRCLNP  
Clinical Reminders 1 PXRMASU  
Health Summary 1 GMTSXAW3  
IHS Electronic Health Record 1 BEHORMCV  
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