Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
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>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 3 FILE^DIE  $$GET1^DIQ  ^DIR  
Integrated Billing 2 ($$ASKSURE,$$LOCKEV,$$SELEVENT,UNLOCKEV,VALMSGH)^IBTRH1  EN^IBTRH5  
Kernel 2 ($$DT,$$FMTE)^XLFDT  $$UP^XLFSTR  
List Manager 2 PAUSE^VALM1  (FLDTEXT,WRITE)^VALM10  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Integrated Billing 4 IBT HCSR NEXT REVIEW  IBT HCSR RESPONSE EDIT  IBTRH1A  IBTRH5  
Kernel 1 ^ORD(101  

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)

External References

Name Field # of Occurrence
FILE^DIE DELAY+47
$$GET1^DIQ SHOWFILT+19, SHOWFILT+35, SHOWFILT+51
^DIR GETDDATE+18
$$ASKSURE^IBTRH1 DELAY+23
$$LOCKEV^IBTRH1 DELAY+39
$$SELEVENT^IBTRH1 DELAY+17
UNLOCKEV^IBTRH1 DELAY+48
VALMSGH^IBTRH1 DELAY+11
EN^IBTRH5 RESPWR+8
PAUSE^VALM1 DELAY+55, SHOWFILT+58
FLDTEXT^VALM10 DELAY+52
WRITE^VALM10 DELAY+53
$$DT^XLFDT GETDDATE+10
$$FMTE^XLFDT DELAY+22
$$UP^XLFSTR GETDDATE+20

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
Routine Call
  • DIE
  • Line Location:
    • DELAY+47
Routine Call
  • DIR
  • Line Location:
    • GETDDATE+18

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBT(356.22 - [#356.22] DELAY+29, DELAY+34
^TMP("IBTRH1" DELAY+51

Label References

Name Line Occurrences
$$GETDDATE DELAY+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CODE GETDDATE+7~, GETDDATE+11*, GETDDATE+12
DDATE DELAY+9~, DELAY+19*, DELAY+20, DELAY+22, DELAY+46
DIR DELAY+9~, DELAY+54!, GETDDATE+7~, GETDDATE+18!, SHOWFILT+6~, SHOWFILT+57!
DIR("?" GETDDATE+14*, GETDDATE+15*, GETDDATE+16*, GETDDATE+17*
DIR("A" GETDDATE+13*
DIR(0 GETDDATE+12*
DIROUT DELAY+9~, GETDDATE+7~, SHOWFILT+6~
DIRUT DELAY+9~, GETDDATE+7~, GETDDATE+19, SHOWFILT+6~
DLINE DELAY+9~, DELAY+17, DELAY+19, DELAY+21, DELAY+23, DELAY+26, GETDDATE~, GETDDATE+9, GETDDATE+13
DTOUT DELAY+9~, GETDDATE+7~, SHOWFILT+6~
DUOUT DELAY+9~, GETDDATE+7~, SHOWFILT+6~
EIEN DELAY+9~, DELAY+25*, DELAY+29, DELAY+34, DELAY+39, DELAY+44, DELAY+48
EIENS DELAY+9~, DELAY+17*, DELAY+18, DELAY+24, DELAY+25
ERROR DELAY+9~, DELAY+12*, DELAY+31*, DELAY+36*, DELAY+41*, DELAY+55
FIELD DELAY+9~, DELAY+51*, DELAY+52
FILTERS SHOWFILT~
FILTERS(0 SHOWFILT+8, SHOWFILT+10, SHOWFILT+12, SHOWFILT+15, SHOWFILT+30, SHOWFILT+46
FILTERS(1 SHOWFILT+32, SHOWFILT+34, SHOWFILT+35, SHOWFILT+39
FILTERS(2 SHOWFILT+48, SHOWFILT+50, SHOWFILT+51, SHOWFILT+55
FILTERS(3 SHOWFILT+18, SHOWFILT+19, SHOWFILT+23
>> IBFILTS RESPWR+7
IBFILTSR RESPWR+6~, RESPWR+7*, RESPWR+8
IEN DELAY+9~, DELAY+44*, DELAY+45, DELAY+46, SHOWFILT+6~, SHOWFILT+19*, SHOWFILT+35*, SHOWFILT+51*
IX DELAY+9~, DELAY+24*, DELAY+25, DELAY+26, SHOWFILT+6~, SHOWFILT+18*, SHOWFILT+19, SHOWFILT+23, SHOWFILT+34*, SHOWFILT+35
, SHOWFILT+39, SHOWFILT+50*, SHOWFILT+51, SHOWFILT+55
LEN SHOWFILT+6~, SHOWFILT+17*, SHOWFILT+20*, SHOWFILT+21, SHOWFILT+24*, SHOWFILT+26*, SHOWFILT+33*, SHOWFILT+36*, SHOWFILT+37, SHOWFILT+40*
, SHOWFILT+42*, SHOWFILT+49*, SHOWFILT+52*, SHOWFILT+53
LINE DELAY+9~, DELAY+26*, DELAY+30, DELAY+35, DELAY+40, DELAY+51, DELAY+52, DELAY+53
MSG DELAY+9~, DELAY+13*, DELAY+21*, DELAY+22*, DELAY+23
NOW GETDDATE+7~, GETDDATE+10*
PROMPT DELAY+10~, DELAY+14*, DELAY+17, GETDDATE+7~, GETDDATE+8*, GETDDATE+13
SDATA DELAY+10~, DELAY+43!
SDATA( DELAY+45*, DELAY+46*
>> VALMBCK DELAY+12*, DELAY+18*
X GETDDATE+7~
XX GETDDATE+7~, GETDDATE+9*, GETDDATE+13, SHOWFILT+6~, SHOWFILT+19*, SHOWFILT+20, SHOWFILT+22, SHOWFILT+27, SHOWFILT+35*, SHOWFILT+36
, SHOWFILT+38, SHOWFILT+43, SHOWFILT+51*, SHOWFILT+52, SHOWFILT+54, SHOWFILT+56
Y GETDDATE+7~, GETDDATE+20
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All