RECORD OF PROSTHETIC APPLIANCE/REPAIR FILE ACCESS ICR (6496)

Name

Value

NUMBER

6496

IA #

6496

FILE NUMBER

660

GLOBAL ROOT

RMPR(660

DATE CREATED

2016/10/17

CUSTODIAL PACKAGE

PROSTHETICS

USAGE

Private

TYPE

File

DBIC APPROVAL STATUS

APPROVED

NAME

RECORD OF PROSTHETIC APPLIANCE/REPAIR FILE ACCESS

GENERAL DESCRIPTION

The Advanced Prosthetics Acquisition Tool (APAT) reads from the RECORD
OF PROS APPLIANCE/REPAIR (#660) when displaying appliance transactions
on the 2319 tab and when extracting appliance data to SQL Server to
determine if duplicate appliances have been purchased for a patient.
When creating a Prosthetic 1358, a 2529-3, a GIP or PIP Stock Issue,
and when adding a cancellation note to a Prosthetic Suspense, APAT
writes to the RECORD OF PROS APPLIANCE/REPAIR (#660) in order to record
the purchase/issue on the patient's 2319. APAT also allows for the
editing of specific fields in the RECORD OF PROS APPLIANCE/REPAIR
(#660).

During reconciliation and close out, APAT stores the shipment date
(DATE OF SERVICE (#39)) of each 2319 entry associated with a purchase
card order.

Amendment - Effective 4/14/23, The Advanced Prosthetics Acquisition Tool
(APAT) requests changes in the types of access for the following fields in the
RECORD OF PROS APPLIANCE/REPAIR (#660) file.  Direct global reads of fields
are requested to prevent VistA timeouts when reports are produced or grids are
filled.

Amendment (requested 1/23/24) - The Advanced Prosthetics Acquisition Tool
(APAT) requests changes in the types of access for the indicated fields in the
RECORD OF PROS APPLIANCE/REPAIR (#660) file.  Direct global reads of the
indicated fields are requested to prevent VistA timeouts when reports and
lists are generated.  The requested direct global reads have existed in APAT
since it was released in 2019.

GLOBAL REFERENCE

FIELD NUMBER

GLOBAL DESCRIPTION

RMPR(660,D0,0)

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
.01	Direct Global Read & R/W w/Fileman	ENTRY DATE	0;1
.02	Direct Global Read & R/W w/Fileman	PATIENT NAME	0;2
1	Direct Global Read & R/W w/Fileman	REQUEST DATE	0;3
2	Direct Global Read & R/W w/Fileman	TYPE OF TRANSACTION	0;4
13	Both R/W w/Fileman	ACTION	0;5
4	Direct Global Read & R/W w/Fileman	ITEM	0;6
5	Direct Global Read & R/W w/Fileman	QTY	0;7
78	Direct Global Read & R/W w/Fileman	UNIT OF ISSUE	0;8
7	Direct Global Read & R/W w/Fileman	VENDOR	0;9
8	Direct Global Read & R/W w/Fileman	STATION	0;10
9	Direct Global Read & R/W w/Fileman	SERIAL NBR	0;11
10	Direct Global Read & R/W w/Fileman	DELIVERY DATE	0;12
11	Direct Global Read & R/W w/Fileman	FORM REQUESTED ON	0;13
12	Direct Global Read & R/W w/Fileman	SOURCE	0;14
15	Direct Global Read & R/W w/Fileman	HISTORICAL DATA	0;15
14	Direct Global Read & R/W w/Fileman	TOTAL COST	0;16
6	Direct Global Read & R/W w/Fileman	SHIP/DEL	0;17
16	Direct Global Read & R/W w/Fileman	REMARKS	0;18
17	Both R/W w/Fileman	RETURNED STATUS	0;19
17.5	Both R/W w/Fileman	RETURN STATUS DATE	0;20
18	Both R/W w/Fileman	STATUS FLAG	0;21
4.1	Both R/W w/Fileman	HCPCS	0;22
21	Both R/W w/Fileman	LOT NUMBER	0;24
22	Both R/W w/Fileman	PRODUCT LINE	0;25
6.5	Direct Global Read & R/W w/Fileman	PICKUP/DEL	0;26
27	Both R/W w/Fileman	INITIATOR	0;27

RMPR(660,D0,1)

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
23	Both R/W w/Fileman	TRANSACTION	1;1
24	Both R/W w/Fileman	DESCRIPTION	1;2
29	Both R/W w/Fileman	INVENTORY POINT	1;3
4.5	Direct Global Read & R/W w/Fileman	PSAS HCPCS	1;4
4.6	Both R/W w/Fileman	STOCK ISSUE	1;5
4.7	Both R/W w/Fileman	CPT MODIFIER	1;6
4.8	Read w/Fileman	DATE CPT MODIFIER EXTRACTED	1;7
39	Both R/W w/Fileman	DATE OF SERVICE	1;8
35	Both R/W w/Fileman	USER WHO EDIT	1;9
36	Both R/W w/Fileman	DATE EDITED	1;10
4.9	Direct Global R/W & w/Fileman	HCPCS-ICD9 CODING FLAG	1;11
4.91	Direct Global Read & R/W w/Fileman	CODING FLAG DATE	1;12
4.92	Direct Global Read & R/W w/Fileman	HI TECH ITEM	1;13

RMPR(660,D0,2)

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
37	Read w/Fileman	HCPCS/ITEM	2;1
38	Both R/W w/Fileman	HCPCS/ITEM DESCRIPTION	2;2
38.1	Both R/W w/Fileman	EXCLUDE/WAIVER	2;3
38.7	Both R/W w/Fileman	CONTRACT #	2;9
38.8	Both R/W w/Fileman	NUMBER OF BIDS	2;10

RMPR(660,D0,3)

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
25	Both R/W w/Fileman	DELIVER TO	3;1
26	Both R/W w/Fileman	DATE REQUIRED	3;2
19	Read w/Fileman	PATIENT NOTIFICATION FLAG	3;3

RMPR(660,D0,4)

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
4.2	Both R/W w/Fileman	VENDOR TRACKING NUMBER	4;1
4.3	Both R/W w/Fileman	BANK AUTHORIZATION NUMBER	4;2
8.61	Both R/W w/Fileman	CONSULT REQUEST SERVICE	4;3

RMPR(660,D0,5)

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
34	Both R/W w/Fileman	OIF/OEF	5;1

RMPR(660,D0,6)

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
20	Read w/Fileman	DELIVERY VERIFICATION DATE	6;1
20.1	Read w/Fileman	DELIVERY VERIFICATION STATUS	6;2

RMPR(660,D0,9)

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
9.1	Both R/W w/Fileman	PRODUCT DESCRIPTION	9;1
9.2	Both R/W w/Fileman	PRODUCT MODEL	9;2

RMPR(660,D0,10)

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
8.1	Both R/W w/Fileman	SUSPENSE DATE	10;1
8.2	Both R/W w/Fileman	DATE RX WRITTEN	10;2
8.3	Both R/W w/Fileman	INITIAL ACTION DATE	10;3
8.4	Both R/W w/Fileman	COMPLETION DATE	10;4
8.5	Both R/W w/Fileman	TYPE OF REQUEST	10;5
8.6	Both R/W w/Fileman	SUSPENSE REQUESTOR	10;6
8.7	Both R/W w/Fileman	PROVISIONAL DIAGNOSIS	10;7
8.8	Direct Global Read & R/W w/Fileman	SUSPENSE ICD	10;8
8.9	Both R/W w/Fileman	CONSULT	10;9
8.11	Both R/W w/Fileman	SUSPENSE STATION	10;11
8.12	Both R/W w/Fileman	PCE	10;12
8.13	Both R/W w/Fileman	DATE SENT TO PCE	10;13
8.14	Both R/W w/Fileman	SUSPENSE STATUS	10;14

RMPR(660,D0,'AM')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
60	Both R/W w/Fileman	AMIS DATE	AM;1
81	Direct Global Read & R/W w/Fileman	NO ADMIN COUNT	AM;2
62	Direct Global Read & R/W w/Fileman	PATIENT CATEGORY	AM;3
63	Both R/W w/Fileman	SPECIAL CATEGORY	AM;4
64	Read w/Fileman	ADMIN REPAIR AMIS CODE	AM;5
79	Read w/Fileman	AMIS FLAG	AM;6
52	Read w/Fileman	AMIS NEW CODE	AM;9

RMPR(660,D0,'AMS')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
68	Direct Global Read & R/W w/Fileman	AMIS GROUPER	AMS;1

RMPR(660,D0,'BA1')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
30	Both R/W w/Fileman	PRIMARY ICD DIAGNOSIS CODE	BA1;1
30.1	Both R/W w/Fileman	PRIMARY AGENT ORANGE EXPOSURE	BA1;2
30.2	Both R/W w/Fileman	PRIMARY IONIZED RADIATION	BA1;3
30.3	Both R/W w/Fileman	PRIMARY SERVICE-CONNECTED	BA1;4
30.4	Both R/W w/Fileman	PRIMARY ENVIRONMENTAL CONT.	BA1;5
30.5	Both R/W w/Fileman	PRIMARY MST	BA1;6
30.6	Both R/W w/Fileman	PRIMARY HEAD/NECK CANCER	BA1;7
30.7	Both R/W w/Fileman	PRIMARY COMBAT VET	BA1;8

RMPR(660,D0,'BA2')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
31	Both R/W w/Fileman	SECONDARY ICD DIAGNOSIS CODE 1	BA2;1
31.1	Both R/W w/Fileman	SECONDARY AGENT ORANGE 1	BA2;2
31.2	Both R/W w/Fileman	SECONDARY IONIZED RADIATION 1	BA2;3
31.3	Both R/W w/Fileman	SECONDARY SERVICE-CONNECTED 1	BA2;4
31.4	Both R/W w/Fileman	SECONDARY ENVIRONMENTAL CONT 1	BA2;5
31.5	Both R/W w/Fileman	SECONDARY MST 1	BA2;6
31.6	Both R/W w/Fileman	SECONDARY HEAD/NECK CANCER 1	BA2;7
31.7	Both R/W w/Fileman	SECONDARY COMBAT VET 1	BA2;8

RMPR(660,D0,'BA3')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
32	Both R/W w/Fileman	SECONDARY ICD DIAGNOSIS 2	BA3;1
32.1	Both R/W w/Fileman	SECONDARY AGENT ORANGE 2	BA3;2
32.2	Both R/W w/Fileman	SECONDARY IONIZED RADIATION 2	BA3;3
32.3	Both R/W w/Fileman	SECONDARY SERVICE-CONNECTED 2	BA3;4
32.4	Both R/W w/Fileman	SECONDARY ENVIR. CONT. 2	BA3;5
32.5	Both R/W w/Fileman	SECONDARY MST 2	BA3;6
32.6	Both R/W w/Fileman	SECONDARY HEAD/NECK CANCER 2	BA3;7
32.7	Both R/W w/Fileman	SECONDARY COMBAT VET 2	BA3;8

RMPR(660,D0,'BA4')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
33	Both R/W w/Fileman	SECONDARY ICD DIAGNOSIS 3	BA4;1
33.1	Both R/W w/Fileman	SECONDARY AGENT ORANGE 3	BA4;2
33.2	Both R/W w/Fileman	SECONDARY IONIZED RADIATION 3	BA4;3
33.3	Both R/W w/Fileman	SECONDARY SERVICE-CONNECTED 3	BA4;4
33.4	Both R/W w/Fileman	SECONDARY ENVIRON. CONT. 3	BA4;5
33.5	Both R/W w/Fileman	SECONDARY MST 3	BA4;6
33.6	Both R/W w/Fileman	SECONDARY HEAD/NECK CANCER 3	BA4;7
33.7	Both R/W w/Fileman	SECONDARY COMBAT VET 3	BA4;8

RMPR(660,D0,'DES',0)

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
28	Both R/W w/Fileman	EXTENDED DESCRIPTION	660.028;1

RMPR(660,D0,'HST')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
89	Direct Global Read & w/Fileman	HISTORICAL ITEM	HST;1
90	Read w/Fileman	HISTORICAL STATION	HST;2
91	Direct Global Read & w/Fileman	HISTORICAL VENDOR	HST;3
97	Read w/Fileman	HISTORICAL RECORD	HST;4

RMPR(D0,'HSTV')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
92	Read w/Fileman	HISTORICAL VENDOR PHONE	HSTV;1
93	Read w/Fileman	HISTORICAL STREET	HSTV;2
94	Read w/Fileman	HISTORICAL CITY	HSTV;3

RMPR(660,D0,'HSTV1')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
95	Read w/Fileman	HISTORICAL STATE	HSTV1;1
96	Read w/Fileman	HISTORICAL ZIP	HSTV1;2
89.1	Direct Global Read & w/Fileman	DALC REFERENCE NUMBER	HSTV1;3
89.2	Read w/Fileman	DALC BILL DATE	HSTV1;4
89.3	Read w/Fileman	DALC ORDERING STATION	HSTV1;5

RMPR(660,D0,'LB')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
40	Both R/W w/Fileman	REQUESTING STATION	LB;1
72.5	Both R/W w/Fileman	FREE TEXT WO #	LB;2
69	Direct Global Read & R/W w/Fileman	SOURCE OF PROCUREMENT	LB;3
70	Both R/W w/Fileman	RECEIVING STATION	LB;4
71	Both R/W w/Fileman	WORK ORDER NUMBER	LB;5
45	Both R/W w/Fileman	TOTAL LABOR HOURS	LB;6
46	Both R/W w/Fileman	TOTAL LABOR COST	LB;7
47	Both R/W w/Fileman	TOTAL MATERIAL COST	LB;8
48	Direct Global Read & R/W w/Fileman	TOTAL LAB COST	LB;9
72	Both R/W w/Fileman	2529-3	LB;10
50	Both R/W w/Fileman	COMPLETION DATE	LB;11
51	Read w/Fileman	LAB REMARKS	LB;12
80	Read w/Fileman	WORK FOR OTHER STATION	LB;13
82	Both R/W w/Fileman	NO LAB COUNT	LB;14

RMPR(660,D0,'LBA')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
73	Read w/Fileman	LAB AMIS DATE	LBA;1
74	Read w/Fileman	ORTHOTICS LAB CODE	LBA;2
75	Read w/Fileman	ORTHOTICS LAB REPAIR CODE	LBA;3
76	Read w/Fileman	RESTORATION LAB CODE	LBA;4
77	Read w/Fileman	RESTORATIONS LAB REPAIR CODE	LBA;5
83	Both R/W w/Fileman	BACKLOG DATE	LBA;6

RMPR(D0,'PFSS')

FIELD NUMBER	ACCESS	FIELD NAME	LOCATION
100	Read w/Fileman	PFSS ACCOUNT REFERENCE	PFSS;1
101	Read w/Fileman	PFSS CHARGE ID	PFSS;2
102	Read w/Fileman	LATEST PSAS HCPCS	PFSS;3
103	Read w/Fileman	LATEST QTY	PFSS;4
104	Read w/Fileman	LATEST TOTAL COST	PFSS;5
105	Read w/Fileman	LATEST ORDERING PROVIDER	PFSS;6
106	Read w/Fileman	PFSS ACCOUNT FLAG	PFSS;7
107	Read w/Fileman	PFSS CHARGE FLAG	PFSS;8

RMPR(660,'AC'

File 660 'AC' cross-reference  Used to look up by
REQUEST DATE

RMPR(660,'AG'

File 660 'AG' cross-reference  Used to look up by AMIS
GROUPER

RMPR(660,'B'

File 660 'B' cross reference  Used to look up by ENTRY
DATE

RMPR(660,'C'

File 660 'C' cross reference  Used to look up by PATIENT
NAME

RMPR(660,'CT'

File 660 'CT' cross reference  Used to look up by
DELIVERY DATE

STATUS

Active

KEYWORDS

APAT

DURATION

Till Otherwise Agreed

RMPR(660

SUBSCRIBING PACKAGE

ADVANCED PROSTHETICS ACQUISITION TOOL

DATE ACTIVATED

2024/02/01