| FILE |
2 |
| NAME |
ANAM201 |
| 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 |
WHOLE FILE |
| ROOT FILE |
2.01 |
| SET LOGIC |
I '$G(XUNOTRIG) N XUNOTRIG S XUNOTRIG=1,DG20NAME=X D NARY^XLFNAME7(.DG20NAME),UPDCOMP^XLFNAME2(2.01,.DA,.01,.DG20NAME,100.03,,"CL30") K DG20NAME Q |
| CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- SUBSCRIPT NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 2.01
- FIELD: .01
- COLLATION: forwards
|
| KILL LOGIC |
I '$G(XUNOTRIG) N XUNOTRIG S XUNOTRIG=1 D DELCOMP^XLFNAME2(2.01,.DA,.01,100.03) Q |
