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 |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call  | All
Print Page as PDF
Routine: IBOMTLTC

Package: Integrated Billing

Routine: IBOMTLTC


Information

IBOMTLTC ;OAKOIFO/ELZ-MT/LTC COPAY REMOTE QUERY ;20-AUG-2002

Source Information

Source file <IBOMTLTC.m>

Entry Points

Name Comments DBIA/ICR reference
QUERY ; main entry point for user to request a query of mt and ltc copay info
DQ ; tasked entry point
PAUSE(IBNEW) ;
; IBNEW = optional variable, it is a flag for new site
RETURN(IBR,IBICN,DFN,IBBDT,IBEDT) ;
; this is called from the main query for local data and from the remote
; procedure IBO MT LTC COPAY QUERY for remote data. The return is
; in a global array.
; if DFN then that will be used to identify the patient
; if no DFN, then the ICN (ibicn) needs to be there to identify patient
SPACE(IBTEXT) ; spaces out return info (sub-header info)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There is no ICN for this patient."
  • Line Location: QUERY+9
Function Call: WRITE
  • Prompt: !!,"Performing query locally only"
  • Line Location: QUERY+13
Function Call: WRITE
  • Prompt: "."
  • Condition for execution: $D(IBTFL)>9
  • Line Location: QUERY+13
Function Call: WRITE
  • Prompt: ", the patient has no remote facilities."
  • Line Location: QUERY+13
Function Call: WRITE
  • Prompt: !,^(IBX)
  • Line Location: DQ+40
Function Call: WRITE
  • Prompt: @IOF,!,"MT and LTC Copay Information ",$$FMTE^XLFDT(IBBDT)," to ",$$FMTE^XLFDT(IBEDT),?IOM-15,"Page: ",IBP
  • Line Location: PAUSE+8
Function Call: WRITE
  • Prompt: !,"Patient: ",VADM(1)," (DOB ",$P(VADM(3),U,2),") For Site: ",$P(IBS(0),"^")," (",$P(IBS(0),"^",2),")",!
  • Line Location: PAUSE+9
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PAUSE+10

Used in RPC

RPC Name Call Tags
IBO MT LTC COPAY QUERY RETURN

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^IB - [#350] EXTERNAL^DILFD
^IBE(351 - [#351] GETS^DIQ
^IBA(351.81 - [#351.81] GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call  | All