Sub-Field: 798.31

Parent File	Name	Number	Package
ROR PATIENT EVENTS(#798.3)	ERROR	798.31	Clinical Case Registries

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	REGISTRY	0;1	POINTER TO ROR REGISTRY PARAMETERS FILE (#798.1)	ROR REGISTRY PARAMETERS(#798.1) LAST EDITED: `APR 15, 2002` DESCRIPTION: `The REGISTRY field identifies the registry that the record is associated with.` `DELETE AUTHORITY: @` `WRITE AUTHORITY: @` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` FIELD INDEX: `B (#156) REGULAR IR LOOKUP & SORTING` `Unique for: Key A (#21), File #798.31` `Short Descr: Uniqueness Index for the "A" key of Subfile #798.31` `Set Logic: S ^RORDATA(798.3,DA(1),1,"B",X,DA)=""` `Kill Logic: K ^RORDATA(798.3,DA(1),1,"B",X,DA)` `Whole Kill: K ^RORDATA(798.3,DA(1),1,"B")` `X(1): REGISTRY (798.31,.01) (Subscr 1)`
1	DATE	0;2	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ETX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `APR 15, 2002` DESCRIPTION: `The field holds the date that was used as the start date of the data search when problems arose during the processing of patient data. After the problems are fixed, the next data search will start from this date (minus` `lag days).` TECHNICAL DESCR: `The value of this field is used instead of the regular start date from the REGISTRY UPDATED UNTIL field of the REGISTRY PARAMETERS file during the search for patient data.` `DELETE AUTHORITY: @` `WRITE AUTHORITY: @` CROSS-REFERENCE: `798.31^AD` `1)= S ^RORDATA(798.3,DA(1),1,"AD",$E(X,1,30),DA)=""` `2)= K ^RORDATA(798.3,DA(1),1,"AD",$E(X,1,30),DA)` `3)= Do not delete!`
2	COUNTER	0;3	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `APR 15, 2002` HELP-PROMPT: `Type a Number between 1 and 99, 0 Decimal Digits.` DESCRIPTION: `When a patient is added to the ROR PATIENT EVENTS file (due to errors during the registry update), this field is populated with 1.` `Until someone fixes the error(s), every subsequent registry update will increment a value of this field by 1. When it reaches a predefined threshold value, the registry updates will skip this patient until someone fixes` `the error(s) and resets this field to 1.` TECHNICAL DESCR: `The $$ADD^RORUPP01 function initializes this field with 1 when the record is created. Then it increments its value each time the record is updated until the field value becomes not less than a value of the local` `RORUPD(MAXPPCNT") node (or 14 by default).` `The function $$SDSDATE^RORUPP01 analyzes the value of the field and returns an error if the counters associated with all processed registries have reached the threshold.` `DELETE AUTHORITY:`

.01

REGISTRY

0;1

POINTER TO ROR REGISTRY PARAMETERS FILE (#798.1)

ROR REGISTRY PARAMETERS(#798.1)

LAST EDITED: APR 15, 2002
DESCRIPTION:
The REGISTRY field identifies the registry that the record is associated with.
DELETE AUTHORITY: @
WRITE AUTHORITY: @
UNEDITABLE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
FIELD INDEX: B (#156) REGULAR IR LOOKUP & SORTING
Unique for: Key A (#21), File #798.31
Short Descr: Uniqueness Index for the "A" key of Subfile #798.31
Set Logic: S ^RORDATA(798.3,DA(1),1,"B",X,DA)=""
Kill Logic: K ^RORDATA(798.3,DA(1),1,"B",X,DA)
Whole Kill: K ^RORDATA(798.3,DA(1),1,"B")
X(1): REGISTRY (798.31,.01) (Subscr 1)

DATE

0;2

DATE

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

INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: APR 15, 2002
DESCRIPTION: The field holds the date that was used as the start date of the data search when problems arose during the processing of patient data. After the problems are fixed, the next data search will start from this date (minus
lag days).
TECHNICAL DESCR:
The value of this field is used instead of the regular start date from the REGISTRY UPDATED UNTIL field of the REGISTRY PARAMETERS file during the search for patient data.
DELETE AUTHORITY: @
WRITE AUTHORITY: @
CROSS-REFERENCE: 798.31^AD
1)= S ^RORDATA(798.3,DA(1),1,"AD",$E(X,1,30),DA)=""
2)= K ^RORDATA(798.3,DA(1),1,"AD",$E(X,1,30),DA)
3)= Do not delete!

COUNTER

0;3

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: APR 15, 2002
HELP-PROMPT: Type a Number between 1 and 99, 0 Decimal Digits.
DESCRIPTION: When a patient is added to the ROR PATIENT EVENTS file (due to errors during the registry update), this field is populated with 1.
Until someone fixes the error(s), every subsequent registry update will increment a value of this field by 1. When it reaches a predefined threshold value, the registry updates will skip this patient until someone fixes
the error(s) and resets this field to 1.
TECHNICAL DESCR: The $$ADD^RORUPP01 function initializes this field with 1 when the record is created. Then it increments its value each time the record is updated until the field value becomes not less than a value of the local
RORUPD(MAXPPCNT") node (or 14 by default).
The function $$SDSDATE^RORUPP01 analyzes the value of the field and returns an error if the counters associated with all processed registries have reached the threshold.
DELETE AUTHORITY:

Customize PDF page

Package: Clinical Case Registries

ROR PATIENT EVENTS(#798.3)-->798.31

Sub-Field: 798.31

Information

Details