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

Package: Integrated Billing

Routine: IBTRH1B


Information

IBTRH1B ;ALB/FA - HCSR Worklist ;11-SEP-2014

Source Information

Source file <IBTRH1B.m>

Entry Points

Name Comments DBIA/ICR reference
DELAY ;EP
; Protocol action to remove selected HCSR Worklist entry(s) until a
; selected date or until time of discharge
; Input: ^TMP("IBTRH1",$J) - Current Array of displayed entries
; ^TMP($J,"IBTRHIX") - Current Index of displayed entries
; Output: Selected Entry is removed from the worklist
; Error messages display (potentially)
; ^TMP("IBTRH1",$J) - Updated Array of displayed entries
; ^TMP($J,"IBTRHIX") - Updated Index of displayed entries
GETDDATE(DLINE) ;EP
; Allows the user to select a delay date which is used to remove
; entries from the HCSR Worklist until the delay date has been met
; Input: DLINE - Comma delimited list of entries to be delayed
; Returns: DDATE - 'D' to delay until admission has been discharged
; Fileman internal date of when the entry will re-appear
; null, if nothing selected
RESPWR ;EP
; Protocol action to display the Response Worklist to show all Entries with
; completed responses.
; Input: IBFILTS - Array of filter options currently set on the
; HCSR Worklist
; Output: Response Worklist is shown with the current filter settings
SHOWFILT(FILTERS)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,">>>> Entry ",LINE," is for an Outpatient and cannot be delayed"
  • Line Location: DELAY+30
Function Call: WRITE
  • Prompt: !,*7,">>>> Entry ",LINE," is being worked and cannot be delayed"
  • Line Location: DELAY+35
Function Call: WRITE
  • Prompt: !,*7,">>>> Someone else is editing entry ",LINE,". Try again later."
  • Line Location: DELAY+40
Function Call: WRITE
  • Prompt: !!,"Show ChampVA/Tricare entries, CPAC entries or Both: "
  • Line Location: SHOWFILT+7
Function Call: WRITE
  • Prompt: $S($P(FILTERS(0),"^",2)=0:"C",FILTERS(0)=1:"T",1:"B")
  • Line Location: SHOWFILT+8
Function Call: WRITE
  • Prompt: !,"Show Inpatient entries, Outpatient entries or Both: "
  • Line Location: SHOWFILT+9
Function Call: WRITE
  • Prompt: $S($P(FILTERS(0),"^",1)=0:"O",$P(FILTERS(0),"^",1)=1:"I",1:"B")
  • Line Location: SHOWFILT+10
Function Call: WRITE
  • Prompt: !,"Show All Divisions or Selected Divisions: "
  • Line Location: SHOWFILT+11
Function Call: WRITE
  • Prompt: $S($P(FILTERS(0),"^",3)=0:"All",1:"Selected")
  • Line Location: SHOWFILT+12
Function Call: WRITE
  • Prompt: !,"Divisions to Display: "
  • Line Location: SHOWFILT+16
Function Call: WRITE
  • Prompt: XX
  • Line Location: SHOWFILT+22
Function Call: WRITE
  • Prompt: ", "
  • Line Location: SHOWFILT+25
Function Call: WRITE
  • Prompt: !," ",XX
  • Line Location: SHOWFILT+27
Function Call: WRITE
  • Prompt: !,"Clinics to Display: "
  • Line Location: SHOWFILT+31
Function Call: WRITE
  • Prompt: "ALL"
  • Line Location: SHOWFILT+32
Function Call: WRITE
  • Prompt: XX
  • Line Location: SHOWFILT+38
Function Call: WRITE
  • Prompt: ", "
  • Line Location: SHOWFILT+41
Function Call: WRITE
  • Prompt: !," ",XX
  • Line Location: SHOWFILT+43
Function Call: WRITE
  • Prompt: !,"Wards to Display: "
  • Line Location: SHOWFILT+47
Function Call: WRITE
  • Prompt: "ALL"
  • Line Location: SHOWFILT+48
Function Call: WRITE
  • Prompt: XX
  • Line Location: SHOWFILT+54
Function Call: WRITE
  • Prompt: !," ",XX
  • Line Location: SHOWFILT+56

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(40.8 - [#40.8] GET1^DIQ
^DIC(42 - [#42] GET1^DIQ
^SC - [#44] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call