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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: IBCU6

Package: Integrated Billing

Routine: IBCU6


Information

IBCU6 ;ALB/AAS - UTILITY ROUTINE TO SET BEDSECTIONS/REVENUE CODES FROM PTF DATA ; 25 MAY 90

Source Information

Source file <IBCU6.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Integrated Billing 5 SET^IBCSC5A  (ALL,GVAR)^IBCU61  SETREV^IBCU62  (,RX)^IBCU63  $$LOS^IBCU64  
Registration 1 UPDT^DGPTUTL  

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Integrated Billing 7 IBCA2  IBCD3  IBCSC3  IBCSC4  IBCSC5  IBCSC6  IBCSC7  

Entry Points

Name Comments DBIA/ICR reference
OPT ;I IBIDS(.05)>2 S DGBILLBS="OUTPATIENT VISIT",DGVISCNT=$S($D(^DGCR(399,IBIFN,"OP",0)):$P(^(0),U,4),1:""),^UTILITY($J,"IB-BS",DGBILLBS)=DGVISCNT G END:DGVISCNT<1 D G END:IBQUIT,3
END
SETU1 ;determine los - set utility=los
1 ;build array of movement dates, billable bedsections
SETU ;utility array of all movements by date, billing bedsection
3 ;find revenue codes and set up in file.
2 ;build array of billable bedsections = los in bedsection

External References

Name Field # of Occurrence
UPDT^DGPTUTL %+3
SET^IBCSC5A OPT+6
ALL^IBCU61 %+5
GVAR^IBCU61 %+1
SETREV^IBCU62 3+2
^IBCU63 OPT+5
RX^IBCU63 OPT+6
$$LOS^IBCU64 SETU1+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] %+1, %+2, %+3, %+5, OPT+4, OPT+5, 3+1*
^DGCR(399.1 - [#399.1] 3+2
^DGPM("AMV1" %+4
^DGPT - [#45] %+3, 1+1, SETU+2
^DIC(42.4 - [#42.4] SETU+3
^UTILITY($J %+1!, OPT+4*, 2+3, 3+2, SETU+5*, SETU1+1, SETU1+7, SETU1+8*, END+1!

Label References

Name Line Occurrences
3 OPT+3
END OPT+3, 3+3
SETU 1+1
SETU1 2+3

Naked Globals

Name Field # of Occurrence
^( 3+2
^(0 %+3, OPT+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA END+1!
>> DFN %+2*, %+4
DGACTDT END+1!
DGADM %+4*, END+2!
DGAMNT END+1!
DGBDT SETU1+2*, SETU1+4, END+2!
DGBILLBS OPT+4*, SETU+3*, SETU+5, END+1!
DGBR END+1!
DGBRN END+1!
DGBS 2+2*, 3+1*, 3+2*, SETU1+1*, SETU1+5, SETU1+6, SETU1+7, SETU1+8, END+1!
DGBS1 2+2*, SETU1+1*, SETU1+5, SETU1+6, END+1!
DGBSI 3+2*, END+1!
DGBSLOS 3+2*, END+1!
DGDC END+2!
DGEDT SETU1+2*, SETU1+4, END+2!
DGFND END+2!
DGFUNC END+1!
DGIFN END+2!
DGII 1+1*, 2+3*, 3+2*, END+1!
DGINPAR SETU1+5, END+1!
DGJJ END+1!
DGKK END+1!
DGLL END+2!
DGMOVE 1+1*, SETU+2, END+1!
DGMVDT 2+2*, 2+3*, SETU1+1, SETU1+2, SETU1+3, SETU1+7, END+1!
DGMVDTP 2+2*, 2+3*, SETU1+2, END+1!
DGMVT END+2!
DGMVTP END+2!
DGNEXT END+2!
DGPMCA %+4*, SETU1+4, END+2!
>> DGPTUPDT %+3*
DGREC END+1!
DGREV END+1!
DGREV00 END+1!
DGREVHDR END+1!
DGRVRCAL END+1!
DGVISCNT OPT+3, OPT+4*, OPT+5, END+1!
DGX END+2!
DIK END+1!
DR END+1!
DT SETU+5
IBCHK END+2!
IBCNT OPT+6*, END+2!
IBIDS END+1!
IBIDS( %+3, %+4, OPT+3, 2+2, SETU1+3, SETU1+6, END*
IBIDS(151 2+2, SETU1+2
IBIDS(152 2+3, SETU1+2, SETU1+3
>> IBIFN %+1, %+2, %+3, %+5, OPT+4, OPT+5, OPT+6, 3+1
IBND0 END+2!
IBNDU END+2!
IBQUIT %+1~*, OPT+3, 3+2
IBTF SETU1+3*, SETU1+4, END+2!
IBX OPT+6!
>> PTF %+3*, 1+1, SETU+2
U OPT+4, OPT+6, SETU+3, SETU+5, SETU1+7
X SETU+2*, SETU+3, SETU+5, SETU1+4*, SETU1+8, END+1!
X1 END+1!
X2 END+1!
Y END+1!
Z END+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All