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

Package: Integrated Billing

Routine: IBTREC


Information

IBTREC ;BAH/MBS - Claims Tracking Comment Editor ; Nov 04, 2024@13:01

Source Information

Source file <IBTREC.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
List Manager 3 EN^VALM  (FULL,PAUSE)^VALM1  (CLEAN,SET)^VALM10  
VA FileMan 3 (FILE,UPDATE)^DIE  $$GET1^DIQ  ^DIR  
Kernel 2 $$FMTE^XLFDT  DISP^XQORM1  
Integrated Billing 1 $$PT^IBEFUNC  
Registration 1 PID^VADPT  

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

Package Total Caller Graph
Integrated Billing 6 IBT BILLING INFO  IBT CLAIMS TRACKING CMT EDITOR  IBTREC ADD COMMENT  IBTREC DEL COMMENT  IBTREC EDIT COMMENT  ^IBT(356  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN(CTIEN,DFN) ; -- main entry point for IBT CLAIMS TRACKING CMT EDITOR
HDR ; -- header code
INIT ; -- init variables and list array
BLD ; -- Build list of comments
BLDONEC(VALMCNT,COMCNT) ; -- Build one item
WRAP(TEXT,LENGTH) ;
GETCMTS(CTIEN) ; -- Get Comment details
GETONE(CTIEN,CMTIEN,CNT) ; -- Get one comment details
SETL(LINE,DATA,LABEL,COL,LNG) ; Creates a line of data to be set into the body
; of the worklist - copied from IBCNCH2
; Input: LINE - Current line being created
; DATA - Information to be added to the end of the current line
; LABEL - Label to describe the information being added
; COL - Column position in line to add information add
; LNG - Maximum length of data information to include on the line
; Returns: Line updated with added information
HELP ; -- help code
EXIT ; -- exit code
EXPND ; -- expand code
ADDCOM ; Add Comment Logic
EDCOM ; Edit Comment Logic
DELCOM ; Delete Comment Logic
EXSCN ; Exit Screen
SELCOM(FULL,PROMPT,COMCNT,WLIST)
SELENTRY(PROMPT,START,END)
TRIGGER ; Trigger to create new comment when old Additional Comment field was edited

External References

Name Field # of Occurrence
FILE^DIE EDCOM+16, DELCOM+19
UPDATE^DIE EN+30, ADDCOM+15, TRIGGER+6
$$GET1^DIQ EN+9, HDR+4, HDR+6, GETONE+4, GETONE+5, GETONE+7, GETONE+8, EDCOM+9, EDCOM+13, DELCOM+8
^DIR EN+22, EN+36, ADDCOM+8, ADDCOM+12, EDCOM+9, EDCOM+13, DELCOM+10, SELENTRY+9
$$PT^IBEFUNC HDR+3
PID^VADPT HDR+1
EN^VALM EN+38
FULL^VALM1 EXIT+2, ADDCOM+2, EDCOM+3, DELCOM+3, SELCOM+13
PAUSE^VALM1 EN+6, EN+45, DELCOM+18, DELCOM+21, EXSCN+3, SELCOM+20, SELCOM+26, SELCOM+34
CLEAN^VALM10 EXIT+2
SET^VALM10 BLD+8, BLD+15, BLDONEC+6, BLDONEC+9, BLDONEC+12, BLDONEC+18
$$FMTE^XLFDT EN+25, GETONE+6
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"Claims Tracking record is not identified."
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!," For the RNB of GLOBAL SURGERY, enter the related Surgery Date"
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !,"The RNB of OTHER requires a Comment of at least 15 characters"
  • Line Location: EN+33
Function Call: WRITE
  • Prompt: !,"The RNB of OTHER requires a Comment of at least 15 characters.",!,"No comment currently satisfies this requirement."
  • Line Location: EN+44
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!,*7,"You have selected this comment:",!
  • Line Location: DELCOM+7
Function Call: WRITE
  • Prompt: !,IBTMP(I)
  • Line Location: DELCOM+9
Function Call: WRITE
  • Prompt: !,"The RNB of OTHER requires a Comment of at least 15 characters.",!,"No comment currently satisfies this requirement."
  • Line Location: DELCOM+17
Function Call: WRITE
  • Prompt: !,"Comment has been deleted."
  • Line Location: DELCOM+20
Function Call: WRITE
  • Prompt: !!,*7,"I'm sorry, Dave, I'm afaid I cannot let you do that."
  • Line Location: EXSCN+2
Function Call: WRITE
  • Prompt: !,*7,">>>> Only single entry selection is allowed"
  • Line Location: SELCOM+18
Function Call: WRITE
  • Prompt: !,*7,">>>> No comments to "_X
  • Line Location: SELCOM+24
Function Call: WRITE
  • Prompt: !,*7,">>>> Invalid selection number"
  • Line Location: SELCOM+32
Routine Call
  • DIE
  • Line Location:
    • EDCOM+16
    • DELCOM+19
Routine Call
  • DIE
  • Line Location:
    • EN+30
    • ADDCOM+15
    • TRIGGER+6
Routine Call
  • DIR
  • Line Location:
    • EN+22
    • EN+36
    • ADDCOM+8
    • ADDCOM+12
    • EDCOM+9
    • EDCOM+13
    • DELCOM+10
    • SELENTRY+9
Routine Call
  • VALM
  • Line Location:
    • EN+38

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^IBT(356 - [#356] GET1^DIQ
356.04 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] HDR+3
^IBE(356.8 - [#356.8] EN+10, EN+31
^IBT(356 - [#356] EN+8, EN+39, EN+41, EN+42, GETCMTS+3, GETONE+2, DELCOM+14, DELCOM+15
^TMP($J INIT+1!, BLD+5, BLDONEC+3, GETONE+9*, EXIT+1!, SELCOM+12, SELCOM+22, SELCOM+30

Label References

Name Line Occurrences
$$SELCOM EDCOM+4, DELCOM+4
$$SELENTRY SELCOM+28
$$SETL BLDONEC+2, BLDONEC+5, BLDONEC+8, BLDONEC+11
BLD INIT+2
BLDONEC BLD+11
GETCMTS BLD+2
GETONE GETCMTS+5
INIT ADDCOM+17, EDCOM+17, DELCOM+22
WRAP BLDONEC+15, DELCOM+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN+11~
CMTIEN GETCMTS+1~, GETCMTS+2*, GETCMTS+3*, GETCMTS+5, GETONE~, GETONE+2, GETONE+3, GETONE+9
CNT BLD+1~, BLD+3*, BLD+5*, BLD+6, BLD+11, GETCMTS+1~, GETCMTS+2*, GETCMTS+4*, GETCMTS+5, GETONE~
, GETONE+9
COL SETL~, SETL+8
COMCNT BLDONEC~, BLDONEC+2, BLDONEC+3, EDCOM+1~, EDCOM+4, DELCOM+1~, DELCOM+4, SELCOM~, SELCOM+14*, SELCOM+15*
, SELCOM+17, SELCOM+28*, SELCOM+29, SELCOM+30
COMIEN EDCOM+1~, EDCOM+4*, EDCOM+5, EDCOM+6, DELCOM+1~, DELCOM+4*, DELCOM+5, DELCOM+6, DELCOM+15, SELCOM+10~
, SELCOM+30*, SELCOM+31, SELCOM+35
COMMENT GETONE+1~, GETONE+4*, GETONE+9
CTIEN EN~, EN+4, EN+8, EN+9, EN+26, EN+39, EN+41, EN+42, HDR+6, BLD+2
, GETCMTS~, GETCMTS+3, GETCMTS+5, GETONE~, GETONE+2, GETONE+3, ADDCOM+4, EDCOM+6, DELCOM+6, DELCOM+14
DELCOM+15
DA ADDCOM+1~, TRIGGER+2
DATA SETL~, SETL+8
DATALN BLDONEC+1~, BLDONEC+3*, BLDONEC+4, BLDONEC+7, BLDONEC+10, BLDONEC+14
DFN EN~, EN+7, EN+8*, HDR+3, HDR+4
DIR EN+2~, EN+45!, ADDCOM+1~, EDCOM+1~, DELCOM+1~, DELCOM+11!, DELCOM+18!, SELCOM+19!, SELCOM+25!, SELCOM+33!
, SELENTRY+6~, SELENTRY+9!
DIR("?" EN+16*, EN+17*, EN+18*, EN+19*, EN+20*, EN+21*
DIR("A" EN+15*, EN+36*, DELCOM+10*, SELENTRY+8*
DIR("B" EN+36*, EDCOM+9*, EDCOM+13*, DELCOM+10*
DIR(0 EN+15*, EN+36*, ADDCOM+8*, ADDCOM+12*, EDCOM+9*, EDCOM+13*, DELCOM+10*, SELENTRY+7*
DIROUT SELCOM+10~, SELENTRY+6~
DIRUT ADDCOM+9, ADDCOM+13, EDCOM+10, EDCOM+14, SELCOM+10~, SELENTRY+6~
DLINE SELCOM+10~
DPT GETONE+1~, GETONE+8*, GETONE+9
DT EN+27, ADDCOM+5, TRIGGER+3
DTENT GETONE+1~, GETONE+5*, GETONE+6*, GETONE+9
DTOUT SELCOM+10~, SELENTRY+6~
DUOUT EN+23, EN+37, SELCOM+10~, SELENTRY+6~
DUZ EN+28, ADDCOM+6, EDCOM+7, TRIGGER+4
END SELCOM+10~, SELCOM+12*, SELCOM+28, SELENTRY~, SELENTRY+7
FULL SELCOM~, SELCOM+13
I EN+41*, EN+42, BLDONEC+1~, BLDONEC+16*, BLDONEC+18, DELCOM+1~, DELCOM+9*, DELCOM+14*, DELCOM+15
IBERR DELCOM+1~
IBFASTXT EN+2~, EN+38*
IBFDA EN+11~, ADDCOM+1~, EDCOM+1~, DELCOM+1~, TRIGGER+1~
IBFDA( EN+27*, EN+28*, EN+29*, ADDCOM+5*, ADDCOM+6*, ADDCOM+10*, ADDCOM+14*, EDCOM+7*, EDCOM+11*, EDCOM+15*
DELCOM+19*, TRIGGER+3*, TRIGGER+4*, TRIGGER+5*
IBFT1 WRAP+4~, WRAP+10*, WRAP+12
IBFT2 WRAP+4~, WRAP+11*, WRAP+12
IBI WRAP+4~, WRAP+7*, WRAP+8, WRAP+12, WRAP+14*, WRAP+15, WRAP+16
IBOKAY EN+2~, EN+3*, EN+34, EN+35*, EN+41*, EN+42*, EN+43, DELCOM+1~, DELCOM+13*, DELCOM+14
DELCOM+15*, DELCOM+16
IBREENT EN+2~, EN+3*, EN+36, EN+38*, EN+45, EN+46
IBRGENS EN+2~, EN+3*, EN+12*
IBRNB EN+2~, EN+9*, EN+10, EN+31
IBROTH EN+2~, EN+3*, EN+32*, EN+40, BLD+16, DELCOM+13
IBTMP BLDONEC+1~, WRAP+8*, WRAP+9, WRAP+10, WRAP+11, DELCOM+1~
IBTMP( BLDONEC+16, BLDONEC+18, WRAP+13*, WRAP+15, WRAP+16*, DELCOM+9
>> IBUP EN+3*, EN+10, EN+23*, EN+34, EN+37*
IBX EN+11~, EN+23*, EN+24, EN+25*, EN+29
IBXR HDR+1~
IBY WRAP+4~, WRAP+15*, WRAP+16*
IENS EN+11~, EN+26*, EN+27, EN+28, EN+29, GETONE+1~, GETONE+3*, GETONE+4, GETONE+5, GETONE+7
, GETONE+8, ADDCOM+1~, ADDCOM+4*, ADDCOM+5, ADDCOM+6, ADDCOM+10, ADDCOM+14, EDCOM+6*, EDCOM+7, EDCOM+9
EDCOM+11, EDCOM+13, EDCOM+15, DELCOM+6*, DELCOM+8, DELCOM+19, TRIGGER+2*, TRIGGER+3, TRIGGER+4, TRIGGER+5
LABEL SETL~, SETL+8
LENGTH WRAP~, WRAP+9, WRAP+10, WRAP+11, WRAP+15
LINE BLD+1~, BLD+3*, BLDONEC+1~, BLDONEC+2*, BLDONEC+5*, BLDONEC+6, BLDONEC+8*, BLDONEC+9, BLDONEC+11*, BLDONEC+12
, SETL~, SETL+8*, SETL+9
LINENO WRAP+4~, WRAP+6*, WRAP+13, WRAP+15*, WRAP+16
LN BLD+1~
LNG SETL~, SETL+8
PROMPT SELCOM~, SELCOM+23, SELCOM+28, SELENTRY~, SELENTRY+8
START SELCOM+10~, SELCOM+12*, SELCOM+28, SELENTRY~, SELENTRY+7
TEXT WRAP~, WRAP+5, WRAP+7, WRAP+8, WRAP+12*, WRAP+13, WRAP+14, WRAP+15, WRAP+16
U EN+8, EN+42, GETONE+9, DELCOM+15
USR GETONE+1~, GETONE+7*, GETONE+9
>> VALMBCK ADDCOM+3*, EDCOM+2*, DELCOM+2*, EXSCN+1*
VALMCNT BLD+3*, BLD+7*, BLD+8, BLD+10*, BLD+11, BLD+13, BLD+14*, BLD+15, BLDONEC~, BLDONEC+6
, BLDONEC+9, BLDONEC+12, BLDONEC+17*, BLDONEC+18
>> VALMHDR(1 HDR+5*
>> VALMHDR(2 HDR+6*
>> VALMSG BLD+16*
WLIST SELCOM~, SELCOM+11*, SELCOM+12, SELCOM+22, SELCOM+30
X EN+2~, EN+11~, HELP+1*, ADDCOM+1~, DELCOM+1~, SELCOM+10~, SELCOM+23*, SELCOM+24, SELENTRY+6~, SELENTRY+10
TRIGGER+5
>> XQORNOD(0 SELCOM+14
XX HDR+3*, HDR+4*, HDR+5, BLD+1~, BLD+14*, BLD+15, BLDONEC+4*, BLDONEC+5, BLDONEC+7*, BLDONEC+8
, BLDONEC+10*, BLDONEC+11, BLDONEC+14*, BLDONEC+15
Y EN+2~, EN+11~, EN+23, EN+38, ADDCOM+1~, ADDCOM+10, ADDCOM+13, ADDCOM+14, EDCOM+11, EDCOM+15
DELCOM+1~, DELCOM+12, SELCOM+10~, SELENTRY+6~
>> ZZ HDR+4*
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