| FILE |
46.14 |
| NAME |
AD |
| SHORT DESCRIPTION |
ASIH Status and ASIH Termination date |
| TYPE |
REGULAR |
| EXECUTION |
RECORD |
| ACTIVITY |
IR |
| USE |
SORTING ONLY |
| ROOT TYPE |
WHOLE FILE |
| ROOT FILE |
46.15 |
| SET LOGIC |
S ^DGRU(46.14,"AD",$E(X(1),1,30),$E(X(2),1,30),DA(1),DA)="" |
| CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- SUBSCRIPT NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 46.15
- FIELD: .04
- MAXIMUM LENGTH: 30
- COLLATION: forwards
-
- ORDER NUMBER: 2
- SUBSCRIPT NUMBER: 2
- TYPE OF VALUE: COMPUTED VALUE
- COMPUTED CODE: N X1,X2 S X1=$P(^DGRU(46.14,DA(1),1,DA,0),U),X2=30 D C^%DTC
- MAXIMUM LENGTH: 30
|
| KILL LOGIC |
K ^DGRU(46.14,"AD",$E(X(1),1,30),$E(X(2),1,30),DA(1),DA) |
| KILL ENTIRE INDEX CODE |
K ^DGRU(46.14,"AD") |
