Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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

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
Info |  Source |  Entry Points |  Interaction Calls