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

Package: Fee Basis

Routine: FBFPAR


Information

FBFPAR ;WOIFO/SAB-FPPS AUDIT REPORT ;7/18/2003

Source Information

Source file <FBFPAR.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 6 DD^%DT  NOW^%DTC  $$GET1^DID  DA^DILF  ($$GET1,GETS)^DIQ  ^DIR  
Kernel 4 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  $$FMTE^XLFDT  
Fee Basis 1 DAYS^FBAAUTL1  

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 FB FPPS AUDIT REPORT  

Entry Points

Name Comments DBIA/ICR reference
QEN ; queued entry
GATHER ; collect and sort data
PRINT ; report data
EXIT ;
HD ; page header
PRINT1 ; Print one audit record (FBDA)

External References

Name Field # of Occurrence
DD^%DT PRINT+1
NOW^%DTC PRINT+1
^%ZIS FBFPAR+34
HOME^%ZIS FBFPAR+38
^%ZISC PRINT+29
^%ZTLOAD FBFPAR+38
$$S^%ZTLOAD HD+2
$$GET1^DID PRINT1+12
DA^DILF PRINT1+26
$$GET1^DIQ PRINT1+8, PRINT1+21, PRINT1+28, PRINT1+30, PRINT1+32, PRINT1+34
GETS^DIQ PRINT1+7
^DIR FBFPAR+10, FBFPAR+18, FBFPAR+24, FBFPAR+30, PRINT+28, HD+3
DAYS^FBAAUTL1 FBFPAR+22
$$FMTE^XLFDT FBFPAR+17, FBFPAR+23, PRINT+5, PRINT1+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"no Audit entries found."
  • Line Location: PRINT+24
Function Call: WRITE
  • Prompt: !!,"REPORT STOPPED AT USER REQUEST"
  • Line Location: PRINT+26
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !,"FPPS Data Audit Report "
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: "by Date Range"
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: "for Invoice: ",FBAAIN
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: ?49,FBDTR,?72,"page ",FBPG
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: !,FBHDT(FBI)
  • Line Location: HD+10
Function Call: WRITE
  • Prompt: !!,"Date/Time Changed",?19,"File",?27,"IENS",?58,"User"
  • Line Location: HD+11
Function Call: WRITE
  • Prompt: !,FBDL
  • Line Location: HD+12
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT1+4
Function Call: WRITE
  • Prompt: !,FBADT,?19,FB(163.7,FBIENS,2),?27,FB(163.7,FBIENS,3)
  • Line Location: PRINT1+9
Function Call: WRITE
  • Prompt: ?58,$E(FB(163.7,FBIENS,7),1,20)
  • Line Location: PRINT1+10
Function Call: WRITE
  • Prompt: !?4,"Field: "
  • Line Location: PRINT1+11
Function Call: WRITE
  • Prompt: $$GET1^DID(FB(163.7,FBIENS,2),FB(163.7,FBIENS,4),"","LABEL")
  • Line Location: PRINT1+12
Function Call: WRITE
  • Prompt: ?27,"Old Field Value: ",FB(163.7,FBIENS,5)
  • Line Location: PRINT1+13
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT1+14
Function Call: WRITE
  • Prompt: ?4,"Invoice: ",FB(163.7,FBIENS,.01)
  • Line Location: PRINT1+15
Function Call: WRITE
  • Prompt: ?27,"New Field Value: ",FB(163.7,FBIENS,6)
  • Line Location: PRINT1+16
Function Call: WRITE
  • Prompt: !,?4,"Prescription: "
  • Line Location: PRINT1+20
Function Call: WRITE
  • Prompt: $$GET1^DIQ(162.11,FB(163.7,FBIENS,3),.01)
  • Line Location: PRINT1+21
Function Call: WRITE
  • Prompt: !,?4,"Patient: "
  • Line Location: PRINT1+27
Function Call: WRITE
  • Prompt: $$GET1^DIQ(162,FBDA(3)_",",.01)
  • Line Location: PRINT1+28
Function Call: WRITE
  • Prompt: ?40,"Vendor: "
  • Line Location: PRINT1+29
Function Call: WRITE
  • Prompt: $E($$GET1^DIQ(162.01,FBDA(2)_","_FBDA(3)_",",.01),1,30)
  • Line Location: PRINT1+30
Function Call: WRITE
  • Prompt: !,?4,"Date of Service: "
  • Line Location: PRINT1+31
Function Call: WRITE
  • Prompt: $$GET1^DIQ(162.02,FBDA(1)_","_FBDA(2)_","_FBDA(3)_",",.01)
  • Line Location: PRINT1+32
Function Call: WRITE
  • Prompt: ?36,"Service Provided: "
  • Line Location: PRINT1+33
Function Call: WRITE
  • Prompt: $$GET1^DIQ(162.03,FB(163.7,FBIENS,3),.01)
  • Line Location: PRINT1+34
Routine Call
  • DIR
  • Line Location:
    • FBFPAR+10
    • FBFPAR+18
    • FBFPAR+24
    • FBFPAR+30
    • PRINT+28
    • HD+3
Routine Call
  • %ZIS
  • Line Location:
    • FBFPAR+34
Routine Call
  • %ZIS
  • Line Location:
    • FBFPAR+38

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAAC - [#162] GET1^DIQ
162.01 GET1^DIQ
162.02 GET1^DIQ
162.03 GET1^DIQ
162.11 GET1^DIQ
^FB(163.7 - [#163.7] GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FB(163.7 - [#163.7] PRINT+15, PRINT+16, PRINT+21

Label References

Name Line Occurrences
EXIT FBFPAR+10, FBFPAR+13, FBFPAR+28, FBFPAR+34, FBFPAR+35
HD PRINT+7, PRINT1+3
PRINT1 PRINT+17, PRINT+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PRINT+1, EXIT+3!
>> %ZIS FBFPAR+34*
DIC EXIT+3!
DIR FBFPAR+10!, FBFPAR+18!, FBFPAR+24!, FBFPAR+30!, PRINT+28!, EXIT+3!, HD+3!
DIR("?" FBFPAR+7*, FBFPAR+8*, FBFPAR+9*
DIR("A" FBFPAR+5*, FBFPAR+15*, FBFPAR+20*, FBFPAR+29*
DIR("B" FBFPAR+6*, FBFPAR+17*, FBFPAR+23*
DIR(0 FBFPAR+4*, FBFPAR+15*, FBFPAR+20*, FBFPAR+29*, PRINT+28*, HD+3*
DIROUT EXIT+3!
DIRUT FBFPAR+10, FBFPAR+13, FBFPAR+18, FBFPAR+24, FBFPAR+28, FBFPAR+30, EXIT+3!
DT FBFPAR+17
DTOUT EXIT+3!
DUOUT EXIT+3!
FB PRINT1+1~
FB( PRINT1+9, PRINT1+10, PRINT1+12, PRINT1+13, PRINT1+15, PRINT1+16, PRINT1+19, PRINT1+21, PRINT1+24, PRINT1+26
, PRINT1+34
FBAAIN FBFPAR+31*, PRINT+21, EXIT+2!, HD+8
FBADT PRINT1+1~, PRINT1+8*, PRINT1+9
FBC PRINT+10*, PRINT+24, EXIT+2!, PRINT1+2*
FBDA PRINT+16*, PRINT+21*, PRINT1+6, PRINT1+25~, PRINT1+26
FBDA(1 PRINT1+32
FBDA(2 PRINT1+30, PRINT1+32
FBDA(3 PRINT1+28, PRINT1+30, PRINT1+32
FBDL PRINT+2!*, HD+12
FBDT PRINT+14*, PRINT+15*, PRINT+16, EXIT+2!
FBDT1 FBFPAR+19*, FBFPAR+20, FBFPAR+22, FBFPAR+23, PRINT+5, PRINT+14, EXIT+2!
FBDT2 FBFPAR+25*, PRINT+5, PRINT+15, EXIT+2!
FBDTR PRINT+1*, EXIT+2!, HD+9
FBHDT EXIT+2!
FBHDT( HD+10
FBHDT(1 PRINT+5*
FBI HD+1~, HD+10*
FBIENS EXIT+2!, PRINT1+6*, PRINT1+7, PRINT1+8, PRINT1+9, PRINT1+10, PRINT1+12, PRINT1+13, PRINT1+15, PRINT1+16
, PRINT1+19, PRINT1+21, PRINT1+24, PRINT1+26, PRINT1+34
FBPG PRINT+1*, EXIT+2!, HD+3, HD+4, HD+5*, HD+9
FBQUIT GATHER+1*, PRINT+15, PRINT+16, PRINT+21, PRINT+26, PRINT+28, EXIT+2!, HD+2*, HD+3*, PRINT1+3
FBRANGE FBFPAR+11*, FBFPAR+13, FBFPAR+28, PRINT+5, PRINT+13, PRINT+20, EXIT+2!, HD+7, PRINT1+15
FBX FBFPAR+37*, EXIT+2!
I EXIT+3!
IO QEN+1
IO("Q" FBFPAR+35
IOF HD+4
IOM PRINT+2
IOSL PRINT1+3
IOST PRINT+28, HD+3, HD+4
J EXIT+3!
POP FBFPAR+34, EXIT+3!
X FBFPAR+22*, FBFPAR+23, EXIT+3!
Y FBFPAR+11, FBFPAR+19, FBFPAR+25, FBFPAR+31, PRINT+1*, EXIT+3!, HD+3
>> ZTDESC FBFPAR+36*
>> ZTQUEUED EXIT+1, HD+2
>> ZTREQ EXIT+1*
>> ZTRTN FBFPAR+36*
>> ZTSAVE( FBFPAR+37*
ZTSK FBFPAR+38!
>> ZTSTOP HD+2*
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