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

Package: Fee Basis

Routine: FBAAFED


Information

FBAAFED ;WOIFO/SAB - FPPS DATA EDIT OUTPATIENT/ANCILLARY INVOICE ;5/15/14 12:49

Source Information

Source file <FBAAFED.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 5 MSG^DIALOG  ^DIC  (FILE,UPDATE)^DIE  $$GET1^DIQ  ^DIR  
Fee Basis 3 MILL^FBAAPET1  ($$CKFPPS,FILEQUE)^FBFHLL  ($$FPPSC,$$FPPSL)^FBUTL5  
Kernel 1 $$NOW^XLFDT  

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 FBAA FPPS EDIT INVOICE  

Entry Points

Name Comments DBIA/ICR reference
INVED ; Invoice Edit
ASKINV ; Select Invoice to Edit
EDITFC ; edit FPPS CLAIM ID
ASKLINE ; Select Line to Edit
ASKPT ; Select Patient
ASKVEN ; Select Vendor
ASKDOS ; Select Date of Service
ASKSVC ; Select Service Provided
EDITFL ; edit FPPS Line Item
INVEDX ; Invoice Edit Exit
; if invoice changed then queue for retransmit to FPPS
CLEAN

External References

Name Field # of Occurrence
MSG^DIALOG EDITFC+30, EDITFC+32, EDITFL+14, EDITFL+26
^DIC ASKPT+3, ASKDOS+5, ASKSVC+4
FILE^DIE EDITFC+32, EDITFL+14
UPDATE^DIE EDITFC+30, EDITFL+26
$$GET1^DIQ ASKINV+17, ASKSVC+14, ASKSVC+18
^DIR ASKINV+4, ASKPT+7, ASKDOS+9, ASKSVC+8
MILL^FBAAPET1 ASKINV+12
$$CKFPPS^FBFHLL ASKINV+8
FILEQUE^FBFHLL INVEDX+2
$$FPPSC^FBUTL5 EDITFC+1
$$FPPSL^FBUTL5 EDITFL+1
$$NOW^XLFDT EDITFC+23, EDITFL+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKINV+1
Function Call: WRITE
  • Prompt: !,$C(7),"Invalid selection.",!
  • Line Location: ASKINV+5
Function Call: WRITE
  • Prompt: !?5,"Invoice ",FBAAIN," has not been transmitted to FPPS."
  • Line Location: ASKINV+9
Function Call: WRITE
  • Prompt: !,$C(7),"Only EDI Claims can be selected!"
  • Line Location: ASKINV+20
Function Call: WRITE
  • Prompt: !,$C(7),"Can not change EDI from YES to NO on invoice that has been sent to FPPS!"
  • Line Location: EDITFC+5
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKPT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKVEN+1
Function Call: WRITE
  • Prompt: !,"Vendor = ",$P($G(^FBAAV(FBV,0)),U)
  • Line Location: ASKVEN+11
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKDOS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKSVC+1
Function Call: WRITE
  • Prompt: $C(7),!,"Line is not on invoice ",FBAAIN,"!"
  • Line Location: ASKSVC+15
Routine Call
  • DIALOG
  • Line Location:
    • EDITFC+30
    • EDITFC+32
    • EDITFL+14
    • EDITFL+26
Routine Call
  • DIC
  • Line Location:
    • ASKPT+3
    • ASKDOS+5
    • ASKSVC+4
Routine Call
  • DIE
  • Line Location:
    • EDITFC+32
    • EDITFL+14
Routine Call
  • DIE
  • Line Location:
    • EDITFC+30
    • EDITFL+26
Routine Call
  • DIR
  • Line Location:
    • ASKINV+4
    • ASKPT+7
    • ASKDOS+9
    • ASKSVC+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAAC - [#162] Classic Fileman Calls
162.03 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FBAAC("C" ASKINV+5
^FBAAV - [#161.2] ASKVEN+11

Label References

Name Line Occurrences
ASKDOS ASKDOS+6, ASKSVC+5
ASKINV ASKINV+5, ASKINV+8, ASKINV+19
ASKPT ASKPT+4, ASKDOS+6
ASKSVC ASKSVC+5, ASKSVC+14, EDITFL+28
CLEAN FBAAFED+6
EDITFC EDITFC+4
INVED FBAAFED+5
INVEDX EDITFC+2, ASKPT+3, ASKPT+4, ASKDOS+5, ASKDOS+6, ASKSVC+4, ASKSVC+5, EDITFL+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D CLEAN!
DIC ASKPT+2*, ASKPT+3!, ASKDOS+3*, ASKDOS+5!, ASKSVC+3*, ASKSVC+4!, CLEAN!
DIC("A" ASKDOS+4*
DIC(0 ASKPT+2*, ASKDOS+2*, ASKSVC+2*
DIR ASKINV+4!, ASKPT+7!, ASKDOS+9!, ASKSVC+8!, CLEAN!
DIR("?" ASKINV+3*
DIR("A" ASKINV+2*, ASKPT+6*, ASKDOS+8*, ASKSVC+7*
DIR(0 ASKINV+2*, ASKPT+5*, ASKDOS+7*, ASKSVC+6*
DIROUT CLEAN!
DIRUT ASKINV+4, ASKPT+4, ASKPT+7, ASKDOS+6, ASKDOS+9, ASKSVC+5, ASKSVC+8, CLEAN!
DTOUT ASKPT+3, ASKDOS+5, ASKSVC+4, CLEAN!
DUOUT ASKPT+3, ASKDOS+5, ASKSVC+4, CLEAN!
DUZ EDITFC+29, EDITFL+25
FBAAIN ASKINV+6*, ASKINV+8, ASKINV+9, ASKINV+12, EDITFC+22, ASKSVC+14, ASKSVC+15, EDITFL+18, INVEDX+2, CLEAN+1!
FBAAOUT FBAAFED+4*, FBAAFED+5, ASKINV+4*, EDITFC+2*, ASKPT+7*, ASKDOS+9*, ASKSVC+8*, EDITFL+2*, CLEAN+1!
FBDA ASKSVC+9*, ASKSVC+11, CLEAN+1!
FBDA(1 ASKDOS+10*, ASKSVC+3, ASKSVC+11
FBDA(2 ASKVEN+10*, ASKDOS+3, ASKSVC+3, ASKSVC+11
FBDA(3 ASKPT+8*, ASKDOS+3, ASKSVC+3, ASKSVC+11
FBFDA EDITFC+13!, EDITFC+32, EDITFL+12!, EDITFL+14, EDITFL+17!, EDITFL+26, CLEAN+1!
FBFDA( EDITFC+18*, EDITFL+13*, EDITFL+18*, EDITFL+19*, EDITFL+20*, EDITFL+21*, EDITFL+22*, EDITFL+23*, EDITFL+24*, EDITFL+25*
FBFDAA EDITFC+21!, EDITFC+30, CLEAN+1!
FBFDAA( EDITFC+22*, EDITFC+23*, EDITFC+24*, EDITFC+25*, EDITFC+26*, EDITFC+27*, EDITFC+28*, EDITFC+29*
FBFPPSC ASKINV+17*, ASKINV+19, EDITFC+1, EDITFC+6*, EDITFC+9, EDITFC+18, EDITFC+28, CLEAN+1!
FBFPPSC(0 ASKINV+17*, EDITFC+9, EDITFC+27
FBFPPSL ASKSVC+18*, EDITFL+1, EDITFL+4*, EDITFL+7, EDITFL+13, EDITFL+24, CLEAN+1!
FBFPPSL(0 ASKSVC+18*, EDITFL+7, EDITFL+23
>> FBI EDITFC+15*, EDITFC+16
FBIENS ASKINV+15*, ASKINV+16, ASKINV+17, EDITFC+16*, EDITFC+18, EDITFC+25, ASKSVC+11*, ASKSVC+14, ASKSVC+18, EDITFL+13
, EDITFL+21, CLEAN+1!
FBINVCHG ASKINV+22*, EDITFC+11*, EDITFL+9*, INVEDX+2, CLEAN+1!
FBMILL ASKINV+12, CLEAN+2!
FBMILL( ASKINV+15, EDITFC+15, EDITFC+16
FBMILL(0 ASKINV+15
FBV ASKINV+16*, ASKVEN+10, ASKVEN+11, CLEAN+2!
FBX EDITFC+1*, EDITFC+2, EDITFC+4, EDITFC+6, EDITFL+1*, EDITFL+2, EDITFL+4, CLEAN+2!
U ASKVEN+11
X CLEAN!
Y ASKINV+4, ASKINV+5, ASKINV+6, ASKPT+4, ASKPT+8, ASKDOS+6, ASKDOS+10, ASKSVC+5, ASKSVC+9, CLEAN!
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