PSOVEXR1 ;BIRM/KML - PHARMACY TELEPHONE REFILLS - CONTINUED ; 06/07/18 08:47am
Source file <PSOVEXR1.m>
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 |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GET1^DIQ |
^PSRX - [#52] | GETS^DIQ |
^PS(52.444 - [#52.444] | Classic Fileman Calls |