DGMSTL2 ;ALB/SCK - MST LISTMANAGER UTILITIES CONT. ; 12/17/98
Source file <DGMSTL2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ASKDATE(MSTDT,MSTOLDDT) | ; Return status change date
; Future dates will not be allowed |
|
| ASKPROV(MSTPV) | ; Ask for Provider
; Input ; MSTPV - IEN of default provider [optional] |
|
| ADDSTR(DFN,MSTST,MSTDT,MSTPR,MSTIEN) | ; Build the formatted display string for the List Manager display
; Input ; DFN - IEN of patient in the PATIENT File (#2) ; MSTST - Status code for the MST status ; MSTDT - Date of the status change in FM internal format ; MSTPR - IEN of provider in the NEW USER File (#200) ; MSTIEN- IEN of new entry in the MST HISTORY File (#29.11) |
|
| SET(X,IDX,DFN,MSTIEN) | ; Set the formatted display string into the List Manager global
; Build the DFN and IDX indexes ; Input ; X - formated display string ; IDX - Index number ; DFN - IEN of patient in the PATIENT File (#2) |
|
| EXTMST(MSTST) | ; convert MST status code to external dislay format
|
|
| NUL | ; Check for empty list. If empty display message and force page number
|
|
| CHKNUL() | ; Checks of an "empty" list to lock out protocols.
|
