Global: ^HOLIDAY

Information

FileMan FileNo	FileMan Filename	Package
40.5	HOLIDAY	Kernel

This file is used to record institutional holidays. It is referenced by the XUWORKDY routine. It is not distributed with data. It is cross-referenced by date.

Package	Total	Routines
Scheduling	14	SCRPW3 SCRPW71 SDAUT1 SDAUT2 SDB1 SDCLAV1 SDD0 SDM0 SDM1 SDMANA SDMM SDMULT0 SDOQMP1 SDRRISRU
Patient Care Component Table Maintiance	5	APCM11E4 APCM13E4 APCM14E4 APCM24E4 APCM25E4
Kernel	4	%ZOSVKR XQ92 XUSFACHK XUWORKDY
Order Entry Results Reporting	4	ORCDLR1 ORWDLR ORWDLR32 ORWDLR33
IHS Changes To Scheduling	3	BSDCCR1 BSDM0 BSDMM
Lab Service	3	LRAPTT LRORDIM LROW5
IHS Changes To ADT	2	ADGDSIP ADGICPQ
Surgery	2	SRORIN SROUTUP
Capacity Management - RUM	1	KMPRUTL3

Package	Total	Routines
Order Entry Results Reporting	2	ORB3TIM2 ORQ11
Automated Information Collection System	1	IBDFQB
Health Summary	1	GMTSPNJ
IHS VA Support Files	1	AVA32P23
Lab Service	1	LR7OV4
Scheduling	1	SDHOL

Package	Total	FileMan Files
Surgery	1	SURGERY SITE PARAMETERS(#133)[#133.027(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DATE	0;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X S:$D(X) DINUM=X` LAST EDITED: `JUN 27, 1989` HELP-PROMPT: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` DESCRIPTION: The date for the observance of the holiday. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `40.5^B` 1)= S ^HOLIDAY("B",X,DA)="" 2)= K ^HOLIDAY("B",X,DA)
2	NAME	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>40!($L(X)<3) X` HELP-PROMPT: `ANSWER MUST BE 3-40 CHARACTERS IN LENGTH` DESCRIPTION: Name of the holiday.

DATE

0;1

DATE

************************REQUIRED FIELD************************

DESCRIPTION:

The date for the observance of the holiday.

CROSS-REFERENCE: 40.5^B

1)= S ^HOLIDAY("B",X,DA)=""

2)= K ^HOLIDAY("B",X,DA)

NAME

0;2

FREE TEXT

Name	Field # of Occurrence
^%DT	.01+1

Name	Line Occurrences (* Changed, ! Killed)
^HOLIDAY("B"	.01(XREF 1S), .01(XREF 1K)

Name	Field # of Occurrence
^(0	ID2+1