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

Package: Fee Basis

Routine: FBAAPP


Information

FBAAPP ;AISC/GRR - ENTER FEE PHARMACY DETERMINATION ;5/10/2005

Source Information

Source file <FBAAPP.m>

Entry Points

Name Comments DBIA/ICR reference
ASKRV
RDIN
END
GOT
DIR ; DISPLAY FOR PHARMACY EDIT
DIR1
REVIEW
CHK

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There are no Fee Basis prescriptions Pending Pharmacy review"
  • Line Location: FBAAPP+5
Function Call: WRITE
  • Prompt: !!,*7,"There are ",CNT," Fee Prescription(s) Pending Pharmacy review"
  • Line Location: FBAAPP+7
Function Call: WRITE
  • Prompt: !
  • Line Location: RDIN+0
Function Call: WRITE
  • Prompt: !,*7,"No more prescriptions pending review!"
  • Line Location: RDIN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: GOT+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: GOT+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: GOT+4
Function Call: WRITE
  • Prompt: !!,"Vendor: ",$P($G(^FBAAV(+VIFN,0)),"^"),!
  • Line Location: GOT+6
Function Call: WRITE
  • Prompt: *7,!?20,">> PATIENT REIMBURSEMENT <<",!
  • Line Location: GOT+7
Function Call: WRITE
  • Prompt: !,"Prescription #: ",$P(FBY(0),"^")," Drug: ",$P(FBY(0),"^",2),!!,"Fill Date: ",$E(FDT,4,5),"/",$E(FDT,6,7),"/",$E(FDT,2,3)," Strength: ",$P(FBY(0),"^",12)
  • Line Location: GOT+8
Function Call: WRITE
  • Prompt: " Qty: ",$P(FBY(0),"^",13)
  • Line Location: GOT+9
Function Call: WRITE
  • Prompt: !
  • Line Location: REVIEW+0
Function Call: WRITE
  • Prompt: !
  • Line Location: REVIEW+8
Function Call: WRITE
  • Prompt: "-"
  • Line Location: REVIEW+8
Function Call: WRITE
  • Prompt: !!?22,">>> PRESCRIPTION REVIEW <<<",!
  • Line Location: REVIEW+9
Function Call: WRITE
  • Prompt: !,"Rx for Authorized condition: ",FBNO1
  • Line Location: REVIEW+10
Function Call: WRITE
  • Prompt: ?36,"Emergency Medication: ",FBNO2
  • Line Location: REVIEW+11
Function Call: WRITE
  • Prompt: !,"Generic Drug Issued: ",FBAAGP
  • Line Location: REVIEW+12
Function Call: WRITE
  • Prompt: ?36,"Generic Drug Name: ",$E(FBDRUG,1,25)
  • Line Location: REVIEW+13
Function Call: WRITE
  • Prompt: !!,"Current list of Adjustments: "
  • Line Location: REVIEW+16
Function Call: WRITE
  • Prompt: "none"
  • Line Location: REVIEW+17
Function Call: WRITE
  • Prompt: ?30,"Code: "
  • Line Location: REVIEW+19
Function Call: WRITE
  • Prompt: ?44,"Group: "
  • Line Location: REVIEW+21
Function Call: WRITE
  • Prompt: ?56,"Amount: "
  • Line Location: REVIEW+23
Function Call: WRITE
  • Prompt: "$",$FN($P(FBADJ(FBI),U,3),"",2),!
  • Line Location: REVIEW+24
Function Call: WRITE
  • Prompt: !!,"Current list of Remittance Remarks: "
  • Line Location: REVIEW+25
Function Call: WRITE
  • Prompt: "none"
  • Line Location: REVIEW+26
Function Call: WRITE
  • Prompt: !!,"Optional Pharmacy Remarks: ",FBAAPR
  • Line Location: REVIEW+30
Function Call: WRITE
  • Prompt: !
  • Line Location: REVIEW+32

FileMan Files Accessed Via FileMan Db Call

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