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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBCERP7

Package: Integrated Billing

Routine: IBCERP7


Information

IBCERP7 ;AITC/KDM - HID HCCH Payer ID Report ;5/4/2017

Source Information

Source file <IBCERP7.m>

Entry Points

Name Comments DBIA/ICR reference
ENT ; Menu Option Entry Point
QUE ; Queued Entry Point
DATES ; Enter the from and to dates for this report
DEVICE ; - Ask device
GATHER ;GO GET THE INFO BASED ON THE DATES ENTERED
; uses ^DIC(36,"AEDIX",DATE,INSURANCE IEN,) to get data within date range.
; If data is within date range sets up ^TMP($J file with all data needed for the report.
; ^DIC(36,"AEDIX",DATE,INSURANCE IEN ,EDI ID NUMBER,TYPE "P" OR "I")=EDI ID NUMBER ON FILE ;
PRINT ; Print data
; PGC=page ct,LNTOT=no of lines to be printed,LNCNT=when to page break
; MAX=IOSL (device length)
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+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DATES+6
Function Call: WRITE
  • Prompt: !!!,"You will need a 132 column printer for this report",!
  • Line Location: DEVICE+3
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"Your task number "_ZTSK_" has been queued.",1:"Unable to queue this job.")
  • Line Location: DEVICE+16
Function Call: WRITE
  • Prompt: !!!
  • Line Location: DEVICE+18
Function Call: WRITE
  • Prompt: !!!,NONEMSG
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !,$E(NAME,1,30),?32,COMPADDR,?72,$$FMTE^XLFDT(DATE,2),?PIDPOS,PID,?105,EDIONFILE,?115,EDINO,?125,UPDATE
  • Line Location: PRINT+28
Function Call: WRITE
  • Prompt: !!!,?49,EORMSG,!!!
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDRINIT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,HDR1,?43,HDR2,?98," Page: "_PGC_" of "_PAGES
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !,"Timeframe: "_BEGDT_" thru "_ENDDT
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !!
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !,"Insurance Co",?32,"Address",?72,"Date",?82,"EDI-PayerID",?94,"CLM-OFC-ID",?105,"OldValue",?115,"NewValue",?125,"Updated"
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !,LEGEND
  • Condition for execution: +ASTERISK
  • Line Location: HEADER+14
Function Call: WRITE
  • Prompt: !,DASH
  • Line Location: HEADER+14
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EXIT+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(36 - [#36] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call