354.71 (65)    INDEX (.11)

Name Value
FILE 354.71
NAME AD
DESCRIPTION
This is used to sort all transactions by patient, and then by the
month/year they apply to.
SHORT DESCRIPTION This is the main transaction sorting cross reference.
TYPE REGULAR
EXECUTION RECORD
ACTIVITY IR
USE SORTING ONLY
ROOT TYPE INDEX FILE
ROOT FILE 354.71
SET LOGIC S ^IBAM(354.71,"AD",X(1),X(2),DA)=""
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   354.71
    FIELD:   .02
    COLLATION:   forwards
  • ORDER NUMBER:   2
    SUBSCRIPT NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   354.71
    FIELD:   .03
    TRANSFORM FOR STORAGE:   S X=$E(X,1,5)_"00"
    COLLATION:   forwards
KILL LOGIC K ^IBAM(354.71,"AD",X(1),X(2),DA)
KILL ENTIRE INDEX CODE K ^IBAM(354.71,"AD")