PROSTHETICS PATIENT ELIGIBILITY ICR (3614)

Name

Value

NUMBER

3614

IA #

3614

FILE NUMBER

GLOBAL ROOT

DPT(

DATE CREATED

2002/07/03

CUSTODIAL PACKAGE

CUSTODIAL ISC

Albany

USAGE

Private

TYPE

File

NAME

PROSTHETICS PATIENT ELIGIBILITY

GENERAL DESCRIPTION

The following are patient data to be passed to coreFLS
to support Purchasing and Inventory functions.

GLOBAL REFERENCE

FIELD NUMBER

DPT(D0,0)

FIELD NUMBER	ACCESS	FIELD DESCRIPTION	FIELD NAME	LOCATION
.01	Read w/Fileman	Extract data via FileMan utility like $$GET1^DIQ().	NAME	0;1
.09	Read w/Fileman	Extract data via FileMan utility like $$GET1^DIQ().	SOCIAL SECURITY NUMBER	0;9

DPT(D0,.36)

FIELD NUMBER	ACCESS	FIELD DESCRIPTION	FIELD NAME	LOCATION
.361	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	PRIMARY ELIGIBILITY CODE	.36;1

DPT(D0,.362)

FIELD NUMBER	ACCESS	FIELD DESCRIPTION	FIELD NAME	LOCATION
.36205	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	RECEIVING A&A BENEFITS?	.362;12
.36215	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	RECEIVING HOUSEBOUND BENEFITS?	.362;13

DPT(D0,.372,D1)

FIELD NUMBER	ACCESS	FIELD DESCRIPTION	FIELD NAME
IEN	Direct Global Read & w/Fileman	Loop through subfile entries as via $O(^DPT(D0,.372,D1)).	Internal Entry Number

DPT(D0,.372,D1,0)

FIELD NUMBER	ACCESS	FIELD DESCRIPTION	FIELD NAME	LOCATION
.01	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	RATED DISABILITIES (VA)	0;1
2	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	DISABILITY %	0;2
3	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	SERVICE CONNECTED	0;3

DPT(D0,.52)

FIELD NUMBER	ACCESS	FIELD DESCRIPTION	FIELD NAME	LOCATION
.525	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	POW STATUS INDICATED?	.52;5

DPT(D0,.53)

FIELD NUMBER	ACCESS	FIELD DESCRIPTION	FIELD NAME	LOCATION
.531	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	CURRENT PH INDICATOR	.53;1
.532	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	CURRENT PURPLE HEART STATUS	.53;2
.533	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	CURRENT PURPLE HEART REMARKS	.53;3

DPT(D0,"MPI")

FIELD NUMBER	ACCESS	FIELD DESCRIPTION	FIELD NAME	LOCATION
991.04	Read w/Fileman	Extract data via FileMan utility like EN^DIQ1.	LOCALLY ASSIGNED ICN	MPI;4

STATUS

Withdrawn

DURATION

Till Otherwise Agreed

DPT(

SUBSCRIBING PACKAGE

SUBSCRIBING PACKAGE	ISC
COMMUNICATIONS SERVICE LIBRARY	Washington/Silver Spring