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

Package: Fee Basis

Routine: FBCHC78


Information

FBCHC78 ;AISC/DMK - CANCEL A 7078 ;8/25/14 15:22

Source Information

Source file <FBCHC78.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 6 NOW^%DTC  (,IX)^DIC  ^DIE  ^DIK  EN^DIQ  ^DIR  
Fee Basis 2 SITEP^FBAAUTL  PTFD^FBUTL6  
IFCAP 2 EN3^PRCS58  ^PRCS58CC  

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

Package Total Caller Graph
Fee Basis 2 FBCH CANCEL 7078  FBCNH CANCEL 7078  

Entry Points

Name Comments DBIA/ICR reference
ASK ;get 7078 entry to cancel
END
1358 ;subtract estimated dollar amount from 1358
INTER() ;get internal entry number from file 424
CNH ;entry point to cancel an authorization associated with the

External References

Name Field # of Occurrence
NOW^%DTC 1358+8
^DIC ASK+4
IX^DIC ASK+1
^DIE ASK+19, ASK+21
^DIK ASK+20, ASK+23
EN^DIQ ASK+12
^DIR ASK+13
SITEP^FBAAUTL FBCHC78+6
PTFD^FBUTL6 ASK+25
EN3^PRCS58 1358+7
^PRCS58CC 1358+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !,*7,"Must delete all movements associated with this authorization before canceling.",!
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: !!,*7,"There is already an invoice entered for this hospitalization. Cannot delete!",!!
  • Line Location: ASK+8
Function Call: WRITE
  • Prompt: !!,*7,"There already are ancillary services entered against this authorization. Cannot delete!",!!
  • Line Location: ASK+9
Function Call: WRITE
  • Prompt: " ."
  • Line Location: ASK+19
Function Call: WRITE
  • Prompt: "."
  • Line Location: ASK+20
Function Call: WRITE
  • Prompt: "."
  • Line Location: ASK+21
Function Call: WRITE
  • Prompt: "."
  • Line Location: ASK+23
Function Call: WRITE
  • Prompt: !!,"Authorization cancelled. Now updating 1358.",!
  • Line Location: ASK+26
Function Call: WRITE
  • Prompt: !,"Unable to affect 1358 adjustment. Use appropriate IFCAP options.",!
  • Line Location: ASK+27
Function Call: WRITE
  • Prompt: "... Finished",!
  • Line Location: ASK+28
Function Call: WRITE
  • Prompt: !,*7,"Unable to locate reference number on 1358.",!
  • Line Location: 1358+6
Function Call: WRITE
  • Prompt: !,*7,"1358 Not available for posting.",!
  • Line Location: 1358+7
Function Call: WRITE
  • Prompt: !,*7,$P(Y,"^",2),!
  • Line Location: 1358+10
Routine Call
  • DIC
  • Line Location:
    • ASK+4
Routine Call
  • DIC
  • Line Location:
    • ASK+1
Routine Call
  • DIE
  • Line Location:
    • ASK+19
    • ASK+21
Routine Call
  • DIR
  • Line Location:
    • ASK+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAA(161.23 - [#161.23] Classic Fileman Calls
^FBAA(162.2 - [#162.2] Classic Fileman Calls
^FBAACNH - [#162.3] Classic Fileman Calls
^FB7078 - [#162.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] FBCHC78+7
^FBAA(161.23 - [#161.23] ASK+22
^FBAA(162.2 - [#162.2] ASK+19
^FBAAA("AG" ASK+2, ASK+20
^FBAAC("AM" ASK+9
^FBAAI("E" ASK+8
^PRC(424 - [#424] INTER+4, INTER+5, INTER+6

Label References

Name Line Occurrences
$$INTER 1358+6, 1358+9
1358 ASK+27
ASK ASK+1
END FBCHC78+6, ASK+1, ASK+4, ASK+8, ASK+9, ASK+13
FBCHC78 ASK+13, CNH+2

Naked Globals

Name Field # of Occurrence
^( INTER+4, INTER+5, INTER+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % 1358+9
D ASK+1*!
DA ASK+12*, ASK+19*, ASK+20*!, ASK+21*, ASK+23*, END!
DA(1 ASK+20*
DFN ASK+2*, ASK+20, ASK+25, END!, INTER+4, INTER+5
DIC ASK+1*!, ASK+4*!, ASK+12*, ASK+19!, ASK+21!, END!
DIC("A" ASK+1*
DIC("S" ASK+1*, ASK+4*
DIC(0 ASK+1*, ASK+4*
DIE ASK+19*!, ASK+21*!, END!
DIK ASK+20*!, ASK+23*!
DIR ASK+13!
DIR("A" ASK+13*
DIR("B" ASK+13*
DIR(0 ASK+13*
>> DIRUT ASK+13
DR ASK+12*, ASK+19*, ASK+21*, END!
DUZ FBCHC78+3
FB END!
FB(161 ASK+2*
FB7078 ASK+2*, ASK+8, ASK+9, ASK+12, ASK+19, ASK+20, ASK+21, ASK+22, END!, INTER+4
, INTER+5
FBAAOB ASK+2*, END!, 1358+7, INTER+4, INTER+5, INTER+6
FBADDT ASK+3*, ASK+25, END!
FBERR ASK+27, END!, 1358+6*, 1358+7*, 1358+10*
FBI ASK+22*, ASK+23, END!
FBMM ASK+2*, END!, INTER+5
FBNH ASK+4, ASK+19, ASK+22, ASK+25, END!, INTER+4, INTER+5, CNH+2*
FBPOP FBCHC78+6, END!
FBPSA FBCHC78+7*, ASK+2, END!
FBSITE END!
FBSITE(1 FBCHC78+7
FBVEN ASK+3*, END!
FBZZ END!
PRC END!
PRCS END!
PRCS("TYPE" 1358+7*, 1358+10*
PRCS("X" 1358+7*
PRCSX END!, 1358+9*
U ASK+2, ASK+3, ASK+4
X ASK+1, ASK+4*, END!
Y ASK+1, ASK+2, ASK+4, ASK+13, END!, 1358+7, 1358+10
Y(0 ASK+2, ASK+3, ASK+4
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 |  Naked Globals |  Local Variables  | All