Global: ^RMPF(791813

FileMan FileNo	FileMan Filename	Package
791813	REMOTE ORDER/ENTRY PARAMETER	Remote Order Entry System

Package	Total	Routines
Remote Order Entry System	11	^RMPF(791814 RMPFEA RMPFEA2 RMPFET71 RMPFEU RMPFEV RMPFEV1 RMPFQP1 RMPFUTL STAFF DESIGNATION ^RMPF(791813

Package	Total	Routines
Remote Order Entry System	3	RMPFEV RMPFEV1 RMPFQS

Package	Total	FileMan Files
Kernel	2	INSTITUTION(#4)[.01, 2.01] NEW PERSON(#200)[2.03, #791813.0101(.01)]

Fields, Total: 39

Field #	Name	Loc	Type	Details
.01	STATION	0;1	POINTER TO INSTITUTION FILE (#4)	**********************REQUIRED FIELD********************** INSTITUTION(#4) INPUT TRANSFORM: `S:$D(X) DINUM=X` LAST EDITED: `SEP 16, 1991` DESCRIPTION: `This field is a pointer to the Institution File for each station that sets up parameters for the Remote Order/Entry System.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `791813^B` `1)= S ^RMPF(791813,"B",$E(X,1,30),DA)=""` `2)= K ^RMPF(791813,"B",$E(X,1,30),DA)` `Standard name cross-reference.`
.02	ALLOW FREE TEXT ADDRESS	0;2	SET	'1' FOR ALLOW FREE TEXT ADDRESS; '0' FOR DON'T ALLOW FREE TEXT ADDRESS; LAST EDITED: `JUL 18, 1990` DESCRIPTION: `If this field is answered 'YES', in the Enter/Edit Patient Orders option the user will be asked if a new address should be entered for a patient. If a new address is entered, the new address will be transmitted to the DDC` `for update of the DDC database. The DHCP patient file at the station will not be changed. The patient should be sent to MAS to update the station database. If 'NO' is entered, the address in the DHCP patient file will` `be used for the order.`
.03	TRANSMISSION QUEUE OPTIONS	0;3	SET	'I' FOR immediate queue of batch; 'S' FOR standard queue time for batch; 'C' FOR choose queue time for batch; 'A' FOR auto-queue batch; LAST EDITED: `FEB 06, 1995` DESCRIPTION: `This parameter controls the queue time for transmission batches. If an 'I' is entered, batches will be queued for transmission immediately upon closing. If an 'S' is chosen, the user will be asked to set a parameter` `defining the time of day for queueing transmission batches. If a 'C' is entered, the user closing a batch will be asked for a date and time to queue the batch. If an 'A' is entered, the batch will be queued automatically` `every day at the time set in the parameter 'Standard Queue Time for Batch'. If no entry is made in this field, immediate queueing will be assumed.`
.04	STANDARD QUEUE TIME FOR BATCH	0;4	DATE	INPUT TRANSFORM: `S:X["@" X=$P(X,"@",2) S X=DT_"@"_X,%DT="TXR" D ^%DT S X=Y K:Y<1 X S X=$E(X,8,12)` OUTPUT TRANSFORM: `S Y=Y_"00000" S Y=$E(Y,2,3)_":"_$E(Y,4,5)` LAST EDITED: `JAN 15, 1993` HELP-PROMPT: `MONTH, DAY AND YEAR NEED NOT BE ENTERED` DESCRIPTION: `If the System Manager has chosen to set a standard time for queueing of transmission batches to the DDC, this field should hold the time of day for that transmission. Any batches that have been closed will automatically` `be queued for transmission every day at this time.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.05	MULTIPLE STATION ORDERS	0;5	SET	'1' FOR MULTIPLE STATIONS; '0' FOR ONE STATION; LAST EDITED: `JUL 18, 1990` DESCRIPTION: `This field indicates whether or not a field facility wishes to allow ROES orders to be created for multiple station numbers.`
.06	ALLOW MULTIPLE APPROVAL	0;6	SET	'1' FOR ALLOW MULTIPLE APPROVAL; '0' FOR DO NOT ALLOW MULTIPLE APPROVAL; LAST EDITED: `JUL 25, 1990` DESCRIPTION: `If the user chooses to allow multiple approval of orders, the Approving Official will be able to select a group of orders to approve without reviewing the display screen for each order.`
.07	APPROVAL PROCESS	0;7	SET	'S' FOR supervisors only; 'A' FOR audiologists and supervisors; LAST EDITED: `FEB 06, 1995` DESCRIPTION: `This field indicates whether a station wishes to allow both supervisors and Audiologists to be able to approve orders or if they only wish to allow supervisors to have approval privileges. If no entry is made in this` `parameter, only supervisors will be able to approve orders.`
.08	ELIGIBILITY EDIT CAPABILITY	0;8	SET	'0' FOR NO EDIT OF DHCP ELIGIBILITY; '1' FOR EDIT OF DHCP ELIGIBILITY BY SUPERVISOR; '2' FOR EDIT OF DHCP ELIGIBILITY BY ANYONE; LAST EDITED: `JAN 18, 1994` DESCRIPTION: `This parameter controls users abilities to edit the eligibility for a patient. If set to '0', the DHCP eligibility determined from the database cannot be edited. If set to '1', the DHCP eligibility can only be edited by` `a supervisor. If set to '2', the DHCP eligibility can be edited by any user.`
.09	DISPLAY ERRORS ON MENU ENTRY	0;9	SET	'0' FOR DO NOT DISPLAY ERRORS; '1' FOR DISPLAY ERRORS; LAST EDITED: `JUL 07, 1994` DESCRIPTION: `If this parameter is set to 'DISPLAY ERRORS', all users signing on to ROES will see a list of orders in the error status.`
.1	ORDER DELIVERY ROUTING	0;10	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<3) X` LAST EDITED: `DEC 29, 1990` HELP-PROMPT: `Answer must be 3-10 characters in length.` DESCRIPTION: `This field contains the free text routing symbol of the service requesting a regular mail response to correspondence or product delivery from the DDC.`
.11	CERTIFICATION APPROVAL	0;11	SET	'0' FOR ANY USER CAN CERTIFY; '1' FOR AUDIOLOGISTS & SUPERVISORS; '2' FOR SUPERVISORS ONLY; LAST EDITED: `DEC 29, 1994` DESCRIPTION: `This parameter controls which individuals are allowed to certify Custom Hearing Aid and Componenet orders.`
.12	ISSUE APPROVAL	0;12	SET	'0' FOR ANY USER CAN ISSUE; '1' FOR AUDIOLOGISTS & SUPERVISORS; '2' FOR SUPERVISORS ONLY; LAST EDITED: `DEC 29, 1994` DESCRIPTION: `This parameter controls which individuals may be entered as the issuing Audiologist.`
.13	PSAS ELIGIBILITY DETERMINATION	0;13	SET	'0' FOR ALLOW REQUESTS TO PSAS; '1' FOR DO NOT ALLOW REQUESTS TO PSAS; LAST EDITED: `JAN 03, 1995` DESCRIPTION: `This parameter determines whether electronic requests may be sent to PSAS for eligibility determinations for patients whose eligibility cannot be determined from the DHCP patient database.`
1.01	# OF DAYS TO SAVE INCOMPLETE	1;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 25, 1990` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to retain orders with the status of INCOMPLETE. This field will be checked when the Order Purge routine is run. If there is no` `entry in this field when the purge routine is run, any order with a status of INCOMPLETE that is more than 30 days old will be permanently deleted.`
1.02	# OF DAYS TO SAVE DISAPPROVED	1;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 25, 1990` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to retain orders with the status of DISAPPROVED. This field will be checked when the Order Purge routine is run. If there is no` `entry in this field when the purge routine is run, any order with a status of DISAPPROVED that is more than 30 days old will be permanently deleted.`
1.03	# OF DAYS TO SAVE ERRORS	1;3	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 25, 1990` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to retain orders with the status of ERROR. This field will be checked when the Order Purge routine is run. If there is no entry in` `this field when the purge routine is run, any order with a status of ERROR that is more than 30 days old will be permanently deleted.`
1.04	# OF DAYS TO SAVE COMPLETE	1;4	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 25, 1990` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to retain orders with the status of COMPLETE. This field will be checked when the Order Purge routine is run. If there is no entry` `in this field when the purge routine is run, any order with a status of COMPLETE that is more than 30 days old will be permanently deleted.`
1.05	# OF DAYS TO SAVE REJECTS	1;5	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 13, 1991` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to retain orders with the status of REJECT. This field will be checked when the Order Purge routine is run. If there is no entry in` `this field when the purge routine is run, any order with a status of REJECT that is more than 30 days old will be permanently deleted.`
1.06	# OF DAYS TO SAVE CANCELS	1;6	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUN 28, 1994` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to retain orders with the status of CANCELED. This field will be checked when the Order Purge option is run. If there is no entry` `in this field when the purge routine is run, any order with a status of CANCELED that is more than 30 days old will be permanently deleted.`
2.01	EXTENDED CLINIC	2;1	POINTER TO INSTITUTION FILE (#4)	INSTITUTION(#4) LAST EDITED: `AUG 08, 1991` DESCRIPTION: `This field contains the name of the Extended Audiology Clinic for the station entering the parameters. This field will contain the same name as the 'STATION' field when the station is an Extended Audiology Clinic.`
2.02	EXTENDED CLINIC ROUTING	2;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<3) X` LAST EDITED: `AUG 08, 1991` HELP-PROMPT: `Answer must be 3-10 characters in length.` DESCRIPTION: `This field will contain the routing symbol to be used when addressing mail to the Extended Audiology Clinic.`
2.03	LAST USER TO RUN PURGE	2;3	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `JAN 09, 1995` DESCRIPTION: `This is the name of the last user running the purge routine.`
2.04	LAST DATE PURGE WAS RUN	2;4	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JAN 09, 1995` DESCRIPTION: `This is the last date and time that the purge routine was run.`
10.02	ALLOW FREE TEXT ADDRESS	10;2	SET	'1' FOR ALLOW FREE TEXT ADDRESS; '0' FOR DON'T ALLOW FREE TEXT ADDRESS; LAST EDITED: `NOV 29, 1993` DESCRIPTION: `If this field is answered 'YES', in the Enter/Edit Patient Orders option the user will be asked if a new address should be entered for a patient. If a new address is entered, the new address will be transmitted to the DDC` `for update of the DDC database. The DHCP patient file at the station will not be changed. The patient should be sent to MAS to update the station database. If 'NO' is entered, the address in the DHCP patient file will` `be used for the order.`
10.03	TRANSMISSION QUEUE OPTIONS	10;3	SET	'I' FOR immediate queue of batch; 'S' FOR standard queue time for batch; 'C' FOR choose queue time for batch; 'A' FOR auto-queue of batch; LAST EDITED: `FEB 06, 1995` DESCRIPTION: `This parameter controls the queue time of r transmission batches. I an 'I' is entered, batches will be queued for transmission immediately upon closing. If an 'S' is chosen, the user will be asked to set a parameter` `defining the time of day for queueing transmission batches. If a 'C' is entered, the user closing a batch will be asked for a date and time to queue the batch. If an 'A' is entered, the batch will be queued auto-` `matically every day at the time set in the parameter 'Standard Queue Time for Batch'. If no entry is made in this field, immediate queueing will be assumed.`
10.04	STANDARD QUEUE TIME FOR BATCH	10;4	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 29, 1993` DESCRIPTION: `If the ADPAC has chosen to set a standard time for queueing of transmission batches to the DDC, this field should hold the time of day for that transmission. Any batches that have been closed will automatically be queued` `for transmission every day at this time.`
10.05	MULTIPLE STATION ORDERS	10;5	SET	'1' FOR MULITPLE STATIONS; '0' FOR ONE STATION; LAST EDITED: `NOV 29, 1993` DESCRIPTION: `This field indicates whether or not a facility wishes to allow ROES orders to be created for multiple station numbers.`
10.06	ALLOW MULTIPLE APPROVAL	10;6	SET	'0' FOR DO NOT REQUIRE APPROVAL OF ORDERS; '1' FOR REQUIRE APPROVAL OF ORDERS; '2' FOR REQUIRE APPROVAL AND ALLOW MULTIPLE APPROVAL; LAST EDITED: `JUN 21, 1994` DESCRIPTION: `If the user chooses to allow multiple approval of orders, the Approving Official will be able to select a group of orders to approve without reviewing the display screen for each order.`
10.07	APPROVAL PROCESS	10;7	SET	'S' FOR supervisors only; 'A' FOR all PSAS staff; 'N' FOR no approval required; LAST EDITED: `FEB 06, 1995` DESCRIPTION: `This field indicates whether a station wished to allow both supervisors and Audiologists to be able to approve orders or if they only wish to allow supervisors to have approval privileges. If no entry is made in this` `parameter, only supervisors will be able to approve orders.`
10.08	ELIGIBILITY EDIT CAPABILITY	10;8	SET	'0' FOR NO EDIT OF DHCP ELIGIBILITY; '1' FOR EDIT OF DHPC ELIGIBILITY BY SUPERVISOR; '2' FOR EDIT OF DHCP ELIGIBILITY BY ANYONE; LAST EDITED: `JAN 18, 1994` DESCRIPTION: `This parameter controls users abilities to edit the eligibility for a patient. If set to '0', the DHCP eligibility determined from the database cannot be edited. If set to '1', the DHCP eligibility can only be edited by` `a supervisor. If set to '2', the DHCP eligibility can be edited by any user.`
10.09	DISPLAY ERRORS ON MENU ENTRY	10;9	SET	'0' FOR DO NOT DISPLAY ERRORS; '1' FOR DISPLAY ERRORS; LAST EDITED: `JUL 07, 1994` DESCRIPTION: `If this parameter is set to 'DISPLAY ERRORS', all users signing on to ROES will see a list of orders in the error status.`
10.1	ORDER DELIVERY ROUTING	10;10	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<3) X` LAST EDITED: `JAN 18, 1994` HELP-PROMPT: `Answer must be 3-10 characters in length.` DESCRIPTION: `This field contains the free text routing symbol of the service requesting a regular mail response to correspondence or product delivery from the DDC.`
11.01	# OF DAYS TO SAVE INCOMPLETE	11;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 29, 1993` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 enterd into this field will determine the number of days to retain orders with the status of INCOMPLETE. This field will be checked when the Order Purge routine is run. If there is no entry` `in this field when the purge routine is run, any order with a status of INCOMPLETE that is more than 30 days old will be permanently deleted.`
11.02	# OF DAYS TO SAVE DISAPPROVED	11;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 29, 1993` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to retain orders with the status of COMPLETE. This field will be checked when the Order Purge routine is run. If there is no entry` `in this field when the purge routine is run, any order with a status of COMPLETE that is more than 30 days old will be permanently deleted.`
11.03	# OF DAYS TO SAVE ERRORS	11;3	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 29, 1993` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to retain orders with the status of ERROR. This field will be checked when the Order Purge routine is run. If there is no entry in` `this field when the purge routine is run, any order with a status of ERROR that is more than 30 days old will be permanently deleted.`
11.04	# OF DAYS TO SAVE COMPLETE	11;4	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 29, 1993` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to reatin orders with the status of COMPLETE. This field will be checked when the Order Purge routine is run. If there is no entry` `in this field when the purge routine is run, any order with a status of COMPLETE that is more than 30 days old will be permanently deleted.`
11.05	# OF DAYS TO SAVE REJECTS	11;5	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 29, 1993` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to retain orders with the status of REJECT. This field will be checked when the Order Purge routine is run. If there is no entry in` `this field when the purge routine is run, any order with a status of REJECT that is more than 30 days old will be permanently deleted.`
11.06	# OF DAYS TO SAVE CANCELS	11;6	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUN 28, 1994` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits` DESCRIPTION: `A numeric value from 1 to 9999 entered into this field will determine the number of days to retain orders with the status of CANCELED. This field will be checked when the Order Purge option is run. If there is no entry` `in this field when the purge routine is run, any order with a status of CANCELED that is more than 30 days old will be permanently deleted.`
101	STAFF DESIGNATION	101;0	POINTER Multiple #791813.0101	791813.0101 LAST EDITED: `FEB 17, 1991` DESCRIPTION: `This multiple field contains a list of users who have been given designation as an Audiologist.`

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	.04+1, 2.04+1, 10.04+1*
>> DA	.01(XREF 1S), .01(XREF 1K)
>> DINUM	.01+1*
DT	.04+1
X	.01+1, .01(XREF 1S), .01(XREF 1K), .04+1!, .1+1!, 1.01+1!, 1.02+1!, 1.03+1!, 1.04+1!, 1.05+1! , 1.06+1!, 2.02+1!, 2.04+1!, 10.04+1*!, 10.1+1!, 11.01+1!, 11.02+1!, 11.03+1!, 11.04+1!, 11.05+1! , 11.06+1!
>> Y	.04+1, .04OT+1*, 2.04+1, 10.04+1
>> Y(0	.04OT+1*

Customize PDF page

Package: Remote Order Entry System

Global: ^RMPF(791813

Information

Description

Directly Accessed By Routines, Total: 11

Accessed By FileMan Db Calls, Total: 3

Pointer To FileMan Files, Total: 2

Fields, Total: 39

External References

Global Variables Directly Accessed

Local Variables

Legend: