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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCAATR

Package: Accounts Receivable

Routine: PRCAATR


Information

PRCAATR ;WASH-ISC@ALTOONA,PA/RGY - VIEW TRANSACTION FOR BILLS ;2/14/96 2:46 PM

Source Information

Source file <PRCAATR.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Accounts Receivable 5 $$COMP3^PRCAAPR  ($$IBEEOBCK,HDR)^PRCAAPR1  ^PRCATR3  $$SLH^RCFN01  $$RR^RCTCSPU  
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  
Integrated Billing 2 $$BILLREJ^IBJTU6  ENF^IBOLK  
VA FileMan 2 DD^%DT  $$GET1^DIQ  

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

Package Total Caller Graph
Accounts Receivable 2 PRCAAPR  PRCAAPR1  
Integrated Billing 1 IBOHLS2  

Entry Points

Name Comments DBIA/ICR reference
V ;;4.5;Accounts Receivable;**36,104,172,138,233,276,303,301,315,350**;Mar 20, 1995;Build 66
EN1(BILL) ;ENTRY POINT FROM PRCAAPR
Q
HDR ;Header
DIS ;Display transactions
RD
TLN ;Display a transaction
Q1
READ ;Read a trans number
ASK
Q2
VT ;View a transaction
Q3
DQ ;
RD1
DEB ;View debtor
CSREJ ; Show last reject ; PRCA*4.5*350

External References

Name Field # of Occurrence
DD^%DT HDR+12, HDR+14
^%ZIS ASK+1, VT+5
^%ZISC EN1+9, ASK+2
^%ZTLOAD VT+3
$$GET1^DIQ HDR+7, HDR+8, HDR+14, HDR+15
$$BILLREJ^IBJTU6 HDR+5
ENF^IBOLK DQ+2
$$COMP3^PRCAAPR EN1+6
$$IBEEOBCK^PRCAAPR1 EN1+7
HDR^PRCAAPR1 HDR+1
^PRCATR3 DQ+2
$$SLH^RCFN01 DIS+1, TLN+8
$$RR^RCTCSPU HDR+12
$$FMTE^XLFDT CSREJ+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"MEDICARE CONTRACTUAL ADJUSTMENT: ",$J($P($G(^PRCA(430,BILL,13)),"^"),0,2)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"UNREIMBURSED MEDICARE EXPENSE: ",$J($P($G(^PRCA(430,BILL,13)),"^",2),0,2)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"CS "
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: "Re-"
  • Condition for execution: $$RR^RCTCSPU(BILL)
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: "Referred Date: "
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: "Referred Date: "
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: !,"CS Recall Reason: ",$E($$GET1^DIQ(430,BILL,154),1,31)
  • Line Location: HDR+14
Function Call: WRITE
  • Prompt: ?51,"CS Recall Date: "
  • Line Location: HDR+14
Function Call: WRITE
  • Prompt: ?51,"CS Recall Date: "
  • Line Location: HDR+14
Function Call: WRITE
  • Prompt: !,"CS Recall Reason: ",$E($$GET1^DIQ(430,BILL,154),1,31)
  • Line Location: HDR+15
Function Call: WRITE
  • Prompt: ?51,"CS Recall Date: "
  • Line Location: HDR+15
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+17
Function Call: WRITE
  • Prompt: !!,"Bill #",?8,"Tr #",?17,"Type",?52,"Date",?70,"Amount"
  • Line Location: HDR+20
Function Call: WRITE
  • Prompt: !,X
  • Line Location: HDR+21
Function Call: WRITE
  • Prompt: !,?17,"Original Amount",?52,$$SLH^RCFN01($P(^PRCA(430,BILL,0),"^",10)),?65,$J($P(^(0),"^",3),11,2)
  • Line Location: DIS+1
Function Call: WRITE
  • Prompt: !!,X," NO TRANSACTION INFORMATION AVAILABLE ",X
  • Line Location: DIS+3
Function Call: READ
  • Formatting: !!
  • Prompt: "Press return to continue: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: RD+0
Function Call: WRITE
  • Prompt: !!,"Press the return key to return to menu."
  • Line Location: RD+1
Function Call: WRITE
  • Prompt: !?65,"-----------",!,?64,"$",$J($P(X,"^")+$P(X,"^",2)+$P(X,"^",3)+$P(X,"^",4)+$P(X,"^",5),11,2)
  • Line Location: RD+5
Function Call: WRITE
  • Prompt: !,COUNT,$S($P(^PRCA(433,TRAN,0),"^",4)=1!$P(^(0),"^",10):"(I)",1:""),?8,TRAN,?17
  • Line Location: TLN+4
Function Call: WRITE
  • Prompt: $S($P($G(^PRCA(430.3,+$P(X,"^",2),0)),"^",3)=17:$P($G(^PRCA(433,TRAN,5)),"^",2),1:$P($G(^(0)),"^"))
  • Line Location: TLN+5
Function Call: WRITE
  • Prompt: ?52,$S(+X:$$SLH^RCFN01(+X),1:""),?65,$J($P(X,"^",5),11,2)
  • Line Location: TLN+8
Function Call: READ
  • Prompt: ": "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"Select 1-",COUNT,$S(PRCAPRT:" or 'P' to Print",1:" to print")
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: " or return to continue"
  • Condition for execution: TRAN
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"To see detailed information for a transaction number, enter the corresponding '#'",!,"next to the transaction. (Ex: 1 or 1,3)"
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: ASK+7
Function Call: WRITE
  • Prompt: !,"*** Trans # ",D0," REQUEST QUEUED ***"
  • Line Location: VT+3
Function Call: WRITE
  • Prompt: !,"OK, Printing Transaction # ",D0," ..."
  • Line Location: VT+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DQ+1
Function Call: WRITE
  • Prompt: !,X," TRANSACTION PROFILE ",X,!!
  • Line Location: DQ+1
Function Call: READ
  • Formatting: !!
  • Prompt: "PRESS <RETURN> TO CONTINUE: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: RD1+0
Function Call: WRITE
  • Prompt: !!,"Press return to view next transaction or to continue"
  • Line Location: RD1+0
Function Call: WRITE
  • Prompt: " ",$P($G(@("^"_$P(PRCA,";",2)_+PRCA_",0)")),"^")
  • Line Location: DEB+2
Function Call: WRITE
  • Prompt: " Last CS REJECT CODE: ",$P($G(^RC(348.5,RJCODE,0)),"^")
  • Line Location: CSREJ+10
Function Call: WRITE
  • Prompt: " Last CS REJECT DATE: ",$$FMTE^XLFDT(RJDT,"5Z")
  • Line Location: CSREJ+11
Routine Call
  • %ZIS
  • Line Location:
    • ASK+1
    • VT+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCA(430 - [#430] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] EN1+4, HDR+2, HDR+3, HDR+5, HDR+12, HDR+13, HDR+18, HDR+19, DIS+1, RD+4
DEB+2, CSREJ+3, CSREJ+5, CSREJ+7
^PRCA(430.3 - [#430.3] TLN+5
^PRCA(433 - [#433] DIS+2, RD+3, TLN+3, TLN+4, TLN+5
^RC(348.5 - [#348.5] CSREJ+10
^RCD(340 - [#340] DEB+2
^TMP("PRCAATR" EN1+8!, Q!, TLN+3*, ASK+7, VT+2

Label References

Name Line Occurrences
@( HDR+18, HDR+19
ASK ASK+1, ASK+4
DIS EN1+9
DQ VT+6
HDR EN1+9, TLN+2
Q EN1+3, EN1+4
Q1 TLN+2
Q2 READ+1, ASKASK+1, ASK+5
Q3 VT+2, VT+3
RD RD+1
RD1 RD1
READ RD+5, TLN+2, ASK+7
TLN RD+3
VT ASK+8

Naked Globals

Name Field # of Occurrence
^(0 HDR+18, HDR+19, DIS+1, TLN+4, TLN+5
^(15 HDR+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS ASK+1*, VT+1~
BILL EN1~, EN1+3, EN1+4, EN1+6, EN1+7, HDR+2, HDR+3, HDR+5, HDR+7, HDR+8
HDR+12, HDR+13, HDR+14, HDR+15, HDR+18, HDR+19, DIS+1, DIS+2, RD+3, RD+4
DEB+2, CSREJ+3, CSREJ+5, CSREJ+7
COUNT EN1+1~, EN1+8*, TLN+2, TLN+3*, TLN+4, ASK
CSDATE1 EN1+2~, HDR+7*, HDR+9
CSDATE2 EN1+2~, HDR+8*, HDR+9
CSFLG EN1+2~, HDR+9*, HDR+18
D0 EN1+1~, VT+2*, VT+3, VT+4, DQ+2
>> DEBT HDR+18, HDR+19
DTIME RDASKRD1
>> DTOUT RD*, TLN+2, ASK*, RD1*
DXS DQ+2!
I CSREJ+1~, CSREJ+8*
IO READ+1, ASK+1, VT+3, VT+4, VT+6
IO("Q" Q!, VT+3
IO("S" ASK+2
IO(0 EN1+8, READ+1, ASK+1, VT+3, VT+4, VT+6
IOF DQ+1
IOM HDR+21
ION ASK+2
IOP VT+1~, VT+5*
IOSL TLN+2
IOST RD1
OUT EN1+1~, RD*, RD+3, RD+5, TLN+2, ASK*, ASK+1*, ASK+5*, ASK+8, ASK+9*
, RD1*
POP EN1+1~, ASK+1!
PRCA DEB+1~, DEB+2*
PRCA15 EN1+1~, HDR+12*, HDR+13*, HDR+14, HDR+15
PRCAATRX EN1+1~, ASK+8*
PRCAIO EN1+1~, EN1+8*, ASK+1*
PRCAIO(0 EN1+8*, ASK+1*
PRCAIOS EN1+1~, ASK+2*, VT+5
PRCAPRT EN1+1~, EN1+8*, ASKASK+1*
PRCAQUE EN1+1~
PRCOUT EN1+1~, EN1+6*, EN1+7*, HDR+18, HDR+19
REJFLG EN1+1~, HDR+5*, HDR+19
RJCODE CSREJ+1~, CSREJ+2*, CSREJ+8*, CSREJ+9, CSREJ+10
RJDT CSREJ+1~, CSREJ+2*, CSREJ+3*, CSREJ+4, CSREJ+5, CSREJ+11
RJIEN CSREJ+1~, CSREJ+2*, CSREJ+5*, CSREJ+6, CSREJ+7
RJZ CSREJ+1~, CSREJ+7*, CSREJ+8
SEL EN1+1~, ASK+6*, ASK+7, ASK+8
TRAN EN1+1~, RD+3*, TLN+3, TLN+4, TLN+5, ASKASK+5
U HDR+12, HDR+14, HDR+15
X EN1+1~, HDR+21*, DIS+3*, RD*, RD+1, RD+4*, RD+5, TLN+3*, TLN+5, TLN+7*
TLN+8, ASK*, ASK+1, ASK+4, ASK+5, ASK+6, ASK+7*, DQ+1*, DQ+2*, RD1*
Y EN1+1~, HDR+12*, HDR+14*, ASK+7*, ASK+8*, VT+2
YR TLN+1~
ZTDESC VT+1~, VT+3*
ZTDTH VT+1~, VT+3*
ZTRTN VT+1~, VT+3*
ZTSAVE VT+1~
ZTSAVE("D0" VT+3*
ZTSAVE("PRCAIO" VT+3*
ZTSAVE("PRCAIO(0)" VT+3*
ZTSK EN1+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 |  Naked Globals |  Local Variables  | All