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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSOCIDC9

Package: Outpatient Pharmacy

Routine: PSOCIDC9


Information

PSOCIDC9 ;BIR/LE - continuation of activity log corrections ;2/28/05 12:50pm

Source Information

Source file <PSOCIDC9.m>

Entry Points

Name Comments DBIA/ICR reference
RPT ;
DVC ;
QUEUE ;
START ;
FULL ;
TITLE ;
END ;
DONE ;
PRTSSN ;
LOCKED ;LIST OF LOCKED RX'S
DVC2 ;
QUEUE2 ;
START2 ;
FULL2 ;
TITLE2 ;
FIXONE ;FIX LOCKED RX'S
FIX2 ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report reflects all prescriptions where the activity and"
  • Line Location: RPT+7
Function Call: WRITE
  • Prompt: !,"copay activity logs were corrected. For detailed information,"
  • Line Location: RPT+8
Function Call: WRITE
  • Prompt: !,"please view the activity and copay logs on the prescriptions."
  • Line Location: RPT+9
Function Call: WRITE
  • Prompt: !!,"You may queue the report to print, if you wish.",!
  • Line Location: RPT+11
Function Call: WRITE
  • Prompt: !!,"Nothing queued to print.",!
  • Line Location: DVC+1
Function Call: WRITE
  • Prompt: !,"Report queued to print.",!
  • Line Location: QUEUE+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TITLE+3
Function Call: WRITE
  • Prompt: !,"Patch PSO*7*239 - Corrected Activity and Copay Activity logs",!!
  • Line Location: TITLE+4
Function Call: WRITE
  • Prompt: "Note that this report reflects all prescriptions where the activity and/or",!
  • Line Location: TITLE+5
Function Call: WRITE
  • Prompt: "copay activity logs were corrected. For detailed information, please view",!
  • Line Location: TITLE+6
Function Call: WRITE
  • Prompt: "the activity and copay activity log on the prescription.",!
  • Line Location: TITLE+7
Function Call: WRITE
  • Prompt: !,"Date printed: ",Y,?70,"Page: ",PSOPGCT,!
  • Line Location: TITLE+9
Function Call: WRITE
  • Prompt: "="
  • Line Location: TITLE+10
Function Call: WRITE
  • Prompt: !,"PATIENT NAME (SSN) DIV",?42,"RX# "
  • Line Location: TITLE+13
Function Call: WRITE
  • Prompt: !,"--------------- ------- --------------",?42,"------------"
  • Line Location: TITLE+14
Function Call: WRITE
  • Prompt: !!,"** End of Report **"
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !
  • Line Location: END+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+3
Function Call: WRITE
  • Prompt: ?17,"("_PSOPATID_")"_" "_$E(PSODIV,1,15)
  • Line Location: PRTSSN+5
Function Call: WRITE
  • Prompt: !!,"This report reflects all prescriptions where the activity and",!
  • Line Location: LOCKED+7
Function Call: WRITE
  • Prompt: "copay activity logs could not be corrected due to the Rx being locked."
  • Line Location: LOCKED+8
Function Call: WRITE
  • Prompt: !!,"You may queue the report to print, if you wish.",!
  • Line Location: LOCKED+10
Function Call: WRITE
  • Prompt: !!,"Nothing queued to print.",!
  • Line Location: DVC2+1
Function Call: WRITE
  • Prompt: !,"Report queued to print.",!
  • Line Location: QUEUE2+1
Function Call: WRITE
  • Prompt: !,$E(PSONAME,1,14)
  • Line Location: START2+15
Function Call: WRITE
  • Prompt: ?41," ",PSORXN
  • Line Location: START2+17
Function Call: WRITE
  • Prompt: !!,"Total number of prescriptions locked: ",PSONCNT,!
  • Line Location: START2+19
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TITLE2+3
Function Call: WRITE
  • Prompt: !,"Patch PSO*7*239 - Locked Prescription Number Report",!!
  • Line Location: TITLE2+4
Function Call: WRITE
  • Prompt: "Note that this report reflects all prescriptions where the activity and/or",!
  • Line Location: TITLE2+5
Function Call: WRITE
  • Prompt: "copay activity logs could not be corrected. For detailed information,",!
  • Line Location: TITLE2+6
Function Call: WRITE
  • Prompt: "please view the activity and copay activity log on the prescription.",!
  • Line Location: TITLE2+7
Function Call: WRITE
  • Prompt: !!,"Note that FIXONE^PSOCIDC9 can be run from programmer's mode"
  • Line Location: TITLE2+8
Function Call: WRITE
  • Prompt: !,"to correct individual prescriptions.",!!
  • Line Location: TITLE2+9
Function Call: WRITE
  • Prompt: !,"Date printed: ",Y,?70,"Page: ",PSOPGCT,!
  • Line Location: TITLE2+11
Function Call: WRITE
  • Prompt: "="
  • Line Location: TITLE2+12
Function Call: WRITE
  • Prompt: !,"PATIENT NAME (SSN) DIV",?42,"RX# "
  • Line Location: TITLE2+14
Function Call: WRITE
  • Prompt: !,"--------------- ------- --------------",?42,"------------"
  • Line Location: TITLE2+15
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FIXONE+2
Function Call: WRITE
  • Prompt: !,"This function is used to correct individual prescriptions that were locked"
  • Line Location: FIXONE+3
Function Call: WRITE
  • Prompt: !,"during the CIDC Activity Log clean-up process. It verifies whether the"
  • Line Location: FIXONE+4
Function Call: WRITE
  • Prompt: !,"prescription needs to be corrected, and if so corrects it. If the Rx still"
  • Line Location: FIXONE+5
Function Call: WRITE
  • Prompt: !,"cannot be locked for correction, a message stating such will be displayed."
  • Line Location: FIXONE+6
Function Call: WRITE
  • Prompt: !,"Otherwise, a message stating that no correction is needed will be displayed.",!
  • Line Location: FIXONE+7
Function Call: WRITE
  • Prompt: !,"For detailed information please view the activity and copay activity log on"
  • Line Location: FIXONE+8
Function Call: WRITE
  • Prompt: !,"the prescription. For a listing of locked Rx's, type D LOCKED^PSOCIDC9 at"
  • Line Location: FIXONE+9
Function Call: WRITE
  • Prompt: !,"the programmer's prompt.",!
  • Line Location: FIXONE+10
Function Call: WRITE
  • Prompt: !
  • Line Location: FIX2+3
Function Call: WRITE
  • Prompt: !,"For Patient: ",PSONAM
  • Line Location: FIX2+5
Function Call: WRITE
  • Prompt: !!,"No changes are needed for this prescription.",!
  • Line Location: FIX2+9
Function Call: WRITE
  • Prompt: !,"Activity logs corrected.",!!
  • Line Location: FIX2+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call