Global: ^PS(51.24

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Desc
Accessed By FileMan Db Calls
Pointed To By FileMan Files
Pointer To FileMan Files
Fields
Found Entries

FileMan FileNo	FileMan Filename	Package
51.24	DOSE UNITS	Pharmacy Data Management

FileMan FileNo

FileMan Filename

Package

51.24

DOSE UNITS

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 a list of Standard Dose Units, associated synonyms, and a corresponding FIRST DATABANK Dose Unit for every Standard Dose Unit. The associated FIRST DATABANK Dose Unit will be used for the Dosage Checks provided by FIRST DATABANK. Updates cannot be made at a local facility.

Package	Total	Routines
Pharmacy Data Management	6	PSS160PO PSS164P PSS1P178 PSS1P201 PSSP198 PSSPO129

Package	Total	FileMan Files
Pharmacy Data Management	2	DOSE UNITS(#51.24)[99.97] DRUG(#50)[#50.0904(4)]

Package	Total	FileMan Files
Pharmacy Data Management	1	DOSE UNITS(#51.24)[99.97]

Fields, Total: 8

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1)!($E(X,1)=" ")!($E(X,$L(X))=" ")!(X[" ")!(X'?.ANP)!'(X'?1P.E) X` LAST EDITED: `JUN 08, 2011` HELP-PROMPT: `Answer must be 1-30 characters in length, comprised of upper and lower case letters, numerics, and punctuation, but no leading punctuation, and contain no leading, trailing, or consecutive spaces.` DESCRIPTION: `This is the name of the Dose Unit. Local Possible Dosages entries in the DRUG (#50) File will be mapped to entries in this file. This mapping will enable the software to derive a First DataBank Dose Unit, also in this` `file, that can be passed into the Dose API for Dose checks for medication orders.` 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` CROSS-REFERENCE: `51.24^B` `1)= S ^PS(51.24,"B",$E(X,1,30),DA)=""` `2)= K ^PS(51.24,"B",$E(X,1,30),DA)` FIELD INDEX: `UPCASE (#1100) REGULAR IR LOOKUP & SORTING` `Short Descr: Converts mixed case to uppercase for lookup` `Description: This cross-reference converts mixed case (TallMan lettering) to uppercase so that when a lookup is done, the list collates properly while still retaining TallMan lettering in the NAME field (#.01).` `Set Logic: S ^PS(51.24,"UPCASE",$E(X,1,30),DA)=""` `Kill Logic: K ^PS(51.24,"UPCASE",$E(X,1,30),DA)` `Whole Kill: K ^PS(51.24,"UPCASE")` `X(1): NAME (51.24,.01) (Subscr 1) (Len 30) (forwards)` `Transform (Storage): S X=$$UP^XLFSTR(X)`
1	FIRST DATABANK DOSE UNIT	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1)!($E(X,1)=" ")!($E(X,$L(X))=" ")!(X[" ")!(X'?.ANP) X` LAST EDITED: `JAN 26, 2008` HELP-PROMPT: `Answer must be 1-30 characters in length, comprised of upper and lower case letters, numerics, and punctuation, and contain no leading, trailing, or consecutive spaces.` DESCRIPTION: `This field provides the mapping from the Vista Dose Unit to the First DataBank Dose Unit. The First DataBank Dose Unit will be used when processing the dosage checks provided by First DataBank.` `WRITE AUTHORITY: ^` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `51.24^C` `1)= S ^PS(51.24,"C",$E(X,1,30),DA)=""` `2)= K ^PS(51.24,"C",$E(X,1,30),DA)` `This cross reference is a regular cross reference on the FIRST DATABANK DOSE UNIT field. It sets the global: PS(51.24,"C",FIRST DATABANK DOSE UNIT, Internal Entry Number)="".`
2	SYNONYM	1;0	Multiple #51.242	51.242
3	DOSE FORM INDICATOR	0;3	SET	**********************REQUIRED FIELD********************** '0' FOR NO; '1' FOR YES; LAST EDITED: `OCT 01, 2008` HELP-PROMPT: `Enter 'Yes' if this Dose Unit should be considered a Dose Form type by First DataBank for the Dosing Check API. This determines the values used to compose the general dosing information message.` DESCRIPTION: `This field indicates whether the Dose Unit is considered by First DataBank (FDB) as a Dose Form type of Dose Unit when returning data for the Dosing Check API. It determines what values should be used to compose the` `general dosing information message.` `WRITE AUTHORITY: ^`
99.97	REPLACED BY VHA STANDARD TERM	VUID;3	POINTER TO DOSE UNITS FILE (#51.24)	DOSE UNITS(#51.24) 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.24^AREPLACETERM` `1)= S ^PS(51.24,"AREPLACETERM",$E(X,1,30),DA)=""` `2)= K ^PS(51.24,"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: `JAN 26, 2008` DESCRIPTION: `This field identifies the Master entry for a VUID associated with a Term/Concept.` `WRITE AUTHORITY: ^` `UNEDITABLE` RECORD INDEXES: `AMASTERVUID (#687)`
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: `JAN 26, 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.24^AVUID` `1)= S ^PS(51.24,"AVUID",$E(X,1,30),DA)=""` `2)= K ^PS(51.24,"AVUID",$E(X,1,30),DA)` `3)= This cross-reference is by VUID.` `This cross-reference is by VUID.` RECORD INDEXES: `AMASTERVUID (#687)`
99.991	EFFECTIVE DATE/TIME	TERMSTATUS;0	DATE Multiple #51.2499	51.2499 LAST EDITED: `JAN 26, 2008` DESCRIPTION: `Describes the pair Status and Effective Date/Time for each reference term.` `WRITE AUTHORITY: ^`

NAME: APPLICATION(S)	NAME: APPLICATORFUL(S)	NAME: anti-Xa unit	NAME: BAR(S)	NAME: CAP/TAB	NAME: CAPLET(S)	NAME: CAPSULE(S)	NAME: CENTIMETER(S)
NAME: DROP(S)	NAME: EACH	NAME: ENEMA(S)	NAME: GRAM(S)	NAME: INCH(ES)	NAME: INHALATION(S)	NAME: INSERT(S)	NAME: LITER(S)
NAME: LOZENGE(S)	NAME: MICROGRAM(S)	NAME: MILLIGRAM(S)	NAME: MG-PE	NAME: MICRO UNIT(S)	NAME: MILLIEQUIVALENT(S)	NAME: MILLIONUNIT(S)	NAME: MILLILITER(S)
NAME: MILLIMOLE(S)	NAME: NANOGRAM(S)	NAME: OVULE(S)	NAME: PACKAGE(S)	NAME: PACKET(S)	NAME: PAD(S)	NAME: PATCH(ES)	NAME: PELLET(S)
NAME: PIECE(S)	NAME: PUFF(S)	NAME: SACHET(S)	NAME: SCOOPFUL(S)	NAME: SPRAY(S)	NAME: SQUIRT(S)	NAME: STRIP(S)	NAME: SUPPOSITORY(IES)
NAME: TABLESPOONFUL(S)	NAME: TABLET(S)	NAME: TEASPOONFUL(S)	NAME: TROCHE(S)	NAME: THOUSAND UNITS	NAME: UNIT(S)	NAME: VAGINAL INSERT	NAME: VAGINAL RING
NAME: VIAL(S)	NAME: WAFER(S)	NAME: IMPLANT(S)	NAME: FILM(S)	NAME: ELISA UNIT(S)	NAME: PUMP(S)

Customize PDF page

Package: Pharmacy Data Management

Global: ^PS(51.24

Information

Description

Accessed By FileMan Db Calls, Total: 6

Pointed To By FileMan Files, Total: 2

Pointer To FileMan Files, Total: 1

Fields, Total: 8

Found Entries, Total: 54