Sub-Field: 9002169.61

Parent File	Name	Number	Package
QI REVIEW CRITERIA(#9002169.6)	CODE	9002169.61	Quality Assurance

Parent File

Name

Number

Package

CODE

9002169.61

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	CODE	0;1	POINTER TO QI CRITERIA CODES FILE (#9002169.4)	QI CRITERIA CODES(#9002169.4) LAST EDITED: `SEP 21, 1992` HELP-PROMPT: `Enter 1-6 characters as a CODE. Next you will be asked to enter a long DESCRIPTION.` CROSS-REFERENCE: `9002169.61^B` 1)= S ^AQAO1(6,DA(1),"CD","B",$E(X,1,30),DA)="" 2)= K ^AQAO1(6,DA(1),"CD","B",$E(X,1,30),DA) 3)= REGULAR 'B' XREF OF CODE SUBFILE CROSS-REFERENCE: `9002169.6^AB` 1)= S ^AQAO1(6,"AB",$E(X,1,30),DA(1),DA)="" 2)= K ^AQAO1(6,"AB",$E(X,1,30),DA(1),DA) 3)= TO FIND ALL CODES FOR A REVIEW CRIERIA ENTRY

CODE

0;1

POINTER TO QI CRITERIA CODES FILE (#9002169.4)

LAST EDITED: SEP 21, 1992
HELP-PROMPT: Enter 1-6 characters as a CODE. Next you will be asked to enter a long DESCRIPTION.

CROSS-REFERENCE: 9002169.61^B

1)= S ^AQAO1(6,DA(1),"CD","B",$E(X,1,30),DA)=""

2)= K ^AQAO1(6,DA(1),"CD","B",$E(X,1,30),DA)

3)= REGULAR 'B' XREF OF CODE SUBFILE

CROSS-REFERENCE: 9002169.6^AB

1)= S ^AQAO1(6,"AB",$E(X,1,30),DA(1),DA)=""

2)= K ^AQAO1(6,"AB",$E(X,1,30),DA(1),DA)

3)= TO FIND ALL CODES FOR A REVIEW CRIERIA ENTRY