PSOERX1A ;ALB/BWF - eRx Utilities/RPC's ; 8/3/2016 5:14pm
Source file <PSOERX1A.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SI | ;
|
|
SBN | ;
|
|
L(DFN,DIS,SILENT) | ; Locks an eRx Patient
; Input: DFN - Pointer to eRx Patient (Pointer to #52.46) ; DIS - Display name of the user currently locking the record ; (o)SILENT - 1: Silent call - Nothing displayed back | 0: Display information about the Lock on the screen |
|
UL(DFN) | ; unlock
|
|
R() | ; check lock on node
|
|
PDATE() | ;
|
|
WHO(DFN) | ;
|
|
ADDITEM(TEXT,HDR,DATA,STRT,LEN) | ;
|
|
PROV | ;
|
|
PAT | ;
|
|
DRUG | ;
|
|
EDIT(EDTYP,SBN) | ;
|
|
VPROV | ;
|
|
PRVWARN(ACTION,PSOIEN,VAPIEN) | ; Check whether the Provider Select is valid or not
; Input:(r)ACTION - Ation being peformed ("EP": Edit Provider | "VP": Validate Provider) ; (r)PSOIEN - Pointer to the ERX HOLDING QUEUE file (#52.49) ; (r)VAPIEN - Provider -Pointer to the NEW PERSON file (#200) |
|
CHKPRV2(Y) | ;
|
|
PLSTRNG(LOW,HIGH,EDIT,SBN) | ;
|
|
VPAT | ;
|
|
PATWARN(ACTION,PSOIEN,SELPAT) | ; Check whether the Patient Select is valid or not
; Input:(r)ACTION - Ation being peformed ("EP": Edit Patient | "VP": Validate Patient) ; (r)PSOIEN - Pointer to the ERX HOLDING QUEUE file (#52.49) ; (r)SELPAT - Patient -Pointer to the PATIENT file (#2) |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^VA(200 - [#200] | GET1^DIQ |
^PS(52.46 - [#52.46] | GET1^DIQ |
^PS(52.48 - [#52.48] | GETS^DIQ |
^PS(52.49 - [#52.49] | GET1^DIQ |
^PS(59.7 - [#59.7] | GET1^DIQ |