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

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

Print Page as PDF

Global: ^PS(51.1

Package: Outpatient Pharmacy

Global: ^PS(51.1

Information

FileMan FileNo	FileMan Filename	Package
51.1	ADMINISTRATION SCHEDULE	Outpatient Pharmacy

Description

Sets of standard times over which medications are to be administered.

Accessed By FileMan Db Calls, Total: 36

Package	Total	Routines
Inpatient Medications	16	PSGOE41 PSGOE81 PSGOE91 PSGOEF PSGORS0 PSGS0 PSGSH PSIV PSIVORC1 PSIVSP PSJDDUT PSJEEU PSJEEU0 PSJORPOE PSJSV PSJSV0
Pharmacy Data Management	14	PSS51P1 PSS51P1A PSS51P1B PSS51P1C PSSEXLST PSSGS0 PSSGSGUI PSSGSH PSSJEEU PSSJSV PSSJSV0 PSSP110 PSSSCHED PSSSCHRP
Outpatient Pharmacy	5	PSOHELP2 PSOORED3 PSOORED4 PSOORED5 PSOSIG
Order Entry Results Reporting	1	ORCSEND1

Pointed To By FileMan Files, Total: 1

Package	Total	FileMan Files
Inpatient Medications	1	UNIT DOSE ORDER SET(#53.2)[#53.22(8)]

Pointer To FileMan Files, Total: 3

Package	Total	FileMan Files
Pharmacy Data Management	1	DRUG(#50)[#51.111(.01)]
Registration	1	WARD LOCATION(#42)[#51.11(.01)]
Scheduling	1	HOSPITAL LOCATION(#44)[#51.17(.01)]

Fields, Total: 17

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `D ENPSJ^PSSJSV Q:'$D(X) K:X[""""!($A(X)=45) X I $D(X) K:$L(X," ")>$S(X["PRN":4,1:3)!($L(X)>20)!($L(X)<2) X` LAST EDITED: `AUG 18, 2014` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: `This a common abbreviation for a schedule. A schedule is the frequency for which an action is to take place, such as every eight hours ('Q8H') or every other day ('QOD').` GROUP: `PSJ` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `51.1^B` `1)= S ^PS(51.1,"B",$E(X,1,30),DA)=""` `2)= K ^PS(51.1,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `51.1^AUWD^MUMPS` `1)= S ^PS(51.1,"AUWD")=$S($D(^PS(59.7,1,20)):$P(^(20),"^"),1:"")` `2)= Q` `Used by the Unit Dose inits to determine if a conversion process needs to be run on this file. In the form of: ^PS(51.1,"AUWD")` CROSS-REFERENCE: `51.1^ACC^MUMPS` `1)= I $D(^PS(51.1,DA,0)),$P(^(0),"^",4)]"" S ^PS(51.1,"AC",$P(^(0),"^",4),X,DA)=""` `2)= I $D(^PS(51.1,DA,0)),$P(^(0),"^",4)]"" K ^PS(51.1,"AC",$P(^(0),"^",4),X,DA)` `3)= USED BY SCHEDULE PROCESSOR` `Used by the Schedule Processor to do package specific look-ups. In the form of: ^PS(51.1,"AC",$P(^(0),"^",4),X,DA)` CROSS-REFERENCE: `51.1^APP^MUMPS` `1)= I $D(^PS(51.1,DA,0)),$P(^(0),"^",4)]"" S ^PS(51.1,"AP"_$P(^(0),"^",4),X,DA)=""` `2)= I $D(^PS(51.1,DA,0)),$P(^(0),"^",4)]"" K ^PS(51.1,"AP"_$P(^(0),"^",4),X,DA)` `3)= USED BY SCHEDULE PROCESSOR` `Used by the schedule processor to do package specific look-ups. In the form of: ^PS(51.1,"AP"_$P(^(0),"^",4),X,DA)` CROSS-REFERENCE: `51.1^ADHL^MUMPS` `1)= S PSJHLDA(+DA)="MUP"` `2)= S PSJHLDA(+DA)="MDL"` `Use to update Administration Schedule to OE/RR Schedule file. In the form of: PSJHLDA(+DA)` CROSS-REFERENCE: `^^TRIGGER^51.1^5` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S X=Y(0)["PRN" I X S X=DIV S Y(1)=$S($D(^PS(51.1,D0,0)):^(0),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X=DIV S X="P" X ^DD(51.1,.01,1,6,1.4)` `1.4)= S DIH=$G(^PS(51.1,DIV(0),0)),DIV=X S $P(^(0),U,5)=DIV,DIH=51.1,DIG=5 D ^DICR` `2)= Q` `CREATE CONDITION)= NAME["PRN"` `CREATE VALUE)= "P"` `DELETE VALUE)= NO EFFECT` `FIELD)= TYPE` CROSS-REFERENCE: `^^TRIGGER^51.1^5` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X X ^DD(51.1,.01,1,7,69.2) S X=X["P",Y=X,X=Y(1),X=X&Y I X S X=DIV S Y(1)=$S($D(^PS(51.1,D0,0)):^(0),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X="" X ^DD(51.1,.01,1,7,1.4)` `1.4)= S DIH=$G(^PS(51.1,DIV(0),0)),DIV=X S $P(^(0),U,5)=DIV,DIH=51.1,DIG=5 D ^DICR` `2)= Q` `69.2)= S Y(3)=$C(59)_$P($G(^DD(51.1,5,0)),U,3),Y(2)=$S($D(^PS(51.1,D0,0)):^(0),1:"") S X=Y(0)'["PRN",Y(1)=$G(X) S X=$P($P(Y(3),$C(59)_$P(Y(2),U,5)_":",2),$C(59))` `CREATE CONDITION)= NAME'["PRN"&(TYPE["P")` `CREATE VALUE)= ""` `DELETE VALUE)= NO EFFECT` `FIELD)= TYPE`
1	STANDARD ADMINISTRATION TIMES	0;2	FREE TEXT	INPUT TRANSFORM: `D ENCHK^PSSJSV` LAST EDITED: `APR 08, 2009` HELP-PROMPT: `Enter a time (or a set of times) of day, 2 to 119 characters in length` DESCRIPTION: `These are the times of day, for this schedule, that the action should take place. Use military time (24 hour clock) when entering the times, separating each time with a '-'. Be sure that the times are in ascending order,` `i.e., 06-14-22 or 0600-1400-2200. All times must be the same length, either 2 or 4 digits.` EXECUTABLE HELP: `D ADTM^PSSDDUT2` GROUP: `PSJ` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
2	FREQUENCY (IN MINUTES)	0;3	NUMBER	INPUT TRANSFORM: `D ENFREQ^PSSJSV` LAST EDITED: `JUL 27, 2015` HELP-PROMPT: `Type a number between 1 and 525600, 0 Decimal Digits` DESCRIPTION: `The number of minutes between each time that the action should take place.` TECHNICAL DESCR: GROUP: `PSJ` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
2.5	MAX DAYS FOR ORDERS	0;7	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 17, 1992` HELP-PROMPT: `Enter maximum number of days (1-999) continuous orders will last for this administration schedule. (NOT USED BY PHARMACY SOFTWARE.)`
3	WARD	1;0	POINTER Multiple #51.11	51.11 DESCRIPTION: `This allows the site to enter information pertaining to a schedule on ward by ward basis. The wards used are from the WARD LOCATION file.` TECHNICAL DESCR: `This allows the site to enter certain information (e.g. admin times) about the schedule specifically by ward. The wards point to the WARD LOCATION (#42) file. In processing, the ward is determined by the ward on which` `the patient is shown to reside. This is used mainly by the Unit Dose Medications package which is only concerned with inpatients.` GROUP: `PSJ`
4	PACKAGE PREFIX	0;4	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$S(X["""":1,$A(X)=45:1,$L(X)>4:1,$L(X)<1:1,X'?.ANP:1,1:'$D(^DIC(9.4,"C",X))) X` LAST EDITED: `FEB 23, 1995` HELP-PROMPT: `ANSWER MUST BE 1-4 CHARACTERS IN LENGTH.` DESCRIPTION: `This is the package prefix (as found in file 9.4) for the package that will be the primary user of this schedule. This is used primary as a screen to allow various packages to enter and edit their own set of schedules.` `This is NOT to be set through the VA FileMan, but only through the designated utility.` EXECUTABLE HELP: `D EN^DDIOL("ENTER PREFIX OF PACKAGE THAT WILL BE USING THIS SCHEDULE.","","!")` GROUP: `PS` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `51.1^AHL^MUMPS` `1)= S PSJHLDA(+DA)="MUP"` `2)= S PSJHLDA(+DA)="MDL"` `Use to update Administration Schedule to OE/RR Schedule file. In the form of: PSJHLDA(+DA)` CROSS-REFERENCE: `51.1^AC^MUMPS` `1)= I $D(^PS(51.1,DA,0)),$P(^(0),"^")]"" S ^PS(51.1,"AC",X,$P(^(0),"^"),DA)=""` `2)= I $D(^PS(51.1,DA,0)),$P(^(0),"^")]"" K ^PS(51.1,"AC",X,$P(^(0),"^"),DA)` `3)= USED BY SCHEDULE PROCESSOR` `Used by the Schedule Processor to do package specific look-ups. In the form of: ^PS(51.1,"AC",X,$P(^(0),"^"),DA)` CROSS-REFERENCE: `51.1^AP^MUMPS` `1)= S ^PS(51.1,"AP"_X,$P(^PS(51.1,DA,0),"^"),DA)=""` `2)= K ^PS(51.1,"AP"_X,$P(^PS(51.1,DA,0),"^"),DA)` `3)= USED BY SCHEDULE PROCESSOR` `Used by the Schedule Processor to do package specific look-ups. In the form of: ^PS(51.1,"AP"_X,$P(^PS(51.1,DA,0),"^"),DA)`
5	TYPE OF SCHEDULE	0;5	SET	'C' FOR CONTINUOUS; 'D' FOR DAY OF THE WEEK; 'DR' FOR DAY OF THE WEEK-RANGE; 'O' FOR ONE-TIME; 'R' FOR RANGE; 'S' FOR SHIFT; 'OC' FOR ON CALL; 'P' FOR PRN; INPUT TRANSFORM: `D ENPSJT^PSSJSV Q:'$D(X)` LAST EDITED: `JAN 08, 2007` HELP-PROMPT: `ENTER TYPE OF SCHEDULE.` DESCRIPTION: `This is the type of schedule. The type of schedule determines how the schedule will be processed.` SCREEN: `S DIC("S")="I $S($P(^PS(51.1,DA,0),""^"",4)="""":0,$P(^(0),""^"",4)'=""PSJ"":1,Y=""DR"":0,1:""RS""'[Y)"` EXPLANATION: `CHECK PACKAGE` EXECUTABLE HELP: `D ENSTH^PSSDDUT` GROUP: `PSJ` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` `TRIGGERED by the NAME field of the ADMINISTRATION SCHEDULE File` `TRIGGERED by the NAME field of the ADMINISTRATION SCHEDULE File`
6	STANDARD SHIFTS	0;6	FREE TEXT	INPUT TRANSFORM: `D ENSHV^PSSJSV` LAST EDITED: `NOV 12, 1989` HELP-PROMPT: `Answer must be 1-11 characters in length.` DESCRIPTION: `This is the standard shift (or shifts) which pertain to this schedule. If there is more than one shift, separate them with dashes (i.e., 'M-E').` GROUP: `PSJ` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
7	HOSPITAL LOCATION	2;0	POINTER Multiple #51.17	51.17 DESCRIPTION: `This allows the site to enter information pertaining to a schedule on hospital location by hospital location basis. The wards used are from the HOSPITAL LOCATION file.` TECHNICAL DESCR: `This allows the site to enter certain information (e.g. admin times) about the schedule specifically by hospital location. The wards point to the HOSPITAL LOCATION (#42) file. In processing, the hospital location is` `determined by the ward on which the patient is shown to reside.` GROUP: `PSJ`
8	OUTPATIENT EXPANSION	0;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>50!($L(X)<2) X` LAST EDITED: `FEB 22, 1995` HELP-PROMPT: `Answer must be 2-50 characters in length.` DESCRIPTION: `This is the expansion for this Administration Schedule to be use in the Outpatient Pharmacy.`
8.1	OTHER LANGUAGE EXPANSION	3;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>50!($L(X)<2) X` LAST EDITED: `SEP 16, 2002` HELP-PROMPT: `Answer must be 2-50 characters in length.` DESCRIPTION: `This field is used to store the other language expansion.` TECHNICAL DESCR: `Free text.` GROUP: `PSO`
9	EXCLUDE FROM ALL DOSING CHECKS	0;9	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `DEC 28, 2010` HELP-PROMPT: `Enter '1' or 'Yes' to exclude medication orders with this schedule from all dosing checks.` DESCRIPTION: `If this field is set to '1' or 'Yes', no dosing checks will be performed for any medication orders entered in Computerized Patient Record System (CPRS), Inpatient Medications, or Outpatient Pharmacy, that contain this` `schedule.`
10	EXCLUDE FROM DAILY DOSE CHECK	0;10	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `DEC 28, 2010` HELP-PROMPT: `Enter '1' or 'Yes' to exclude medication orders with this schedule from the daily dose check.` DESCRIPTION: `If this field is set to '1' or 'Yes', a daily dose range check will not be performed for any medication orders entered in Computerized Patient Record System (CPRS), Inpatient Medications, or Outpatient Pharmacy, that` `contain this schedule.`
11	DOSING CHECK FREQUENCY	0;11	FREE TEXT	INPUT TRANSFORM: `K:($$FREQCHK^PSSJSV(X)="") X W:$D(X) " "_$$FREQCHK^PSSJSV(X)` `MAXIMUM LENGTH: 30` LAST EDITED: `AUG 21, 2023` HELP-PROMPT: `Answer must be 3-4 characters in length.` DESCRIPTION: `The DOSING CHECK FREQUENCY field takes priority over all other fields/values when determining frequency.` `PLEASE BE AWARE that the format of the frequency in this field must employ the format patterns of the vendor database.` `The text examples within the following brackets [] provide clarification of the literal medication instruction translation for the possible formats. Enter the dosing check frequency in one of the following specified` `formats shown below ('#' represents a whole number, which can be 1 or 2 digits):` `Q#H [every # hour(s), values supported for '#': 1-12, 14-24,` `30, 36, 48, 60, 72 and 96, example: Q6H - EVERY 6 HOURS]` `Q#D [every # day(s), values supported for '#': 1-10, 14, 21, 28,` `30, 56 and 90, example: Q2D - EVERY 2 DAYS]` `Q#W [every # week(s), values supported for '#': 1-6, 8-10,` `12, 16, 24 and 52, example: Q1W - EVERY WEEK]` `Q#L [every # month(s), values supported for '#': 1-4, 6 and 12,` `example: Q3L - EVERY 3 MONTHS]` `#XD [times per day, values supported for '#': 1-99, example:` `4XD - 4 TIMES PER DAY]` `#XW [times per week, values supported for '#': 1-6, example:` `2XW - 2 TIMES PER WEEK]` EXECUTABLE HELP: `D HPDCHK^PSSJSV` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
11.1	DRUG(S) FOR DOSING CHK FREQ	4;0	POINTER Multiple #51.111	51.111 DESCRIPTION: `This multiple field allows for dispense drugs from the DRUG (#50) file to be associated with the DOSING CHECK FREQUENCY (#11) field value within the ADMINISTRATION SCHEDULE (#51.1) file.` `When a value is entered for "DOSING CHECK FREQUENCY:" and NO drug(s) is entered for "Select DRUG(S) FOR DOSING CHK FREQ:",the dosing check will use the value for "DOSING CHECK FREQUENCY:" to derive a frequency for all` `orders that have that schedule.` `When a value is entered for "DOSING CHECK FREQUENCY:" and a drug(s) is entered for "Select DRUG(S) FOR DOSING CHK FREQ:", the Daily Dose Order Check will ONLY use the value in "DOSING CHECK FREQUENCY:" to derive a` `frequency if the order that has that schedule also matches one of the drug(s) entered. If the drug found in the order does not match a drug listed in the DRUG(S) FOR DOSING CHK FREQ field, then the value of the DOSING` `CHECK FREQUENCY will not be used for the Daily Dose Order Check.`
12	INACTIVE	0;12	SET	'1' FOR YES; LAST EDITED: `NOV 17, 2017` HELP-PROMPT: `Answer YES to mark this administration schedule entry as inactive.` DESCRIPTION: `This field is used to indicate that a Standard Schedule is inactive. Inactive schedules are filtered from the list of schedules sent to CPRS for selection when users are placing a medication order.`
13	OLD SCHEDULE NAME(S)	5;0	Multiple #51.113	51.113 DESCRIPTION: `This multiple stores the old values of the administration schedule when the NAME (#.01) field is edited. Values can also be added to this field directly.`

Found Entries, Total: 18

NAME: QD	NAME: BID	NAME: Q6H	NAME: Q4H	NAME: Q3H	NAME: Q8H	NAME: QAM	NAME: TID
NAME: QID	NAME: Q12H	NAME: QOD	NAME: QHS	NAME: NOW	NAME: ONCE	NAME: MO-WE-FR	NAME: Q24H
NAME: Q2H	NAME: STAT

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