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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RCHRFS1

Package: Accounts Receivable

Routine: RCHRFS1


Information

RCHRFS1 ;SLC/SS - High Risk for Suicide Patients Report ; JAN 22,2021@14:32

Source Information

Source file <RCHRFS1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Accounts Receivable 3 COLHEAD^RCHRFS  GET399^RCHRFS2  ($$HRFSDTS,$$PATINFO)^RCHRFSUT  
Kernel 2 $$FMTE^XLFDT  ($$RJ,$$STRIP)^XLFSTR  
VA FileMan 2 EN^DIQ1  ^DIR  
Outpatient Pharmacy 1 RX^PSO52API  

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 RCHRFS  

Entry Points

Name Comments DBIA/ICR reference
RUNRPT(RCDFN,FRMDTINT,TODTINT,IBSTAT,IBSVCTYP) ;Gather data for Report
GET350(DFN,FRMDTINT,TODTINT,IBSTAT,IBSVCTYP) ; Collect data originating from the INTEGRATED BILLING ACTION file (#350)
OUTPRPT ; Loop through ^TMP to write report lines.
WRITEREC(PTNINFO,LINE) ; Write one line of report
GETDTS() ; Get appropriate selection trigger dates by type of service
PAUSE(IBQUIT) ;
CLEAN ; KILL ALL REMAINING VARIABLES BEFORE EXIT

External References

Name Field # of Occurrence
EN^DIQ1 GET350+14, GET350+51, GET350+83
^DIR PAUSE+1
RX^PSO52API GETDTS+19
COLHEAD^RCHRFS OUTPRPT+9
GET399^RCHRFS2 RUNRPT+2
$$HRFSDTS^RCHRFSUT GET350+91
$$PATINFO^RCHRFSUT GET350+9
$$FMTE^XLFDT GET350+67, GET350+68, GET350+70, GET350+73, GET350+88, WRITEREC+12
$$RJ^XLFSTR WRITEREC+16
$$STRIP^XLFSTR GET350+67, GET350+68, GET350+70, GET350+73, GET350+88, WRITEREC+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"NO DATA FOUND"
  • Line Location: OUTPRPT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: OUTPRPT+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: OUTPRPT+9
Function Call: WRITE
  • Prompt: !,$E(PATNM,1,26)
  • Line Location: WRITEREC+4
Function Call: WRITE
  • Prompt: ?26,U,RCSSN
  • Line Location: WRITEREC+5
Function Call: WRITE
  • Prompt: ?36,U,$P(LINE,U,27)
  • Line Location: WRITEREC+6
Function Call: WRITE
  • Prompt: ?53,U,$P(LINE,U,28)
  • Line Location: WRITEREC+7
Function Call: WRITE
  • Prompt: ?72,U,$P(LINE,U,29)
  • Line Location: WRITEREC+8
Function Call: WRITE
  • Prompt: ?84,U,$P(LINE,U,9)
  • Line Location: WRITEREC+9
Function Call: WRITE
  • Prompt: ?96,U,$P(LINE,U,10)
  • Line Location: WRITEREC+10
Function Call: WRITE
  • Prompt: ?123,U,$P(LINE,U,11)
  • Line Location: WRITEREC+11
Function Call: WRITE
  • Prompt: ?135,U,$$STRIP^XLFSTR($$FMTE^XLFDT($P(LINE,U,30),"8D")," ")
  • Line Location: WRITEREC+12
Function Call: WRITE
  • Prompt: ?148,U,$P(LINE,U,12)
  • Line Location: WRITEREC+13
Function Call: WRITE
  • Prompt: ?164,U,$P(LINE,U,13)
  • Line Location: WRITEREC+14
Function Call: WRITE
  • Prompt: ?177,U,$E($P(LINE,U,14),1,16)
  • Line Location: WRITEREC+15
Function Call: WRITE
  • Prompt: ?194,U,$$RJ^XLFSTR($J($P(LINE,U,8),8,2),11)
  • Line Location: WRITEREC+16
Function Call: WRITE
  • Prompt: ?206,U,$P(LINE,U,7)
  • Line Location: WRITEREC+17
Function Call: WRITE
  • Prompt: ?211,U,$P(LINE,U,6)
  • Line Location: WRITEREC+18
Function Call: WRITE
  • Prompt: ?225,U,$P(LINE,U,15)
  • Line Location: WRITEREC+19
Routine Call
  • DIR
  • Line Location:
    • PAUSE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IB("C" GET350+12
^PRCA(430 - [#430] GET350+48, GET350+80, GET350+81
^TMP($J GET350+11!, GET350+58, GET350+98*, OUTPRPT+3, OUTPRPT+5, OUTPRPT+6, OUTPRPT+7, OUTPRPT+8, OUTPRPT+10, OUTPRPT+14!
, GETDTS+15!, GETDTS+20, GETDTS+22, GETDTS+24, GETDTS+26, GETDTS+28, GETDTS+30, GETDTS+35, GETDTS+36, CLEAN+1!

Label References

Name Line Occurrences
$$GETDTS GET350+19
GET350 RUNRPT+1
PAUSE OUTPRPT+9
WRITEREC OUTPRPT+12, OUTPRPT+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARAPPR GET350+3~, GET350+49*, GET350+53*, GET350+54*, GET350+76, CLEAN+3!
ARFLDS GET350+3~, GET350+82!
ARFLDS(430 GET350+52, GET350+53, GET350+55, GET350+87
ARIEN GET350+3~, GET350+45*, GET350+48*, GET350+50, GET350+51, GET350+52, GET350+53, GET350+55
ARRSC GET350+3~, GET350+49*, GET350+55*, GET350+56*, GET350+77, CLEAN+3!
ARSTAT GET350+3~, GET350+49*, GET350+52*, GET350+72, CLEAN+3!
BILLNUM GET350+1~, GET350+46*, GET350+47*, GET350+48, GET350+50, GET350+58, GET350+64, GET350+98, OUTPRPT+1~, OUTPRPT+2*
, OUTPRPT+6*, OUTPRPT+7, OUTPRPT+8, OUTPRPT+10
CNT GET350+1~, GET350+6*, GET350+45*, GET350+58*, GET350+98, OUTPRPT+1~, OUTPRPT+2*, OUTPRPT+8*, OUTPRPT+10
DA GET350+2~, GET350+14*, GET350+51*, GET350+83*
DATEINFO GET350+2~, GET350+19*, GET350+20, GET350+21*, GET350+22, GET350+26*, GET350+27, GET350+28, GET350+29, GET350+71
DATES GETDTS+6~
DFN GET350~, GET350+9, GET350+12, GET350+91, GETDTS+19, GETDTS+22, GETDTS+24, GETDTS+26, GETDTS+28, GETDTS+30
, GETDTS+35, GETDTS+36
DIC GET350+2~, GET350+14*, GET350+51*, GET350+83*
DIQ GET350+2~, GET350+14*, GET350+51*, GET350+83*
DIQ(0 GET350+14*, GET350+51*, GET350+83*
DIR PAUSE+1!
DIR(0 PAUSE+1*
DPTDFN CLEAN+2!
DR GET350+2~, GET350+14*, GET350+51*, GET350+83*
FBILLNUM GET350+2~, GET350+46*, GET350+47, GET350+79, GET350+80, GET350+81
FRMDTINT RUNRPT~, RUNRPT+1, RUNRPT+2, GET350~, GET350+32
IB0 GET350+1~
IBBG GETDTS+6~
IBCANCLB GET350+3~, GET350+6*, GET350+40*, GET350+75
IBCANCLD GET350+3~, GET350+39*, GET350+73
IBCANCLR GET350+3~, GET350+6*, GET350+38*, GET350+73, GET350+74, GET350+75
IBCAT GETDTS+6~, GETDTS+8*, GETDTS+10*, GETDTS+41, GETDTS+49
IBDTENT GETDTS+6~, GETDTS+8*, GETDTS+42*, GETDTS+43*, GETDTS+45, GETDTS+46
IBDTFRM GETDTS+7~, GETDTS+8*, GETDTS+44*, GETDTS+45*, GETDTS+46
IBFLDS GET350+13!, CLEAN+2!
IBFLDS(350 GET350+15, GET350+23, GET350+24, GET350+34, GET350+35, GET350+36, GET350+38, GET350+39, GET350+40, GET350+46
, GET350+57, GET350+59, GET350+60, GET350+61, GET350+62, GET350+63, GET350+65, GET350+67, GET350+68, GETDTS+10
, GETDTS+11, GETDTS+42, GETDTS+43, GETDTS+44, GETDTS+51, GETDTS+54
IBIEN GET350+1~, GET350+6*, GET350+12*, GET350+14, GET350+15, GET350+23, GET350+24, GET350+34, GET350+35, GET350+36
, GET350+38, GET350+39, GET350+40, GET350+46, GET350+57, GET350+59, GET350+60, GET350+61, GET350+62, GET350+63
, GET350+65, GET350+67, GET350+68, GETDTS+10, GETDTS+11, GETDTS+42, GETDTS+43, GETDTS+44, GETDTS+51, GETDTS+54
IBQUIT OUTPRPT+5, OUTPRPT+6, OUTPRPT+7, OUTPRPT+8, OUTPRPT+9, PAUSE~, PAUSE+1*
IBRXFILL CLEAN+2!
IBRXNAM CLEAN+2!
IBRXNUM CLEAN+2!
IBSTAT RUNRPT~, RUNRPT+1, RUNRPT+2, GET350~, GET350+8
IBSTATNM GET350+1~, GET350+57*, GET350+62
IBSVCTYP RUNRPT~, RUNRPT+1, RUNRPT+2, GET350~, GET350+35, GET350+36
IBTYPE GETDTS+6~, GETDTS+11*, GETDTS+14, GETDTS+16
IBTYPINT GETDTS+6~
ICANCLD GET350+6*, CLEAN+2!
IOF OUTPRPT+9
IOSL OUTPRPT+9
JUNK OUTPRPT+1~, OUTPRPT+2*
LCNT GET350+2~, GET350+84*, GET350+86*
LINE GET350+1~, OUTPRPT+1~, OUTPRPT+2*, OUTPRPT+10*, OUTPRPT+11*, OUTPRPT+12, OUTPRPT+13, WRITEREC~, WRITEREC+6, WRITEREC+7
, WRITEREC+8, WRITEREC+9, WRITEREC+10, WRITEREC+11, WRITEREC+12, WRITEREC+13, WRITEREC+14, WRITEREC+15, WRITEREC+16, WRITEREC+17
, WRITEREC+18, WRITEREC+19
LTR1 CLEAN+2!
LTR2 CLEAN+2!
LTR3 CLEAN+2!
LTR4 CLEAN+2!
LTRFLD GET350+2~, GET350+85*, GET350+87
NORELDT GET350+4~, GET350+5*, GET350+17*, GET350+30*, GET350+96, GETDTS+7~, GETDTS+8*, GETDTS+33*, GETDTS+37
PATNM WRITEREC+1~, WRITEREC+2*, WRITEREC+4
POP GET350+1~, OUTPRPT+2*, OUTPRPT+3*, OUTPRPT+5, OUTPRPT+6, OUTPRPT+7
PTNINFO GET350+4~, GET350+9*, GET350+10, GET350+11, GET350+58, GET350+98, OUTPRPT+1~, OUTPRPT+4*, OUTPRPT+5*, OUTPRPT+6
, OUTPRPT+7, OUTPRPT+8, OUTPRPT+10, OUTPRPT+12, OUTPRPT+13, WRITEREC~, WRITEREC+2, WRITEREC+3
RC430IEN GET350+2~, GET350+81*, GET350+83, GET350+87
RCDFN RUNRPT~, RUNRPT+1, RUNRPT+2
RCHRFSST GET350+4~, GET350+91*, GET350+92, GET350+93, GET350+94
>> RCPAGE PAUSE+1
RCSSN WRITEREC+1~, WRITEREC+3*, WRITEREC+5
RESPONSE GETDTS+6~, GETDTS+8*, GETDTS+20*, GETDTS+21, GETDTS+37*, GETDTS+38, GETDTS+46*, GETDTS+47, GETDTS+51*, GETDTS+52
, GETDTS+54*, GETDTS+55
RESULT GET350+1~, GET350+34*
RXADTNL GET350+4~, GET350+5*, GET350+16*, GET350+20*, GET350+30, GET350+31
RXDATE GET350+23*, GET350+26, GETDTS+7~, GETDTS+24*, GETDTS+26*, GETDTS+33*, GETDTS+34*, GETDTS+37
RXFILDT GET350+4~, GET350+5*, GET350+18*, GET350+31*, GET350+97, GETDTS+7~, GETDTS+28*, GETDTS+30*, GETDTS+33, GETDTS+37
RXFLDS GETDTS+6~, CLEAN+2!
RXIEN GETDTS+7~, GETDTS+16*, GETDTS+19, GETDTS+20, GETDTS+22, GETDTS+24, GETDTS+26, GETDTS+28, GETDTS+30, GETDTS+35
, GETDTS+36
RXNAME GET350+25*, GET350+26, GETDTS+6~, GETDTS+36*, GETDTS+37
RXNODE GETDTS+7~, GETDTS+17*, GETDTS+18*, GETDTS+19
RXNUM GET350+24*, GET350+26, GETDTS+6~, GETDTS+35*, GETDTS+37
RXRFILL GETDTS+6~, GETDTS+8*, GETDTS+14*, GETDTS+18, GETDTS+22, GETDTS+24, GETDTS+28
STAT350 GET350+4~, GET350+15*, GET350+32
STATLST GET350+1~, GET350+8*, GET350+32
SVCDT GET350+2~, GET350+28*, GET350+58, GET350+67, GET350+68, GET350+70, GET350+91, GET350+98, OUTPRPT+7*, OUTPRPT+8
, OUTPRPT+10
SVCTYP GET350+1~, GET350+34*, GET350+35, GET350+36, GET350+66, GET350+69, GET350+95, GETDTS+6~, GETDTS+11*, GETDTS+12
, GETDTS+40
TLTR GET350+3~, GET350+86*, GET350+87, GET350+88, GET350+89
TODTINT RUNRPT~, RUNRPT+1, RUNRPT+2, GET350~, GET350+32
TRIGDT GET350+2~, GET350+27*, GET350+32, CLEAN+2!
>> TRM PAUSE+1
U GET350+31, GET350+59, GET350+60, GET350+61, GET350+62, GET350+63, GET350+64, GET350+65, GET350+67, GET350+68
, GET350+70, GET350+71, GET350+72, GET350+73, GET350+74, GET350+75, GET350+76, GET350+77, GET350+88, GET350+89
, GET350+92, GET350+93, GET350+94, GET350+96, GET350+97, OUTPRPT+11, OUTPRPT+12, OUTPRPT+13, WRITEREC+2, WRITEREC+3
, WRITEREC+5, WRITEREC+6, WRITEREC+7, WRITEREC+8, WRITEREC+9, WRITEREC+10, WRITEREC+11, WRITEREC+12, WRITEREC+13, WRITEREC+14
, WRITEREC+15, WRITEREC+16, WRITEREC+17, WRITEREC+18, WRITEREC+19, GETDTS+20, GETDTS+22, GETDTS+24, GETDTS+26, GETDTS+28
, GETDTS+30, GETDTS+36, GETDTS+37
VADM CLEAN+2!
XTEMP GET350+2~, GET350+59*, GET350+60*, GET350+61*, GET350+62*, GET350+63*, GET350+64*, GET350+65*, GET350+67*, GET350+68*
, GET350+70*, GET350+71*, GET350+72*, GET350+73*, GET350+74*, GET350+75*, GET350+76*, GET350+77*, GET350+88*, GET350+89*
, GET350+92*, GET350+93*, GET350+94*, GET350+96*, GET350+97*, GET350+98, GET350+99!
>> Y PAUSE+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All