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 |  Local Variables  | All
Print Page as PDF
Routine: IBINRPT

Package: Integrated Billing

Routine: IBINRPT


Information

IBINRPT ;YMG/EDE - Indian Attestation (MEGABUS Act) Copay Exemption Report ;NOV 23 2021

Source Information

Source file <IBINRPT.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZTLOAD  ($$FMADD,$$FMTE)^XLFDT  $$CJ^XLFSTR  
Integrated Billing 2 ($$INDCHKDT,$$INDGET)^IBINUT1  ($$GETEXCEL,PRTEXCEL)^IBUCMM  
VA FileMan 2 $$GET1^DIQ  ^DIR  
Registration 1 DEM^VADPT  

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
Integrated Billing 1 IB INDIAN EXEMPTION REPORT  

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point
COMPILE ; compile report
PRINT ; print report
HDR ; print header
DASH(LEN) ; print line of dashes
PATID(DFN) ; returns Id for a given patient
ASKDT ; prompt for start and end dates
ASKDT1 ;
ASKDTX ; dates prompt exit point
PAUSE

External References

Name Field # of Occurrence
^%ZIS EN+13
HOME^%ZIS EN+17
^%ZTLOAD EN+17
$$GET1^DIQ COMPILE+11, COMPILE+17, PRINT+22
^DIR ASKDT+9, ASKDT1+5, PAUSE+2
$$INDCHKDT^IBINUT1 COMPILE+10
$$INDGET^IBINUT1 COMPILE+4
$$GETEXCEL^IBUCMM EN+8
PRTEXCEL^IBUCMM EN+9
DEM^VADPT PATID+8
$$FMADD^XLFDT ASKDT+7, ASKDT1+2
$$FMTE^XLFDT PRINT+4, PRINT+6, PRINT+25, PRINT+26, PRINT+29, PRINT+30, HDR+4, ASKDT+7, ASKDT1+2
$$CJ^XLFSTR PRINT+15, PRINT+29, PRINT+30

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Indian Attestation Copay Exemption Report",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"This report requires 132 column display.",!
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!,"Report compilation has started with task# ",ZTSK,".",!
  • Line Location: EN+18
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !!,"No records found."
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+35
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+35
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"Indian Attestation Copay Exemption Report",?66,EXTDT,?120,"Page: ",PAGE
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Indian Attestation Change dates: ",$$FMTE^XLFDT(IBSTART)," - ",$$FMTE^XLFDT(IBEND)
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !!,"Bills with Indian Attestation Status = Y : Eligible for possible cancellation."
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"Bills with Indian Attestation Status = N : Eligible for possible re-billing."
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !," Indian Change Indian Bill From Bill To Bill"
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,"Name ID Date/Time Status Bill # Charge Type Bill Status Date Date Amount"
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: DASH
  • Line Location: DASH+2
Function Call: WRITE
  • Prompt: !," End Date must not precede the Start Date."
  • Line Location: ASKDT1+7
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+4
Routine Call
  • %ZIS
  • Line Location:
    • EN+13
Routine Call
  • %ZIS
  • Line Location:
    • EN+17
Routine Call
  • DIR
  • Line Location:
    • ASKDT+9
    • ASKDT1+5
    • PAUSE+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IB - [#350] GET1^DIQ
^IBE(350.1 - [#350.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT("AINC" COMPILE+2, COMPILE+3
^IB - [#350] COMPILE+8
^IB("C" COMPILE+7
^IBE(350.1 - [#350.1] COMPILE+16
^TMP("IBINRPT" EN+3!, COMPILE+22*, COMPILE+23*, COMPILE+28!, PRINT+13, PRINT+18, PRINT+19, PRINT+20, PRINT+21

Label References

Name Line Occurrences
$$PATID COMPILE+19
ASKDT EN+6
ASKDT1 ASKDT1+7
ASKDTX ASKDT+10, ASKDT1+6
COMPILE EN+20
DASH HDR+10
HDR PRINT+11, PRINT+31
PAUSE EN+18, PRINT+16, PRINT+35, HDR+1
PRINT COMPILE+27

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EN+2~, EN+13*
%ZIS("B" EN+13*
DASH DASH+1~, DASH+2*
DFN PATID~, PATID+7
DIR ASKDT+4~, PAUSE+1~
DIR("?" ASKDT+8*, ASKDT1+3*, ASKDT1+4*
DIR("A" ASKDT+6*, ASKDT1+1*
DIR("B" ASKDT+7*, ASKDT1+2*
DIR(0 ASKDT+5*, PAUSE+2*
DIRUT ASKDT+4~, ASKDT+10, ASKDT1+6, PAUSE+1~, PAUSE+3
DT PRINT+4, ASKDT+7, ASKDT1+2
DTOUT ASKDT+4~, PAUSE+1~
DUOUT ASKDT+4~, PAUSE+1~
EXCEL EN+1~, EN+8*, EN+9, EN+10, PRINT+5, PRINT+9, PRINT+14, PRINT+24
EXTDT PRINT+1~, PRINT+4*, PRINT+6, HDR+3
IBBLNO COMPILE+1~, COMPILE+18*, COMPILE+22
IBCHRG COMPILE+1~, COMPILE+20*, COMPILE+22, PRINT+1~, PRINT+23*, PRINT+26, PRINT+30
IBCHTYPE COMPILE+1~, COMPILE+15*, COMPILE+16, COMPILE+17, COMPILE+22, PRINT+1~, PRINT+22*, PRINT+25, PRINT+30
IBDATA COMPILE+1~, COMPILE+8*, COMPILE+9, COMPILE+15, COMPILE+18, COMPILE+20, COMPILE+21, PRINT+1~, PRINT+21*, PRINT+22
PRINT+23, PRINT+25, PRINT+26, PRINT+29, PRINT+30
IBDFN COMPILE+1~, COMPILE+3*, COMPILE+4, COMPILE+7, COMPILE+19, COMPILE+22, COMPILE+23, PRINT+1~, PRINT+19*, PRINT+20
PRINT+21
IBEND EN+1~, COMPILE+2, PRINT+6, HDR+4, ASKDT1+8*
IBFR COMPILE+1~, COMPILE+21*, COMPILE+22
IBGRP COMPILE+1~, COMPILE+16*
IBIEN COMPILE+1~, COMPILE+7*, COMPILE+8, COMPILE+11, COMPILE+22, PRINT+20*, PRINT+21
IBINDTM COMPILE+1~, COMPILE+2*, COMPILE+3, COMPILE+22
IBINFLG COMPILE+1~, COMPILE+5*, COMPILE+13, COMPILE+14, COMPILE+22
IBINSTDT COMPILE+1~, COMPILE+6*, COMPILE+10
IBNM COMPILE+1~, COMPILE+19*, COMPILE+22, COMPILE+23, PRINT+1~, PRINT+18*, PRINT+19, PATID+6~, PATID+9*, PATID+10
IBPID COMPILE+1~, COMPILE+19*, COMPILE+22
IBSTART EN+1~, COMPILE+2, PRINT+6, HDR+4, ASKDT+11*, ASKDT1+7
IBSTATNM COMPILE+1~, COMPILE+11*, COMPILE+13, COMPILE+14, COMPILE+22
IBTO COMPILE+1~, COMPILE+9*, COMPILE+10, COMPILE+22
IO PRINT+2
IO("Q" EN+12!, EN+14
IOF PRINT+10, PRINT+16, PRINT+35, HDR+1
IOP EN+12!
IOSL PRINT+31
IOST PRINT+10
LEN DASH~, DASH+2
LN PRINT+1~, PRINT+28*, PRINT+31, HDR+2*
PAGE PRINT+1~, PRINT+3*, PRINT+16, PRINT+35, HDR+1, HDR+2*, HDR+3
POP EN+2~, EN+13*
QUIT EN+1~, EN+6*, PRINT+1~, PRINT+3*, PRINT+18, PRINT+19, PRINT+20, PRINT+31, PRINT+35, HDR+1
ASKDT+10*, ASKDT1+6*, PAUSE+3*
U COMPILE+5, COMPILE+6, COMPILE+9, COMPILE+13, COMPILE+15, COMPILE+16, COMPILE+18, COMPILE+19, COMPILE+20, COMPILE+21
COMPILE+22, PRINT+6, PRINT+22, PRINT+23, PRINT+25, PRINT+26, PRINT+29, PRINT+30, PATID+10
VADM PATID+6~
VADM(1 PATID+9
VADM(2 PATID+10
X ASKDT+4~, PAUSE+1~
Y ASKDT+4~, ASKDT+11, ASKDT1+7, ASKDT1+8, PAUSE+1~
Z COMPILE+1~, COMPILE+4*, COMPILE+5, COMPILE+6, COMPILE+19*
ZTDESC EN+2~, EN+15*
>> ZTQUEUED PRINT+10, PRINT+16, PRINT+35, HDR+1
ZTRTN EN+2~, EN+15*
ZTSAVE EN+2~
ZTSAVE("EXCEL" EN+16*
ZTSAVE("IBEND" EN+16*
ZTSAVE("IBSTART" EN+16*
ZTSAVE("ZTREQ" EN+16*
ZTSK EN+2~, EN+18
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 |  Local Variables  | All