Global: ^DG(43

FileMan FileNo	FileMan Filename	Package
43	MAS PARAMETERS	Registration

Package	Total	Routines
Registration	130	DG10 DG1068P DG53208P DGPREBJ DGREG0 ^DG(405.4 DG53164P DG53211P DG53686P DG53734P DG53818P DG53833P DG53848P DGAINP1 DGBUL DGPTMSG DGPTMSG1 DGRPCK ^DG(43 ^DIC(42 *CARE COSTS CLINIC EXCLUSION DG DEVICE SELECTION DG1010PA DG1039P DG531087P DG53110P DG531110P DG53150P DG53260P DG53337P DG53429P DG53486P DG53551P DG53591 DG53768P DG53798P DG53858P DG53860P DG53875P DG53910P DG53922P DG53930P DG5393PT DG53949P DG53973P DG53995P DGA400 DGA4001 DGA4002 DGABUL DGANHD1 DGDIS DGDISPL DGEN DGENELA4 DGENRPD1 DGFI DGGECS DGGECSA DGMTCOU DGMTDD DGMTOFA DGMTR DGMTR1 DGMTREQB DGMTSCU DGMTU4 DGMTUTL DGODMT DGOIL DGPAR DGPF ENABLE DIVISIONS DGPMBSAB DGPMGL DGPMGL1 DGPMGL5 DGPMHST DGPMTSR DGPREBJ1 DGPREP0 DGPREP3 DGPREP4 DGPTCO2 DGPTOD0 DGPTUTL DGPWB DGREG DGREG00 DGREGE DGREGFAC DGRPC DGRPC2 DGRPCR DGRPCS DGRPCU DGRPD DGRPP1 DGRPTU DGRPV DGRRLU1 DGRUGBGJ DGRUGC1 DGRUGDR DGRUGGR DGRUUTL DGSEC DGSEC1 DGSEC3 DGSEC4 DGSILL DGSTAT DGTSSET DGUTL DGVPP DGWIN DGYKPP DGYXPP ELIGIBILITY EXCLUSION EXCLUDE WHICH TERMINAL TYPES? PROVIDER CONVERSION ROUTINE SCHEDULING ARCHIVE DATE VADPT VAFCDODA VAFHPIV2 VAFHPOST VAFHPST1 VAFHPURG VAFHUTL
Scheduling	52	SCCVEAE3 SCDXMSG2 SCDXPRN2 SCENI0 SCENI01 SCMSPEN SCMSPU1 SCRPIUT1 SCRPW17 SCRPW8 SCRPW9 SD53121 SDAM1 SDAM2 SDAM3 SDAMA308 SDAMEVT1 SDAMO SDAMOCC SDAMODO SDAMOW SDAMQ SDAMQ1 SDAMQ3 SDAMU SDBT SDCLAV0 SDCLAV1 SDCNL SDCO20 SDDIV SDEC40 SDEC50 SDES2SETCHECKOUT SDESAPPTLETTERS SDESCHECKOUT SDLT SDLTP SDM1A SDNOS SDNOS0 SDNOS1A SDNOS2 SDOPC4 SDOQMP0 SDPARM2 SDPCE2 SDUTL SDVPT SDVSIT SDYDPOST SDYMPOST
Beneficiary Travel	13	DGBTCD DGBTCR DGBTCSL DGBTDIST DGBTDIV DGBTDLT1 DGBTE DGBTEE1 DGBTEE2 DGBTMTTH DGBTOA1 DGBTOA2 DGBTR17
Income Verification Match	9	IVM20E IVMCME2 IVMCME5 IVMCMF1 IVMCMF3 IVMCMZ IVMPBUL IVMUCHK2 IVMUCHK5
Automated Information Collection System	7	IBDF14 IBDF15 IBDF1B IBDFCNOF IBDFFT IBDFOSG IBDFREG
Integrated Billing	7	IB20PRE IB20PT86 IBAMTED IBCNEDE6 IBCSCU IBJDIPR IBODIV
Incomplete Records Tracking	6	DGJBGJ1 DGJOPRT DGJOTP DGJPDEF DGJTDEL DGJTEE
HINQ	3	DVBHCE DVBHQZ4 DVBHT2
Fee Basis	2	FBAA ADDRESS EDIT ^FBAA(163.98
Kernel	2	^DIC(19 ^VA(200
PCE Patient Care Encounter	2	PXBAPI22 VSITCK1
Text Integration Utility	2	TIULA TIULA1
Automated Medical Information Exchange	1	DVBAXA
Enrollment Application System	1	EASECSCU
Health Summary	1	GMTSFHWZ
Lab Service	1	LRPARAM
Oncology	1	ONCOCON
Problem List	1	GMPLNTRT

Package	Total	Routines
Registration	52	DG1039P DG1068P DG531018P DG531087P DG53110P DG531110P DG53150P DG53211P DG53260P DG53337P DG53429P DG53486P DG53551P DG53686P DG53734P DG53768P DG53798P DG53818P DG53833P DG53848P DG53860P DG53875P DG53910P DG53922P DG53930P DG53949P DG53973P DG53995P DG903PST DGBUL DGPAR DGPAR1 DGPHSTAT DGPMBSAB DGPMBSAR DGPMBSR DGPMBSR1 DGPMGL1 DGPMGL5 DGPMGLP DGPTRAM DGQPT2 DGRP6EF DGRPC2 DGRRLU2 DGRUADT DGRUADT0 DGRUADT2 DGRUPAR VAFCDODA VAFHPOST VAFHPURG
Beneficiary Travel	8	DGBT1 DGBT1P9 DGBTEF1 DGBTR121 DGBTR123 DGBTR125 DGBTUTL DGBTUTL1
Scheduling	7	SD53138B SDES2GETSTATUS SDES2SETCHECKOUT SDESAPPTLETTERS SDESCHECKOUT SDPARM SDPARM2
DSS Extracts	3	ECXAADM ECXAMOV ECXANUR
Barcode Medication Administration	2	PSBMD PSBMMRB
Clinical Information Resource Network	1	RGADTP
Incomplete Records Tracking	1	DGJBGJ
Integrated Billing	1	IBARXEU
Network Health Exchange	1	AFJXALRT
Order Entry Results Reporting	1	ORQPT2

Package	Total	FileMan Files
Registration	5	MEDICAL CENTER DIVISION(#40.8)[12] WARD LOCATION(#42)[3] FACILITY TREATING SPECIALTY(#45.7)[1000.1] ELIGIBILITY CODE(#8)[#43.08(.01)] PATIENT(#2)[213]
Kernel	4	TERMINAL TYPE(#3.2)[#43.077(.01)] SERVICE/SECTION(#49)[919] STATE(#5)[914] NEW PERSON(#200)[603, 720, 907]
Health Summary	1	HEALTH SUMMARY TYPE(#142)[43]
MailMan	1	MAIL GROUP(#3.8)[215, 216, 217, 226, 500, 501, 502, 503, 504, 505, 506, 507, 508, 509, 510, 511, 512, 513, 906, 908]
Scheduling	1	HOSPITAL LOCATION(#44)[213, #43.04(.01)]
VA FileMan	1	INPUT TEMPLATE(#.402)[70]

Fields, Total: 163

Field #	Name	Loc	Type	Details
.001	NUMBER		NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>1)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `MAY 27, 1986` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 1 AND 1` DESCRIPTION: `There is only one 'number' in the MAS Parameters File at this time, and that is the number 'one' denoting there is only on MAS Parameter. The labels are subfields of this one parameter.`
.01	ONE	0;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>1)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `APR 15, 1986` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 0 AND 1` DESCRIPTION: `'One' designates the 'one' MAS Parameter. There can only be one set of parameters.` CROSS-REFERENCE: `43^B` `1)= S ^DG(43,"B",$E(X,1,30),DA)=""` `2)= K ^DG(43,"B",$E(X,1,30),DA)`
3	HEMODIALYSIS WARD	0;4	POINTER TO WARD LOCATION FILE (#42)	WARD LOCATION(#42) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,3)=""M""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `APR 13, 1984` DESCRIPTION: `Does your facility have a Hemodialysis Ward?` SCREEN: `S DIC("S")="I $P(^(0),U,3)=""M"""` EXPLANATION: `Ward must be in Medical Service`
4	SYSTEM TIMEOUT	0;5	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<10)!(X?.E1"."1N.N) X` LAST EDITED: `DEC 03, 1983` HELP-PROMPT: `Enter the amount of time you want to allow the data entry clerk to answer the questions. The lowest the amount of time can be is 10 seconds. If you want no timeout, enter 99999.` DESCRIPTION: `Enter number of seconds to wait for user to respond to prompts (at least 10 seconds). Enter 99999 if you wish no system timeout.`
5.5	DAYS TO MAINTAIN G&L CORR	0;29	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>365)!(X<14)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 10, 1986` HELP-PROMPT: `Type the number of days to maintain the G&L correction log (14-365). Leave blank if you want to maintain the complete file` DESCRIPTION: `Enter the number of days you want to save G&L corrections in the system (between 14 and 365); corrections older than this number are deleted by the system when G&L Auto-Recalculation runs. Leave blank if you wish to` `maintain the complete file. Up to 90 days is recommended.`
6	TIME FOR LATE DISPOSITION	0;7	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>240)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `DEC 09, 1983` HELP-PROMPT: `Enter the number of hours that is allowed to elapse before a disposition is considered to be late, between 0 and 240.` DESCRIPTION: `Enter the number of hours you want an active registration to remain open before the disposition is considered late (between 0 and 240).`
7	SUPPLEMENTAL 10/10	0;8	SET	'1' FOR DO NOT PRINT WITH 10 10; '0' FOR PRINT WITH 10 10; LAST EDITED: `JUN 25, 1986` HELP-PROMPT: `Enter 1 if you do NOT want supplemental 10 10 printed with 10 10` DESCRIPTION: `Do you wish Supplemental 10-10 to be printed wtih 10-10?`
8	PRINT DRUG PROFILES WITH 10-10	0;17	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `FEB 17, 1984` HELP-PROMPT: `If you have selected a free-form 10-10 and would like to be asked to print drug profiles as well, enter a YES here.` DESCRIPTION: `Do you wish to have printing of drug profiles prompted with 10-10 printing?`
9	DEFAULT PTF MESSAGE PRINTER	0;19	FREE TEXT	INPUT TRANSFORM: `S L=X,X=$P(X,";",1),DIC=3.5,DIC(0)="EQ" D ^DIC K:Y'>0!(X=" ") X S:$D(X) X=X_$S(L[";":";"_$P(L,";",2,99),1:"") S DIC=DIE K L` LAST EDITED: `JAN 27, 1986` HELP-PROMPT: `Enter the device number to print MAS PTF messages on.` DESCRIPTION: `If you answered YES to the 'PRINT PTF MESSAGES?' prompt select the default device to which these message should print. This device will be used in cases where a specific device is not entered for the individual` `facility/division using the 'DEVICE SELECTION' option of the SYSTEM DEFINITION MENU.` EXECUTABLE HELP: `S DIC=3.5,DIC(0)="E",X="?" D ^DIC S DIC=DIE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
9.5	PRINT PTF MESSAGES?	0;31	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `APR 08, 1987` DESCRIPTION: `Enter '1' if you wish to print PTF messages upon admission, change of treating specialty or deletion of admission, treating specialty transfer, discharge or 501 movement. Enter '0' if you DO NOT wish PTF messages to` `print.`
9.6	AUTOMATIC PTF MESSAGES?	0;40	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `MAR 19, 1990` DESCRIPTION: `This field indicates whether the site wants to automatically generate PTF messages as part of normal ADT processing.` `If 'YES' than entries into the PTF MESSAGE file will occur. If 'NO' than no PTF messages will be generated during ADT activities.`
10	EARLIEST DATE FOR G&L	GL;1	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:3990930X) X` LAST EDITED: `MAY 10, 1993` HELP-PROMPT: `TYPE A DATE BETWEEN 10/1/1990 AND 9/30/2099` DESCRIPTION: `Enter the earliest date for G&L to be run on. The day previous to this will be used for ward bed status data initialization.`
11	MULTIDIVISION MED CENTER?	GL;2	SET	**********************REQUIRED FIELD********************** '0' FOR NO; '1' FOR YES; LAST EDITED: `NOV 21, 1983` HELP-PROMPT: `Enter '1' if this is a multidivision medical center, '0' if it is not.` DESCRIPTION: `Is your facility multi-divisional?`
12	MEDICAL CENTER NAME	GL;3	POINTER TO MEDICAL CENTER DIVISION FILE (#40.8)	**********************REQUIRED FIELD********************** MEDICAL CENTER DIVISION(#40.8) LAST EDITED: `JUN 06, 1986` HELP-PROMPT: `Enter the primary medical center number for your medical center.` DESCRIPTION: `Enter name of primary facility for which you are defining parameters.`
13	AFFILIATED	GL;4	SET	**********************REQUIRED FIELD********************** '0' FOR NO; '1' FOR YES; '2' FOR INTERMEDIATE; LAST EDITED: `DEC 11, 1985` HELP-PROMPT: `Enter 'Y' if your medical center is associated with a teaching facility, 'N' if it is not, 'I' if Intermediate` DESCRIPTION: `Is your facility affiliated with a teaching facility?`
14	*HONEYWELL SITE	H;1	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `DEC 03, 1991` HELP-PROMPT: `Enter 'Y' is you have been running ADT/S and Lab on a Honeywell and plan to transmit data back to it until Lab is available on DHCP.` DESCRIPTION: `This field is currently unused by the MAS package and will be deleted in a future release of MAS. It was previously used to determine whether the honeywell software should be utilized or not.`
15	NURSING HOME WARDS?	0;20	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `AUG 15, 1984` HELP-PROMPT: `Enter 'Y' if you medical center will contain nursing home wards, 'N' if not.` DESCRIPTION: `Does your site have nursing home wards?`
16	DOMICILIARY WARDS?	0;21	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `AUG 15, 1984` HELP-PROMPT: `Enter 'Y' if your medical center will contain domiciliary wards, 'N' if not.` DESCRIPTION: `Does your medical center have domiciliary wards?`
17	USE HINQ INQUIRY?	0;27	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `OCT 25, 1985` HELP-PROMPT: `Enter yes if you want HINQ prompt on registration.` DESCRIPTION: `Determines if HINQ inquiry can be made on registration.`
18	EMBOSSERS ON-LINE	0;28	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `NOV 20, 1985` HELP-PROMPT: `Enter Yes if Embossers are on-line, No if they are not.` DESCRIPTION: `Do you wish to have embossing of data card prompted during registration options?`
19	USE CLOSEST PRINTER	0;30	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `FEB 24, 1986` HELP-PROMPT: `Enter 'Y' if you want to use closest printer as default 10 10,routing slip and pharmacy profile printers.` DESCRIPTION: `Do you wish closest printer to be default for 10-10s, routing slips and pharmacy profiles?`
25	DEFAULT CODE SHEET PRINTER	0;25	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: `MAR 25, 1991` HELP-PROMPT: `Enter the device number to print MAS AMIS Code Sheets when generating AMIS segments 334-341, 345&346 and 401-420.` DESCRIPTION: `If a 'Default Code Sheet Printer' is defined, AMIS code sheets can be generated when AMIS(s) are generated. The Code Sheets created will be printed on the default printer.` EXECUTABLE HELP: `S DIC=3.5,DIC(0)="EM",X="?" D ^DIC S DIC=DIE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
32	VIEW CHECK OUT INFO DEFAULT	0;32	SET	**********************REQUIRED FIELD********************** '0' FOR NO; '1' FOR YES; LAST EDITED: `MAR 30, 1998` DESCRIPTION: `During the editing of a disposition, should the user default answer be 'Yes' or 'No' to the following prompt:` `'Do you wish to see the check out screen?'`
33	DAYS TO MAINTAIN SENSITIVITY	0;33	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>365)!(X<30)!(X?.E1"."1N.N) X` LAST EDITED: `AUG 17, 1987` HELP-PROMPT: `Type a Number between 30 and 365, 0 Decimal Digits` DESCRIPTION: `Enter number of days for which sensitivity data must be maintained on line before purging is permitted.`
34	SHOW STATUS SCREEN	0;34	SET	**********************REQUIRED FIELD********************** '0' FOR NO; '1' FOR YES; LAST EDITED: `MAR 14, 1988` DESCRIPTION: `Do you want the MAS Status Screen to be displayed to users upon entering the ADT Menu?`
37	CONSISTENCY CHECKER ON?	0;37	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `AUG 29, 1988` HELP-PROMPT: `For those options which access the patient file consistency checker do you want it executed or no.` DESCRIPTION: `Do you wish to turn on the automatic Consistency Checker? If YES, data will be checked in accordance with parameters set through the Determine Consistencies to Check/Don't Check option of the Consistency Supervisor Menu.`
38	ABBREVIATED PATIENT INQUIRY?	0;38	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `SEP 29, 1988` HELP-PROMPT: `Enter YES if you want an abbreviated Patient Inquiry versus the detailed one.` DESCRIPTION: `Do you wish an abbreviated patient inquiry to be displayed through the Patient Inquiry Option? An abbreviated inquiry will include the following: name, SSN, date of birth, address, temporary address, means test status,` `eligibility status, admission and appointment enrollment information. Items such as religion, claim number and period of service will be excluded.`
39	ASK DEVICE IN REGISTRATION	0;39	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `SEP 08, 1989` DESCRIPTION: `Answering YES will force the DEVICE: prompt at the beginning of registration the first time through and will set the 1010, routing sheet, and profile printer to this device. This takes precedence over all devices defined` `as default printers or closet printer.`
41	RUN CO-PAY SOFTWARE?	0;41	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `FEB 08, 1993` HELP-PROMPT: `This should be 'YES' unless directed to turn off Co-Pay software.` DESCRIPTION: `This will prevent the Co-Pay menus and routines from being invoked by the Registration software.` TECHNICAL DESCR: `If this is set to 'NO', Co-Pay related calls will not be invoked.` `WRITE AUTHORITY: ^`
42	PRINT HEALTH SUMMARY?	0;42	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `MAY 27, 1993` HELP-PROMPT: `If you have selected a free-form 10-10 and would like to be asked to print a Health Summary as well, enter a YES here.` DESCRIPTION: `By answering 'YES' the user will be prompted to print a Health Summary at the end of the Registration process and during the 10/10 Print without New Registration option. NOTE: Unless HEALTH SUMMARY v2.5 patch #3 (or` `higher) has been loaded the user will not be prompted to print a Health Summary.`
43	DEFAULT HEALTH SUMMARY	0;43	POINTER TO HEALTH SUMMARY TYPE FILE (#142)	HEALTH SUMMARY TYPE(#142) LAST EDITED: `MAY 27, 1993` HELP-PROMPT: `Indicate the default prompt for Health Summary prints in Registration.` DESCRIPTION: `When the user is prompted to print a Health Summary type in Registration, this field contains the default. NOTE: Unless the MAS PARAMETER, 'PRINT HEALTH SUMMARY?', has been answered 'YES', this has no effect.`
44	CHOICE OF DRUG PROFILE TYPE?	0;44	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `MAY 27, 1993` HELP-PROMPT: `If YES is entered for the PRINT DRUG PROFILES WITH 10-10 field, answering YES to this field will offer the user a choice between the Action and Informational Drug Profiles.` DESCRIPTION: `If YES is entered for the PRINT DRUG PROFILES WITH 10-10 field, answering YES to this field will offer the user a choice between the Action and Informational Drug Profiles. Note: Unless the PRINT DRUG PROFILES WITH 10-10` `has been answered 'YES', this field will have no effect.` TECHNICAL DESCR: `If this is not answered, the software functions as if NO had been answered.`
45	DEFAULT TYPE OF DRUG PROFILE	0;45	SET	'A' FOR ACTION; 'I' FOR INFORMATIONAL; LAST EDITED: `MAY 27, 1993` HELP-PROMPT: `If PRINT DRUG PROFILES WITH 10-10 is YES, this field defines the Drug Profile to print (or the default if CHOICE OF DRUG PROFILE TYPE? is YES).` DESCRIPTION: `This field is irrelevant unless the PRINT DRUG PROFILES WITH 10-10 field has been answered 'YES'. If the user has a choice of Drug Profiles (when CHOICE OF DRUG PROFILE TYPE? is YES) this field defines the default. If the` `user does not have a choice of Drug Profiles, this field defines the type of Drug Profile (Action or Informational).` TECHNICAL DESCR: `This field is irrelevant unless the PRINT DRUG PROFILES WITH 10-10 field has been answered 'YES'. If the user has a choice of Drug Profiles (when CHOICE OF DRUG PROFILE TYPE? is YES) this field defines the default. If the` `user does not have a choice of Drug Profiles, this field defines the type of Drug Profile (Action or Informational).`
46	DAYS TO UPDATE MEDICAID	0;46	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 14, 1993` HELP-PROMPT: `Type a number between 1 & 999 for the maximum number of days without updating Medicaid (without causing an inconsistency).` DESCRIPTION: `After this number of days without updating the DATE MEDICAID LAST ASKED field an inconsistency will be created. The default is 365 days.`
47	PRINT ENCOUNTER FORM AT REG.	0;47	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `FEB 05, 1996` DESCRIPTION: `Answering "YES" will have the prompt Print Encounter Form be asked at Registration. If the encounter form is said to be printed, the clinic(s) to print the encounter forms will be asked.` TECHNICAL DESCR:
48	DEFAULT EF PRINTER	0;48	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: `JAN 22, 1996` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: `This field contains the name of the default printer that will print encounter forms at registration.` TECHNICAL DESCR: EXECUTABLE HELP: `S DIC=3.5,DIC(0)="EM",X="?" D ^DIC S DIC=DIE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
50	G&L STARTED	GLS;1	DATE	INPUT TRANSFORM: `S %DT="ETX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 19, 1985` DESCRIPTION: `The date/time the Gains and Losses Sheet was started by a user through the ADT Outputs menu option.`
52	RECALC STARTED	GLS;2	DATE	INPUT TRANSFORM: `S %DT="ETX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 30, 1985` DESCRIPTION: `The date/time G&L recalculation was started. A user would recalc a G&L for past dates normally.`
53	RECALC UP TO	GLS;3	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 30, 1985` DESCRIPTION: `Date G&L recalculation has reached cleared when recalc is finished.`
54	ZTSK(RECALC)	GLS;4	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 30, 1994` HELP-PROMPT: `Type a Number between 0 and 9999999999, 0 Decimal Digits` DESCRIPTION: `The task number of the G&L recalculation job running.`
55	SCHEDULED(RECALC)	GLS;5	DATE	INPUT TRANSFORM: `S %DT="ET" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `OCT 17, 1985` DESCRIPTION: `The date/time the G&L recalculation is scheduled to run. It is a nightly background job usually set to run sometime after midnight each day.`
56	CPU(RECALC)	GLS;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<1) X` LAST EDITED: `OCT 24, 1985` HELP-PROMPT: `ANSWER MUST BE 1-4 CHARACTERS IN LENGTH` DESCRIPTION: `CPU recalc was started from`
57	AUTO RECALC LAST STARTED	GLS;7	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAR 18, 1993` DESCRIPTION: `The date/time that Auto Recalc was last started for the G&L stats.`
58	CPU(AUTO RECALC)	GLS;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<1) X` LAST EDITED: `OCT 24, 1985` HELP-PROMPT: `ANSWER MUST BE 1-4 CHARACTERS IN LENGTH` DESCRIPTION: `CPU which last ran auto recalc`
59	AUTO RECALC FINISHED	GLS;9	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAR 12, 1993` HELP-PROMPT: `This is the Date/Time the G&L Auto Recalc finished running.`
60	AUTO RECALC BACK TO	GLS;10	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAR 12, 1993` HELP-PROMPT: `When the G&L Auto Recalc last ran this is the date it went back to for recalculation of the stats.` DESCRIPTION: `When the G&L Auto Recalc last ran, this is the date it went back to for recalculation of the stats.`
61	G&L LAST RUN	GLS;11	DATE	INPUT TRANSFORM: `S %DT="ET" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `OCT 24, 1985` DESCRIPTION: `Time G&L was run last.`
70	REGISTRATION TEMPLATE (LOCAL)	0;35	POINTER TO INPUT TEMPLATE FILE (#.402)	INPUT TEMPLATE(#.402) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),""^"",4)=2" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `JUL 22, 1988` HELP-PROMPT: `Select name of template you want to appear at end of each registration (optional).` DESCRIPTION: `A site may need to capture certain registration data in a format other than that of the distributed registration screens. It may do so by creating a local registration screen (through a FileMan template) specifying that` `data in the PATIENT file they wish to capture. The template name should be specified at this prompt. This screen will then be prompted during the registration or load/edit process at the end of the other registration` `screens.` SCREEN: `S DIC("S")="I $P(^(0),""^"",4)=2"` EXPLANATION: `SELECT TEMPLATES FROM FILE 2 (PATIENT) ONLY!`
76	USE HIGH INTENSITY ON SCREENS?	0;36	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `JUN 28, 1988` HELP-PROMPT: `Should reverse video be used for those options in MAS which allow it?` DESCRIPTION: `Should high intensity be used for those options in MAS which allow it? This feature works in conjunction with the Registration and MCCR screens to signify to users that data which may/may not be edited. Under certain` `circumstances some screens or individual data groups may only be edited by selected users. When this feature is turned on, those screens and/or data group numbers which a specific user may edit will be 'highlighted' on` `their terminal but not 'highlighted' to those users who may not edit the screens/data groups.`
77	EXCLUDE WHICH TERMINAL TYPES?	TERM;0	POINTER Multiple #43.077	43.077 DESCRIPTION: `If the USE HIGH INTENSITY ON SCREENS field has been set to YES, you may wish to exclude it from being used on certain terminal types. If so, at this prompt you should specify the terminal type(s) which should not use high` `intensity. This field allows you to specify multiple terminal types. You will be returned to it repeatedly until no more entries are made.`
80	CONSISTENCY PURGE STARTED	CON;1	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAR 12, 1987` DESCRIPTION: `The date the purging of the INCONSISTENT DATA file was started.`
81	CONSISTENCY PURGE LAST RAN	CON;2	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `The date the INCONSISTENT DATA purge last completed.`
82	CONSISTENCY REBUILD STARTED	CON;3	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `The date the INCONSISTENT DATA file was started rebuilding.`
83	CONSISTENCY REBUILD LAST RAN	CON;4	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `The date the INCONSISTENT DATA file last completed rebuilding.`
84	CONSISTENCY UPDATE STARTED	CON;5	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `The date updating of existing data in the INCONSISTENT DATA file was last started.`
85	CONSISTENCY UPDATE LAST RAN	CON;6	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `The date updating of existing data in the INCONSISTENT DATA file last completed running.`
86	OVERDUE ABSENCE SEARCH DATE	CON;7	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAY 27, 1987` DESCRIPTION: `Date the overdue absence list was run. An overdue absence list produces those veterans who have been placed on either AA<96 hrs. or AA and have not returned on the date entered as their return date.`
90	PROVIDER CONVERSION	PCON;0	Multiple #43.02	43.02 DESCRIPTION: `This Multiple will contain parameters used for the conversion of MAS files from file 3, 6, and 16 to file 200.`
91	PROVIDER CONVERSION LOG	PCL;0	WORD-PROCESSING #43.091	TECHNICAL DESCR: `This field will not be deleted until the end of the conversion process. So, if the conversion is re-started then entries will be appended to the text in this message. The assumption is that the field is empty at the time` `the conversion is started so that if the conversion is re-started it is appended to valid data.` LAST EDITED: `JAN 28, 1993`
205	SCHEDULING VERSION	SCLR;5	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<0)!(X?.E1"."3N.N) X` LAST EDITED: `SEP 18, 1986` HELP-PROMPT: `TYPE A NUMBER BETWEEN 0 AND 99` DESCRIPTION: `This is the Version number of the currently loaded Scheduling DHCP software.`
210	SCHEDULING ARCHIVE DATE	SDAR;0	DATE Multiple #43.05	43.05 DESCRIPTION: `This field contains the dates, status, and summary information for the Scheduling archive process.`
212	APPT SEARCH THRESHOLD	SCLR;12	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>30)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `OCT 24, 1991` HELP-PROMPT: `Type the number of days between 1 and 30.` DESCRIPTION: `Enter the number of days in the past that the 'Appointment Management' option should initially search for appointments.` `When the user selects a patient, this parameter will automatically be used to search that many days in the past for appointments.` `When a clinic is selected, this number will be used to calculate the default beginning date. The user is prompted for a beginning and ending date when a clinic is selected.` `If this field is not entered, then the system will use 2 days.`
213	PATIENT OR CLINIC	SCLR;13	VARIABLE POINTER	PATIENT(#2) HOSPITAL LOCATION(#44) EXPLANATION: `Used to check if input is a RT barcode.` `SCREEN ON FILE 44: S DIC("S")="I $P(^(0),U,3)=""C"",'$G(^(""OOS""))"` EXPLANATION: `Only clinics which are not occasion of service clinics allowed.` LAST EDITED: `JAN 31, 1992` DESCRIPTION: `This field definition is used by the 'Appointment Management' option. The option obtains a patient or clinic when using the FileMan Reader. This field is specified in the Reader call.` `No data needs to be set in this field.`
215	APPT. UPDATE MAIL GROUP	SCLR;15	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `MAR 19, 1992` HELP-PROMPT: `Select the name of the Mail Group which should be notified whenever the Appointment Status Update job has been completed.` DESCRIPTION: `This is the name of the Mail Group which should be notified whenever the Appointment Status Update job has been completed.`
216	NPCDB MAIL GROUP	SCLR;16	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `MAR 27, 1998` HELP-PROMPT: `Select the name of the Mail Group which should be notified whenever the generation of the NPCDB update has been completed.` DESCRIPTION: `This is the name of the Mail Group which should be notified whenever the nightly NPCDB job has been completed.`
217	LATE ACTIVITY MAIL GROUP	SCLR;17	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `APR 13, 1992` DESCRIPTION: `This is the name of the Mail Group which should be notified whenever there is late entry/edit of NPCDB related information.` `'Late entry' is defined as information entered after the workload close out date has passed.` `For example, if an appointment is made after the close out date has passed for the appointment date then the members of this mail group will receive a message.`
223	DATE CHECK OUT REQUIRED	SCLR;23	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X I $D(X),X>2931001 K X` LAST EDITED: `MAR 25, 1993` HELP-PROMPT: `Enter the date that the site must start checking out appointments.` DESCRIPTION: `This field indicates the date the site must start checking out appointments, stop code additions (add/edits) and registrations (1010 and unscheduled). Once v5.3 is released then this date will be Oct. 1, 1993.` `However, for alpha and beta testing, this date needs to be set before 10/1/93.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
224	ALLOW UP-ARROW OUT OF CLASS.	SCLR;24	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `JUN 01, 1993` DESCRIPTION: `Enter 'YES' to allow users to up-arrow out of the classification questions. The classification questions are required for workload credit. Allowing the user to exit without answering these questions could result in` `additional work at a later time to track down the record and determine the answer to these questions.`
226	API ERRORS MAIL GROUP	SCLR;26	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `MAY 04, 1994` HELP-PROMPT: `Enter the Mail Group that will receive notification messages from the Scheduling API.` DESCRIPTION: `This field is used to indicate which Mail Group should receive any notifications produced by the Outpatient API.` `Field 'API NOTIFICATIONS TO PROCESS (#227)' indicates the type of notifications should result in a MailMan message.`
227	API NOTIFICATIONS TO PROCESS	SCLR;27	SET	'E' FOR ERRORS ONLY; 'WE' FOR WARNINGS & ERRORS; 'N' FOR NONE; LAST EDITED: `MAY 04, 1994` HELP-PROMPT: `Enter the type of notification messages the Scheduling API should process.` DESCRIPTION: `This field indicates which notification messages from the Outpatient API should be sent to the appropriate Mail Group. The Mail Group is specified in the 'API ERROR MAIL GROUP (#226)' field.` `Possible answers are the following:` `ERRORS - send just error notifications` `WARNINGS & ERRORS - send warning and error notifications` `NONE - do not send any notifications` `Error Definition:` `-----------------` `Before an event is processed, the data passed to the API is analyzed. If any problems are found that cause the event processing not to occur then the problem is reported back to the calling application as 'errors'.` `An example of an 'error' would be an invalid DFN number for a patient.` `Warning Definition:` `-------------------` `During the processing of an event, certain data passed to the API can be found to be inappropriate or inaccurate but was not crucial to the processing of the event. These types of problems are reported back to the calling` `application as 'warnings'.` `An example of a 'warning' would be Agent Orange(AO) exposure information passed for an encounter that did not require AO information.`
250	MEANS TEST DATA	MT;0	DATE Multiple #43.03	43.03 DESCRIPTION: `Enter in this field the year of the means test income category thresholds, property threshold and child income exclusion. These figures are released annually. They are effective on January 1st and are applied to the` `previous year income.`
251	*CARE COSTS	MT1;0	DATE Multiple #43.01	43.01 LAST EDITED: `MAR 02, 1992` DESCRIPTION: `This data is now stored in Integrated Billing. This field to be deleted with the next release of MAS after 5.2.` `Costs by treating Service charged by the VA for care received at a VA facility.`
300	FISCAL YEAR	FY;0	DATE Multiple #43.06	43.06 DESCRIPTION: `Fiscal Year that inpatient and outpatient costs at a VA facility are in effect.`
391.701	CURRENT PIVOT ENTRY	HL7;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `MAY 12, 1995` HELP-PROMPT: `This is the current entry number in the ADT/HL7 Pivot file. Only the application should edit this field. Type a Number between 0 and 999999999, 0 Decimal Digits` DESCRIPTION: `This is the current entry number in the ADT/HL7 Pivot file. Only the` `application should edit this field.` `WRITE AUTHORITY: ^`
391.7012	SEND PIMS HL7 V2.2 MESSAGES	HL7;2	SET	'1' FOR SEND; '0' FOR STOP; LAST EDITED: `JUN 18, 1997` DESCRIPTION: `This field tells the software whether to stop sending the PIMS HL7 messages. If set to 0 or stop no PIMS HL7 messages will be fired from the event drivers, DDs, or registration options.`
391.7013	SEND PIMS HL7 V2.3 MESSAGES	HL7;3	SET	'1' FOR SEND; '0' FOR STOP; '2' FOR SUSPEND; LAST EDITED: `SEP 24, 1997` DESCRIPTION: `This field tells the software whether to stop sending the PIMS HL7 v2.3 messages. If set to 0 or stop no PIMS HL7 v2.3 messages will be fired from the event drivers, DDs, or registration options.`
391.7014	CREATE MFU FOR RAI MDS	HL7;4	SET	'1' FOR YES; LAST EDITED: `SEP 24, 1999`
391.702	PIVOT FILE DAYS TO RETAIN	HL7;6	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<30)!(X?.E1"."1N.N) X` LAST EDITED: `OCT 05, 2005` HELP-PROMPT: `Type a Number between 30 and 999, 0 Decimal Digits` DESCRIPTION: `The number of days worth of data to retain in the ADT/HL7 PIVOT file (#391.71) when the Purge PIMS HL7 PIVOT File option [VAFH PIVOT PURGE] is run.` `Example: If this field is set to 100, then entries in file #391.71 which are older than TODAY-100 days will be purged.` `If nothing is entered in this field, then a default value of 547 days will be used. (547 days is approximately 18 months.)`
391.705	RAI INTEGRATED SITE	HL7;5	SET	'0' FOR NOT INTEGRATED; '1' FOR INTEGRATED, SINGLE DB; '2' FOR INTEGRATED, MULTIPLE DB; LAST EDITED: `OCT 12, 1999` HELP-PROMPT: `SPECIFY THE LEVEL OF INTEGRATION FOR RAI/MDS COTS DATABASE` DESCRIPTION: `This field will indicate whether the site has integrated it's RAI/MDS COTS databases or not and to what level. If the field is null, then the site has not integrated.`
401	IRT BACKGROUND JOB LAST RUN	IRT;1	DATE	INPUT TRANSFORM: `S %DT="ET" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAY 11, 1993` DESCRIPTION: `This field contains the date/time of the last run of the IRT Background Job.`
500	DEATH GROUP	NOT;1	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `MAY 22, 1987` DESCRIPTION: `Select the name of the mailgroup which should be notified whenever a patient expires. If no mailgroup is selected no bulletin will be generated.`
501	NEW PATIENT GROUP	NOT;2	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) DESCRIPTION: `Select the name of the mailgroup which should be notified whenever a new patient is added to the patient file. If no mailgroup is selected no bulletin will be generated.`
502	NAME CHANGE GROUP	NOT;3	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) DESCRIPTION: `Select the name of the mailgroup which should be notified whenever the spelling of an existing patients name is changed. If no mailgroup is selected no bulletin will be generated.`
503	SSN CHANGE GROUP	NOT;4	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) DESCRIPTION: `Select the name of the mailgroup which should be notified whenever the social security number of an existing patient is changed. If no mailgroup is selected no bulletin will be generated.`
504	UNVERIFIED ADMIT GROUP	NOT;5	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) DESCRIPTION: `Select the name of the mailgroup to be notified along with the user, whenever a veteran is admitted for whom eligibility has not been verified, or for patients admitted with verified eligibility who have either future` `scheduled admissions or waiting list entries.` `If no mailgroup is selected no bulletin will be generated.`
505	INCONSISTENCY EDIT GROUP	NOT;6	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `MAY 22, 1987` DESCRIPTION: `Select the name of the mailgroup which should be notified whenever inconsistencies are found in a patients database that can not be corrected by the user because of edit restrictions, i.e., not holding the 'DG ELIGIBILITY'` `security key for verified data. If no mailgroup is selected no bulletin will be generated.`
506	NON-VETERAN ADMIT GROUP	NOT;7	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `MAY 22, 1987` DESCRIPTION: `Select the name of the mailgroup which should be notified whenever a non-veteran is admitted to the facility. If no mailgroup is selected no bulletin will be generated.`
507	OVERDUE ABSENCES GROUP	NOT;8	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `MAY 27, 1987` DESCRIPTION: `Select the name of the mailgroup which should be notified whenever the G&L is run and the user elects to search for patients who are overdue from returning from Authorized/Unauthorized absence and pass. If no mailgroup is` `select no bulletin will be generated.`
508	PATIENT DELETED GROUP	NOT;9	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `MAY 28, 1987` DESCRIPTION: `Select the name of the mailgroup which should be notified whenever a patient is DELETED from the database (PATIENT file). If no local mailgroup is selected no bulletin will be generated.`
509	SENSITIVE REC ACCESSED GROUP	NOT;10	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `JUN 05, 1987` DESCRIPTION: `Select the name of the mailgroup which should be notified whenever a sensitive record is accessed. If no mailgroup is selected no notification will be made however the access will still be recorded.`
510	SENSITIVITY REMOVED GROUP	NOT;11	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `JUN 05, 1987` DESCRIPTION: `Select the name of the mailgroup which should be notified whenever the status of a previously identified sensitive record is changed to non-sensitive. If no mailgroup is selected no notification will be made.`
511	AUTO RECALC GROUP	NOT;12	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `MAR 12, 1993` HELP-PROMPT: `Select the name of the mailgroup which should be notified whenever the G&L auto recalc starts and finishes. If no mailgroup is selected no bulletin will be generated.`
512	MEANS TEST REQUIRED GROUP	NOT;13	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `APR 26, 1993` HELP-PROMPT: `Enter the name of a mail group.` DESCRIPTION: `Enter the name of the mail group that will receive the message stating a means test is required when an appointment is made.`
513	IRT SHORT FORM LIST GROUP	NOT;14	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `JUL 12, 1993` DESCRIPTION: `Select the name of the mailgroup which should be notified whenever the IRT Background Job is run, options: (IRT Update Std. Deficiencies and IRT Update Std. Def. Background Job), to receive a list of patients that have` `been discharged less than 48 hours from their admission (Short Form).. If no mailgroup is selected no bulletin will be generated.`
600	AMIS 420 STARTED	AMIS;1	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `FEB 02, 1988` DESCRIPTION: `Date/time generation was started for the AMIS 420.`
601	AMIS 420 LAST COMPLETED	AMIS;2	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `Date/time AMIS 420 generation was last completed.`
602	AMIS 420 TASK NUMBER	AMIS;3	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `FEB 02, 1988` HELP-PROMPT: `Type a Number between 1 and 9999999, 0 Decimal Digits` DESCRIPTION: `System task number assigned to the job for the AMIS 420 generation.`
603	AMIS 420 STARTED BY	AMIS;4	POINTER TO NEW PERSON FILE (#200)	**********************REQUIRED FIELD********************** NEW PERSON(#200) LAST EDITED: `OCT 17, 1990` DESCRIPTION: `Person/user that ran the generation for the AMIS 420.`
604	AMIS 420 RUNNING	AMIS;5	SET	**********************REQUIRED FIELD********************** '0' FOR NO; '1' FOR YES; LAST EDITED: `FEB 02, 1988` DESCRIPTION: `Date/time the AMIS 420 is currently running.`
605	PERIOD CHECKED	AMIS;6	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>40!($L(X)<1) X` LAST EDITED: `FEB 03, 1988` HELP-PROMPT: `ANSWER MUST BE 1-40 CHARACTERS IN LENGTH` DESCRIPTION: `Month and year the MAS Parameters file was checked/edited.`
700	RUG BACKGROUND JOB LAST RUN	RUG;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JAN 08, 1988` HELP-PROMPT: `Enter date and time background job was last completed` DESCRIPTION: `Date/time Resource Utilization Grouper (RUG) background job was last run.`
701	RUG17 CONVERSION DATE	RUG;2	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:2891002X) X` LAST EDITED: `DEC 15, 1988` HELP-PROMPT: `TYPE A DATE BETWEEN 10/2/1988 AND 10/2/1989` DESCRIPTION: `Date the RUGs were converted to RUG17 methodology.`
720	BT CERTIFYING OFFICIAL	BT;1	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `OCT 17, 1990` HELP-PROMPT: `Enter the name you want printed on form 70-3542d, if blank the user's name will be printed instead followed by DESIGNEE OF CERTIFYING OFFICIAL..` DESCRIPTION: `This will be used to print on the 70-3542d form, if the site decides that they want to have a set name printed all the time. If it is left blank then the user's name, followed by DESIGNEE OF CERTIFYING OFFICIAL will be` `printed instead of the set name of the certifying official.`
721	BT OTHER EXPENSES ASKED	BT;2	SET	**********************REQUIRED FIELD********************** '0' FOR NO; '1' FOR YES; LAST EDITED: `MAY 12, 1989` HELP-PROMPT: `Enter NO if you do not want the questions "MEALS & LODGING" or "FERRY, BRIDGES, ETC" questions asked in the Beneficiary Travel Claim Enter/Edit Option.` DESCRIPTION: `This field will be used to determine whether the "MEALS & LODGING" and "FERRY, BRIDGES, ETC." questions are asked in the Beneficiary Travel Claim Enter/Edit Option.`
722	USE TEMPORARY ADDRESS	BT;3	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `DEC 28, 1988` DESCRIPTION: `Do you want the patient's temporary address to be used on scheduling letters if one is provided in the PATIENT file?`
723	COREFLS ACTIVE	BT;4	SET	'1' FOR YES; '0' FOR NO; INPUT TRANSFORM: `N DGBTX S DGBTX=X S X="CSLVQ" X ^%ZOSF("TEST") W:'$T " COREFLS Package CSL V1.0 not installed. " S:'$T X=0 S:$T X=DGBTX Q` LAST EDITED: `AUG 18, 2004` HELP-PROMPT: `Enter 'Yes' if using the coreFLS system for vendors.` DESCRIPTION: `This entry determines whether the Bene Travel package prompts for coreFLS vendor (ACTIVE - YES) or FMS vendor (ACTIVE - NO).` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
800	ROUTINE	ROU;0	Multiple #43.07	43.07 DESCRIPTION: `A list of all routines distributed with the MAS DHCP software package.`
900	*NAME OF UB82 SIGNER	UB82;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<2) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `Enter the name of the person responsible for signing this bill as it should appear on the bill from 2-20 characters.` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
901	*TITLE OF UB82 SIGNER	UB82;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<2) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `Enter the title of the person responsible for signing this bill as it should appear on the bill from 2-20 characters.` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
902	*CAN REVIEWER AUTHORIZE?	UB82;3	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `FEB 06, 1992` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
903	*REMARK TO APPEAR ON EACH UB82	UB82;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>39!($L(X)<2) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `Enter any facility specific remarks which you would like to print on every UB-82 bill from 2-39 characters. This field is optional.` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
904	*FEDERAL TAX NUMBER	UB82;5	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>10!($L(X)<10)!'(X?2N1"-"7N) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `Enter the federal tax number for your facility in NN-NNNNNNN format.` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
905	*BLUE CROSS/SHIELD PROVIDER #	UB82;6	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>13!($L(X)<3)!'(X?.ANP) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `Enter the 3-13 character BC/BS Provider Number which will be the default for all billing episodes at this facility.` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
906	*UB82 CANCELLATION MAILGROUP	UB82;7	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `Enter the mail group you want notified whenever a UB-82 is cancelled. If none is entered no mailman notification will be made.` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
907	*BILLING SUPERVISOR NAME	UB82;8	POINTER TO NEW PERSON FILE (#200)	**********************REQUIRED FIELD********************** NEW PERSON(#200) LAST EDITED: `FEB 06, 1992` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
908	*UB82 DISAPPROVED MAILGROUP	UB82;9	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `When a UB-82 is disapproved the supervisor and initiator of the bill will be notified. If you want additional people notified create a mailgroup and specify it here.` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
909	*PRINT '001' FOR TOTAL CHARGES	UB82;10	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `FEB 06, 1992` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
910	*CAN INITIATOR REVIEW?	UB82;11	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `Enter 1 or 'YES' if the person who initiates/enters a billing record is also able to review that record.` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
911	*AGENT CASHIER MAIL SYMBOL	UB82-1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>25!($L(X)<1) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `ANSWER MUST BE 1-25 CHARACTERS IN LENGTH` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
912	*AGENT CASHIER STREET ADDRESS	UB82-1;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>25!($L(X)<1) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `ANSWER MUST BE 1-25 CHARACTERS IN LENGTH` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
913	*AGENT CASHIER CITY	UB82-1;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1)!'(X?1.ANP) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `ANSWER MUST BE 1-15 CHARACTERS IN LENGTH` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
914	*AGENT CASHIER STATE	UB82-1;4	POINTER TO STATE FILE (#5)	STATE(#5) LAST EDITED: `FEB 06, 1992` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
915	*AGENT CASHIER ZIP CODE	UB82-1;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>5!($L(X)<5)!'(X?5N) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `ANSWER MUST BE 5 CHARACTERS IN LENGTH` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
916	*AGENT CASHIER PHONE NUMBER	UB82-1;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>25!($L(X)<4) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `ANSWER MUST BE 4-25 CHARACTERS IN LENGTH` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
917	*UB-82 INITIALIZATION NUMBER	UB82;12	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>4!($L(X)<4)!'(X?.N)!('+X) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `ENTER THE FOUR DIGIT NUMBER (0001-9999) WITH WHICH TO COMMENCE ASSIGNMENT OF UB-82 BILL NUMBERS.` DESCRIPTION: `This field is no longer used in determining bill numbers.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
918	*UB-82 BILL NUMBER ASSIGNMENT	UB82;13	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `This field is used during bill creation so only one user at a time can create a new bill.` DESCRIPTION: `Obsolete field no longer used.`
919	*MAS SERVICE POINTER	UB82;14	POINTER TO SERVICE/SECTION FILE (#49)	**********************REQUIRED FIELD********************** SERVICE/SECTION(#49) LAST EDITED: `FEB 06, 1992` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
920	*CANCELLATION REMARK FOR FISCA	UB82-1;7	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>75!($L(X)<3)!'(X?1A.E) X` LAST EDITED: `FEB 06, 1992` HELP-PROMPT: `Enter the 3-75 character remark (reason for cancellation) which will be sent to Fiscal Service every time a bill is cancelled in MAS.` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
921	*CAN CLERK ENTER NON-PTF CODES	UB82;15	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `MAR 02, 1992` HELP-PROMPT: `Enter '1' or 'Yes' if diagnosis and procedure codes not found in the PTF record may be entered by the billing clerk into a billing record.` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release of MAS after 5.2.` `Answering Yes to this parameter will also allow billing clerks to enter CPT and HCPCS codes into the billing record as well as ICD Diagnosis and Procedure codes that are not in the corresponding PTF record.`
922	*ASK HINQ IN MCCR	UB82;16	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `FEB 06, 1992` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
923	*USE OP CPT SCREEN	UB82;17	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `FEB 06, 1992` DESCRIPTION: `This field has been moved to the IB SITE PARAMETER file. To be deleted with the next release after MAS 5.2.`
926	*LAST MEANS TEST CONVERTED	MTC;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `FEB 03, 1992` HELP-PROMPT: `Type a Number between 1 and 9999999999, 0 Decimal Digits` DESCRIPTION: `Restartable entry point for means test conversion; last patient converted` `This is a temporary field used during the means test conversion, only.` `Field will be deleted in the following release, MAS 5.3.` `UNEDITABLE`
927	*DATE MT CONVERSION STARTED	MTC;2	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `FEB 03, 1992` DESCRIPTION: `Date means test conversion started.` `This is a temporary field used during the means test conversion, only.` `Field will be deleted in the following release, MAS 5.3.` `UNEDITABLE`
928	*DATE MT CONVERSION COMPLETED	MTC;3	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `FEB 03, 1992` DESCRIPTION: `Date means test conversion completed.` `This is a temporary field used during the means test conversion, only.` `Field will be deleted in the following release, MAS 5.3.` `UNEDITABLE`
999	VERSION	VERSION;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<3.3)!(X?.E1"."3N.N) X` LAST EDITED: `MAY 27, 1986` HELP-PROMPT: `TYPE A NUMBER BETWEEN 3.3 AND 999` DESCRIPTION: `The version number assigned to the MAS software package currently installed in the system.`
1000.01	G&L INITIALIZATION DATE	G;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:3990930X) X` LAST EDITED: `MAY 10, 1993` HELP-PROMPT: `TYPE A DATE BETWEEN 10/1/1990 AND 9/30/2099` DESCRIPTION: `Please enter the date on which you wish to initialize your Gains & Losses Sheet and Bed Status Report. The date selected must be on or after October 1, 1990. Bed Status statistics will be calculated from this date only.`
1000.02	SSN FORMAT	G;2	SET	**********************REQUIRED FIELD********************** '1' FOR WHOLE SSN; '6' FOR LAST FOUR; LAST EDITED: `FEB 01, 1989` DESCRIPTION: `The Gains & Losses Sheet allows printing only the last four numbers of the patient's Social Security Number or the entire number. Please determine how you'd like this number to appear on your G&L.`
1000.03	MEANS TEST DISPLAY	G;3	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `FEB 01, 1989` DESCRIPTION: `This G&L is designed to display current Means Test Status (where applicable) if you wish. Simply respond YES to this prompt in order to display this data on your daily Gains and Losses Sheet.`
1000.04	PATIENT'S TREATING SPECIALTY	G;4	SET	**********************REQUIRED FIELD********************** '1' FOR SHOW; '0' FOR DON'T SHOW; LAST EDITED: `FEB 01, 1989` DESCRIPTION: `The This field is used for the purpose of determining whether or not you wish for the exact Treating Specialty to which a patient is assigned to display on the G&L whenever a movement is displayed. The information will` `appear immediately to the right of the assigned ward location.`
1000.05	TWO/THREE COLUMN DISPLAY	G;5	SET	**********************REQUIRED FIELD********************** '2' FOR TWO; '3' FOR THREE; LAST EDITED: `FEB 01, 1989` DESCRIPTION: `Please select whether you wish the patient listing (G&L) to display names in a two or three column format. Certain transaction types, i.e., Transfers in/out, will always appear as a single column output regardless,` `however, this feature may reduce the amount of paper required to generate this listing.`
1000.06	SHOW NON-MOVEMENTS ON G&L	G;6	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `FEB 05, 1989` DESCRIPTION: `Answer YES should you wish for non-movements, i.e., Treating Specialty Change to appear on the G&L otherwise answer NO.`
1000.07	RECALCULATE FROM	G;7	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX",%DT(0)=$S($D(^DG(43,DA,"G")):+^("G"),1:2901001) D ^%DT K %DT(0) S X=Y K:3990930X) X` LAST EDITED: `MAY 10, 1993` HELP-PROMPT: `Enter the earliest date for which recalculation can be run. Date must be on or after the G&L INITIALIZATION DATE.` DESCRIPTION: `Please enter the date from which you wish to recalculate totals which must be on or after the G&L Initialization Date. The purpose of this parameter is to allow you the flexibility to maintain an "old" initialization date` `without the worry that a correction entered say, for five years ago, cause a recalculation process to commence which may take days to complete. It is strongly suggested that recalculation always be accomplished for, at a` `minumum, the current fiscal reporting year.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
1000.08	COUNT VIETNAM VETS REMAINING	G;8	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `FEB 07, 1989` DESCRIPTION: `Answer YES if you wish to calculate vietnam era veteran's remaining at the end of each day. If you choose to do so the length of processing time may be increased up to 20 minutes per day. Please note that this` `information is no longer reported on any AMIS Segment.`
1000.09	COUNT OVER 65'S REMAINING	G;9	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; DESCRIPTION: `Answer YES to the following prompt if you wish to calculate patient's over 65 years in age remaining at the end of each census date. If you choose to do so processing time for recalculation may be increased up to 30` `minutes per date. Please note that this information is no longer reported on any AMIS Segment.`
1000.1	DEFAULT TREATING SPECIALTY	G;10	POINTER TO FACILITY TREATING SPECIALTY FILE (#45.7)	**********************REQUIRED FIELD********************** FACILITY TREATING SPECIALTY(#45.7) INPUT TRANSFORM: `S:$D(DGPME) DIC(0)=DIC(0)_"L" S DIC("S")="I 1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `NOV 07, 1990` DESCRIPTION: `Once the system starts collecting Treating Specialty statistics it will be necessary to capture those data where a Treating Specialty may not have been assigned to a particular patient.` `Please respond to to this field with the DEFAULT Treating Specialty to which you want these statistical data associated. Perhaps one might want to create a Treating Specialty called UNKNOWN, UNDEFINED, etc., and utilize` `this.` SCREEN: `S:$D(DGPME) DIC(0)=DIC(0)_"L" S DIC("S")="I 1"` EXPLANATION: `Allows laygo if field is edited during v5 conversion`
1000.11	TSR INITIALIZATION DATE	G;11	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:3991001X) X` LAST EDITED: `JAN 28, 1993` HELP-PROMPT: `TYPE A DATE BETWEEN 10/1/1992 AND 10/1/2099` DESCRIPTION: `Enter the date on which you wish to initialize your Treating Specialty Report. The date selected must be on or after October 1, 1992. The Treating Specialty Report census statistics will be calculated from this date.`
1100.01	PRE-REGISTRATION SORT	DGPRE;1	SET	'P' FOR PATIENT NAME; 'S' FOR MEDICAL SERVICE; LAST EDITED: `JAN 08, 1997` HELP-PROMPT: `Enter default method for sorting entries in the call list.` DESCRIPTION: `This entry determines the sort order of the call list display`
1100.02	DAYS BETWEEN CALLS	DGPRE;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `DEC 13, 1996` HELP-PROMPT: `Enter the number of days between when the patient was last called and he can be called again.` DESCRIPTION: `This field will be used to determine how many days from the latest DATE CHANGED Field, #1, in PRE-REGISTRATION AUDIT File, #41.41, before the patient will be added to the call list again. If the patient has another` `appointment within x number of days of the date in the DATE CHANGED field, he will not be added.`
1100.03	BACKGROUND JOB FUNCTION	DGPRE;3	SET	'D' FOR DELETE ALL ENTRIES; 'P' FOR DELETE CALLED PATIENTS; 'DA' FOR DELETE ENTRIES AND ADD NEW; 'PA' FOR DELETE CALLED PATIENTS AND ADD NEW; 'AO' FOR ADD NEW ENTRIES ONLY; 'N' FOR NOTHING; LAST EDITED: `APR 01, 1997` HELP-PROMPT: `Enter the function the background job is to do when run.` DESCRIPTION: `Preregistration nightly background job. This field determines which actions the background job performs when run. Delete removes all entries from the call list. Purge removes only the called patients from the call list.` `Nothing tells the background job to leave the call list alone. Add, just adds entries to the call list, without removing any.`
1100.04	DAYS TO MAINTAIN LOG	DGPRE;4	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 09, 1997` HELP-PROMPT: `Enter the number of days to maintain entries in the Call Log. (Call Attempts)` DESCRIPTION: `This field is the number of days to maintain entries in the PRE-REGISTRATION CALL LOG File, #41.43. All entries before this limit will be purged.`
1100.05	DAYS TO PULL APPOINTMENT	DGPRE;5	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 09, 1997` HELP-PROMPT: `Enter the number of days in advance to pull appointments for.` DESCRIPTION: `This field sets the number of days in advance to look for appointments to pull patients for.`
1100.06	RUN FOR WEEKEND	DGPRE;6	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `JAN 14, 1997` HELP-PROMPT: `Enter 'Y'es if background job should run on weekends, 'N'o if not.` DESCRIPTION: `If this field is 'Y'es, then the background job will run and add on weekends.`
1100.07	Enable My HealtheVet Prompts?	DGPRE;7	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `AUG 18, 2016` HELP-PROMPT: `Enter "YES" if you wish to enable the "Increase Engagement in My HealtheVet" Pre-Register Patient Interface. Leave blank or enter "NO" to disable this interface.` DESCRIPTION: `When using the PreRegister Patient [DGPRE PreRegister Patient] option if "Increase Engagement in My HealtheVet" functionality is enabled then the clerk will be prompted to ask Veterans if they are enrolled in My HealtheVet` `and if not, to encourage them to enroll.` `This is an optional field which only needs to be set to "YES" when a site desires to use this functionality. This field was added with Patch DG5.3903 (Increase Engagement in My HealtheVet during Pre-Registration).`
1110	CLINIC EXCLUSION	DGPREC;0	POINTER Multiple #43.04	43.04 SCREEN: `S DIC("S")="I $P($G(^SC(Y,0)),U,3)=""C"""` EXPLANATION: `Screen out all hospital locations EXCEPT clinics`
1120	ELIGIBILITY EXCLUSION	DGPREE;0	POINTER Multiple #43.08	43.08
1201	RESTRICT PATIENT RECORD ACCESS	REC;1	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `JAN 04, 1999` HELP-PROMPT: `Enter a 1 to restrict user access to their own PATIENT (#2) file record or a 0 to not restrict access.` DESCRIPTION: `If this parameter is set to 1 and the user does not hold the DG RECORD ACCESS security key, they will not be allowed to access their own PATIENT (#2) file record.`
1202	PURPLE HEART SORT	PH;1	SET	'A' FOR ASCENDING; 'D' FOR DESCENDING; LAST EDITED: `SEP 08, 2000` DESCRIPTION: `This field should be edited if the local site wants the daily tasked Purple Heart Status Report to be sorted in 'A'scending order by the number of days since the last status update. By default, the report will sort by` `descending order.`
1203	NET WORTH CALCULATION	GMT;1	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `AUG 05, 2002` DESCRIPTION: `This field is used as a flag to indicate the method to use in determining the veteran's net worth. If the Net Worth Calculation = "YES" then net worth is equal to the veteran's assets minus debts. If the Net Worth` `Calculation = "NO" then net worth is equal to assets plus income minus debts.`
1205	VFA START DATE	VFA;1	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:3130101X) X` LAST EDITED: `SEP 04, 2012` HELP-PROMPT: `Type a date between 6/1/2012 and 1/1/2013.` DESCRIPTION: `The date, January 1,2013, that the Veteran Financial Assessment(VFA) project becomes operational. A Primary Means Test(MT) on file less than or equal to 1 year old as of the VFA Start Date shall not expire. Otherwise,` `MTs older than 1 year shall be considered expired and a new MT shall be required.`
1301	AO STA EXP DATE	ENR;1	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:X<1 X` LAST EDITED: `NOV 05, 2009` HELP-PROMPT: `(No range limit on date)` DESCRIPTION: `If populated, this field will be used as the expiration date for the Special Treatment Authority (STA) for Agent Orange (AO) Veterans with an AO exposure location of Vietnam. New enrollments of AO Veterans with an` `exposure location of Vietnam and no additional eligibility factors will no longer be enrolled as a Priority Group 6 if the enrollment date is greater than the expiration date.` `WRITE AUTHORITY: ^` `UNEDITABLE`
1302	SWAC STA EXP DATE	ENR;2	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:X<1 X` LAST EDITED: `MAY 12, 2009` HELP-PROMPT: `(No range limit on date)` DESCRIPTION: `If populated, this field will be used as the expiration date for the Special Treatment Authority (STA) for Southwest Asia Condition (SWAC) Veterans. New enrollments of SWAC Veterans and no additional eligibility factors` `will no longer be enrolled as a Priority Group 6 if the enrollment date is greater than the expiration date.` `WRITE AUTHORITY: ^` `UNEDITABLE`
1401	PROCESS MVI DOD UPDATE?	MVI;1	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `JUN 23, 2016` HELP-PROMPT: `Select the code that specifies if DOD messages from MVI should be processed.` DESCRIPTION: `The PROCESS MVI DOD UPDATE? value indicates whether the site should process Date of Death (DOD) messages from the Master Veteran Index (MVI).`
1402	BWN ACTIVE DATE	BWN;1	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `DEC 07, 2020` HELP-PROMPT: `Enter the date on which "BLUE WATER NAVY" is a valid Agent Orange Exposure Location and can be entered by the user.` DESCRIPTION: `The date on which "BLUE WATER NAVY" is a valid Agent Orange Exposure Location and can be entered by the user.` `UNEDITABLE`

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #44	Oncology	VERSION (999). Access: Read w/Fileman
ICR #45		VERSION (999). Access: Read w/Fileman
ICR #431	Integrated Billing Beneficiary Travel Income Verification Match Enrollment Application System	USE HIGH INTENSITY ON SCREENS (76). Access: Direct Global Read & w/Fileman EXCLUDE WHICH TERMINAL TYPES (.01). Access: Direct Global Read & w/Fileman VERSION (999). Access: Direct Global Read & w/Fileman VFA START DATE (1205). Access: Read w/Fileman
ICR #483	VISIT TRACKING Enrollment Application System Order Entry Results Reporting Scheduling Mental Health	DOMICILIARY WARDS (16). Access: Direct Global Read & w/Fileman
ICR #1008	QUALITY IMPROVEMENT CHECKLIST	MULTIDIVISION MED CENTER? (11). Access: Read w/Fileman
ICR #1494	Network Health Exchange Order Entry Results Reporting Imaging	SENSITIVE REC ACCESSED GROUP (509). Access: Direct Global Read & w/Fileman
ICR #1574	Automated Information Collection System	DEFAULT EF PRINTER (48). Access: Read w/Fileman MULTIDIVISION MED CENTER? (11). Access: Read w/Fileman
ICR #2085	PCE Patient Care Encounter	ALLOW UP-ARROW OUT OF CLASS (224). Access: Direct Global Read & w/Fileman
ICR #2233	DSS - DECISION SUPPORT SYSTEM EXTRACTS Incomplete Records Tracking	MULTIDIVISIONAL MED CENTER? (11). Access: Direct Global Read & w/Fileman	This file contains site specific parameters used by ADTModules.
ICR #2296	Scheduling Beneficiary Travel	MULTIDIVISION MED CENTER? (11). Access: Direct Global Read & w/Fileman MEDICAL CENTER NAME (12). Access: Direct Global Read & w/Fileman
ICR #3431	Incomplete Records Tracking	IRT SHORT FORM LIST GROUP (513). Access: Direct Global R/W & w/Fileman IRT BACKGROUND JOB LAST RUN (401). Access: Both R/W w/Fileman
ICR #3444	Text Integration Utility Problem List	MULTIDIVISION MED CENTER? (11). Access: Read w/Fileman
ICR #3490	Beneficiary Travel	BT CERTIFYING OFFICIAL (720). Access: Both R/W w/Fileman BT OTHER EXPENSES ASKED (721). Access: Both R/W w/Fileman USE TEMPORARY ADDRESS (722). Access: Both R/W w/Fileman
ICR #4242	Integrated Billing	CLINIC EXCLUSION (1). Access: Read w/Fileman ELIGIBILITY EXCLUSION (1). Access: Read w/Fileman
ICR #5338	Fee Basis
ICR #6014	Enrollment Application System	CHILD INCOME EXCLUSION (17). Access: Direct Global Read & w/Fileman
ICR #6812	Barcode Medication Administration	MULTIDIVISION MED CENTER? (11). Access: Read w/Fileman
ICR #7025	Scheduling	DOMICILIARY WARDS? (16). Access: Direct Global Read & w/Fileman USE TEMPORARY ADDRESS (722). Access: Direct Global Read & w/Fileman

Name	Field # of Occurrence
^%DT	10+1, 50+1, 52+1, 53+1, 55+1, 57+1, 59+1, 60+1, 61+1, 80+1 , 81+1, 82+1, 83+1, 84+1, 85+1, 86+1, 223+1, 401+1, 600+1, 601+1 , 700+1, 701+1, 927+1, 928+1, 1000.01+1, 1000.07+1, 1000.11+1, 1205+1, 1301+1, 1302+1 , 1402+1
^DIC	3+1, 9+1, 9(HELP ), 25+1, 25(HELP ), 48+1, 48(HELP ), 70+1, 1000.1+1
RT^SDAMEX	213VPSCR1+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	10+1, 50+1, 52+1, 53+1, 55+1, 57+1, 59+1, 60+1, 61+1, 80+1 , 81+1, 82+1, 83+1, 84+1, 85+1, 86+1, 223+1, 401+1, 600+1, 601+1 , 700+1, 701+1, 927+1, 928+1, 1000.01+1, 1000.07+1, 1000.11+1, 1205+1, 1301+1, 1302+1 , 1402+1*
>> %DT(0	1000.07+1*!
>> DA	.01(XREF 1S), .01(XREF 1K), 1000.07+1
>> DGPME	1000.1+1, 1000.1SCR+1
DIC	3+1!, 9+1, 9(HELP ), 25+1, 25(HELP ), 48+1, 48(HELP ), 70+1!, 1000.1+1!
DIC("S"	.01SCR+1, 3+1, 3SCR+1, 70+1, 70SCR+1, 213VPSCR1+1!, 213VPSCR2+1, 1000.1+1, 1000.1SCR+1*
DIC(0	9+1, 9(HELP ), 25+1, 25(HELP ), 48+1, 48(HELP ), 1000.1+1, 1000.1SCR+1*
>> DIE	3+1, 9+1, 9(HELP ), 25+1, 25(HELP ), 48+1, 48(HELP ), 70+1, 1000.1+1
L	9+1!, 25+1!, 48+1*!
U	25+1, 48+1
X	.001+1!, .01+1!, .01(XREF 1S), .01(XREF 1K), 3+1!, 4+1!, 5.5+1!, 6+1!, 9+1!, 9(HELP ) , 10+1!, 25+1!, 25(HELP ), 33+1!, 46+1!, 48+1!, 48(HELP ), 50+1!, 52+1!, 53+1! , 54+1!, 55+1!, 56+1!, 57+1!, 58+1!, 59+1!, 60+1!, 61+1!, 70+1!, 80+1! , 81+1!, 82+1!, 83+1!, 84+1!, 85+1!, 86+1!, 205+1!, 212+1!, 223+1!, 391.701+1! , 391.702+1!, 401+1!, 600+1!, 601+1!, 602+1!, 605+1!, 700+1!, 701+1!, 900+1!, 901+1! , 903+1!, 904+1!, 905+1!, 911+1!, 912+1!, 913+1!, 915+1!, 916+1!, 917+1!, 918+1! , 920+1!, 926+1!, 927+1!, 928+1!, 999+1!, 1000.01+1!, 1000.07+1!, 1000.1+1!, 1000.11+1!, 1100.02+1! , 1100.04+1!, 1100.05+1!, 1205+1!, 1301+1!, 1302+1!, 1402+1*!
>> Y	3+1, 9+1, 10+1, 25+1, 48+1, 50+1, 52+1, 53+1, 55+1, 57+1 , 59+1, 60+1, 61+1, 70+1, 80+1, 81+1, 82+1, 83+1, 84+1, 85+1 , 86+1, 223+1, 401+1, 600+1, 601+1, 700+1, 701+1, 927+1, 928+1, 1000.01+1 , 1000.07+1, 1000.1+1, 1000.11+1, 1205+1, 1301+1, 1302+1, 1402+1
>> Y(0	25+1, 48+1

Customize PDF page

Package: Registration

Global: ^DG(43

Information

Description

Directly Accessed By Routines, Total: 241

Accessed By FileMan Db Calls, Total: 77

Pointer To FileMan Files, Total: 13

Fields, Total: 163

Found Entries, Total: 1

ICR, Total: 18

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: