Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PSUCP1

Package: Pharmacy Benefits Management

Routine: PSUCP1


Information

PSUCP1 ;BIR/TJH,PDW - PBM - CONTROL POINT, MANUAL ENTRY ; 1/10/11 8:08am

Source Information

Source file <PSUCP1.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; start here
ASK ; ask type of report desired
DATES ; do this if user entered N, wants date range
PSUMON ; do this if user asked for monthly report
SETDT ; set month name variables
SELF ; include self and PSU PBM mailgroup
MASTER ; if monthly, should it be added to master file
MODULE ; display and select module(s)
MODP ; module selection prompt
MODHLP
RPT ; select report type - full report or summary only
BCKGND ; always run as a background job
DEVICE ;
EXIT ; exit point for normal finish
PSUHDR ;Display header
DATE ;Date conversion
ERR ; Exit point following erroneous input or ^

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+6
Function Call: WRITE
  • Prompt: !
  • Line Location: DATES+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DATES+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PSUMON+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SELF+6
Function Call: WRITE
  • Prompt: !
  • Line Location: MASTER+6
Function Call: WRITE
  • Prompt: !!,"Select one or more of the following:",!
  • Line Location: MODULE+2
Function Call: WRITE
  • Prompt: !,I,".",?5,PSUA(I,"M")
  • Line Location: MODULE+3
Function Call: WRITE
  • Prompt: !!,"Laboratory data and a Patient Demographic summary report will be automatically"
  • Line Location: MODULE+4
Function Call: WRITE
  • Prompt: !,"generated if IVs, Unit Dose, or Prescription extracts are chosen."
  • Line Location: MODULE+5
Function Call: WRITE
  • Prompt: !,"You may select all of the modules by entering 'A' for ALL or by using '1:12'."
  • Line Location: MODULE+6
Function Call: WRITE
  • Prompt: !!,"The Provider Data report may take an extended amount of time to run."
  • Line Location: MODULE+7
Function Call: WRITE
  • Prompt: !,"It is recommended that it be run during off peak hours."
  • Line Location: MODULE+8
Function Call: WRITE
  • Prompt: !!,"Select the code(s) associated with the data requested: "
  • Line Location: MODP+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: MODP+2
Function Call: WRITE
  • Prompt: " <??>",$C(7)
  • Line Location: MODP+4
Function Call: WRITE
  • Prompt: !!,"<INVALID CHOICE - ",X,", TRY AGAIN>",$C(7)
  • Line Location: MODHLP+19
Function Call: WRITE
  • Prompt: !!,"No choices were made."
  • Line Location: MODHLP+20
Function Call: WRITE
  • Prompt: !!,"You have selected: "
  • Line Location: MODHLP+24
Function Call: WRITE
  • Prompt: ?20,X," - ",PSUA(X,"M"),!
  • Line Location: MODHLP+25
Function Call: WRITE
  • Prompt: ?20,"Patient Demographic Summary"
  • Line Location: MODHLP+27
Function Call: WRITE
  • Prompt: !
  • Line Location: MODHLP+27
Function Call: WRITE
  • Prompt: !
  • Line Location: RPT+7
Function Call: WRITE
  • Prompt: !!,"This report will automatically run as a background job."
  • Line Location: BCKGND+1
Function Call: WRITE
  • Prompt: !
  • Line Location: BCKGND+9
Function Call: WRITE
  • Prompt: !,"HARDCOPIES NOT AVAILABLE FOR THIS OPTION"
  • Line Location: DEVICE+3
Function Call: READ
  • Formatting: !
  • Prompt: "-> "
  • Variable: PSUX
  • Timeout: DTIME
  • Line Location: DEVICE+12
Function Call: WRITE
  • Prompt: " ??"
  • Line Location: DEVICE+12
Function Call: WRITE
  • Prompt: !!,"The Pharmacy Benefits Management (PBM) report will extract"
  • Line Location: PSUHDR+1
Function Call: WRITE
  • Prompt: !,"statistics from one or more of the following files:",!
  • Line Location: PSUHDR+2
Function Call: WRITE
  • Prompt: !,"1. Pharmacy Patient IV Sub-file File # 55.01"
  • Line Location: PSUHDR+3
Function Call: WRITE
  • Prompt: !,"2. Pharmacy Patient UD Sub-file File # 55.06"
  • Line Location: PSUHDR+4
Function Call: WRITE
  • Prompt: !,"3. AR/WS Stats File # 58.5"
  • Line Location: PSUHDR+5
Function Call: WRITE
  • Prompt: !,"4. Prescription File # 52"
  • Line Location: PSUHDR+6
Function Call: WRITE
  • Prompt: !,"5. Procurement File # 58.811,# 58.81"
  • Line Location: PSUHDR+7
Function Call: WRITE
  • Prompt: !,"6. Controlled Substances File # 58.81"
  • Line Location: PSUHDR+8
Function Call: WRITE
  • Prompt: !,"7. Patient Demographics File # 2"
  • Line Location: PSUHDR+9
Function Call: WRITE
  • Prompt: !,"8. Outpatient Visits File # 9000010,# 9000010.07"
  • Line Location: PSUHDR+10
Function Call: WRITE
  • Prompt: !,"9. Inpatient PTF Record File # 45"
  • Line Location: PSUHDR+11
Function Call: WRITE
  • Prompt: !,"10. Provider Data File # 200,# 7,# 49,# 8932.1"
  • Line Location: PSUHDR+12
Function Call: WRITE
  • Prompt: !,"11. Allergy/Adverse Event File # 120.8,# 120.85"
  • Line Location: PSUHDR+13
Function Call: WRITE
  • Prompt: !,"12. Vitals/Immunization Record File # 120.5,# 9999999.14"
  • Line Location: PSUHDR+14
Function Call: WRITE
  • Prompt: !,"13. Laboratory File # 60,# 63"
  • Line Location: PSUHDR+15
Function Call: WRITE
  • Prompt: !!,"This data can be collected for ALL of the files listed or for one or"
  • Line Location: PSUHDR+17
Function Call: WRITE
  • Prompt: !,"more specific files. A summary of data or a detailed report by drug"
  • Line Location: PSUHDR+18
Function Call: WRITE
  • Prompt: !,"can be delivered to you in a mail message or in a hard copy report.",!!
  • Line Location: PSUHDR+19
Info |  Source |  Entry Points |  Interaction Calls