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

Package: Integrated Billing

Routine: IBTRR1


Information

IBTRR1 ;ALB/ARH - CLAIMS TRACKING - ROI SPECIAL CONSENT ACTIONS ; 08-JAN-2013

Source Information

Source file <IBTRR1.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 4 FILE^DICN  ^DIE  ^DIK  ^DIR  
Integrated Billing 3 PAT^IBCNSM  ($$EXPAND,BLD,HDR)^IBTRE  ($$ACTIVE,$$DATE,BLD,EN)^IBTRR  
List Manager 2 FULL^VALM1  EN^VALM2  
Kernel 1 $$FMTE^XLFDT  

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

Package Total Caller Graph
Integrated Billing 14 IBTOBI  IBTRC  IBTRCD  IBTRD  IBTRDD  IBTRE  IBTRE ROI CONSENT  IBTRED  
IBTRR ROI ADD  IBTRR ROI DELETE  IBTRR ROI EDIT  IBTRR ROI REVOKE  IBTRV  IBTRVD  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
AA ; Protocol Action: Add an ROI Special Consent
EA ; Protocol Action: Edit an ROI Special Consent
RA ; Protocol Action: Revoke an ROI Special Consent
DA ; Protocol Action: Delete an ROI Special Consent
OP ; Protocol Action: Open ROI Screen - called from CT Editor IBTRE ROI CONSENT
ADD ; add a new ROI Special Consent entry, IBRFN set on exit (record incomplete)
EDIT ; edit an ROI Special Consent entry, IBRFN must be set on entry
REVOKE ; revoke an ROI entry, IBRFN must be defined
DELETE ; delete and ROI entry, IBRFN must be defined
SAVE ; save entry before editing
COMP ; compare before editing global with current global entry
UPDATE ; update last edited fields for entry
ROIDSP(IBRFN) ; display an ROI entry
ROIPAT(DFN,DATE) ; return Indicators of Conditions Active for Patient on Date (LM Patient List header)
; outputs alpha characters of sensitive conditions with active ROI
ROIEVT(IBTRN,SHRT) ; return ROI Consent and Indicators for a specific CT Event and Date (LM Event Detail)
; outputs CT entries ROI Consent and alpha characters of sensitive conditions with active ROI
;

External References

Name Field # of Occurrence
FILE^DICN ADD+12
^DIE EDIT+8, REVOKE+8, UPDATE+2
^DIK DELETE+7
^DIR ADD+5, DELETE+5
PAT^IBCNSM ADD+3
$$EXPAND^IBTRE ROIDSP+6, ROIDSP+9, ROIEVT+4
BLD^IBTRE OP+1
HDR^IBTRE OP+1
$$ACTIVE^IBTRR ROIDSP+7
$$DATE^IBTRR ROIDSP+6
BLD^IBTRR AA+6, EA+11, RA+11, DA+11
EN^IBTRR OP+1
FULL^VALM1 AA+2, EA+2, RA+2, DA+2
EN^VALM2 EA+5, RA+5, DA+5
$$FMTE^XLFDT ROIDSP+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"IB ROI EDIT Key Required to Add an ROI"
  • Line Location: AA+1
Function Call: WRITE
  • Prompt: !!,"IB ROI EDIT Key Required to Edit an ROI"
  • Line Location: EA+1
Function Call: WRITE
  • Prompt: !!,"IB ROI EDIT Key Required to Revoke an ROI"
  • Line Location: RA+1
Function Call: WRITE
  • Prompt: !!,"IB ROI EDIT Key Required to Delete an ROI"
  • Line Location: DA+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+1
Function Call: WRITE
  • Prompt: !!,"A New ROI Special Consent has been added for: ",$P($G(^DPT(+DFN,0)),U,1),!
  • Line Location: ADD+7
Function Call: WRITE
  • Prompt: " Not Deleted!"
  • Line Location: DELETE+5
Function Call: WRITE
  • Prompt: " Entry Deleted!"
  • Line Location: DELETE+7
Function Call: WRITE
  • Prompt: !!,IBDS,!,"ROI Special Consent for ",$P($G(^DPT(+$P(IBR0,U,2),0)),U,1),":"
  • Line Location: ROIDSP+5
Function Call: WRITE
  • Prompt: !!,$$EXPAND^IBTRE(356.26,.03,$P(IBR0,U,3)),?37,$$DATE^IBTRR($P(IBR0,U,4))," - ",$$DATE^IBTRR($P(IBR0,U,5))
  • Line Location: ROIDSP+6
Function Call: WRITE
  • Prompt: ?60,$S(+$$ACTIVE^IBTRR(IBRFN,DT):"ACTIVE",1:"INACTIVE"),?70,$S(+$P(IBR0,U,6):"REVOKED",1:"")
  • Line Location: ROIDSP+7
Function Call: WRITE
  • Prompt: !!,"Comment: ",IBR2
  • Line Location: ROIDSP+8
Function Call: WRITE
  • Prompt: !!,"Entered by: ",$E($$EXPAND^IBTRE(356.26,1.02,$P(IBR1,U,2)),1,21),?37,"Last Edited By: ",$E($$EXPAND^IBTRE(356.26,1.04,$P(IBR1,U,4)),1,21)
  • Line Location: ROIDSP+9
Function Call: WRITE
  • Prompt: !,"Date Entered: ",$$FMTE^XLFDT($P(IBR1,U,1)),?37,"Date Last Edited: ",$$FMTE^XLFDT($P(IBR1,U,3)),!,IBDS,!
  • Line Location: ROIDSP+10
Routine Call
  • DIE
  • Line Location:
    • EDIT+8
    • REVOKE+8
    • UPDATE+2
Routine Call
  • DIR
  • Line Location:
    • ADD+5
    • DELETE+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBT(356.26 - [#356.26] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] ADD+7, ROIDSP+5
^IBT(356 - [#356] ROIEVT+3
^IBT(356.26 - [#356.26] ADD+9, EDIT+3, REVOKE+3, DELETE+3, SAVE+2, SAVE+3, SAVE+4, COMP+2, COMP+3, COMP+4
, ROIDSP+2, ROIDSP+3, ROIPAT+4, ROIPAT+5
^TMP("IBTRR" EA+7, RA+7, DA+7
^TMP("IBTRRX" EA+7, RA+7, DA+7
^TMP($J EDIT+11!, REVOKE+11!, SAVE+1!, SAVE+2*, SAVE+3*, SAVE+4*, COMP+2, COMP+3, COMP+4
^XUSEC("IB ROI EDIT" AA+1, EA+1, RA+1, DA+1

Label References

Name Line Occurrences
$$ROIPAT ROIEVT+5
ADD AA+4
COMP EDIT+10, REVOKE+10
DELETE DA+9
EDIT AA+4, EA+9
REVOKE RA+9
ROIDSP EA+8, RA+8, DA+8
SAVE EDIT+4, REVOKE+4
UPDATE EDIT+10, REVOKE+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D0 ADD+1~, EDIT+1~, REVOKE+1~, UPDATE+1~
DA ADD+1~, EDIT+1~, EDIT+6*, REVOKE+1~, REVOKE+6*, DELETE+1~, DELETE+7*, UPDATE+1~, UPDATE+2*
DATE ROIPAT~, ROIPAT+2*, ROIPAT+6
DD ADD+1~
DFN ADD+3, ADD+7, ADD+11, ROIPAT~, ROIPAT+2*, ROIPAT+4
DIC ADD+1~, ADD+10*, ADD+12!, EDIT+1~, REVOKE+1~, UPDATE+1~
DIC("DR" ADD+11*
DIC(0 ADD+10*
DIE ADD+1~, ADD+12!, EDIT+1~, EDIT+6*, REVOKE+1~, REVOKE+6*, UPDATE+1~, UPDATE+2*
DIE("NO^" EDIT+6*, REVOKE+6*
DIK DELETE+1~, DELETE+7*
DIR ADD+1~, DELETE+1~
DIR("A" ADD+5*, DELETE+5*
DIR("B" ADD+5*, DELETE+5*
DIR(0 ADD+5*, DELETE+5*
DIRUT DELETE+1~
DLAYGO ADD+1~, ADD+10*, ADD+12!
DO ADD+1~
DR ADD+1~, EDIT+1~, EDIT+7*, REVOKE+1~, REVOKE+7*, UPDATE+1~, UPDATE+2*
DT ROIDSP+7, ROIPAT+2
DUZ AA+1, EA+1, RA+1, DA+1, ADD+11, UPDATE+2
I EA+4~, RA+4~, DA+4~
IBDIFF EDIT+1~, EDIT+10, REVOKE+1~, REVOKE+10, COMP+1*, COMP+2*, COMP+3*, COMP+4*
IBDS ROIDSP+1~*, ROIDSP+5, ROIDSP+10
IBR0 ROIDSP+1~, ROIDSP+2*, ROIDSP+5, ROIDSP+6, ROIDSP+7, ROIPAT+2~, ROIPAT+5*, ROIPAT+6
IBR1 ROIDSP+1~, ROIDSP+3*, ROIDSP+9, ROIDSP+10
IBR2 ROIDSP+1~, ROIDSP+3*, ROIDSP+8
IBRFN AA+4, EA+4~, EA+7*, EA+8, RA+4~, RA+7*, RA+8, DA+4~, DA+7*, DA+8
ADD+1*, ADD+12*, EDIT+3, EDIT+6, REVOKE+3, REVOKE+6, DELETE+3, DELETE+7, SAVE+2, SAVE+3
SAVE+4, COMP+2, COMP+3, COMP+4, UPDATE+2, ROIDSP~, ROIDSP+2, ROIDSP+3, ROIDSP+7, ROIPAT+2~
, ROIPAT+4*, ROIPAT+5
IBROIBG EDIT+1~
IBRSC ROIEVT+3~*, ROIEVT+4, ROIEVT+5
IBTRN ROIEVT~, ROIEVT+3
IBTRN0 ROIEVT+3~*, ROIEVT+5
IBX ROIPAT+2~*, ROIPAT+8*, ROIPAT+9, ROIEVT+3~*, ROIEVT+4*, ROIEVT+5*, ROIEVT+6
IBXXR EA+4~, EA+6*, EA+7, RA+4~, RA+6*, RA+7, DA+4~, DA+6*, DA+7
IBY ROIPAT+2~*, ROIPAT+7*, ROIEVT+3~, ROIEVT+5*
IBY( ROIPAT+6*, ROIPAT+7
IBZ ROIPAT+2~*, ROIPAT+7*, ROIPAT+8
IOM ROIDSP+1
J EA+4~, RA+4~, DA+4~
SHRT ROIEVT~, ROIEVT+5
U EA+7, RA+7, DA+7, ADD+7, ADD+9, ROIDSP+5, ROIDSP+6, ROIDSP+7, ROIDSP+9, ROIDSP+10
, ROIPAT+6, ROIEVT+3, ROIEVT+5
>> VALMBCK AA+1*, AA+7*, EA+1*, EA+12*, RA+1*, RA+12*, DA+1*, DA+12*, OP+1*
VALMQUIT ADD+1~
VALMY EA+4~, EA+6, RA+4~, RA+6, DA+4~, DA+6
VALMY( EA+6, RA+6, DA+6
X ADD+1~, ADD+9*, EDIT+1~, REVOKE+1~, DELETE+1~, UPDATE+1~
>> XQORNOD(0 EA+5, RA+5, DA+5
Y ADD+1~, ADD+5, ADD+12, EDIT+1~, REVOKE+1~, DELETE+1~, DELETE+5, DELETE+7, UPDATE+1~
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