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

Package: Integrated Billing

Routine: IBCERPN


Information

IBCERPN ;ALB/VD - RPN Resubmission/Printing Claims No Changes CSA Report ;1/16/2019

Source Information

Source file <IBCERPN.m>

Entry Points

Name Comments DBIA/ICR reference
ENT ; Menu Option Entry Point
QUE ; Queued Entry Point
DATES ; Enter the date range for this report
DEVICE ; - Ask device
GATHER ;GATHER THE INFO BASED ON THE DATE RANGE ENTERED
; Uses the ^IBM(361,"ARPN",CURDAT,IBNO,USER,ACTION) cross-reference file to get
; data within date range. If data is within date range this sets up the ^TMP($J
; file with all data needed for the report.
PRINT ; Print data
END
HDRINIT ; Initial setting
HEADER ; Print Header info
EXIT() ;clean up and quit

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DATES+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DATES+7
Function Call: WRITE
  • Prompt: !!!,"You will need a 132 column printer for this report",!
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"Your task number "_ZTSK_" has been queued.",1:"Unable to queue this job.")
  • Line Location: DEVICE+9
Function Call: WRITE
  • Prompt: !!!
  • Line Location: DEVICE+11
Function Call: WRITE
  • Prompt: !!!,NONEMSG
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !,$J(LCTR,3),?7,IBCLMNO,?16,$E(IBPAY,1,20),?38,$E(USRNAM,1,15),?59
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: $E(IBEMSG,1,50),?111,$P($$FMTE^XLFDT(CURDAT,2),"@"),?120,$J("$"_$FN(IBCBAL,"",2),12)
  • Line Location: PRINT+21
Function Call: WRITE
  • Prompt: !!!,?49,EORMSG,!!!
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDRINIT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !,HDR1,?59,HDR2,?114," Page: "_PGC_" of "_PAGES
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,LEGEND
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !!,?7,"Bill #",?17,"Payer Name",?38,"User Name",?59,"Error Message/Narrative/Category",?111,"Date",?124,"Curr Bal"
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,DASH
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EXIT+3
Info |  Source |  Entry Points |  Interaction Calls