Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | All

Print Page as PDF

Global: ^AQAOCC(5

Package: Quality Assurance

Global: ^AQAOCC(5

Information

FileMan FileNo	FileMan Filename	Package
9002166.5	QI OCC CRITERIA	Quality Assurance

Description

This file stores all review criteria for each indicator. It is a flat file where each new criterion creates a new entry. The file points back to both the PATIENT file and the QI OCCURRENCE file. The file is shipped empty and is populated at the facility. **DO NOT ACCESS THIS FILE VIA FILEMAN UNLESS DIRECTED BY THE DEVELOPER!**

Directly Accessed By Routines, Total: 12

Accessed By FileMan Db Calls, Total: 3

Pointer To FileMan Files, Total: 4

Fields, Total: 7

Field #	Name	Loc	Type	Details
.01	NAME	0;1	POINTER TO QI REVIEW CRITERIA FILE (#9002169.6)	**********************REQUIRED FIELD********************** QI REVIEW CRITERIA(#9002169.6) LAST EDITED: `OCT 13, 1993` CROSS-REFERENCE: `9002166.5^B` 1)= S ^AQAOCC(5,"B",$E(X,1,30),DA)="" 2)= K ^AQAOCC(5,"B",$E(X,1,30),DA) 3)= REGULAR 'B' XREF
.02	OCCURRENCE	0;2	POINTER TO QI OCCURRENCE FILE (#9002167)	**********************REQUIRED FIELD********************** QI OCCURRENCE(#9002167) LAST EDITED: `MAY 10, 1993` CROSS-REFERENCE: `9002166.5^AB` 1)= S ^AQAOCC(5,"AB",$E(X,1,30),DA)="" 2)= K ^AQAOCC(5,"AB",$E(X,1,30),DA) 3)= FOR CONTEXT SWITCH FROM QI OCC FILE Need a regular xref to handle context switch from QI Occurrence file to this file during execution of input template. CROSS-REFERENCE: `9002166.5^AC^MUMPS` 1)= N AQAOX S AQAOX=+^AQAOCC(5,DA,0) S:AQAOX]"" ^AQAOCC(5,"AC",X,AQAOX,DA)="" 2)= N AQAOX S AQAOX=+^AQAOCC(5,DA,0) K:AQAOX]"" ^AQAOCC(5,"AC",X,AQAOX,DA) 3)= TO FIND ALL CRITERIA ENTRIES FOR AN OCCURRENCE This xref is used to find all review criteria entered for a particular occurrence. It is used by ^AQAOEDTP to display all criteria already entered during the data entry process. It is also used by ^AQAOPC11 to group criteria by occurrence in the Trending Report - Occurrences by Review Criteria.
.03	PATIENT	0;3	POINTER TO PATIENT FILE (#9000001)	**********************REQUIRED FIELD********************** PATIENT(#9000001) LAST EDITED: `APR 28, 1993`
.05	YES/NO/NA	0;5	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; '2' FOR N/A; LAST EDITED: `JUL 28, 1994`
.06	CODE	0;6	POINTER TO QI CRITERIA CODES FILE (#9002169.4)	**********************REQUIRED FIELD********************** QI CRITERIA CODES(#9002169.4) INPUT TRANSFORM: `S DIC("S")="I $D(^AQAO1(6,""AB"",Y,AQAOCR))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `MAY 10, 1993` SCREEN: `S DIC("S")="I $D(^AQAO1(6,""AB"",Y,AQAOCR))"` EXPLANATION: `ONLY CODES DEFINED FOR THIS CRITERIA ARE LISTED`
.07	NUMBER	0;7	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `D SETNUM^AQAODIC K:+X'=X!(X>9999.99)!(X<0)!(X?.E1"."3N.N)!(XAQAOHI) X K AQAOLOW,AQAOHI` LAST EDITED: `JUL 28, 1994` EXECUTABLE HELP: `D SETNUM^AQAODIC W !!,"Enter a number between ",AQAOLOW," and ",AQAOHI," inclusive."` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.08	DATE	0;8	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ET" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `APR 28, 1993` HELP-PROMPT: `Enter the date that applies.`

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | All