2 (589)    INDEX (.11)

Name Value
FILE 2
NAME ANAM01
DESCRIPTION
This cross reference uses Kernel name standardization APIs to keep the NAME
COMPONENTS (#20) file record associated with the #.01 field synchronized
with the data value stored in that field.
SHORT DESCRIPTION This index keeps the NAME COMPONENTS file in synch with the .01 field.
TYPE MUMPS
EXECUTION FIELD
ACTIVITY IR
USE ACTION
ROOT TYPE INDEX FILE
ROOT FILE 2
SET LOGIC I '$G(XUNOTRIG) N XUNOTRIG S XUNOTRIG=1,DG20NAME=X D NARY^XLFNAME7(.DG20NAME),UPDCOMP^XLFNAME2(2,.DA,.01,.DG20NAME,1.01,+$P($G(^DPT(DA,"NAME")),U),"CL30") K DG20NAME Q
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   2
    FIELD:   .01
    COLLATION:   forwards
KILL LOGIC I '$G(XUNOTRIG) N XUNOTRIG S XUNOTRIG=1 D DELCOMP^XLFNAME2(2,.DA,.01,1.01) Q