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: PSOCPIB5

Package: Outpatient Pharmacy

Routine: PSOCPIB5


Information

PSOCPIB5 ;BIR/EJW-Report of back-billed fills with insurance information ;06/24/03

Source Information

Source file <PSOCPIB5.m>

Entry Points

Name Comments DBIA/ICR reference
RPT ;
DVC
QUEUE
START ;
FULL ;
TITLE ;
END ;
DONE ;
PRTSSN ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report shows the patient name, prescription fill, and insurance"
  • Line Location: RPT+1
Function Call: WRITE
  • Prompt: !,"information for fills that were billed as part of patch PSO*7*123 clean-up."
  • Line Location: RPT+2
Function Call: WRITE
  • Prompt: !!,"You may queue the report to print, if you wish.",!
  • Line Location: RPT+3
Function Call: WRITE
  • Prompt: !!,"Nothing queued to print.",!
  • Line Location: DVC+0
Function Call: WRITE
  • Prompt: !,"Report queued to print.",!
  • Line Location: QUEUE+0
Function Call: WRITE
  • Prompt: !,PSONAM
  • Line Location: START+14
Function Call: WRITE
  • Prompt: !,?4,RXP," (",PSOFILL,")"
  • Line Location: START+15
Function Call: WRITE
  • Prompt: ?43,"** NO BILL NUMBER FOR THIS FILL **"
  • Line Location: START+20
Function Call: WRITE
  • Prompt: "** COPAY CHARGE CANCELLED **"
  • Line Location: START+21
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TITLE+3
Function Call: WRITE
  • Prompt: !,"Patch PSO*7*142 -COPAYS BILLED BY PSO*7*123 WITH RX INSURANCE INFORMATION"
  • Line Location: TITLE+4
Function Call: WRITE
  • Prompt: !,"Date printed: ",Y,?70,"Page: ",PSOPGCT,!
  • Line Location: TITLE+5
Function Call: WRITE
  • Prompt: "="
  • Line Location: TITLE+6
Function Call: WRITE
  • Prompt: !,"PATIENT NAME (SSN) DIV",?44,"RX INSURANCE",?66,"RX INSURANCE"
  • Line Location: TITLE+7
Function Call: WRITE
  • Prompt: !,?4,"RX# (FILL)",?25,"RELEASE DATE",?43,"ON RELEASE DATE",?65,"ON BILLED DATE"
  • Line Location: TITLE+8
Function Call: WRITE
  • Prompt: !,"------------------------",?25,"------------",?43,"---------------",?65,"--------------"
  • Line Location: TITLE+9
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: " ("_$G(VA("BID"))_")"_" "_PSODIV
  • Line Location: PRTSSN+5
Info |  Source |  Entry Points |  Interaction Calls