Routine: LEXSET

Information

LEXSET ;ISL/KER - Setup Appl/User Defaults for Look-up ;04/21/2014

Source file <LEXSET.m>

Package	Total	Call Graph
Lexicon Utility	6	($$MD,$$NS)^LEXDFN2 (APP,GEN,MOD,SUB,USR)^LEXSET2 (OVER,USER)^LEXSET3 ($$NS,$$SS)^LEXSET4 EN^LEXSET5 VDT^LEXU
Kernel	1	$$FMTE^XLFDT

Package	Total	Caller Graph
Lexicon Utility	9	GMPTSET LEX10CX2 LEX10CX3 LEX10DBT LEX10DX LEX10TAX LEXA LEXHLP LEXTRAN
Patient Care Component	9	APCDAOP APCDAPOV APCDBPOV APCDCPOV APCDEPOV APCDETPD APCDFHD APCDLPOV APCDXPOV
Order Entry Results Reporting	3	ORCDGMRC ORQQPL1 ORWPCE
Referred Care Information System	3	BMCADD1 BMCFUNC BMCMOD1
Automated Information Collection System	2	IBDF4 IBDFDE21
Problem List	2	GMPLENFM GMPLX
Text Integration Utility	2	TIUPXAPC TIUPXAPI
Consult Request Tracking	1	GMRCEDT4
Contract Health Management Information System	1	ACHSA6
Emergency Room	1	AMERUTIL
IHS Emergency Dept Dashboard	1	BEDDPOV
IHS Prenatal Care Module	1	BJPNUTIL
Radiology Nuclear Medicine	1	RA97PST1
Registration	1	DGPTF5

Name	Comments	DBIA/ICR reference
SET	; Quit Setting Defaults
ASIEN(LEX)	; Get IEN for application
NSIEN(LEX)	; Get IEN for application based on namespace
SSIEN(LEX)	; Get IEN for subset based on subset
EN	; Namespace/subset are not known
ALTDEF	; Defaults if LEXNS or LEXSS are invalid
MDIEN(LEX)	; Get IEN for mode based on subset
CONFIG(LEXNS,LEXSS,LEXCDT)	; Namespace/subset are known	ICR #1577 Status: Retired Usage: Controlled Subscription ICR #1609 Status: Active Usage: Supported
DEF	; Defaults if LEXNS or LEXSS are invalid

Name	Line Occurrences (* Changed, ! Killed)
^LEXT(757.2 - [#757.2]	CONFIG+33, CONFIG+34, NSIEN+1, SSIEN+2, SSIEN+3, SSIEN+4, SSIEN+5, MDIEN+2, ASIEN+2, ASIEN+3 , ASIEN+4, ASIEN+5
^TMP("LEXSCH"	CONFIG+46, CONFIG+47, CONFIG+48*

Name	Field # of Occurrence
>> DIC	ALTDEF+1*
>> DIC(0	ALTDEF+3, ALTDEF+4
DTOUT	EN+1~, EN+2, EN+3
DUOUT	EN+1~, EN+2, EN+3
LEX	NSIEN~, NSIEN+1, SSIEN~, SSIEN+1, SSIEN+2, SSIEN+3, SSIEN+4, SSIEN+5, MDIEN~, MDIEN+1 , MDIEN+2, ASIEN~, ASIEN+1, ASIEN+2, ASIEN+3, ASIEN+4, ASIEN+5
LEXA	CONFIG+31~, CONFIG+36*, CONFIG+37, CONFIG+38, CONFIG+39, CONFIG+40, CONFIG+41, CONFIG+42
LEXAP	CONFIG+29~, ALTDEF+5*
LEXCDT	CONFIG~, CONFIG+29, CONFIG+30, CONFIG+46, CONFIG+47
LEXD	EN+1~, CONFIG+29~, CONFIG+31~
LEXD("DF"	CONFIG+44, CONFIG+45, DEF+1, DEF+2, DEF+3, DEF+4, DEF+5, DEF+6
LEXD0	EN+1~
LEXDA	EN+1~
LEXDB	EN+1~
LEXDP	EN+1~
LEXDR	EN+1~
LEXDS	EN+1~
LEXDW	EN+1~
LEXDX	EN+1~
LEXL	CONFIG+31~, CONFIG+37*
LEXLL	SET+1!, ALTDEF+5*
LEXM	CONFIG+31~, CONFIG+37*, CONFIG+40, CONFIG+41
LEXNS	EN+1~, EN+2, EN+3, EN+4, CONFIG~, CONFIG+31, CONFIG+32, CONFIG+33, CONFIG+36
LEXO	CONFIG+35~
LEXQ	CONFIG+30, CONFIG+32*, CONFIG+48, SET+1!
LEXQOK	CONFIG+29~, CONFIG+30*, SET+1
LEXS	CONFIG+31~, CONFIG+36*, CONFIG+38, CONFIG+40
LEXSCT	CONFIG+29~
LEXSHOW	CONFIG+29~, ALTDEF+5*
LEXSS	EN+1~, EN+3, EN+4, CONFIG~, CONFIG+31, CONFIG+32, CONFIG+34, CONFIG+36, CONFIG+37
LEXSUB	CONFIG+29~, ALTDEF+5*
LEXT	CONFIG+35~
LEXUN	CONFIG+29~, ALTDEF+5*
LEXUS	CONFIG+35~
LEXVDT	CONFIG+30*, SET+1!
U	EN+2, EN+3
>> X	ALTDEF+3
>> XTLKGBL	ALTDEF+1*
>> XTLKHLP	ALTDEF+2*
>> XTLKKSCH("DSPLY"	ALTDEF+2*
>> XTLKKSCH("GBL"	ALTDEF+1*
>> XTLKKSCH("INDEX"	ALTDEF+2*
>> XTLKSAY	ALTDEF+3*