PRSPESR1 ;WOIFO/JAH - part time physicians ESR Edit ;11/04/04
Source file <PRSPESR1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ESRFRM(PRSIEN,PPI,PRSD) | ;Run ScreenMan Form PRSA ESR EDIT on file 458
|
|
GETSTAT(PRSIEN,PPI,PRSD) | ; func return status
; esr daily status (#146) 1:NOT STARTED;2:PENDING;3:RESUBMIT; ; 4:SIGNED;5:APPROVED;6:DAY OFF |
|
ESRVALID | ; Validate Daily ESR data
; called when PTP attempts to save ScrMn form PRSP ESR POST (F458) ; DDSERROR set to prevent save. ; DDSBR set takes user field |
|
CHKDATA | ; called to validate screenman posting on ESR daily
|
|
E1 | ||
E2 | ||
E3 | ||
E4 | ||
E5 | ||
E6 | ||
E7 | ||
E8 | ||
E9 | ||
E10 | ||
E11 | ||
E12 | ||
E13 | ||
E14 | ||
E15 | ||
E16 | ||
E17 |