
| 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 |