STANDARD DATA DICTIONARY #40.8 -- MEDICAL CENTER DIVISION FILE 3/24/25 PAGE 1
STORED IN ^DG(40.8, (1 ENTRY) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the Medical Center Divisions which are defined using the 'MAS Parameter Entry/Edit' option. The primary
facility as well as any NHCU, Domiciliary or other division should be defined within this file.
DD ACCESS: @
RD ACCESS: d
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
IDENTIFIED BY: FACILITY NUMBER (#1)[R]
POINTED TO BY: FACILITY APPLYING TO field (#3) of the DISPOSITION LOG-IN DATE/TIME sub-field (#2.101) of the PATIENT File (#2)
FACILITY field (#.02) of the OPC ERRORS File (#40.15)
DIVISION field (#2) of the VISIT DATE MESSAGE sub-field (#40.152) of the OPC ERRORS File (#40.15)
DIVISION field (#4) of the FIELD NAME sub-field (#40.16) of the OPC ERRORS File (#40.15)
DIVISION field (#12) of the SCHEDULED ADMISSION File (#41.1)
DIVISION field (#.1) of the PRE-REGISTRATION CALL LIST File (#41.42)
DIVISION field (#5) of the PRE-REGISTRATION CALL LOG File (#41.43)
DIVISION field (#.015) of the WARD LOCATION File (#42)
DIVISION field (#.01) of the WAIT LIST File (#42.5)
DIVISION field (#.01) of the DIVISION sub-field (#42.61) of the SEGMENT sub-field (#42.6001) of the AMIS 334-341
File (#42.6)
DIVISION field (#.01) of the DIVISION sub-field (#42.702) of the SEGMENT sub-field (#42.701) of the AMIS 345&346
File (#42.7)
MEDICAL CENTER NAME field (#12) of the MAS PARAMETERS File (#43)
DIVISION field (#3.5) of the HOSPITAL LOCATION File (#44)
DIVISION field (#24.2) of the ERX HOLDING QUEUE File (#52.49)
DWO MESSAGE ENTITY field (#.01) of the DWO MESSAGE ENTITY sub-field (#58.6014) of the PADE INVENTORY SYSTEM File
(#58.601)
DIVISION field (#2) of the PADE DISPENSING DEVICE File (#58.63)
DIVISION field (#5) of the PADE OUTBOUND MESSAGES File (#58.72)
DIVISION field (#.01) of the DIVISION sub-field (#58.74) of the PADE SYSTEM SETUP File (#58.7)
DIVISION field (#.02) of the IV ROOM File (#59.5)
DIVISION field (#.02) of the PBM AR/WS AOU MAPPINGS sub-field (#59.79001) of the PHARMACY SYSTEM File (#59.7)
DIVISION field (#.02) of the PBM CS NAOU MAPPINGS sub-field (#59.79002) of the PHARMACY SYSTEM File (#59.7)
DIVISION field (#.02) of the PBM DA PHARM LOC MAPPINGS sub-field (#59.79003) of the PHARMACY SYSTEM File (#59.7)
MEDICAL CENTER DIVISION field (#.01) of the MEDICAL CENTER DIVISION sub-field (#100.9531) of the QUICK ORDER
DIVISION GROUPS File (#100.953)
DIVISION field (#.01) of the MDRO SITE PARAMETERS File (#104)
DIVISION OF CARE field (#.01) of the DIVISION OF CARE sub-field (#349.161) of the AR TRANSMISSION TYPE File (#349.1)
DIVISION field (#.02) of the BASC LOCALITY MODIFIER File (#350.5)
DEFAULT DIVISION field (#1.25) of the IB SITE PARAMETERS File (#350.9)
DIVISION field (#.05) of the FACILITY BILLING ID File (#355.92)
DIVISION field (#.04) of the IB PROVIDER ID CARE UNIT File (#355.95)
DIVISION field (#.01) of the DIVISION sub-field (#357.9911) of the PRINT MANAGER CLINIC GROUPS File (#357.99)
DIVISION field (#.01) of the DIVISION sub-field (#363.3111) of the BILLING REGION File (#363.31)
MEDICAL CENTER DIVISION field (#.15) of the EVENT sub-field (#366.141) of the IB NCPDP EVENT LOG File (#366.14)
FACILITY ID field (#13) of the PFSS ACCOUNT File (#375)
MEDICAL CENTER DIVISION field (#.03) of the STATION NUMBER (TIME SENSITIVE) File (#389.9)
DIVISION field (#.01) of the DIVISION sub-field (#391.11) of the AMIS SEGMENT File (#391.1)
DIVISION field (#11) of the BENEFICIARY TRAVEL CLAIM File (#392)
DIVISION NAME field (#.01) of the DIVISION MILEAGE sub-field (#392.1001) of the BENEFICIARY TRAVEL DISTANCE File
(#392.1)
DIVISION field (#.06) of the INCOMPLETE RECORDS File (#393)
MEDICAL CENTER DIVISION field (#9) of the HINQ SUSPENSE File (#395.5)
NOTICE OF DISCHARGE DIVISION field (#4.6) of the FORM 7131 File (#396)
HOSPITAL SUMMARY DIVISION field (#5.6) of the FORM 7131 File (#396)
CERTIFICATE (21-DAY) DIVISION field (#6.6) of the FORM 7131 File (#396)
OTHER/EXAM LISTED IN REM DIV field (#7.6) of the FORM 7131 File (#396)
SPECIAL REPORT DIVISION field (#9.6) of the FORM 7131 File (#396)
COMPETENCY REPORT DIVISION field (#11.6) of the FORM 7131 File (#396)
VA FORM 21-2680 DIVISION field (#13.6) of the FORM 7131 File (#396)
ASSET INFORMATION DIVISION field (#15.6) of the FORM 7131 File (#396)
ADMISSION REPORT DIVISION field (#17.6) of the FORM 7131 File (#396)
OPT TREATMENT RPT DIVISION field (#18.6) of the FORM 7131 File (#396)
BEGINNING DATE/CARE DIVISION field (#20.6) of the FORM 7131 File (#396)
DIVISION field (#29) of the FORM 7131 File (#396)
REMOTE SITE (7131) field (#.01) of the REMOTE SITE (7131) sub-field (#396.13) of the AMIE SITE PARAMETER File
(#396.1)
REMOTE SITE (2507) field (#.01) of the REMOTE SITE (2507) sub-field (#396.14) of the AMIE SITE PARAMETER File
(#396.1)
DIVISION field (#.01) of the CAPRI DIVISION EXAM LIST File (#396.15)
ROUTING LOCATION field (#24) of the 2507 REQUEST File (#396.3)
OLD DIVISION field (#8) of the REROUTE DATE/TIME sub-field (#396.34) of the 2507 REQUEST File (#396.3)
ROUTING LOCATION field (#1) of the FORM 28-8861 File (#396.9)
DEFAULT DIVISION field (#.22) of the BILL/CLAIMS File (#399)
DIVISION field (#5) of the PROCEDURES sub-field (#399.0304) of the BILL/CLAIMS File (#399)
DIVISION field (#.07) of the REVENUE CODE sub-field (#399.042) of the BILL/CLAIMS File (#399)
DIVISION field (#2) of the RECALL REMINDERS PROVIDERS File (#403.54)
DIVISION field (#.12) of the SDSC SERVICE CONNECTED CHANGES File (#409.48)
DIVISION field (#3) of the SCHEDULING VISITS File (#409.5)
MEDICAL CENTER DIVISION field (#.11) of the OUTPATIENT ENCOUNTER File (#409.68)
MEDICAL CENTER DIVISION field (#.05) of the ACRP TRANSMISSION HISTORY File (#409.77)
DIVISION field (#.01) of the PRINT MANAGER DIVISION SETUP File (#409.96)
DIVISION field (#1.03) of the AR MEDICARE DEDUCTIBLE ALERTS PART A File (#436.1)
PARENT SITE field (#91) of the HBHC PATIENT File (#631)
PARENT SITE field (#.01) of the PARENT SITE sub-field (#631.99) of the HBHC SYSTEM PARAMETERS File (#631.9)
PARENT SITE field (#35) of the HBHC MEDICAL FOSTER HOME File (#633.2)
DIVISION field (#.03) of the CP_MOVEMENT_AUDIT File (#704.005)
DIVISION field (#.02) of the CP_PROTOCOL_LOCATION File (#704.006)
MEDICAL CENTER DIVISION field (#.01) of the DSS DIVISION IDENTIFIER File (#727.3)
FACILITY field (#3) of the ADMISSION EXTRACT File (#727.802)
FACILITY field (#3) of the PHYSICAL MOVEMENT EXTRACT File (#727.808)
FACILITY field (#3) of the UNIT DOSE LOCAL EXTRACT File (#727.809)
FACILITY field (#3) of the IV DETAIL EXTRACT File (#727.819)
DIVISION field (#52) of the QUASAR EXTRACT File (#727.825)
FACILITY field (#3) of the CLINIC EXTRACT File (#727.827)
DIVISION field (#1) of the INPATIENT WORKLOAD sub-field (#731.03) of the VAMC MANAGEMENT File (#731)
OUTPATIENT NAME field (#.01) of the OUTPATIENT WORKLOAD sub-field (#731.04) of the VAMC MANAGEMENT File (#731)
OS HOSPITAL DIVISION field (#.01) of the OS HOSPITAL DIVISION sub-field (#740.02) of the QUALITY ASSURANCE SITE
PARAMETERS File (#740)
FACILITY field (#.08) of the ESP POLICE REGISTRATION LOG File (#910.2)
FACILITY field (#.05) of the ESP EVIDENCE File (#910.8)
FACILITY field (#.07) of the ESP OFFENSE REPORT File (#912)
FACILITY field (#.01) of the FACILITY sub-field (#912.31) of the ESP CRIME DATA-BY-FACILITY File (#912.3)
FACILITY field (#.1) of the ESP VIOLATIONS File (#914)
FACILITY field (#.5) of the ESP DAILY JOURNAL File (#916)
DIVISION field (#.01) of the TIU DIVISION PRINT PARAMETERS File (#8925.94)
DIVISION field (#.01) of the DIVISION sub-field (#8925.952) of the TIU DOCUMENT PARAMETERS File (#8925.95)
DIVISION field (#60) of the A&SP CLINIC VISIT File (#509850.6)
DIVISION field (#.01) of the DIVISION sub-field (#509850.75) of the A&SP WORKLOAD File (#509850.7)
DIVISION field (#.01) of the DIVISION sub-field (#509850.83) of the A&SP SITE PARAMETERS File (#509850.8)
CROSS
REFERENCED BY: INSTITUTION FILE POINTER(AD), INSTITUTION FILE POINTER(ADV), NAME(B), FACILITY NUMBER(C), TREATING SPECIALTY(D)
INDEXED BY: INSTITUTION FILE POINTER & PRF ASSIGNMENT OWNERSHIP (APRF)
40.8,.001 NUM NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JUL 21, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999
DESCRIPTION:
This field contains the internal entry number of the division as determined by VA FileMan.
40.8,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>35!($L(X)<3) X
LAST EDITED: JUL 21, 1986
HELP-PROMPT: ANSWER MUST BE 3-35 CHARACTERS IN LENGTH
DESCRIPTION: Enter in this field the name of a division at your facility. It may be the main building, a
satelite clinic, a domiciliary, or a nursing home.
CROSS-REFERENCE: 40.8^B
1)= S ^DG(40.8,"B",$E(X,1,30),DA)=""
2)= K ^DG(40.8,"B",$E(X,1,30),DA)
40.8,.07 INSTITUTION FILE POINTER 0;7 POINTER TO INSTITUTION FILE (#4) (Required)
INPUT TRANSFORM: D ^DIC S X=+Y Q:$P(^DG(40.8,DA,0),U,7)=+Y K:Y<0 X I $D(X),$D(^DG(40.8,"AD",X)) W !,"Enter a unique
pointer." K X
LAST EDITED: MAR 28, 2005
HELP-PROMPT: Enter the institution in file #4 to which this corresponds.
DESCRIPTION: Enter the entry in the institution file that corresponds to this division. It is IMPERATIVE that
you respond to this prompt properly as this affects transmission of data to Austin as well as many
other statistical reports.
SCREEN: S DIC("S")="I +$$GET1^DIQ(4,+Y,99)"
EXPLANATION: ONLY SITES WITH APPROPRIATE STATION NUMBER
EXECUTABLE HELP: W !,"Each entry in the Medical Center Division file should point to a unique entry in the Instituti
on file."
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 40.8^ADV^MUMPS
1)= S ^DG(40.8,"ADV",DA)=X
2)= K ^DG(40.8,"ADV",DA)
CROSS-REFERENCE: 40.8^AD
1)= S ^DG(40.8,"AD",$E(X,1,30),DA)=""
2)= K ^DG(40.8,"AD",$E(X,1,30),DA)
RECORD INDEXES: APRF (#693)
40.8,.08 PRINT WRISTBANDS 0;8 SET
'Y' FOR YES;
'N' FOR NO;
LAST EDITED: FEB 01, 1995
HELP-PROMPT: Enter whether you want wristbands printed at this division.
DESCRIPTION:
This field determines whether the patient's wristbands are printed at this division.
40.8,1 FACILITY NUMBER 0;2 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>7!($L(X)<3) X
LAST EDITED: JUL 08, 1993
HELP-PROMPT: Answer must be 3-7 characters in length.
DESCRIPTION: Enter the number of the facility that this division is affiliated with. This should be the 3 digit
facility number the site is assigned by Central Office officials. It may also include a suffix.
CROSS-REFERENCE: 40.8^C
1)= S ^DG(40.8,"C",$E(X,1,30),DA)=""
2)= K ^DG(40.8,"C",$E(X,1,30),DA)
40.8,2 EMPLOYEE HEALTH COUNTS 1;0 DATE Multiple #40.801 (Add New Entry without Asking)
DESCRIPTION: This multiple contains the number of employee health visits to this division broken down by
month/year.
40.801,.01 MONTH/YEAR 0;1 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X S:$D(X) DINUM=X
LAST EDITED: FEB 21, 1984
DESCRIPTION:
Enter the year for which employee health visits are to be tracked.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.801,1 TOTAL 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
DESCRIPTION:
Enter the total number of employee health visits to this division during this month.
40.8,3 OUTPATIENT ONLY 0;3 SET
'1' FOR OUTPATIENT ONLY;
INPUT TRANSFORM: F I=0:0 S I=$N(^DIC(42,I)) Q:I'>0 I $P($S($D(^(I,0)):^(0),1:0),U,11)=DA K X W !,"Ward has this des
ignated",! Q
LAST EDITED: MAY 22, 1986
HELP-PROMPT: Enter 1 if this Division does not have any wards
DESCRIPTION:
Enter yes if this division has only outpatient medical services (no inpatient wards).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.8,4 PRINT 'AA'<96' ON G&L 0;4 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: MAY 28, 1986
HELP-PROMPT: Enter '1' if you want the pass transfers to appear on the gains and losses
DESCRIPTION: Enter YES to display AA<96 (pass) transfers on the gains and losses sheet. Respond NO if these
transfers should not be listed. The counts will be included on the bed status report regardless of
your response here.
40.8,5 PRINT 'AA' ON G&L 0;5 SET
'0' FOR NO;
'1' FOR YES;
HELP-PROMPT: Enter '1' if you want the authorized absence transfers to appear on the gains and losses
DESCRIPTION: Enter YES if you would like authorized absence transfers of more than 96 hours to appear on the
gains and losses sheet. Answer NO otherwise. Regardless of the response here, these figures will
be calculated into the bed status report.
40.8,6 NHCU/DOM/HOSP G&L 0;6 SET
'0' FOR COMBINED;
'1' FOR SEPARATE;
LAST EDITED: MAR 30, 1993
HELP-PROMPT: Enter '0' if you want to print the NHCU and DOM G&L combined together, '1' to put them on separate
pages
DESCRIPTION: Respond YES if the gains and losses sheet should combine the movements which occur in the nursing
home, hospital, and dom on a single sheet for this division. Answer no if movements for these
three types of care should be on different sheets.
40.8,7 DEFAULT 1010 PRINTER DEV;1 FREE TEXT
INPUT TRANSFORM: S L=X,X=$P(X,";",1),DIC=3.5,DIC(0)="QMEZ" D ^DIC K:Y'>0!(X=" ") X S:$D(X) X=$P(Y(0),U,1)_$S(L[";":"
;"_$P(L,";",2,99),1:"") S DIC=$S($D(DIE):DIE,1:DIC) K L
LAST EDITED: JUL 09, 1986
HELP-PROMPT: Enter device where 10 10's will be printed
DESCRIPTION: Enter the printer which the 1010, 1010I, and 1010F outputs will display on if no other printer is
selected. The reports will only print to this printer for registrations at this division.
EXECUTABLE HELP: S DIC=3.5,DIC(0)="EM",X="?" D ^DIC S DIC=DIE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.8,8 DEFAULT DRUG PROFILE PRINTER DEV;2 FREE TEXT
INPUT TRANSFORM: S L=X,X=$P(X,";",1),DIC=3.5,DIC(0)="QZME" D ^DIC K:Y'>0!(X=" ") X S:$D(X) X=$P(Y(0),U,1)_$S(L[";":"
;"_$P(L,";",2,99),1:"") S DIC=$S($D(DIE):DIE,1:DIC) K L
LAST EDITED: JUL 09, 1986
HELP-PROMPT: Enter device where Drug Profiles will be printed
DESCRIPTION: Enter the printer on which the pharmacy drug profile will display if no other printer is selected.
The drug profile will only display to this printer for registrations entered at this division.
EXECUTABLE HELP: S DIC=3.5,DIC(0)="EM",X="?" D ^DIC S DIC=DIE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.8,9 DEFAULT ROUTING SLIP PRINTER DEV;3 FREE TEXT
INPUT TRANSFORM: S L=X,X=$P(X,";",1),DIC=3.5,DIC(0)="QMEZ" D ^DIC K:Y'>0!(X=" ") X S:$D(X) X=$P(Y(0),U,1)_$S(L[";":"
;"_$P(L,";",2,99),1:"") S DIC=$S($D(DIE):DIE,1:DIC) K L
LAST EDITED: JUL 09, 1986
HELP-PROMPT: Enter device where Routing Slips will be printed
DESCRIPTION: Enter the printer on which the routing slip will appear if no other printer is selected. The
routing slip will only display to this printer for registrations entered at this division.
EXECUTABLE HELP: S DIC=3.5,DIC(0)="EM",X="?" D ^DIC S DIC=DIE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.8,9.1 DIVISION PTF PRINTER DEV;4 FREE TEXT
INPUT TRANSFORM: S L=X,X=$P(X,";",1),DIC=3.5,DIC(0)="QMEZ" D ^DIC K:Y'>0!(X=" ") X S:$D(X) X=$P(Y(0),U,1)_$S(L[";":"
;"_$P(L,";",2,99),1:"") S DIC=$S($D(DIE):DIE,1:DIC) K L
LAST EDITED: NOV 12, 1986
HELP-PROMPT: Enter device where MIS messages will be printed
DESCRIPTION: This is the printer on which you want all PTF messages to appear for this division. It overrides
the printer defined in the DEFAULT PTF MESSAGE PRINTER prompt located in the ADT PARAMETER file.
EXECUTABLE HELP: S DIC=3.5,X="??",DIC(0)="Q" D ^DIC S DIC=$S($D(DIE):DIE,1:DIC)
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.8,10 CENSUS DATE CEN;0 DATE Multiple #40.802
DESCRIPTION: This multiple field contains data on inpatient census as broken down by date. This data is
compiled when the gains and losses and bed status reports are run.
IDENTIFIED BY: *DIALYSIS PATIENTS(#4)
40.802,.01 CENSUS DATE 0;1 DATE (Multiply asked)
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X S:$D(X) DINUM=X
LAST EDITED: JUN 15, 1984
HELP-PROMPT: Enter the date you wish to enter or edit the census for.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.802,1 CUM PLANNED NH ADC 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUN 15, 1984
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 2999
DESCRIPTION: This sub-field of the Census Date contains the Cumulative Planned Nursing Home Average Daily
Census (ADC).
40.802,1.25 CUM PLANNED DOM ADC 0;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: AUG 15, 1984
HELP-PROMPT: Enter the cumulative planned domicillary ADC, 0-2999.
DESCRIPTION: This sub-field of the Census Date contains the Cumulative Planned Domicillary Average Daily
Census (ADC).
40.802,1.5 AVG DOM CENSUS FY TO DATE 0;9 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUN 15, 1984
HELP-PROMPT: Enter the average census for the domicillary, fiscal year to date, 0-2999.
DESCRIPTION: This sub-field of the Census Date contains the Average Domicillary Census for the current fiscal
year to date.
40.802,2 MONTHLY PLANNED ADC 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUN 15, 1984
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 2999
DESCRIPTION:
This sub-field of the Census Date contains the Monthly Planned Average Daily Census (ADC).
40.802,2.25 MONTHLY PLANNED NH ADC 0;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: AUG 15, 1984
HELP-PROMPT: Enter the monthly planned nursing home ADC, 0-2999.
DESCRIPTION: This sub-field of the Census Date contains the Monthly Planned Nursing Home Average Daily Census
(ADC).
40.802,2.5 MONTHLY PLANNED DOM ADC 0;12 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: AUG 15, 1984
HELP-PROMPT: Enter the monthly planned domicillary ADC, 0-2999.
DESCRIPTION: This sub-field of the Census Date contains the Monthly Planned Domicillary Average Daily Census
(ADC).
40.802,3 CUM PLANNED ADC 0;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: AUG 15, 1984
HELP-PROMPT: Enter the cumulative planned ADC for the medical center, 0-2999.
DESCRIPTION: This sub-field of the Census Date contains the Cumulative Planned Average Daily Census (ADC) for
this medical center.
40.802,4 *DIALYSIS PATIENTS 0;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 30, 1992
HELP-PROMPT: Enter the number of dialysis patient's selected for the current date.
DESCRIPTION:
This sub-field of the Census Date contains the number of Dialysis Patients for this census date.
40.802,5 CENSUS 0;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUN 15, 1984
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 2999
DESCRIPTION:
This sub-field of the Census Date contains the Census figures for the medical center.
40.802,6 AVG CENSUS FY TO DATE 0;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."10N.N) X
LAST EDITED: AUG 15, 1984
HELP-PROMPT: Enter the average census for the medical center, fiscal year to date.
DESCRIPTION:
This sub-field of the Census Date contains the Average Census Fiscal Year to date.
40.802,8 AVG NH CENSUS FY TO DATE 0;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>2999)!(X<0)!(X?.E1"."10N.N) X
LAST EDITED: AUG 15, 1984
HELP-PROMPT: Enter the average census for the nursing home, fiscal year to date, 0-2999.
DESCRIPTION:
This sub-field of the Census Date contains the Average Nursing Home Census Fiscal Year to date.
40.802,9 *CUMULATIVE DIALYSIS PATIENTS 0;13 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 30, 1992
HELP-PROMPT: Enter the cumulative number of dialysis patients, 0-9999.
DESCRIPTION:
This sub-field of the Census Date contains the Cumulative Dialysis Patients fiscal year to date.
40.802,10 WAIT LIST - 65 AND OVER 1;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 03, 1985
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 999999
DESCRIPTION: This sub-field of the Census Date contains the number of patients on the Waiting List that are 65
years old and over.
40.802,11 WAIT LIST - VIET NAM ERA 1;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 999999
DESCRIPTION: This sub-field of the Census Date contains the number of patients on the Waiting List that are
Vietnam Era.
40.802,12 *BED OCCUPANTS - 65 AND OVER 1;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 999999
40.802,13 *BED OCCUPANTS - VIET NAM ERA 1;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 999999
40.802,14 WAIT LIST BEDSECTION 2;0 SET Multiple #40.805 (Add New Entry without Asking)
DESCRIPTION: This sub-field of the Census Date multiple is a mutiple that adds new entries without asking,
inpatient AMISs use this information.ient A
40.805,.01 WAIT LIST BEDSECTION 0;1 SET (Multiply asked)
'334' FOR PSYCHIATRY;
'335' FOR INTERMEDIATE;
'336' FOR MEDICINE;
'337' FOR NEUROLOGY;
'338' FOR REHAB MEDICINE;
'339' FOR BLIND REHAB;
'340' FOR SPINAL CORD INJURY;
'341' FOR SURGERY;
'345' FOR NHCU;
INPUT TRANSFORM: S:$D(X) DINUM=X
LAST EDITED: JAN 04, 1985
DESCRIPTION: This sub-field of the Waiting List Bedsection of the Census Date Multiple is a set of code and
is by inpatient AMISs.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.805,.02 WAIT LIST IN HOSPITAL 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 04, 1985
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 99999
DESCRIPTION: This sub-field of the Waiting List Bedsection of the Census Date Multiple is the number of
patients on the waiting list for this bedsection.
40.805,.03 WAIT LIST NOT IN HOSPITAL 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 99999
DESCRIPTION: This sub-field of the Waiting List Bedsection of the Census Date Multiple is the number of
patients on the waiting list for this bedsection not in the hospital.
40.805,.04 WAIT LIST - SERVICE CONNECTED 0;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 04, 1985
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 9999
DESCRIPTION: This sub-field of the Waiting List Bedsection of the Census Date Multiple is the number of
patients on the waiting list for this bedsection who are service connected.
40.802,20 CORRECTIONS TO PREVIOUS G&L'S A;0 WORD-PROCESSING #40.804
DESCRIPTION: This sub-field of the Census Date multiple is a word-processing field and contains the
corrections to previous G&L's and is printed at the bottom Census Date Gains and Losses Sheet
(G&L).
LAST EDITED: NOV 12, 1984
40.8,26.01 PRF ASSIGNMENT OWNERSHIP PRF;1 SET
'1' FOR ENABLED;
'0' FOR DISABLED;
LAST EDITED: JUN 22, 2005
HELP-PROMPT: Enter 1 to enable this division as a patient record flag assignment owner; enter 0 to disable this
division as a patient record flag assignment owner.
DESCRIPTION: This field contains the indicator of whether or not this medical center division has been
designated as a patient record flag assignment owner. Data in this field should not be added or
edited except through the use of the Patient Record Flags software that is part of Registration.
SCREEN: S DIC("S")="I $$SCRNDIV^DGPFDD(DA,+Y)"
EXPLANATION: Cannot disable this medical center division if active assignments are associated with the division.
RECORD INDEXES: APRF (#693)
40.8,26.02 PRF OWNERSHIP EDITED PRF;2 DATE
INPUT TRANSFORM: S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JUN 28, 2005
HELP-PROMPT: Enter the date and time the PRF Assignment Ownership indicator is edited.
DESCRIPTION: This field is used as part of the audit trail for the enabling/disabling of medical center
divisions as patient record flag assignment owners. This field will contain the date/time that the
PRF ASSIGNMENT OWNERSHIP indicator was edited. Data in this field should not be added or edited
except through the use of the Patient Record Flags software that is part of Registration.
40.8,26.03 PRF OWNERSHIP EDITED BY PRF;3 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: JUN 28, 2005
HELP-PROMPT: Enter the user who is editing the PRF Assignment Ownership indicator.
DESCRIPTION: This field is used as part of the audit trail for the enabling/disabling of medical center
divisions as patient record flag assignment owners. This field will contain the user responsible
for editing the PRF ASSIGNMENT OWNERSHIP indicator. Data in this field should not be added or
edited except through the use of the Patient Record Flags software that is part of Registration.
40.8,30.01 ADDRESS LOCATION ON LETTERS LTR;1 SET
'1' FOR BOTTOM;
'0' FOR TOP;
LAST EDITED: JAN 09, 1989
DESCRIPTION: Enter the location (top or bottom) where the address should appear for letters generated for
appointments or other activities at this division.
40.8,30.02 OP LAB TEST START TIME LTR;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>4!($L(X)<4)!'(X?4N)!($E(X,3,4)>59)!(X>2400) X
LAST EDITED: MAY 05, 1992
HELP-PROMPT: Answer with MILITARY time only.
DESCRIPTION: Enter the time in the morning at which lab tests begin. This is used by the auto-rebook
functionality to prevent lab test being scheduled too early. For example, if a patient has an
appointment at 2pm with lab at 11pm and the appointment is cancelled and autorebooked for 8am, the
lab would have been scheduled for 5am. This will prevent this from occurring.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.8,30.03 OP EKG START TIME LTR;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>4!($L(X)<4)!'(X?4N)!(X>2400)!($E(X,3,4)>59) X
LAST EDITED: MAY 05, 1992
HELP-PROMPT: Answer with MILITARY time only.
DESCRIPTION: Enter the time in the morning at which ekg tests begin. This is used by the auto-rebook
functionality to prevent ekg test being scheduled too early. For example, if a patient has an
appointment at 2pm with ekg at 11pm and the appointment is cancelled and auto-rebooked for 8am, the
ekg would have been scheduled for 5am. This will prevent this from occurring.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.8,30.04 OP X-RAY START TIME LTR;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>4!($L(X)<4)!'(X?4N)!(X>2400)!($E(X,3,4)>59) X
LAST EDITED: MAY 05, 1992
HELP-PROMPT: Answer with MILITARY time only.
DESCRIPTION: Enter the time in the morning at which x-ray tests begin. This is used by the auto-rebook
functionality to prevent x-ray test being scheduled too early. For example, if a patient has an
appointment at 2pm with x-ray at 11pm and the appointment is cancelled and auto-rebooked for 8am,
the x-ray would have been scheduled for 5am. This will prevent this from occurring.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.8,35.01 DISPLAY MEANS TEST REQUIRED MT;1 SET
'Y' FOR YES;
'N' FOR NO;
LAST EDITED: DEC 08, 1999
HELP-PROMPT: Enter whether you want to display Means Test Required message on patient lookups
DESCRIPTION: This field determines whether a Means Test Required message is displayed on patient lookups at this
division
40.8,35.02 MEANS TEST TEXT MT;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>80!($L(X)<3) X
LAST EDITED: JAN 10, 2000
HELP-PROMPT: Enter text to be displayed, such as where to report,etc.
DESCRIPTION: If you have answered 'Yes' to the Means Test Required prompt, you can enter text here to be
displayed upon patient lookup, such as where to report to complete the Means Test, etc.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
40.8,35.03 DISPLAY MEANS TEST REQ IF GUI MT;3 SET
'Y' FOR YES;
'N' FOR NO;
LAST EDITED: DEC 02, 1999
HELP-PROMPT: Enter whether you want to display Means Test Required message on GUI patient lookups
DESCRIPTION:
This field determines whether a Means Test Required message is displayed on patient GUI lookups
40.8,40 OP VISIT DATE OP;0 DATE Multiple #40.808
DESCRIPTION: This field is a multiple containing the OP visit date, planned OP visits (CUM) and actual OP visits
(CUM).
40.808,.01 OP VISIT DATE 0;1 DATE (Multiply asked)
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X I $D(X) S DINUM=9999999-X
LAST EDITED: MAR 09, 1989
HELP-PROMPT: Enter the date for which you wish to enter OP vists.
DESCRIPTION: This is a date/time field (FM function) and represents the date/time of a specifie outpatient
visit date/time associated with the medical center.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 40.808^B
1)= S ^DG(40.8,DA(1),"OP","B",$E(X,1,30),DA)=""
2)= K ^DG(40.8,DA(1),"OP","B",$E(X,1,30),DA)
40.808,.02 PLANNED OP VISITS [CUM] 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAR 09, 1989
HELP-PROMPT: Type a Number between 0 and 9999999999, 0 Decimal Digits
DESCRIPTION: This field contains the number of planned cumulative outpatient visits for a given medical center
as defined by top management.
40.808,.03 ACTUAL OP VISITS [CUM] 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 9999999999, 0 Decimal Digits
DESCRIPTION: This field contains the actual number of cumulative outpatient visits for a medical center in a
given fiscal year.
40.8,50 TREATING SPECIALTY TS;0 POINTER Multiple #40.806
LAST EDITED: OCT 04, 1994
DESCRIPTION:
This multiple contains data as it is used in the Treating Specialty Report.
40.806,.01 TREATING SPECIALTY 0;1 POINTER TO FACILITY TREATING SPECIALTY FILE (#45.7) (Multiply asked)
INPUT TRANSFORM: I $D(X) S DINUM=+X
LAST EDITED: APR 06, 1993
HELP-PROMPT: Answer with the CENSUS Treating Specialty.
DESCRIPTION: This sub-field of the Treating Specialty multiple is a multiple and a pointer to the Facility
Treating Speciality File (#45.7)
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 40.806^B
1)= S ^DG(40.8,DA(1),"TS","B",$E(X,1,30),DA)=""
2)= K ^DG(40.8,DA(1),"TS","B",$E(X,1,30),DA)
CROSS-REFERENCE: 40.8^D
1)= S ^DG(40.8,"D",$E(X,1,30),DA(1),DA)=""
2)= K ^DG(40.8,"D",$E(X,1,30),DA(1),DA)
40.806,.02 NUMBER OF BEDS 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>500)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 500, 0 Decimal Digits
DESCRIPTION:
This sub-field of the Treating Specialty multiple is the number of beds.
40.806,.03 BEGINNING TSR PATIENTS 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 28, 1993
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits * Enter the number of patients for this
Treating Specialty on the TSR Initialization Date
DESCRIPTION: This sub-field of the Treating Specialty multiple is used to initialize the number of patients
for the TSR.
40.806,.04 TSR ORDER 0;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<.01)!(X?.E1"."3N.N) X
LAST EDITED: JAN 28, 1993
HELP-PROMPT: Type a Number between .01 and 99999, 2 Decimal Digits. This will be used to determine the order
in which treating specialties will print on the TSR.
DESCRIPTION: This sub-field of the Treating Specialty multiple will be used in the print display order of the
Treating Specialty Report by division. This field entry must be unique and greater than 0 for a
treating specialty to appear on the TSR. If the treating specialty should not be printed on the
TSR, the value in this field should be deleted.
CROSS-REFERENCE: 40.806^ATS^MUMPS
1)= S ^DG(40.8,"ATS",DA(1),$E(X,1,30),DA)=""
2)= K ^DG(40.8,"ATS",DA(1),$E(X,1,30),DA)
This Cross Reference is used to print out the Treating Specialty Report in the print order
specified by this field for each division.
40.806,10 CENSUS DATE C;0 DATE Multiple #40.807
DESCRIPTION: This sub-field of the Treating Specialty multiple is a multiple that contains the data for the
Treating Speciality G&L/BSR.
40.807,.01 CENSUS DATE 0;1 DATE (Required) (Multiply asked)
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:3990930X) X I $D(X) S DINUM=X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: TYPE A DATE BETWEEN 10/1/1987 AND 9/30/2099
DESCRIPTION: This sub-field of the Census Date multiple contains the inverse date for for informtaion stored
for this treating specialty on a specific census date.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 40.807^B
1)= S ^DG(40.8,DA(2),"TS",DA(1),"C","B",$E(X,1,30),DA)=""
2)= K ^DG(40.8,DA(2),"TS",DA(1),"C","B",$E(X,1,30),DA)
40.807,.02 PATIENTS REMAINING 0;2 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: SEP 30, 1994
HELP-PROMPT: Type a number between 0 and 99999 with 0 decimal digits indicating the number of patients
remaining in this treating specialty at the end of this census date.
DESCRIPTION: This sub-field of the Census Date multiple contains the number of patients remaining in this
treating specialty on this census date.
40.807,.03 PATIENT DAYS OF CARE [CUM] 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 28, 1993
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative Patient Days of Care in this
treating specialty from the beginning of the fiscal year to date.
40.807,.04 OPERATING BEDS [CUM] 0;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative Operating Beds in this
treating specialty from the beginning of the fiscal year to date.
40.807,.05 DISCHARGE-TOTAL [CUM] 0;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative Discharges in this treating
specialty from the beginning of the fiscal year to date.
40.807,.06 IWT LOSSES [CUM] 0;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative Inter Ward Transfers (IWT)
for this treating speciality from the beginning of the fiscal year to date.
40.807,.07 PATIENTS REMAINING [CUM] 0;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUL 14, 1993
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative Patient's Remaining for
this treating specialty from the beginning of the fiscal year to date.
40.807,.08 XRF TO OTHER TS [CUM] 0;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative Transfers to Other Treating
Speciality (XFR TO OTHER TS) for this treating specialty from the beginning of the fiscal year
to date.
40.807,.09 PASS DAYS [CUM] 0;9 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative days of Authorized Absence
<96 hours (PASS) for this treating specialty for this fiscal year to date.
40.807,.1 AUTHORIZED ABSENCE DAYS [CUM] 0;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative days of Authorized Absence
(AA) for this treating specialty for this fiscal year to date.
40.807,.11 UNAUTH. ABSENCE DAYS [CUM] 0;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 999999, 0 Decimal Digits
DESCRIPTION: This sub-field of theCensus Date multiple contains the Cumulative number of days of
Unauthorized Absence Days for this treating specialty for this fiscal year to date.
40.807,.13 TRANSFER-IN ADMITS [CUM] 0;13 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 9999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of admissioos with
movement type of Transfer In for this treating specialty for this fiscal year to date.
40.807,.14 TRANSFER-OUT DISCHARGES [CUM] 0;14 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 9999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of Discharges with
the movement type of Transfer Out for this treating specialty for this fiscal year to date.
40.807,.15 DEATHS [CUM] 0;15 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of movement type of
Death for this treating specialty for this fiscal year to date.
40.807,.16 OPT/NSC DISCHARGES [CUM] 0;16 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of movement type of
OPT/NSC Discharges for this treating specialty for this fiscal year to date.
40.807,.17 ADMISSIONS-OTHER [CUM] 0;17 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of Admissions (Other)
for this treating specialty for this fiscal year to date.
40.807,.18 ADM AFTER REHOSP>30DAYS [CUM] 0;18 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of Admission after
Rehospitalization > 30 days for this treating specialty for this fiscal year to date.
40.807,.19 RETURN FROM ASIH [CUM] 0;19 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of return from ASIH
(FROM ASIH) for this treating specialty for this fiscal year to date.
40.807,.2 SENT TO ASIH [CUM] 0;20 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative transfer To ASIH (send to
ASIH) for this treating specialty for the fiscal year to date.
40.807,.21 DISCH WHILE ASIH [CUM] 0;21 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of Discharges While
ASIH for this treating specialty for this fiscal year to date.
40.807,.22 DIED WHILE ASIH [CUM] 0;22 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of Discharges Of Died
While ASIH for this treating specialty for this fiscal year to date.
40.807,.23 XFR FROM OTHER TS [CUM] 0;23 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of Transfers From
Other Treating Specialty (XFR FROM OTHER TS) for this treating specialty for this fiscal year
to date.
40.807,.24 LOSSES-TOTAL [CUM] 0;24 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative Totals of Losses (from
transfers and discharges) for this treating specialty for this fiscal year to date.
40.807,.25 TO PASS [CUM] 0;25 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of To Pass (AA<96)
for this treating specailty for this fiscal year to date.
40.807,.26 TO AA [CUM] 0;26 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of TO AA (Authorized
Absence) to this treating specialty for this fiscal year to date.
40.807,.27 TO UA [CUM] 0;27 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative number of TO UA
(Unauthorized Absence) to this treating specialty for this fiscal year to date.
40.807,.28 GAINS-TOTAL [CUM] 0;28 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative Gains Total (from admissions
and transfers) for this treating specialty for this fiscal year to date.
40.807,.29 IWT GAINS [CUM] 0;29 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the Cumulative Inter Ward Transfers (IWT)
Gains for this treating specialty for this fiscl year to date.
40.807,1 FEMALES REMAINING 1;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: SEP 01, 1994
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the number of Female Patients Remaining at
the end of the census day (not cumulative) for this treating specailty.
40.807,2 OPERATING BEDS 1;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the number of Operating Beds at the end of
the census day (not Cumulative) for this treating specailty.
40.807,3 PATIENTS OVER 65 REMAINING 1;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUL 14, 1993
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the number of Patients Over 65 (65 years
old or greater) Remaining at the end of the census day (not cumulative) for this treating
specialty.
40.807,4 VIETNAM ERA VETS REMAINING 1;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUL 14, 1993
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the number of Patients whose period of
service indicated Vietnam Era at the end of the census day (not cumulative) for this treating
specialty.
40.807,5 PASS PATIENTS REMAINING 1;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUL 14, 1993
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the number of Patient on Pass (AA<96)
Remaining at the end of the census day (not cumulative) for this treating specialty.
40.807,6 AA PATIENTS REMAINING 1;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUL 14, 1993
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the number of AA (Authorized Absence)
Patient's Remaining at the end of the census day (not cumulative) for this treating specialty.
40.807,7 UA PATIENTS REMAINING 1;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUL 14, 1993
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the number of UA (Unauthorized Absence)
Patient's Remaining at the end of the census day (not cumulative) for this treating specialty.
40.807,8 ASIH PATIENTS REMAINING 1;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUL 14, 1993
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census Date multiple contains the number of ASIH (Absent Sick In
Hospital) Patient's Remaining at the end of the census day (not cumulative for this treating
specialty.
40.807,11 ONE DAY DISCHARGES 1;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 18, 1989
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This sub-field of the Census field multiple contains the number of One Date Discharges
(patients who were discharged with admission on the same day) at end end of the census day (not
cumulative) for this treating specialty.
40.8,100.01 TRACK INCOMPLETE SUMMARIES? DT;1 SET (Required)
'1' FOR YES;
'0' FOR NO;
LAST EDITED: AUG 13, 1991
HELP-PROMPT: Are you tracking delinquent summaries at this division?
DESCRIPTION:
Is this division using the MAS summary tracking package?
40.8,100.02 DEFAULT PRIMARY PHYSICIAN DT;2 SET (Required)
'P' FOR PRIMARY CARE PHYSICIAN;
'A' FOR ATTENDING PHYSICIAN;
LAST EDITED: APR 21, 1992
HELP-PROMPT: Enter the physician responsible for dictating the report
DESCRIPTION: Enter 'P' if the PRIMARY CARE PHYSICIAN is responsible for this summary or op report or 'A' if the
ATTENDING PHYSICIAN is responsible. If, for example, you choose ATTENDING PHYSICIAN, the ATTENDING
PHYSICIAN of record in bed control, when the summary or OP report is created, will be the default.
You may, however, edit the PHYSICIAN RESPONSIBLE at any time.
40.8,100.03 ARE REPORTS REVIEWED? DT;3 SET (Required)
'1' FOR YES;
'0' FOR NO;
LAST EDITED: FEB 07, 1991
HELP-PROMPT: Does this division require that summaries are reviewed?
DESCRIPTION: If this division requires a second physician to review the summary, respond YES, otherwise respond
NO.
40.8,100.04 DEFAULT REVIEWING PHYSICIAN DT;4 SET (Required)
'P' FOR PRIMARY CARE PHYSICIAN;
'A' FOR ATTENDING PHYSICIAN;
LAST EDITED: FEB 07, 1991
HELP-PROMPT: Enter the type of physician responsible for reviewing the summary.
DESCRIPTION: If summaries require review, enter the PRIMARY or ATTENDING physician responsible. If, for
example, you choose ATTENDING PHYSICIAN, the ATTENDING PHYSICIAN of record in bed control, when the
summary or OP report is created, will be the default.
40.8,100.05 TRACK OUTPATIENT OP REPORTS? DT;5 SET (Required)
'1' FOR YES;
'0' FOR NO;
LAST EDITED: FEB 07, 1991
HELP-PROMPT: Do you want to allow entry of outpatient op reports into the tracking system?
DESCRIPTION:
If you want to track outpatient op reports at this division, respond YES. Otherwise, respond NO.
40.8,100.06 DAYS FOR DICTATION DT;6 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUN 20, 1991
HELP-PROMPT: Type a Number between 0 and 99, 0 Decimal Digits
DESCRIPTION:
Enter the number of days the physician has to dictate a summary before it is considered incomplete.
40.8,100.07 DAYS FOR SIGNATURE DT;7 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUN 20, 1991
HELP-PROMPT: Type a Number between 0 and 99, 0 Decimal Digits
DESCRIPTION: Enter the number of days from the date of transcription the physician has in order to sign the
summary or op report.
40.8,100.08 DAYS FOR REVIEW DT;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JUN 20, 1991
HELP-PROMPT: Type a Number between 0 and 99, 0 Decimal Digits
DESCRIPTION:
Enter the number of days the reviewing physician has to review the report once it has been signed.
40.8,100.09 INCOMPLETE SUMMARIES MESSAGE DT;9 FREE TEXT
INPUT TRANSFORM: K:$L(X)>99!($L(X)<1) X
LAST EDITED: AUG 13, 1991
HELP-PROMPT: Answer must be 1-99 characters in length.
DESCRIPTION: This field contains the message that the facility wants displayed at the end of each page for each
type of report.
40.8,100.1 DEFAULT PHYS. FOR SIGNATURE DT;10 SET (Required)
'P' FOR PRIMARY CARE PHYSICIAN;
'A' FOR ATTENDING PHYSICIAN;
LAST EDITED: FEB 11, 1993
DESCRIPTION: This is a new field in file 40.8 the MEDICAL CENTER DIVISION file. This field will be asked in the
Set Up IRT Parameters option and will be used to store the default of the physician who will be
responsible for the signature of a deficiency. It will be either the Primary or the Attending
physician.
40.8,100.2 STD. DEFIC. FOR SHORT FORMS? DT;11 SET (Required)
'1' FOR YES;
'0' FOR N;
LAST EDITED: JUL 13, 1993
HELP-PROMPT: Entering 'Yes' will cause the IRT Background Job to create standard deficiencies for short forms.
DESCRIPTION: By entering yes in this field, the IRT Backgroud Job will create standard deficiencies for short
form discharges ( discharged less than 48 hours after admission). If you enter no in this field
the standard deficiencies will not be created for short forms in the IRT Background Job.
40.8,100.3 DEFAULT MEDICAL RECORD TYPE DT;12 POINTER TO RECORD TYPES FILE (#195.2)
LAST EDITED: OCT 22, 2001
HELP-PROMPT: Enter the Division's default record type for Medical records.
DESCRIPTION: Incomplete Records Tracking will use this entry as the default Medical record type for Division
when pulling patient information. If blank, MEDICAL RECORD will be default value.
40.8,900.01 RAI SUBSCRIPTION NUMBER RAI;1 POINTER TO SUBSCRIPTION CONTROL FILE (#774)
LAST EDITED: NOV 02, 1999
HELP-PROMPT: Enter the HL7 subscription registy number
DESCRIPTION: This field points to the subscribing RAI/MDS COTS system subscription registry for patient updates.
This subscription control number is specific to this division. Do not change the control number
once set up as this will prevent the COTS system from being updated by VistA. Use only documented
API calls to create or retrieve the subscription control number.
FILES POINTED TO FIELDS
FACILITY TREATING SPECIALTY
(#45.7) TREATING SPECIALTY:TREATING SPECIALTY (#.01)
INSTITUTION (#4) INSTITUTION FILE POINTER (#.07)
NEW PERSON (#200) PRF OWNERSHIP EDITED BY (#26.03)
RECORD TYPES (#195.2) DEFAULT MEDICAL RECORD TYPE (#100.3)
SUBSCRIPTION CONTROL (#774) RAI SUBSCRIPTION NUMBER (#900.01)
File #40.8
Record Indexes:
APRF (#693) RECORD REGULAR IR SORTING ONLY
Short Descr: Index the INSTITUTION and PRF ASSIGNMENT OWNERSHIP fields.
Set Logic: S ^DG(40.8,"APRF",X(1),X(2),DA)=""
Set Cond: S X=X2(2)=1
Kill Logic: K ^DG(40.8,"APRF",X(1),X(2),DA)
Kill Cond: S X=X2(2)=0
Whole Kill: K ^DG(40.8,"APRF")
X(1): INSTITUTION FILE POINTER (40.8,.07) (Subscr 1) (forwards)
X(2): PRF ASSIGNMENT OWNERSHIP (40.8,26.01) (Subscr 2) (forwards)
INPUT TEMPLATE(S):
DGJ IRT PARAMETERS OCT 22, 2001@09:03 USER #0
DGTS SEP 22, 1995@15:33 USER #0 ^DGXTS
PRINT TEMPLATE(S):
ECX DIV EXPORT JUN 24, 2019@15:22 USER #0 @@
ECX DIV PRINT MAY 29, 2019@11:60 USER #0 MEDICAL CENTER DIVISION List
IB DIVISION DISPLAY FEB 05, 1992@17:22 USER #10882^IBXDIVD MEDICAL CENTER DIVISION BILLING LIST
Displays wage rates and locality modifer data for a division.
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):