Routine: PSOPMP1

Information

PSOPMP1 ;BIRM/MFR - Patient Medication Profile - Listmanager ;04/28/05

Source file <PSOPMP1.m>

Name	Comments	DBIA/ICR reference
VIDEO()	; - Changes the Video Attributes for the list
RV	;reverse video for flagged pending orders
SETHDR()	; - Displays the Header Line
SETSIG(TYPE,RX,LINE,DFN)	; Set the SIG line
GROUP(LBL,CNT,LINE)	; Sets a group delimiter line
PENHDR(DFN)	; Sets the Header in the ^TMP("PSOHDR",$J) global for displaying individual Pending Order
FILTER(RX)	; - Filter Rx's that should not be displayed
STSINFO(RX)	; Returns the Rx Status MNEMONIC^NAME ; Input: RX - Prescription IEN (#52)
ISSDT(IEN,TYPE)	; Returns the Rx ISSUE DATE formatted MM-DD-YY
LSTFD(RX)	; Returns the Rx LAST FILL DATE formatted MM-DD-YY[R], where [R] = Returned to Stock
REFREM(RX)	; - Returns the number of refills remaining
DAT(FMDT,SEP,Y4)	; - Formats FM dates to MM/DD/YY (SEP: Separator:"/","-",etc...)
COPAY(RX)	; Returns "$" is Rx has a copay and "" if not
CMOP(DRUG,RX)	; Returns the CMOP indicator (">", "T", etc)
ALLERGY(LINE,DFN,POS)	; also called from PSONVAVW & PSOPMP0 ; Input: LINE - (r) text to concatenate allergy information to ; DFN - (r) patient IEN used for ^GMRADTP ; POS - (o) position # to include text