XDRDEFLG ;SF-IRMFO/TKW - SILENT API TO UPDATE THE SUPPRESS NEW DUP EMAIL FLAG ;9/19/08 16:57
Source file <XDRDEFLG.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(XDRSLT,XDRFL,XDRVAL) | ; Update the SUPPRESS NEW DUP EMAIL field on record in file #15.1
; Called from REMOTE PROCEDURE - XDR UPD EMAIL FLAG ; XDRSLT = OUTPUT results. ; set to 0 if update was successful, -1^ERRMSG if error ; XDRFL = 'FILE TO BE CHECKED' field value in file 15.1, defaults to PATIENT file. ; XDRVAL = 0 or 1 (value to set into field) |
| RPC Name | Call Tags |
|---|---|
| XDR UPD SUPPR EMAIL | EN |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC - [#1] | EN+13 |
| ^TMP("DIERR" | EN+23, EN+24 |
| ^VA(15.1 - [#15.1] | EN+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| XDRFDA | EN+8~ |
| XDRFDA( | EN+21* |
| XDRFL | EN~, EN+10*, EN+11*, EN+13, EN+14, EN+21, EN+24 |
| XDRGBL | EN+8~, EN+13*, EN+14 |
| XDRSLT | EN~, EN+7!, EN+15*, EN+19*, EN+24*, EN+27* |
| XDRVAL | EN~, EN+17*, EN+18, EN+21 |
