XDRDADDS ;SF-IRMFO/TKW - SILENT API TO ADD POTENTIAL DUPLICATE PAIR TO FILE 15 ;9/22/08 11:27
Source file <XDRDADDS.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADD(XDRSLT,XDRFL,XDRFR,XDRTO) | ; Add a pair to the DUPLICATE RECORD file (#15)
; Called from REMOTE PROCEDURE - XDR ADD POTENTIAL PATIENT DUPS ; XDRSLT = OUTPUT results. ; set to DFN in file 15 if add was successful, -1^ERRMSG if error ; XDRFL = File number where duplicate records reside. If not passed, defaults to PATIENT file. ; XDRFR = From entry IEN (DFN if PATIENT file entry) ; XDRTO = To entry IEN (DFN if PATIENT file entry) ; |
|
| SENDMSG(XDRFL,XDRFR,XDRPN1,XDRSSN1,XDRTO,XDRPN2,XDRSSN2,XDRNEWR) | ; Send email message
|
| RPC Name | Call Tags |
|---|---|
| XDR ADD POTENTIAL PATIENT DUP | ADD |
| FileNo | Call Tags |
|---|---|
| ^VA(15.1 - [#15.1] | GET1^DIQ |
| ^DPT - [#2] | GET1^DIQ |
| ^XMB(3.8 - [#3.8] | GET1^DIQ |