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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: RCYDD1

Package: Accounts Receivable

Routine: RCYDD1


Information

RCYDD1 ;WASH-ISC@ALTOONA,PA/RGY-DD CALL UTILITIES ;8/27/96 5:35 PM

Source Information

Source file <RCYDD1.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Integrated Billing 4 $$RXST^IBARXEU  $$EOB^IBCNSBL2  $$REC^IBRFN  $$IB^IBRUTL  
Accounts Receivable 3 $$BAL^PRCAFN  $$PAID^PRCAFN1  $$NAM^RCFN01  
VA FileMan 3 (,NOW)^%DTC  ^DIC  ^DIR  
Outpatient Pharmacy 1 $$POT^PSOCOPAY  

Entry Points

Name Comments DBIA/ICR reference
Q1
CHK(DFN) ;Check copay exemption status and RX potential charges
Q3
Q2
REC ;Called by the 344,.01 input transform. Make sure duplicate receipts cannot be created.
Q4
STAT(RCYC) ;Called by the 344,100 field to return status of receipt
PAY ;Called by the input transform of field 344.01,.04
V ;;4.5;Accounts Receivable;**9,48,128**;Mar 20, 1995
DEF(DEB) ;Get default for payment amount (used in input templates for payments)
DOP ;Make sure date of payment not in future or more than one month ago
PN ;Called by the input transform in field 344.01,.09
NOT(REC) ;Called to calculate the number of transaction for a receipt (344,101)
DIS ;DISPLAY BILL INFO

External References

Name Field # of Occurrence
^%DTC DOP+2
NOW^%DTC STAT+2
^DIC PN+4
^DIR PN+11
$$RXST^IBARXEU CHK+1
$$EOB^IBCNSBL2 PAY+8
$$REC^IBRFN PN+6
$$IB^IBRUTL PN+15
$$BAL^PRCAFN DEF+3
$$PAID^PRCAFN1 PAY+8
$$POT^PSOCOPAY CHK+2
$$NAM^RCFN01 DIS+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$P($G(^PRCA(430,+X,0)),"^")," "
  • Line Location: PN+12
Function Call: WRITE
  • Prompt: *7," ... This bill appears to have other patient bills on 'hold'."
  • Line Location: PN+15
Function Call: WRITE
  • Prompt: " ",$P(^PRCA(430.3,RCY,0),"^")
  • Line Location: DIS+3
Function Call: WRITE
  • Prompt: *7,!,"This bill is not in 'active' status."
  • Line Location: DIS+3
Function Call: WRITE
  • Prompt: " $",$J($P(RCY,"^")+$P(RCY,"^",2)+$P(RCY,"^",3)+$P(RCY,"^",4)+$P(RCY,"^",5),1,2)
  • Line Location: DIS+4
Function Call: WRITE
  • Prompt: *7," Payment amount greater than amount of bill!",*7
  • Line Location: PAY+7
Function Call: WRITE
  • Prompt: *7,!?2,"* Patient is exempt from RX Copay: ",$P(X,"^",4)," *"
  • Line Location: CHK+1
Function Call: WRITE
  • Prompt: *7,!?2,"* This patient has ",X,"-30 day RX's totaling $",(X*2),".00 that are potentially *"
  • Line Location: CHK+2
Function Call: WRITE
  • Prompt: !,"* billable. This represents any Window Rx's issued today. *"
  • Line Location: CHK+3
Function Call: WRITE
  • Prompt: !,"Receipt already in use, please use another receipt number!"
  • Line Location: REC+1
Routine Call
  • DIC
  • Line Location:
    • PN+4
Routine Call
  • DIR
  • Line Location:
    • PN+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" CHK+1, CHK+2
^PRCA(430 - [#430] PN+3, PN+12, PN+16, DIS+2, DIS+3, DIS+4, PAY+5, PAY+6, PAY+8, DEF+4
^PRCA(430.3 - [#430.3] DIS+3, DEF+4
^PRCA(433 - [#433] REC+1
^RCD(340 - [#340] PN+16, DIS+3, PAY+5
^RCY(344 - [#344] PAY+2, PAY+3, REC+1, STAT+3, STAT+4, STAT+6, NOT+3

Label References

Name Line Occurrences
CHK PN+14, PN+16
DIS PN+3, PN+12
Q1 PAY+4, PAY+5
Q2 PN+14
Q3 DEF+2, DEF+3, DEF+4
Q4 DOP+3

Naked Globals

Name Field # of Occurrence
^(0 PN+3, DIS+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % STAT+5
AMT PAY+1~, PAY+2*, PAY+6*, PAY+7
AMT(1 PAY+8*, PAY+9, PAY+10
>> DA PAY+2
>> DA(1 PAY+2, PAY+3
DATE DOP+1~, DOP+2*, DOP+4
DEB DEF~, DEF+2, DEF+3, DEF+4
DFN CHK~, CHK+1, CHK+2
>> DIC PN+4*
>> DIC(0 PN+4*
DIR PN+8~
DIR("A" PN+9*
DIR("B" PN+9*
DIR(0 PN+11*
DIRUT PN+8~
DT DOP+2, CHK+1
I PAY+1~, PAY+6*
PROC PAY+1~, PAY+3*
RCY PN+1~, PN+3*, PN+4, PN+6, PN+9, PN+10*, PN+12, PN+14*, PN+15, PN+16
, Q2, DIS+1~, DIS+2*, DIS+3*, DIS+4*
RCY1 PN+1~
RCY2 PN+1~
RCYC STAT~, STAT+3, STAT+4, STAT+6
>> RCYTYP PN+5
REC NOT~, NOT+3
TOT NOT+1~, NOT+2*, NOT+3*, NOT+4
X PN+2!, PN+3*, PN+4*, PN+6*, PN+10, PN+12*, PN+13!, PN+14, PN+16*, Q2*
, DIS+2, DIS+3, DIS+4, PAY+7, DEF+1~, DEF+2*, DEF+3*, DEF+4*, Q3, DOP+2
, DOP+3!, DOP+4*, CHK+1*, CHK+2*, REC+1!, STAT+1~, STAT+3*, STAT+4*, STAT+5*, STAT+6*
, STAT+7
>> X1 DOP+2*
>> X2 DOP+2*
Y PN+1~, PN+4, PN+5, PN+6*, PN+7, PN+11*, PN+12, PN+13, PAY+1~, PAY+2*
, PAY+4, PAY+5, PAY+6*, STAT+1~, STAT+3*, STAT+4, STAT+5, STAT+6, NOT+1~, NOT+3*
Y(1 PAY+6*, PAY+8
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All