2 (597)    INDEX (.11)

Name Value
FILE 2
NAME ANAM341
DESCRIPTION
This cross reference uses Kernel name standardization APIs to keep the NAME
COMPONENTS (#20) file record associated with the #.341 field synchronized
with the data value stored in that field.
SHORT DESCRIPTION This index keeps the NAME COMPONENTS file in synch with field #.341.
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,.341,.DG20NAME,1.09,+$P($G(^DPT(DA,"NAME")),U,9),"CL35") K DG20NAME Q
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   2
    FIELD:   .341
    COLLATION:   forwards
KILL LOGIC I '$G(XUNOTRIG) N XUNOTRIG S XUNOTRIG=1 D DELCOMP^XLFNAME2(2,.DA,.341,1.09) Q