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.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.

Directly Accessed By Routines, Total: 74

Package	Total	Routines
Inpatient Medications	41	PSGNE3 PSGOE4 PSGOE41 PSGOE6 PSGOE8 PSGOE81 PSGOE9 PSGOER PSGORS0 PSGOU PSGPL0 PSGS0 PSGVBW PSGVBWU PSIVCHK PSIVEDT1 PSIVOCDS PSIVOPT2 PSIVORC1 PSIVORFA PSIVORFB PSIVQUI PSIVSP PSIVUTL PSIVWL PSJ0071 PSJ0103 PSJAPIDS PSJBCMA PSJBCMA3 PSJCLOR PSJDDUT PSJEEU PSJHL4A PSJHL7 PSJMISC2 PSJOCDS PSJORPOE PSJSFRQ PSJSV PSJSV0
Pharmacy Data Management	22	PSS0093 PSS1P210 PSS51P1B PSS51P1C PSSCHPST PSSDDUT PSSDSAPA PSSDSAPD PSSDSAPI PSSDSUTL PSSGS0 PSSGSGUI PSSHLSCH PSSJSV PSSJSV0 PSSOAS PSSOUTSC PSSPOST PSSSCHED PSSSCHMS PSSSCHRP PSSUTIL1
Outpatient Pharmacy	10	DRUG(S) FOR DOSING CHK FREQ HOSPITAL LOCATION OLD SCHEDULE NAME(S) PSONVNEW PSOORED3 PSOORED4 PSOSIG PSOSPSIG ^PS(51.1 SORT GROUP
Order Entry Results Reporting	1	ORWDPS

Accessed By FileMan Db Calls, Total: 37

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	15	PSS51P1 PSS51P1A PSS51P1B PSS51P1C PSSDDUT 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: `D DFCHK^PSSJSV` LAST EDITED: `OCT 22, 2014` 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, which always places the numeric value in the middle position of the schedule. In some cases an 'X'` `(symbol for 'times') must be entered as the first character, although it is still translated as the number of times per designated period.` `The text examples within the following brackets [] provide clarification of the literal schedule translation for the possible formats. Enter the dosing check frequency in one of the following specified formats (#` `represents a whole number):` `Q#H [every # hour(s), such as every 5 hours]` `Q#D [every # day(s), such as every 3 days]` `Q#W [every # week(s), such as every 5 weeks]` `Q#L [every # month(s), such as every 3 months]` `X#D [times per day, such as 17 times per day]` `X#W [times per week, such as 3 times per week]` `X#L [times per month, such as 4 times per month]` `Numeric value can be 1-2 characters.` 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

External References

Name	Field # of Occurrence
EN^DDIOL	4(HELP )
^DICR	.01(XREF 6n1.4), .01(XREF 7n1.4)
ENSTH^PSSDDUT	5(HELP )
ADTM^PSSDDUT2	1(HELP )
DFCHK^PSSJSV	11+1
ENCHK^PSSJSV	1+1
ENFREQ^PSSJSV	2+1
ENPSJ^PSSJSV	.01+1
ENSHV^PSSJSV	6+1
HPDCHK^PSSJSV	11(HELP )

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(51.1	.01(XREF 6S), .01(XREF 7S), .01(XREF 7n69.2)
^DIC(9.4 - [#9.4]	4+1
^PS(51.1 - [#51.1]	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 6S), .01(XREF 6n1.4), .01(XREF 7S) , .01(XREF 7n1.4), .01(XREF 7n69.2), 4(XREF 2S), 4(XREF 2K), 4(XREF 3S), 4(XREF 3K)
^PS(59.7 - [#59.7]	.01(XREF 2S)

Naked Globals

Name	Field # of Occurrence
^(0	ID1+1, ID12+1, .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 6S), .01(XREF 6n1.4), .01(XREF 7S), .01(XREF 7n1.4) , .01(XREF 7n69.2), 4(XREF 2S), 4(XREF 2K)
^(20	.01(XREF 2S)

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> D0	.01(XREF 6S), .01(XREF 7S), .01(XREF 7n69.2)
>> DA	.01(XREF 1S), .01(XREF 1K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 5S), .01(XREF 5K), .01(XREF 6S), .01(XREF 7S) , 4(XREF 1S), 4(XREF 1K), 4(XREF 2S), 4(XREF 2K), 4(XREF 3S), 4(XREF 3K)
>> DIC("S"	5SCR+1*
>> DIG	.01(XREF 6n1.4), .01(XREF 7n1.4)
>> DIH	.01(XREF 6n1.4), .01(XREF 7n1.4)
>> DIU	.01(XREF 6S), .01(XREF 7S)
DIV	.01(XREF 6S), .01(XREF 6n1.4), .01(XREF 7S), .01(XREF 7n1.4)
DIV(0	.01(XREF 6S), .01(XREF 6n1.4), .01(XREF 7S), .01(XREF 7n1.4)
>> PSJHLDA(	.01(XREF 5S), .01(XREF 5K), 4(XREF 1S), 4(XREF 1K)
U	ID1+1, ID12+1, .01(XREF 6S), .01(XREF 6n1.4), .01(XREF 7S), .01(XREF 7n1.4), .01(XREF 7n69.2)
X	.01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 6S), .01(XREF 6n1.4), .01(XREF 7S) , .01(XREF 7n1.4), .01(XREF 7n69.2), 2.5+1!, 4+1!, 4(XREF 2S), 4(XREF 2K), 4(XREF 3S), 4(XREF 3K), 8+1!, 8.1+1!
Y	.01(XREF 6S), .01(XREF 7S)
Y(0	.01(XREF 6S), .01(XREF 7S), .01(XREF 7n69.2)
Y(1	.01(XREF 6S), .01(XREF 7S), .01(XREF 7n69.2)
Y(2	.01(XREF 7n69.2)
Y(3	.01(XREF 7n69.2)

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