
| Name | Value |
|---|---|
| FILE | 61.2 |
| NAME | AD |
| SHORT DESCRIPTION | Special xref for valid SCT and duplicate SCT screening |
| TYPE | MUMPS |
| EXECUTION | FIELD |
| ACTIVITY | IR |
| USE | ACTION |
| ROOT TYPE | INDEX FILE |
| ROOT FILE | 61.2 |
| SET LOGIC | N LRY S LRY=$$SCTCHK^LRXREF($G(X2(1)),DA) D:LRY<1 DELSCT^LRXREF(DA) |
| SET CONDITION CODE | S X=$S('$D(LRFMERTS):1,1:0) |
| CROSS-REFERENCE VALUES |
|
| KILL LOGIC | Q |