Routine: PSOVEXR1

Information

PSOVEXR1 ;BIRM/KML - PHARMACY TELEPHONE REFILLS - CONTINUED ; 06/07/18 08:47am

Name	Comments	DBIA/ICR reference
PSOBLD	; This will transfer entries from the vendor daily telephone refill requests global when the pharmacy audio refills option is accessed.
CLEAN	;delete completed records from the new file 52.444.
SETVEN	;adds fill date, status and processing result to vendor global to facilitate completion in their process.
TILDECHK(PSORXIEN,PSORXEN)	;check for the tilde character (~) in the free text dosage field of the medications instructions ; PSORXIEN = input - ien of RX in PRESCRIPTION file (#52) ; PSORXEN = input - ien of RX in PHARMACY TELEPHONE REFILLS file (#52.444) ; RSLT = return as output
CSDRUG(IEN)	;Controlled Substance drug? ; Input: IEN - DRUG file (#50) pointer

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Process Telephone Refills is not available. Please try again later." Line Location: PSOBLD+19
Function Call: WRITE	Prompt: !,"RX #: "_$P(PSORX(52,IENS,".01"),U,1)_" RX IEN: "_IENS_" was marked processed in the ^VEXHRX Global. " Line Location: SETVEN+14