INPUT TRANSFORM: Q:$$VAEDT^RORDD(798.2,$G(DA(1))) K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAR 26, 2002
HELP-PROMPT: Type a Number between 1 and 999999999, 0 Decimal Digits.
DESCRIPTION: YOU MUST NOT EDIT THIS FIELD IF IT IS A PART OF NATIONAL REGISTRY DEFINITION!
Enter the code of the data element that should be loaded before evaluation of the expression. Values of all data elements referenced in the selection rule expression are loaded automatically (you do not need to enter
them here).
DELETE TEST: 1,0)= I $$VADEL^RORDD(798.2,$G(DA(1)))
DELETE AUTHORITY: @
WRITE AUTHORITY: @
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
FIELD INDEX: B (#155) REGULAR IR LOOKUP & SORTING
Unique for: Key A (#20), File #798.26
Short Descr: Uniqueness Index for the "A" Key of Subfile #798.26