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

Package: Accounts Receivable

Routine: RCCPCPS


Information

RCCPCPS ;WASH-ISC@ALTOONA,PA/NYB - Build Patient Statement File ;12/19/96 4:14 PM

Source Information

Source file <RCCPCPS.m>

Call Graph

Call Graph

Call Graph Total: 26

Package Total Call Graph
Accounts Receivable 14 (EN,REF)^PRCAGD  $$GMT^PRCAGST  (EN,TBAL)^PRCAGT  ($$PRE,BBAL,PBAL,SITE,UPDAT)^PRCAGU  $$EMERES^PRCAUTL  $$DADD^RCAMADD  $$FPS^RCAMFN01  $$ASOF^RCCPCFN  
(BILLDESC,TRANDESC)^RCCPCPS1  STM^RCCPCSTM  $$TRANVALU^RCDPBTLM  (CLOSE,OPEN)^RCEVDRV1  ($$LST,$$NAM,$$SLH,$$SSN)^RCFN01  $$SITE^RCMSITE  
VA FileMan 7 DD^%DT  (H,NOW,YMD,YX)^%DTC  DT^DICRW  ^DIE  (,IXALL)^DIK  $$GET1^DIQ  ^DIR  
Kernel 4 ^%ZIS  ^%ZISC  (,KILL)^%ZTLOAD  $$NOW^XLFDT  
MailMan 1 ^XMD  

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

Package Total Caller Graph
Accounts Receivable 4 PRCAE CLEAR LOCAL STMNT QUEUE  PRCAE LOCAL STATEMENT PRINT  RCCPC BUILD  RCCPCBJ  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
V ;;4.5;Accounts Receivable;**34,70,80,48,104,116,149,170,181,190,223,237,219,265,301,348,397,401,460**;Mar 20,1995;Build 5
EN
OSTM ;Process old statements ;PRCA*4.5*401
STATMNT ;Print oversized patient statements to local printer
NO ;If there is no activity
BUILD ;This is the entry point from the BUILD CCPC file option
TIME
RCDESC ;Remove "IN PART" & "IN FULL" from the the bill description
RCCPOSST ;PRCA*4.5*401 Sends external email to Mail group to notify there are statements to print
FILEOSFG(RCDEBTDA,RCFT) ;PRCA*4.5*401 Set/Clear LOCAL PRINT flag, in file 340, to:
; Yes, i.e. 1 if RCFT="S"
; No, i.e. 0 if RCFT="C"
; RCDEBTDA = File 340 IEN
; RCFT = Filing Type (S Set or C Clear)
CLRSTMTQ ;PRCA*4.5*401 Clear Oversize statement queue
FILESTAT(DEB) ;PRCA*4.5*401 File
; INPUT: DEB - Debtor IEN (file 340)

External References

Name Field # of Occurrence
DD^%DT EN+7
H^%DTC TIME+2
NOW^%DTC EN+7, EN+8, EN+26, EN+57
YMD^%DTC TIME+3
YX^%DTC TIME+2
^%ZIS STATMNT+22, STATMNT+23
^%ZISC STATMNT+27
^%ZTLOAD STATMNT+27, TIME+1
KILL^%ZTLOAD TIME+6
DT^DICRW EN+6
^DIE FILEOSFG+11, FILEOSFG+16
^DIK EN+128
IXALL^DIK EN+131
$$GET1^DIQ EN+2, FILESTAT+6
^DIR STATMNT+8, STATMNT+16, CLRSTMTQ+11
EN^PRCAGD EN+35
REF^PRCAGD EN+33
$$GMT^PRCAGST EN+68
EN^PRCAGT EN+29
TBAL^PRCAGT EN+30
$$PRE^PRCAGU EN+33
BBAL^PRCAGU EN+31
PBAL^PRCAGU EN+28
SITE^PRCAGU EN+6
UPDAT^PRCAGU FILESTAT+14
$$EMERES^PRCAUTL EN+16
$$DADD^RCAMADD EN+49
$$FPS^RCAMFN01 EN+9, EN+24
$$ASOF^RCCPCFN BUILD+3
BILLDESC^RCCPCPS1 EN+86
TRANDESC^RCCPCPS1 EN+95
STM^RCCPCSTM STATMNT+24
$$TRANVALU^RCDPBTLM EN+99
CLOSE^RCEVDRV1 FILESTAT+13
OPEN^RCEVDRV1 FILESTAT+12
$$LST^RCFN01 EN+23
$$NAM^RCFN01 EN+58
$$SLH^RCFN01 BUILD+4
$$SSN^RCFN01 EN+14, EN+48
$$SITE^RCMSITE FILESTAT+12
$$NOW^XLFDT FILEOSFG+13
^XMD RCCPOSST+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"AR SITE PARAMETER ENTRIES NOT DEFINED!",?50
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: Y
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: Y
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !,"Nothing done"
  • Line Location: STATMNT+10
Function Call: WRITE
  • Prompt: !,"Nothing done"
  • Line Location: STATMNT+11
Function Call: WRITE
  • Prompt: !
  • Line Location: STATMNT+13
Function Call: WRITE
  • Prompt: !,"Nothing done"
  • Line Location: STATMNT+18
Function Call: WRITE
  • Prompt: !,"Cannot continue."
  • Line Location: STATMNT+21
Function Call: WRITE
  • Prompt: !,"Queued for Building."
  • Line Location: TIME+2
Function Call: WRITE
  • Prompt: !,"Queued for Building."
  • Line Location: TIME+7
Function Call: WRITE
  • Prompt: !,"Nothing done"
  • Line Location: CLRSTMTQ+12
Function Call: WRITE
  • Prompt: !!,"Local Statement Queue has been cleared"
  • Line Location: CLRSTMTQ+16
Routine Call
  • DIE
  • Line Location:
    • FILEOSFG+11
    • FILEOSFG+16
Routine Call
  • DIR
  • Line Location:
    • STATMNT+8
    • STATMNT+16
    • CLRSTMTQ+11
Routine Call
  • %ZIS
  • Line Location:
    • STATMNT+22
    • STATMNT+23

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCD(340 - [#340] Classic Fileman Calls,  GET1^DIQ
^RC(342 - [#342] GET1^DIQ
^RCPS(349.2 - [#349.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] EN+53, EN+54
^PRCA(430 - [#430] EN+75, EN+77, EN+78, EN+90, EN+109
^PRCA(430.2 - [#430.2] EN+79
^PRCA(433 - [#433] EN+103, EN+113
^RC(342 - [#342] STATMNT+20
^RCD(340 - [#340] EN+11, EN+16, EN+52, RCCPOSST+4, CLRSTMTQ+13, FILESTAT+12
^RCPS(349.2 - [#349.2] EN+3!, EN+47, EN+48*, EN+50*, EN+52*, EN+55*, EN+56*, EN+57*, EN+58*, EN+59*
, EN+60*, EN+64, EN+71*, EN+76, EN+82*, EN+90*, EN+91*, EN+109*, EN+110*, EN+113*
, EN+120*, EN+121*, EN+124*, EN+132, NO+1, NO+2*, NO+3*, NO+4*, NO+5*, NO+6
, NO+7*, NO+8*, NO+9*, NO+10, BUILD+2, BUILD+3
^RCT(349 - [#349] BUILD+5, BUILD+8, BUILD+9
^RCT(349.1 - [#349.1] EN+4!
^TMP("PRCAGT" EN+22!, EN+36, EN+74, EN+84, EN+93
^TMP($J RCCPOSST+3!, RCCPOSST+8*
^XTMP("PRCAGU" EN+39, EN+133!
^XTMP("RCCPC" EN+5!

Label References

Name Line Occurrences
FILEOSFG EN+127, CLRSTMTQ+15
FILESTAT CLRSTMTQ+14
NO EN+93, EN+129
RCCPOSST EN+134
RCDESC EN+95
TIME TIME+4

Naked Globals

Name Field # of Occurrence
^( EN+132*
^(0 EN+47*, EN+59*, EN+64*, EN+84
^(4 NO+10*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN~, EN+7, EN+8, EN+26, EN+57, TIME+3
>> %H TIME+2*, TIME+3*
>> %Y TIME+2
%ZIS STATMNT+1~, STATMNT+22*, STATMNT+23*
ADDR EN+13~, EN+49*, EN+50, EN+51, EN+56
AMT EN+12~, EN+84*, EN+90
BBAL EN+12~, EN+31*, EN+32, EN+33, EN+34, EN+35, EN+36, EN+37, EN+38, EN+39
, FILESTAT+5~
BBAL("ADM" EN+60, FILEOSFG+13, FILESTAT+8*, FILESTAT+12
BBAL("CT" EN+60, FILEOSFG+13, FILESTAT+9*, FILESTAT+12
BBAL("INT" EN+60, FILEOSFG+13, FILESTAT+8*, FILESTAT+12
BBAL("MF" EN+60, FILEOSFG+13, FILESTAT+9*, FILESTAT+12
BBAL("PB" EN+60, FILEOSFG+13, FILESTAT+8*, FILESTAT+12
BEG EN+12~, EN+23*, EN+24, EN+25, EN+27*, EN+28*, EN+35
BEGDC EN+12~, EN+23*, EN+29
BN EN+12~
CAT EN+12~, EN+78*, EN+79
CCPC EN~
CNT EN~, EN+10*, RCCPOSST+1~, RCCPOSST+2*, RCCPOSST+4*, RCCPOSST+5, RCCPOSST+8
COMM EN+1*, EN+39, EN+133!
CSBB EN+18~*, EN+32, EN+42, EN+43
CSPREV EN+18~, EN+43*, EN+44
CSTCH EN+18~*, EN+43, EN+45
CSTPC EN+18~*, EN+43, EN+46
DA EN+128*, FILEOSFG+8~, FILEOSFG+9*, FILEOSFG+10*, FILEOSFG+14*, FILEOSFG+15*, FILEOSFG+17!, CLRSTMTQ+2~
DAT EN~
DEB EN~, EN+10*, EN+11*, EN+14, EN+16, EN+23, EN+28, EN+29, EN+30, EN+31
, EN+33, EN+35, EN+36, EN+39, EN+48, EN+49, EN+50, EN+52, EN+55, EN+56
, EN+57, EN+58, EN+59, EN+60, EN+63, EN+132*, EN+133, NO+1, NO+2, NO+3
, NO+4, NO+5, NO+6, NO+7, NO+8, NO+9, NO+10, FILESTAT~, FILESTAT+6, FILESTAT+12
, FILESTAT+14
DESC EN+12~
DIE FILEOSFG+8~, FILEOSFG+9*, FILEOSFG+10*, FILEOSFG+14*, FILEOSFG+15*, FILEOSFG+17!
DIK EN~, EN+128*, EN+131*
DIR STATMNT+1~, CLRSTMTQ+2~
DIR("A" STATMNT+5*, STATMNT+6*, STATMNT+14*, CLRSTMTQ+5*, CLRSTMTQ+6*, CLRSTMTQ+7*, CLRSTMTQ+8*, CLRSTMTQ+9*
DIR("B" STATMNT+7*, STATMNT+15*, CLRSTMTQ+10*
DIR("T" CLRSTMTQ+10*
DIR(0 STATMNT+7*, STATMNT+15*, CLRSTMTQ+10*
DIROUT STATMNT+2~, STATMNT+10, STATMNT+18, CLRSTMTQ+2~
DIRUT STATMNT+2~, STATMNT+10, STATMNT+18, CLRSTMTQ+2~
DR FILEOSFG+8~, FILEOSFG+9*, FILEOSFG+10*, FILEOSFG+14*, FILEOSFG+15*, FILEOSFG+17!
DT EN+9, FILESTAT+14
DTOUT STATMNT+2~, STATMNT+10, STATMNT+18, CLRSTMTQ+2~
DUOUT STATMNT+2~, STATMNT+10, STATMNT+18, CLRSTMTQ+2~
DUZ FILESTAT+12
END EN~, EN+8*, EN+26*, EN+29, FILESTAT+5~, FILESTAT+11*, FILESTAT+12
ERR FILESTAT+5~, FILESTAT+12
ETY EN+12~
EVN FILESTAT+5~, FILESTAT+12, FILESTAT+13
FC EN+12~, EN+54*, EN+55, EN+56
INADFL EN~, EN+19*
IO("Q" STATMNT+22!
IOP STATMNT+20*, STATMNT+21, STATMNT+22!
LDT1 EN~, EN+9*
LDT3 EN~, EN+24*
LINE RCCPOSST+1~, RCCPOSST+7*, RCCPOSST+8*
ND EN+12~
PAT EN+12~
PBAL EN+12~, EN+27*, EN+28*, EN+34, EN+35, EN+40, EN+44*, EN+59
PC EN+12~, EN+79*, EN+80, EN+81*, EN+82
PC( EN+80*, EN+81
PC(1 EN+77*
PC(75 EN+76*
PCC EN~, EN+80*
PDAT EN+13~, EN+27*, EN+28*
PEND EN+13~, EN+33*, EN+34
POP STATMNT+1~, STATMNT+22, STATMNT+23
PRCADEV STATMNT+1~, STATMNT+20*
PRN EN~, EN+10*
QDT BUILD+1~, TIME+3*, TIME+4
RCBILLDA EN+62~, EN+74*, EN+75, EN+77, EN+78, EN+84, EN+86, EN+90, EN+93, EN+109
RCCOM1 EN+62~, EN+66*, EN+70*, EN+71
RCCOM2 EN+62~, EN+66*, EN+68*, EN+70, EN+71
RCCOM3 EN+62~, EN+66*, EN+69*, EN+71
RCDATA1 EN+62~, EN+103*, EN+104, EN+106, EN+113
RCDATE EN~, EN+9*, EN+25
RCDEBIEN RCCPOSST+1~, RCCPOSST+2*, RCCPOSST+4*
RCDEBTDA EN+62~, EN+63*, EN+64, EN+68, EN+71, EN+74, EN+76, EN+82, EN+84, EN+90
, EN+91, EN+93, EN+109, EN+110, EN+113, EN+120, EN+121, EN+124, EN+127, EN+128
, FILEOSFG~, FILEOSFG+9, FILEOSFG+10, FILEOSFG+14, FILEOSFG+15
RCDESC EN+62~, EN+86!, EN+95!, EN+118*, EN+120
RCDESC( EN+91, EN+110
RCDESC(1 EN+90, EN+97, EN+109, RCDESC+1, RCDESC+4*, RCDESC+5*
RCDFN EN+16~*
RCFT FILEOSFG~, FILEOSFG+9, FILEOSFG+10, FILEOSFG+12, FILEOSFG+15, CLRSTMTQ+1~, CLRSTMTQ+3*, CLRSTMTQ+15
RCIEN CLRSTMTQ+1~, CLRSTMTQ+3*, CLRSTMTQ+13*, CLRSTMTQ+14, CLRSTMTQ+15
RCINFULL EN+1~, RCDESC+2*, RCDESC+4
RCINPART EN+1~, RCDESC+3*, RCDESC+5
RCPSDA EN+62~, EN+73*, EN+89*, EN+90, EN+91*, EN+108*, EN+109, EN+110*, EN+119*, EN+120
, EN+121, EN+124, EN+126
RCT EN~, EN+4*
RCTOTAL EN+62~
RCTOTAL("ADM" EN+116, EN+118
RCTOTAL("INT" EN+116, EN+118
RCTOTAL("OTH" EN+116, EN+118
RCTRANDA EN+62~, EN+93*, EN+95, EN+99, EN+103, EN+113
RCTRDATE EN+62~, EN+74*, EN+84, EN+90, EN+93, EN+109
REF EN+21~
>> REP EN+33, EN+35
SBAL EN+21~
SDT EN+21~
SITE EN~, EN+7
SITE("COM1" EN+66
SITE("ZERO" EN+37
ST EN+13~, EN+51*, EN+53*, EN+54
STATLIM EN+1~, EN+2*, EN+126
SVADM EN~, EN+13~, EN+20*
SVAMT EN~, EN+20*
SVINT EN~, EN+13~, EN+20*
SVOTH EN~, EN+13~, EN+20*
TBAL EN+21~, EN+30*, EN+34, EN+35, EN+40*, EN+42*, EN+59, EN+69
TBAL("CH" EN+45*, EN+59
TBAL("PC" EN+46*, EN+59
TBAL("RF" EN+59
TDT BUILD+1~, BUILD+2*, BUILD+3*, BUILD+4*, BUILD+6, BUILD+7, BUILD+9*, BUILD+10
TDT("T" BUILD+5*, BUILD+6
TN EN+21~
TTY EN+21~
TXT EN~
U EN+33, EN+52, FILESTAT+12
VALUE EN+62~, EN+99*, EN+100*, EN+104*, EN+106*, EN+109
VAR EN~
VBLLST FILEOSFG+8~, FILEOSFG+13*, FILEOSFG+14, FILESTAT+5~, FILESTAT+6*, FILESTAT+8, FILESTAT+9, FILESTAT+11
X EN~, EN+4*, EN+21~, EN+33*, EN+80*, EN+81*, EN+91*, EN+110*, EN+116*, EN+117
, EN+120, STATMNT+2~, TIME+3, TIME+4, CLRSTMTQ+2~
XMDUZ RCCPOSST+1~, RCCPOSST+11*
XMSUB RCCPOSST+1~, RCCPOSST+6*
XMTEXT RCCPOSST+1~, RCCPOSST+9*
XMY RCCPOSST+1~
XMY("G.RCCPC EXTERNAL" , RCCPOSST+12*
Y EN+7*, EN+21~, STATMNT+2~, STATMNT+11, STATMNT+20, STATMNT+21, STATMNT+22, STATMNT+23, STATMNT+24, CLRSTMTQ+2~
, CLRSTMTQ+12
ZDTDTH BUILD+1~
ZTASK STATMNT+1~, BUILD+1~
ZTDESC STATMNT+1~, STATMNT+25*, BUILD+1~, TIME*
ZTDTH STATMNT+1~, STATMNT+25*, TIME+1*
ZTIO STATMNT+1~, BUILD+1~, TIME*
ZTRTN STATMNT+1~, STATMNT+25*, BUILD+1~, TIME*
ZTSAVE STATMNT+1~
ZTSAVE("PRCADEV" STATMNT+26*
ZTSK BUILD+1~, TIME+1
ZTSK("D" TIME+2, TIME+3
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