Routine: RCDMCR8C

Information

RCDMCR8C ;ALB/LB - Pension Report Exempt Charge Reconciliation Report - Input/output; Jun 16, 2021@14:23

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Accounts Receivable	1	($$PARENTC,$$PARENTE)^RCDMCR5B
Registration	1	(IN5,KVAR)^VADPT
VA FileMan	1	$$GET1^DIQ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Accounts Receivable	1	RCDMCR8B

Entry Points

Name	Comments	DBIA/ICR reference
GETSTRT(IBIEN)	; Get start date for InPatient / LTC
GETIB(IBIEN,IBMODE)	; Get all Outpatient Dates, Inpatient Dates and RX Dates/drugs ; Input: ; IBIEN - IEN of IB entry (File 350, ^IB) ; IBMODE - 0 if we are in AR mode, 1 if we are in IB mode. ; Output: ; 0 if we don't get anything out of this IB ; Othewise 1 ^ Outpatient Date ^ Discharge Date ^ RX/Refill Date ^ IB Status ^ RX NUM ^ RX Name ^ CHGAMT

External References

Name	Field # of Occurrence
$$GET1^DIQ	GETSTRT+3, GETIB+20, GETIB+23
$$PARENTC^RCDMCR5B	GETIB+16
$$PARENTE^RCDMCR5B	GETIB+19
IN5^VADPT	GETIB+43
KVAR^VADPT	GETIB+40, GETIB+44, GETIB+47

FileNo	Call Tags
^IB - [#350]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IB - [#350]	GETSTRT+2, GETIB+10, GETIB+16, GETIB+24
^IBE(350.1 - [#350.1]	GETIB+30
^PSDRUG - [#50]	GETIB+57, GETIB+67
^PSRX - [#52]	GETIB+54, GETIB+55, GETIB+56, GETIB+57, GETIB+63, GETIB+64, GETIB+65, GETIB+66, GETIB+67
^SCE - [#409.68]	GETIB+35

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTTYPE	GETIB+7~, GETIB+13*, GETIB+30
BILGROUP	GETIB+7~, GETIB+30*, GETIB+31, GETIB+33
CHGAMT	GETIB+8~, GETIB+16*, GETIB+72
DFN	GETIB+7~, GETIB+11*, GETIB+12
DISCHARG	GETIB+7~, GETIB+45*, GETIB+46
DTBILLFR	GETIB+7~, GETIB+14*, GETIB+36
I0	GETIB+7~, GETIB+10*, GETIB+11, GETIB+13, GETIB+14, GETIB+15, GETIB+23, GETIB+69
IBDET	GETIB+7~
IBIEN	GETSTRT~, GETSTRT+2, GETSTRT+3, GETIB~, GETIB+10, GETIB+16, GETIB+19, GETIB+20, GETIB+22
IBMODE	GETIB~, GETIB+21
IBSDT	GETSTRT+1~, GETSTRT+3, GETSTRT+4
IENS	GETIB+7~
OPDT	GETIB+7~, GETIB+34, GETIB+35, GETIB+36, GETIB+37, GETIB+69
OUT	GETIB+7~, GETIB+9, GETIB+12, GETIB+21, GETIB+26, GETIB+31, GETIB+37, GETIB+46, GETIB+58, GETIB+68* , GETIB+69, GETIB+70, GETIB+71, GETIB+72*, GETIB+73
PARENT	GETIB+7~, GETIB+16, GETIB+19, GETIB+20*, GETIB+22, GETIB+23, GETIB+24
PARENTOK	GETIB+7~, GETIB+21, GETIB+22, GETIB+23*
RESULT	GETSTRT+1~, GETSTRT+2, GETSTRT+3, GETIB+7~, GETIB+24*, GETIB+26, GETIB+33, GETIB+34, GETIB+35, GETIB+39 , GETIB+41, GETIB+49, GETIB+51, GETIB+53, GETIB+60, GETIB+62, GETIB+69
RXDT	GETIB+7~, GETIB+54, GETIB+55, GETIB+58, GETIB+63, GETIB+64, GETIB+65*, GETIB+68
RXFIEN	GETIB+52~, GETIB+53*, GETIB+54, GETIB+55
RXIEN	GETIB+52~, GETIB+53, GETIB+54, GETIB+55, GETIB+56, GETIB+57, GETIB+61~, GETIB+62, GETIB+63, GETIB+64 , GETIB+65, GETIB+66, GETIB+67
RXNAM	GETIB+8~, GETIB+57, GETIB+58, GETIB+67, GETIB+68
RXNUM	GETIB+8~, GETIB+56, GETIB+58, GETIB+66, GETIB+68
STATUS	GETIB+7~, GETIB+15*, GETIB+71
U	GETSTRT+2, GETIB+11, GETIB+13, GETIB+14, GETIB+15, GETIB+16, GETIB+23, GETIB+24, GETIB+30, GETIB+35 , GETIB+37, GETIB+45, GETIB+46, GETIB+54, GETIB+55, GETIB+56, GETIB+57, GETIB+58, GETIB+63, GETIB+64 , GETIB+65, GETIB+66, GETIB+67, GETIB+68, GETIB+69, GETIB+71, GETIB+72
VAERR	GETIB+8~, GETIB+44
VAIP	GETIB+8~
VAIP("E"	GETIB+41*
VAIP(17	GETIB+45

Customize PDF page

Package: Accounts Receivable