PSOPROD1 ;ALB/MRD - Pharmacy Productivity and Revenue Report ;9/8/15
Source file <PSOPROD1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Main entry point for user prompts.
|
|
| P1 | ||
| P2 | ||
| P3 | ||
| P4 | ||
| P5 | ||
| P6 | ||
| P7 | ||
| P8 | ||
| EXIT | ; Exit point.
|
|
| STOP() | ; Determine if user wishes to exit out of the option entirely.
; Function return values: ; 1 - Yes, exit entirely. ; 0 - No, do not exit but return to the previous question. |
|
| DIVISION(PSODIV) | ; Allow user to select Divisions or All Divisions.
; Input: None. ; Output: PSODIV ; PSODIV = "ALL" if the user opted to include all divisions. ; PSODIV = "D" if the user selected specific division. If that is ; the case, the selected pharmacies will be listed in PSODIV: ; PSODIV(IEN) = Division name, where IEN is a pointer to file# ; 59, Outpatient Site. ; Function return values: ; 1 - A valid entry or entries were selected. ; 0 - User has exited out (^). |
|
| REPORT(PSOREPORT) | ; Allow user to select report to run (Productivity or Revenue).
; Input: None. ; Output: PSOREPORT, set to one of the following. ; PSOREPORT = "" if no selection was made. ; PSOREPORT = "R" if user selected the RRR Revenue report. ; PSOREPORT = "P" if user selected the Productivity Report. ; Function return values: ; 1 - The user selected one of the two reports. ; 0 - The user exited out. |
|
| STATUS(PSOSTATUS) | ; Allow user to select statuses to include in report.
; Input: None. ; Output: PSOSTATUS, set to one of the following. ; PSOSTATUS = "" if no selection was made. ; PSOSTATUS = "P" if user selected Closed/Resolved - ePayable. ; PSOSTATUS = "R" if user selected Closed/Resolved - eRejected. ; PSOSTATUS = "B" if users opted to include both of the above. ; PSOSTATUS(0) = String to display on report header. ; Function return values: ; 1 - A valid selection was made. ; 0 - The user exited out. |
|
| DATES(PSODTBEGIN,PSODTEND) | ; Prompt user for a date range.
; Function return values: ; 1 - A valid date range was entered. ; 0 - A valid date range was not entered. |
|
| INCLUDE(PSOINCLUDE) | ; Allow user to enter specific Patients, Drugs, etc., to include.
; Input: None. ; Output: ; PSOINCLUDE, set to PATIENT, DRUG, RX, INSURANCE or REJECT CODE. ; For the field selected by the user to include-by, the list of ; entries to include will be at PSOINCLUDE(include-by,value)="", ; for example PSOINCLUDE("RX",12345)="" to include RxIEN 12345. ; All are defaulted to "ALL", e.g. PSOINCLUDE("RX")="ALL", and ; only the one selected by the user may be reset to be a string ; being a list of the external values of the items selected. ; Function return values: ; 1 - A valid selection was made. ; 0 - The user exited out. |
|
| INC | ;
|
|
| SORT(PSOSORT) | ; Prompt user for the sort order.
; Input: None. ; Output: PSOSORT, set to one of the following. ; PSOSORT = "" if no selection was made. ; PSOSORT = "D" if user selected Division. ; PSOSORT = "R" if user selected Date Resolved. ; PSOSORT = "B" if user selected Resolved By. ; PSOSORT = "N" if user selected Drug Name. ; PSOSORT = "C" if user selected Reject Code. ; Function return values: ; 1 - A valid selection was made. ; 0 - The user exited out. |
|
| PATIENT(PSOSHOWPAT) | ; Display Patient Name on report?
; Input: None. ; Output: PSOSHOWPAT, set to one of the following. ; 1 - Yes, display Patient Name on the report. ; 0 - No, do not display the Patient Name. ; * Note: The Patient Name will always be displayed if the user ; requests output in Excel format. ; Function return values: ; 1 - User answered the Y/N question. ; 0 - User exited out. |
|
| EXCEL(PSOEXCEL) | ; Export the report to MS Excel?
; Function return values: ; 1 - User made a valid selection. ; 0 - User exited out. ; This function allows the user to indicate whether the report should be ; printed in a format that could easily be imported into an Excel ; spreadsheet. If the user wants that, the variable PSOEXCEL will be set ; to '1', otherwise PSOEXCEL will be set to '0'. |
|
| DEVICE() | ; Prompt user for output device.
; Function return values: ; 1 - User selected a device. ; 0 - User exited out. |
| 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 |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^DIC(36 - [#36] | GET1^DIQ |
| ^PSDRUG - [#50] | GET1^DIQ |
| ^PSRX - [#52] | GET1^DIQ |
| ^BPSF(9002313.93 - [#9002313.93] | GET1^DIQ |
