PSJPATMR ;BIR/RSB - UTILITY FOR PATIENT MERGE ;Apr 19, 2022@14:12
Source file <PSJPATMR.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN(DFN1,DFN2) | 
 
  | 
|
| MOVEUD(DFN1,DFN2) | ||
| MOVEIV(DFN1,DFN2) | ||
| CHKIVACT(PSJDFN1) | ||
| CHKUDACT(PSJDFN1) | ||
| CHKPL(PSJDFN1) | ||
| CNVUD(DFN,ON) | ||
| CNVIV(DFN,ON) | ||
| UPDBML(FROMDFN,FROMORD,TODFN,TOORD) | ; Update the ORDER REFERENCE NUMBER field (#.11) on the BCMA MED LOG file (#53.79)
 ; Input: FROMDFN - From Patient IEN - Pointer to the PATIENT file (#2) ; FROMORD - Original Order Number Pointer and Type of order being moved (e.g., "24U", "55V", etc.) ; TODFN - To Patient IEN - Pointer to the PATIENT file (#2) ; TOORD - New Order Number Pointer and Type of order being moved (e.g., "48U", "105V", etc.)  | 
| FileNo | Call Tags | 
|---|---|
| ^PSB(53.79 - [#53.79] | Classic Fileman Calls |