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

Package: Integrated Billing

Routine: IBCSC5C


Information

IBCSC5C ;ALB/ARH - ADD/EDIT PRESCRIPTION FILLS (CONTINUED) ;3/4/94

Source Information

Source file <IBCSC5C.m>

Entry Points

Name Comments DBIA/ICR reference
DEFAULT(IFN,IBRX) ; add default DX and CPT to a prescription bill
; if one is not in PSO. If there is, use it instead.
; IFN = ien of bill entry
RXDISP(DFN,DT1,DT2,ARRAY,POARR,RXARR,IBRXALL,NODISP) ; display all rx fills for a patient and date range
DATE(X)
NEWRX(IBX) ;
NEWRX1
NEWRXE
ADDNEW(IBIFN,LIST,IBPR,IBPRO) ;
HTEXT() ;
RXLINK(IBIFN,CPIEN) ; Function returns the ien of the Rx rev code the proc
; code is linked to or 0 if no link found.
EXEMPT(RX) ; Used to look up exemption if any on rx, the return value
; will be only the first exemption reason found.
EREASON ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?33,"PRESCRIPTIONS IN DATE RANGE",!,"===============================================================================",!
  • Line Location: RXDISP+42
Function Call: WRITE
  • Prompt: !,$J(IBCNT,2),")",?5,IBY,?6,RX,?19,$E($G(^TMP($J,"IBDRUG",+$P(ARRAY(RX,DTR),U,3),.01)),1,25),?46,$$DATE(+DTR),?56,$P(IBS,U,1),?61,$P(IBS,U,2),?69,$P(IBS,U,3),?75,$$EXEMPT(+ARRAY(RX,DTR))
  • Line Location: RXDISP+47
Function Call: WRITE
  • Prompt: ?73,$P($G(^DGCR(399,+IBY,0)),U,1)
  • Line Location: RXDISP+48
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWRX+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: ADDNEW+6
Function Call: WRITE
  • Prompt: "."
  • Line Location: ADDNEW+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(362.3 - [#362.3] Classic Fileman Calls
^DGCR(399 - [#399] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call