Sub-Field: 9000046.1101

Parent File	Name	Number	Package
9000046.11	AUTHORIZATION CONTACTS	9000046.1101	IHS Patient

Details

Field #	Name	Loc	Type	Details
.01	CONTACT DATE	0;1	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:X<1 X` LAST EDITED: `JUN 22, 2004` HELP-PROMPT: `(No range limit on date)` CROSS-REFERENCE: `9000046.1101^B` 1)= S ^AUPNAUTH(DA(2),11,DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^AUPNAUTH(DA(2),11,DA(1),1,"B",$E(X,1,30),DA)
.02	CONTACT PERSON	0;2	FREE TEXT	INPUT TRANSFORM: `D NAME^AUPNPED` LAST EDITED: `JUN 28, 2004` HELP-PROMPT: `ANSWER IN THE FORM 'LASTNAME,FIRSTNAME'` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.03	CONTACT PHONE	0;3	FREE TEXT	INPUT TRANSFORM: `D VALPHONE^AGUTILS` LAST EDITED: `JUN 28, 2004` HELP-PROMPT: `Enter a valid phone number. Place extensions at end e.g. 505-245-4323 ext 5465` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.04	CONTACT E-MAIL	0;4	FREE TEXT	INPUT TRANSFORM: `D EMAIL^AGUTILS` LAST EDITED: `JUN 28, 2004` HELP-PROMPT: `Enter a valid e-mail address. name@host` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.05	CONTACT FAX	0;5	FREE TEXT	INPUT TRANSFORM: `D VALPHONE^AGUTILS` LAST EDITED: `JUN 28, 2004` HELP-PROMPT: `Enter a valid phone number. Place extensions at end e.g. 505-245-4323 ext 5466` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
101	CONTACT NOTES	1;0	WORD-PROCESSING #9000046.11101