Global: ^AUPNCR

FileMan FileNo	FileMan Filename	Package
9000009	*CLINICAL REMINDER	IHS Patient

FileMan FileNo

FileMan Filename

Package

9000009

*CLINICAL REMINDER

IHS Patient

Description

This file contains clinical reminders for patients. The PATIENT NAME field of this file (.01) is a backward pointer to the IHS PATIENT file and must exist there before data can be added here. There is one record in this file for each clinical reminder for each patient, therefore, the PATIENT NAME field of this file (.01) is duplicated. Data in this file is generated by software.

Package	Total	Routines
Local Area Programs	1	AZAXDPM1

Package

Total

Routines

Local Area Programs

AZAXDPM1

Package	Total	FileMan Files
IHS Patient	1	PATIENT(#9000001)[.01]
Utility Tables	1	*CLINICAL REMINDER CODE(#9999999.24)[.02]

Package

Total

FileMan Files

IHS Patient

PATIENT(#9000001)[.01]

Utility Tables

*CLINICAL REMINDER CODE(#9999999.24)[.02]

Fields, Total: 3

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	PATIENT NAME	0;1	POINTER TO PATIENT FILE (#9000001)	**********************REQUIRED FIELD********************** PATIENT(#9000001) NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9000009^B` 1)= S ^AUPNCR("B",$E(X,1,30),DA)="" 2)= K ^AUPNCR("B",$E(X,1,30),DA)
.02	CODE	0;2	POINTER TO *CLINICAL REMINDER CODE FILE (#9999999.24)	**********************REQUIRED FIELD********************** *CLINICAL REMINDER CODE(#9999999.24) LAST EDITED: `JUL 11, 1986` UNEDITABLE CROSS-REFERENCE: `9000009^AA^MUMPS` 1)= S ^AUPNCR("AA",$P(^AUPNCR(DA,0),U,1),X,DA)="" 2)= K ^AUPNCR("AA",$P(^AUPNCR(DA,0),U,1),X,DA)
.03	DATE OF TRIGGER	0;3	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:DTX) X` LAST EDITED: `JUL 11, 1986` HELP-PROMPT: `TYPE A DATE BETWEEN 1960 AND TODAY` UNEDITABLE

.01

PATIENT NAME

0;1

POINTER TO PATIENT FILE (#9000001)

************************REQUIRED FIELD************************

PATIENT(#9000001)

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 9000009^B

1)= S ^AUPNCR("B",$E(X,1,30),DA)=""

2)= K ^AUPNCR("B",$E(X,1,30),DA)

.02

CODE

0;2

POINTER TO *CLINICAL REMINDER CODE FILE (#9999999.24)

************************REQUIRED FIELD************************

*CLINICAL REMINDER CODE(#9999999.24)

LAST EDITED: JUL 11, 1986
```
UNEDITABLE
```

CROSS-REFERENCE: 9000009^AA^MUMPS

1)= S ^AUPNCR("AA",$P(^AUPNCR(DA,0),U,1),X,DA)=""

2)= K ^AUPNCR("AA",$P(^AUPNCR(DA,0),U,1),X,DA)

.03

DATE OF TRIGGER

0;3

DATE

************************REQUIRED FIELD************************

INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:DTX) X
LAST EDITED: JUL 11, 1986
HELP-PROMPT: TYPE A DATE BETWEEN 1960 AND TODAY
```
UNEDITABLE
```

Customize PDF page

Package: IHS Patient

Global: ^AUPNCR

Information

Description

Directly Accessed By Routines, Total: 1

Pointer To FileMan Files, Total: 2

Fields, Total: 3