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 |