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

Package: Accounts Receivable

Routine: PRCAHIS


Information

PRCAHIS ;WASH-ISC@ALTOONA,PA/LDB-Transaction History Report ;9/27/93 4:32 PM

Source Information

Source file <PRCAHIS.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Kernel 5 ^%ZIS  ^%ZISC  (ENS,KILL)^%ZISS  ^%ZTLOAD  $$FMTE^XLFDT  
VA FileMan 4 ^DIC  ^DIR  ^DIWP  ^DIWW  
Accounts Receivable 2 TRANS^PRCAHIS1  ($$NAM,$$SSN)^RCFN01  

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

Package Total Caller Graph
Accounts Receivable 1 PRCA TRANS HISTORY  

Entry Points

Name Comments DBIA/ICR reference
V ;;4.5;Accounts Receivable;**110,198,233,315,340,377,381**;Mar 20, 1995;Build 28
EN ;Ask debtor and date range for transaction history
TYPE
DQ ;Call to build array of payment transactions
EXIT1
EXIT2
PRINT ;Print transactions
SCRN ;Check for screen
HDR ;Heading for report

External References

Name Field # of Occurrence
^%ZIS TYPE+6
^%ZISC TYPE+9, EXIT2EXIT2+3
ENS^%ZISS EXIT2+1
KILL^%ZISS EXIT2+1
^%ZTLOAD TYPE+9
^DIC TYPE+2
^DIR EN+3, EN+11, EN+16, EXIT2+1, SCRN+2
^DIWP PRINT+9, PRINT+24
^DIWW PRINT+8, PRINT+23
TRANS^PRCAHIS1 DQ+3
$$NAM^RCFN01 HDR+4
$$SSN^RCFN01 HDR+4
$$FMTE^XLFDT EN+9, EN+15, PRINT+5, PRINT+12, PRINT+16, HDR+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"This patient has no activity."
  • Line Location: EN+7
Function Call: READ
  • Formatting: !
  • Prompt: "TRANSACTION TYPE: ALL//"
  • Variable: X
  • Timeout: DTIME
  • Line Location: TYPE+1
Function Call: WRITE
  • Prompt: !!,"Enter 'ALL' for all types of transactions in the AR TRANSACTION TYPE FILE",!,"including COMMENTS and STATEMENT DATES.",!
  • Line Location: TYPE+3
Function Call: WRITE
  • Prompt: !!,"This is STATUS. Enter a transaction type only."
  • Line Location: TYPE+5
Function Call: WRITE
  • Prompt: !!,"This patient has no activity during this time period."
  • Line Location: DQ+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EXIT2+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT2+1
Function Call: WRITE
  • Prompt: $S(TYP=1:"COMMENT",1:"PATIENT STATEMENT PRINTED")
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !!,$$FMTE^XLFDT($P(DATE,"."))
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !!,$$FMTE^XLFDT(DATE,"1D"),?16
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: TTYP
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: !?16,CAT
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: !,?16,CATCARE
  • Condition for execution: CATCARE]""
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: !?16,$P(^(5),"^",2)
  • Line Location: PRINT+22
Function Call: WRITE
  • Prompt: @IOF,!,?20,"Patient Transaction History Report",?70,"Page ",PG
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?20,"-------------------------------------"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,?18,"For Patient: ",$$NAM^RCFN01(DEB),!,?25,"SSN : ",$$SSN^RCFN01(DEB)
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,?20,"For dates: ",$$FMTE^XLFDT(BDATE,"1D"),"-",$$FMTE^XLFDT(EDATE,"1D")
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !!," DATE",?16,"ACTIVITY",?56,"BILL #",?73,"AMOUNT",!,LINE
  • Line Location: HDR+6
Routine Call
  • %ZIS
  • Line Location:
    • TYPE+6
Routine Call
  • DIC
  • Line Location:
    • TYPE+2
Routine Call
  • DIR
  • Line Location:
    • EN+3
    • EN+11
    • EN+16
    • EXIT2+1
    • SCRN+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCA(430.3 - [#430.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] EN+7, PRINT+12, PRINT+14, PRINT+17, PRINT+18, PRINT+19
^PRCA(430.2 - [#430.2] PRINT+13, PRINT+17, PRINT+18
^PRCA(430.3 - [#430.3] TYPE+5, PRINT+15, PRINT+16
^PRCA(433 - [#433] EN+7, EN+8, PRINT+16, PRINT+22, PRINT+23
^RC(341 - [#341] EN+7, PRINT+7, PRINT+8
^RCD(340 - [#340] EN+5
^TMP("PRCAGT" DQ+4, DQ+5, EXIT1!, PRINT+2, PRINT+3, PRINT+4, PRINT+11, PRINT+12, PRINT+16
^UTILITY($J EXIT1!, EXIT2+1!

Label References

Name Line Occurrences
EN EN+5, EXIT2+4
EXIT1 EN+4, EN+12, EN+16, TYPE+4, TYPE+6, TYPE+9
HDR DQ+5, SCRN+3
PRINT DQ+5
SCRN PRINT+3, PRINT+10, PRINT+11, PRINT+25
TYPE TYPE+3, TYPE+5

Naked Globals

Name Field # of Occurrence
^( PRINT+8, PRINT+23
^(0 PRINT+4, PRINT+8, PRINT+12, PRINT+18, PRINT+23
^(4 PRINT+7
^(5 PRINT+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS TYPE+6*
AMT EXIT1!
BDATE EN+8*, EN+9, EN+12*, EN+14, EXIT1!, HDR+5
BN EXIT1!, PRINT+3*, PRINT+11, PRINT+12, PRINT+14, PRINT+16, PRINT+17, PRINT+18, PRINT+19
BN0 EXIT1!, PRINT+4*, PRINT+6, PRINT+12*, PRINT+13, PRINT+15
CAT EXIT1!, PRINT+13*, PRINT+14, PRINT+17*, PRINT+20
CATCARE EXIT1!, PRINT+18*, PRINT+20
DAT1 EXIT1!
DAT2 EXIT1!
DATE EXIT1!, PRINT+2*, PRINT+3, PRINT+4, PRINT+5, PRINT+11, PRINT+12, PRINT+16
DEB EN+6*, EN+7, EN+8, EXIT1!, PRINT+2, PRINT+3, PRINT+4, PRINT+11, PRINT+12, PRINT+16
HDR+4
DIC TYPE*, EXIT1!
DIC("S" TYPE*
DIC(0 TYPE*
DIR EN+1!, EN+6!, EN+13!, EN+18!, EXIT1!, EXIT2+1!, SCRN+1!
DIR("?" EN+3*, EN+10*
DIR("A" EN+3*, EN+9*, EN+15*
DIR("B" EN+9*, EN+15*
DIR(0 EN+3*, EN+8*, EN+14*, EXIT2+1*, SCRN+2*
DIRUT EN+4, EN+12, EN+16, EXIT1+1!, EXIT2+2!, PRINT+1!, PRINT+2, PRINT+3, PRINT+8, PRINT+11
PRINT+23, SCRN+2
DIWF EXIT1!, PRINT+9*, PRINT+24*
DIWL EXIT1!, PRINT+9*, PRINT+24*
DIWR EXIT1!
DIWT EXIT1!
DPTNOFZK EN+2~*
DPTNOFZY EN+2~*
DT EN+15, EN+16
DTIME TYPE+1
DUOUT EXIT1!
DX EXIT1!, EXIT2+1*
DY EXIT1!, EXIT2+1*
EDATE EN+17*, EXIT1!, HDR+5
EVNT EXIT1!, PRINT+6*, PRINT+7, PRINT+8
EVNTT EXIT1!, PRINT+8*
IO DQ+2
>> IO("Q" TYPE+7
IOF EXIT2HDR+2
IOM EXIT2+1
IOSL SCRN+1
IOST EXIT2EXIT2+1, SCRN+2
>> IOXY EXIT2+1
LINE EXIT1!, HDR+6
PG EXIT1!, HDR+1*, HDR+2
PNODE EXIT1!, PRINT+4*, PRINT+12*, PRINT+14, PRINT+16*, PRINT+19
POP EN+1*, TYPE+6, EXIT1+1!
TBAL EXIT1!
TN EXIT1!, PRINT+11*, PRINT+12, PRINT+16, PRINT+19, PRINT+20, PRINT+21, PRINT+22, PRINT+23
TN0 EXIT1!, PRINT+23*
TOTPRIN EXIT1!
TOTTRAN EXIT1!
TTYP EXIT1!, PRINT+16*
TYP TYPE+4*, EXIT1!, PRINT+6*, PRINT+16*, PRINT+19, PRINT+21
U EN+5, PRINT+16
X EN+13!, TYPE+1*, TYPE+2, TYPE+3, TYPE+4, EXIT1!, EXIT2+1!, PRINT+8*, PRINT+23*, SCRN+1~
Y EN+4, EN+5, EN+6, EN+12, EN+13!, EN+16*, EN+17, TYPE+1*, TYPE+4, TYPE+5
, EXIT1!, EXIT2+1!, SCRN+1~
Z EXIT1!
>> ZTDESC TYPE+8*
ZTRTN TYPE+8*, TYPE+9!
ZTSAVE TYPE+9!
ZTSAVE("BDATE" TYPE+8*
ZTSAVE("DEB" TYPE+8*
ZTSAVE("EDATE" TYPE+8*
ZTSAVE("TYP" TYPE+8*
ZTSK EXIT1!
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