PSORLST ;BIRM/MFR - List of Patients/Prescriptions for Recall Notice ;12/30/09
Source file <PSORLST.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
START | ; Prompt user for search/selection criteria.
|
|
LKTP | ; Type of Drug Lookup
|
|
QUE | ; Entry point for queued report. Begin processing based on user's selection criteria.
|
|
EXIT | ; Quit.
|
|
DTRNG(BGN,END) | ; Date Range Selection
|
|
EXCL() | ; Exclude Deceased Patients
; Input: (o) EXCLUDE - "Y"es or "N"o |
|
MED() | ; Select Medication(s)
; Medication Selection (NDC/Dispense Drug/Generic Drug) |
|
NDC(NDC) | ; Select NDC
|
|
DDRG(PSODDRG,LOTSEL) | ; Select Dispense Drug
|
|
LOT(DRGNO,DRGARR,DRGNAM) | ; Enter Lot Number(s)
|
|
GENERIC(PSODDRG) | ; Select drug by VA GENERIC (file 50.6)
|
|
GLOOP | ; Prompt loop
|
|
ORDITEM(PSODDRG) | ; Select drug by ORDERABLE ITEM (file 50.7)
|
|
OLOOP | ; Prompt loop
|
|
DDSEL(DDIN,DDOUT) | ; Display selectable dispense drugs (DDIN), prompt for selection, save selected dispense drugs in DDOUT
|
|
DEV | ; Prompt user for output device
|
|
DIVSEL(ARRAY) | ; - Division selection (one, multiple or ALL)
|
|
EXCMSG | ;Display the message about capturing to an Excel file format
|
|
MARGIN | ||
PSODED(RXIEN) | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^PSNDF(50.6 - [#50.6] | Classic Fileman Calls |
^PS(59 - [#59] | Classic Fileman Calls |