Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | Found Entries | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All

Print Page as PDF

Global: ^PS(51.23

Package: Pharmacy Data Management

Global: ^PS(51.23

Information

FileMan FileNo	FileMan Filename	Package
51.23	STANDARD MEDICATION ROUTES	Pharmacy Data Management

Description

Per VHA Directive 2005-044, this file has been "locked down" by Data Standardization (DS). The file definition (i.e. data dictionary) shall not be modified. All additions, changes and deletions to entries in the file shall be done by Enterprise Reference Terminology (ERT) using the Master File Server (MFS), provided by Common Services (CS). Creating and/or editing locally defined fields in the file are not permitted. Use of locally defined fields that were created prior to the VHA Directive's 2005-044 effective date shall not be supported. This file contains the list of standard Medication Routes for Vista. Updates will only occur to this file at the national level. Updates cannot be made at a local facility. This file will be used to link local Medication Routes from the Medication Routes (#51.2) file to the national standard.

Directly Accessed By Routines, Total: 10

Package	Total	Routines
Pharmacy Data Management	10	EFFECTIVE DATE/TIME PSSPO129 ^APSPQA(32.5 ^PS(51.23 PSSDFEE PSSDSAPI PSSMEDRQ PSSMEDRT PSSMRTUP PSSMRTUX

Accessed By FileMan Db Calls, Total: 1

Package	Total	Routines
Pharmacy Data Management	1	PSSPO129

Pointed To By FileMan Files, Total: 2

Package	Total	FileMan Files
National Drug File	1	MEDICATION ROUTES(#51.2)[10, #51.27(2), #51.27(3)]
Pharmacy Data Management	1	STANDARD MEDICATION ROUTES(#51.23)[99.97]

Pointer To FileMan Files, Total: 1

Package	Total	FileMan Files
Pharmacy Data Management	1	STANDARD MEDICATION ROUTES(#51.23)[99.97]

Fields, Total: 6

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>50!($L(X)<3)!($E(X,1)=" ")!($E(X,$L(X))=" ")!(X[" ")!(X'?.UNP)!'(X'?1P.E) X` LAST EDITED: `FEB 16, 2008` HELP-PROMPT: `Answer must be 3-50 characters in length, comprised only of uppercase letters, numerics, and punctuation, but no leading punctuation, and contain no leading, trailing, or consecutive spaces.` DESCRIPTION: `This is the name of the Standard Medication Route. It will be used to allow entries from the MEDICATION ROUTES (#51.2) File to be mapped to a standard Medication Route.` PRE-LOOKUP: `I $G(DIC(0))["L",'$D(XUMF) K X D EN^DDIOL("Entries must be edited via the Master File Server (MFS).","","!?5")` DELETE TEST: `1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be inactivated via the Master File Server(MFS).","","!?5") I '$D(XUMF)` LAYGO TEST: `1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be added via the Master File Server(MFS).","","!?5") I $D(XUMF)` `WRITE AUTHORITY: ^` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` FIELD INDEX: `B (#686) REGULAR IR LOOKUP & SORTING` `Short Descr: This cross reference sets PS(51.23,"B",NAME,DA)=""` `Description: This cross reference is a new style cross reference on the NAME (#.01) Field of the STANDARD MEDICATION ROUTES (#51.23) File. This cross reference sets the global PS(51.23,"B",NAME,DA)="".` `Set Logic: S ^PS(51.23,"B",$E(X,1,50),DA)=""` `Kill Logic: K ^PS(51.23,"B",$E(X,1,50),DA)` `Whole Kill: K ^PS(51.23,"B")` `X(1): NAME (51.23,.01) (Subscr 1) (Len 50) (forwards)`
1	FIRST DATABANK MED ROUTE	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!($E(X,1)=" ")!($E(X,$L(X))=" ")!(X[" ")!(X'?.UNP) X` LAST EDITED: `JAN 07, 2008` HELP-PROMPT: `Answer must be 3-30 characters in length, comprised only of uppercase letters, numerics, and punctuation, and contain no leading, trailing, or consecutive spaces.` DESCRIPTION: `This field provides the mapping from the Vista Standard Medication Route to the First DataBank Medication Route. The First DataBank Medication Route will be used when processing the order checks provided by First DataBank.` `WRITE AUTHORITY: ^` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `51.23^C` `1)= S ^PS(51.23,"C",$E(X,1,30),DA)=""` `2)= K ^PS(51.23,"C",$E(X,1,30),DA)` `This cross reference is a regular cross reference on the FIRST DATABANK MED ROUTE field. It sets the global: PS(51.23,"C",FIRST DATABANK MED ROUTE, Internal Entry Number)="".`
99.97	REPLACED BY VHA STANDARD TERM	VUID;3	POINTER TO STANDARD MEDICATION ROUTES FILE (#51.23)	STANDARD MEDICATION ROUTES(#51.23) LAST EDITED: `MAR 01, 2008` DESCRIPTION: `This field is populated when one Term/Concept replaces another Term/Concept. This field is controlled by standardization and should only be changed by standardization processes. This field contains a pointer to a VHA` `standard term that replaces this entry.` `WRITE AUTHORITY: ^` CROSS-REFERENCE: `51.23^AREPLACETERM` `1)= S ^PS(51.23,"AREPLACETERM",$E(X,1,30),DA)=""` `2)= K ^PS(51.23,"AREPLACETERM",$E(X,1,30),DA)` `This cross-reference can be used to identify the replacement entries associated with a Term/Concept.`
99.98	MASTER ENTRY FOR VUID	VUID;2	SET	**********************REQUIRED FIELD********************** '0' FOR NO; '1' FOR YES; LAST EDITED: `FEB 16, 2008` DESCRIPTION: `This field identifies the Master entry for a VUID associated with a Term/Concept.` `WRITE AUTHORITY: ^` `UNEDITABLE` RECORD INDEXES: `AMASTERVUID (#685)`
99.99	VUID	VUID;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S X=+X K:$L(X)>20!($L(X)<1)!'(X?1.20N) X` LAST EDITED: `FEB 16, 2008` HELP-PROMPT: `Answer must be 1-20 digits in length.` DESCRIPTION: `VHA Unique ID (VUID). A unique meaningless integer assigned to reference terms VHA wide.` `WRITE AUTHORITY: ^` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `51.23^AVUID` `1)= S ^PS(51.23,"AVUID",$E(X,1,30),DA)=""` `2)= K ^PS(51.23,"AVUID",$E(X,1,30),DA)` `3)= This cross-reference is by VUID.` `This cross-reference is by VUID.` RECORD INDEXES: `AMASTERVUID (#685)`
99.991	EFFECTIVE DATE/TIME	TERMSTATUS;0	DATE Multiple #51.2399	51.2399 LAST EDITED: `FEB 16, 2008` DESCRIPTION: `Describes the pair Status and Effective Date/Time for each reference term.` `WRITE AUTHORITY: ^`

Found Entries, Total: 58

NAME: BUCCAL	NAME: DENTAL	NAME: EPIDURAL	NAME: INHALATION	NAME: INTRA-ARTERIAL	NAME: INTRA-ARTICULAR	NAME: INTRACARDIAC	NAME: INTRACAVERNOSAL
NAME: INTRADERMAL	NAME: INTRALESIONAL	NAME: INTRAMUSCULAR	NAME: INTRAOCULAR	NAME: INTRAPERITONEAL	NAME: INTRAPLEURAL	NAME: INTRATHECAL	NAME: INTRATRACHEAL
NAME: INTRAVENOUS	NAME: INTRAVESICAL	NAME: IRRIGATION	NAME: NEBULIZATION	NAME: OPHTHALMIC	NAME: ORAL	NAME: OTIC	NAME: RECTAL
NAME: SUBCUTANEOUS	NAME: SUBLINGUAL	NAME: TOPICAL	NAME: TRANSDERMAL	NAME: VAGINAL	NAME: NASAL	NAME: URETHRAL	NAME: NOT APPLICABLE
NAME: INTRAVITREAL	NAME: INTRABURSAL	NAME: INTRASYNOVIAL	NAME: INFILTRATION	NAME: INTRACAUDAL	NAME: INTRACAVITARY	NAME: INTRASPINAL	NAME: INTRAUTERINE
NAME: RETROBULBAR	NAME: ENTERAL	NAME: INTRA-AMNIOTIC	NAME: INTRADUCTAL	NAME: INTRATYMPANIC	NAME: SUBCONJUNCTIVAL	NAME: IONTOPHORESIS	NAME: INTRADETRUSOR
NAME: INTRAOSSEOUS	NAME: PERIBULBAR	NAME: SUBTENONS	NAME: INTRACATHETER	NAME: TRANSLINGUAL	NAME: INTRAVARICEAL	NAME: SUBMUCOSAL	NAME: EXTRACORPOREAL
NAME: SUBDERMAL	NAME: INTRACAMERAL

External References

Name	Field # of Occurrence
EN^DDIOL	.01TPL+1, .01DEL1+1, .01LAYGO1+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(51.23 - [#51.23]	IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1!, IXAMASTERVUIDKEIC+1!, IXBSL+1, IXBKL+1!, IXBKEIC+1!, 1(XREF 1S), 1(XREF 1K), 99.97(XREF 1S), 99.97(XREF 1K) , 99.99(XREF 1S), 99.99(XREF 1K)

Naked Globals

Name	Field # of Occurrence
^(0	ID1+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1, IXBSL+1, IXBKL+1, 1(XREF 1S), 1(XREF 1K), 99.97(XREF 1S), 99.97(XREF 1K), 99.99(XREF 1S), 99.99(XREF 1K)
>> DIC(0	.01TPL+1
U	ID1+1
X	IXBSL+1, IXBKL+1, .01+1!, .01TPL+1!, 1+1!, 1(XREF 1S), 1(XREF 1K), 99.97(XREF 1S), 99.97(XREF 1K), 99.99+1*! , 99.99(XREF 1S), 99.99(XREF 1K)
X(1	IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1
X(2	IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1
>> XUMF	.01TPL+1, .01DEL1+1, .01LAYGO1+1

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | Found Entries | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All