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

Package: Fee Basis

Routine: FBUCDE


Information

FBUCDE ;BOIFO/SGJ-UNAUTHORIZED EDI CLAIMS THAT WERE NOT APPROVED ;12/18/03

Source Information

Source file <FBUCDE.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  $$FMTE^XLFDT  
Fee Basis 2 $$DATX^FBAAUTL  ($$PROG,$$PTR,$$VEN,$$VET)^FBUCUTL  
VA FileMan 2 NOW^%DTC  ^DIR  

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
Fee Basis 1 FBUC DISAPPROVED EDI  

Entry Points

Name Comments DBIA/ICR reference
QEN ; queued entry
GATHER ; collect and sort data by date
HD ; page header
ONE
PRINT ; print claims
EXIT ; kill variables, tmp global and quit

External References

Name Field # of Occurrence
NOW^%DTC FBUCDE+13, GATHER+3
^%ZIS FBUCDE+18
HOME^%ZIS FBUCDE+22
^%ZISC GATHER+27
^%ZTLOAD FBUCDE+22
$$S^%ZTLOAD HD+2
^DIR FBUCDE+9, FBUCDE+14, GATHER+26, HD+3
$$DATX^FBAAUTL GATHER+3, GATHER+6, PRINT+8, PRINT+10
$$PROG^FBUCUTL PRINT+8
$$PTR^FBUCUTL PRINT+8
$$VEN^FBUCUTL PRINT+9
$$VET^FBUCUTL PRINT+9
$$FMTE^XLFDT FBUCDE+8, FBUCDE+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"no entries found.",!
  • Line Location: GATHER+22
Function Call: WRITE
  • Prompt: !!,"REPORT STOPPED AT USER REQUEST",!
  • Line Location: GATHER+24
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !,"UNAUTHORIZED EDI CLAIMS THAT WERE NOT APPROVED",?67,FBDTR
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !,FBHDT(FBI)
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: ?68,"Page: ",FBPG
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: !!,"Date of Disposition",?23,"Disposition",?42,"FPPS Claim ID",?62,"Fee Program"
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: !?2,"Veteran",?38,"Vendor"
  • Line Location: HD+10
Function Call: WRITE
  • Prompt: !?2,"Treatment From",?31,"Treatment To",?58,"Amt Claimed"
  • Line Location: HD+11
Function Call: WRITE
  • Prompt: !,FBDL
  • Line Location: HD+12
Function Call: WRITE
  • Prompt: !!,$$DATX^FBAAUTL($E(FBDT,1,7)),?21,$E($P($$PTR^FBUCUTL("^FB(162.91,",$P(FBZ,U,11)),U),1,30),?44,$O(^TMP("FBDE",$J,FBDT,FBDA,0)),?62,$$PROG^FBUCUTL($P(FBZ,U,2))
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !?2,$E($$VET^FBUCUTL($P(FBZ,U,4)),1,30),?35,$E($$VEN^FBUCUTL($P(FBZ,U,3)),1,30)
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !?2,$$DATX^FBAAUTL($E($P(FBZ,U,5),1,7)),?32,$$DATX^FBAAUTL($E($P(FBZ,U,6),1,7)),?58,$J(FBAC,6)
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !,FBSET_$P(^FB(162.94,I,0),U)
  • Line Location: PRINT+11
Routine Call
  • DIR
  • Line Location:
    • FBUCDE+9
    • FBUCDE+14
    • GATHER+26
    • HD+3
Routine Call
  • %ZIS
  • Line Location:
    • FBUCDE+18
Routine Call
  • %ZIS
  • Line Location:
    • FBUCDE+22

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FB(162.94 - [#162.94] PRINT+11
^FB583 - [#162.7] ONE+1, PRINT+5, PRINT+11
^FB583("AFC" GATHER+19
^TMP("FBDE" GATHER+11!, ONE+9*, PRINT+2, PRINT+3, PRINT+8, EXIT+3!

Label References

Name Line Occurrences
EXIT FBUCDE+18, FBUCDE+19, GATHER+28
HD GATHER+8, PRINT+7
ONE GATHER+19
PRINT GATHER+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT+2!
>> %ZIS FBUCDE+18*
DIC EXIT+2!
DIR FBUCDE+9!, FBUCDE+14!, GATHER+26!, HD+3!, EXIT+2!
DIR("A" FBUCDE+6*, FBUCDE+11*
DIR("B" FBUCDE+8*, FBUCDE+13*
DIR(0 FBUCDE+6*, FBUCDE+11*, GATHER+26*, HD+3*
DIROUT EXIT+2!
DIRUT FBUCDE+9, FBUCDE+14, EXIT+2!
DT FBUCDE+8
DTOUT EXIT+2!
DUOUT EXIT+2!
FBAC PRINT+1~, PRINT+6*, PRINT+10
FBBEG FBUCDE+10*, FBUCDE+11, GATHER+6, GATHER+9*, ONE+4, EXIT+3!
FBC GATHER+1~, GATHER+14*, GATHER+22, PRINT+4*
FBDA GATHER+1~, GATHER+18*, GATHER+19*, ONE+1, ONE+9, PRINT+3*, PRINT+5, PRINT+8, PRINT+11
FBDL GATHER+4!*, HD+12, EXIT+3!
FBDT ONE~, ONE+2*, ONE+4, ONE+9, PRINT+2*, PRINT+3, PRINT+8
FBDTR GATHER+1~, GATHER+3*, HD+6
FBEND FBUCDE+15*, GATHER+6, GATHER+10*, ONE+4, EXIT+3!
FBFPPSC GATHER+1~, GATHER+18*, GATHER+19*, ONE+9
FBHDT GATHER+1~
FBHDT( HD+7
FBHDT(1 GATHER+6*
FBI HD+1~, HD+7*
FBPG GATHER+1~, GATHER+2*, HD+3, HD+4, HD+5*, HD+8
FBQUIT GATHER+2*, GATHER+24, GATHER+26, HD+2*, HD+3*, PRINT+2, PRINT+3, PRINT+7, EXIT+3!
FBSET GATHER+1~, GATHER+16*, PRINT+11
FBX FBUCDE+4~, FBUCDE+21*
FBZ ONE~, ONE+1*, ONE+2, ONE+7, PRINT+1~, PRINT+5*, PRINT+6, PRINT+8, PRINT+9, PRINT+10
I PRINT+1~, PRINT+4*, PRINT+11*
IO QEN+1
IO("Q" FBUCDE+19
IOF HD+4
IOM GATHER+4
IOSL PRINT+7
IOST GATHER+26, HD+3, HD+4
POP FBUCDE+18, EXIT+2!
U ONE+2, ONE+7, PRINT+6, PRINT+8, PRINT+9, PRINT+10, PRINT+11
X FBUCDE+13, GATHER+3, EXIT+2!
Y FBUCDE+10, FBUCDE+15, HD+3, EXIT+2!
>> ZTDESC FBUCDE+20*
>> ZTQUEUED HD+2, EXIT+1
>> ZTREQ EXIT+1*
>> ZTRTN FBUCDE+20*
>> ZTSAVE( FBUCDE+21*
ZTSK FBUCDE+22!
>> ZTSTOP HD+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All