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

Package: Fee Basis

Routine: FBAAVD2


Information

FBAAVD2 ;AISC/DMK - EDIT VENDOR DEMOGRAPHICS ;7/10/14 17:07

Source Information

Source file <FBAAVD2.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Fee Basis 5 UPDT^FBAAAV  $$CKVEN^FBAADV  GETVEN^FBAAUTL1  ($$GRPDIF,GETGRP,UPDGRP)^FBAAUTL6  SETGL^FBAAVD  
VA FileMan 5 ^DIC  FILE^DICN  (,UPDATE)^DIE  (,IX1)^DIK  ^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: 2

Package Total Caller Graph
Fee Basis 2 FBAAVD  FBCNH UPDATE VENDOR CONTRACT  

Entry Points

Name Comments DBIA/ICR reference
EDITV ;entry to edit vendor demographic data
CONTR ;enter contract information for a CNH vendor
RATE
RETRY
GETVEN
END
URATE ;Update rate when user backs up contract dates.

External References

Name Field # of Occurrence
^DIC CONTR+6
FILE^DICN EDITV+27, RETRY+2
^DIE EDITV+7, EDITV+8, EDITV+40, CONTR+9, CONTR+13, URATE+4
UPDATE^DIE EDITV+35
^DIK URATE+3
IX1^DIK EDITV+36
^DIR RATE
UPDT^FBAAAV EDITV+16, EDITV+18, EDITV+20
$$CKVEN^FBAADV EDITV+16
GETVEN^FBAAUTL1 GETVEN
$$GRPDIF^FBAAUTL6 EDITV+12
GETGRP^FBAAUTL6 EDITV+6
UPDGRP^FBAAUTL6 EDITV+41
SETGL^FBAAVD EDITV+25, EDITV+43

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Another user is editing this vendor record. Try again later.",!
  • Line Location: EDITV+2
Function Call: WRITE
  • Prompt: !,"Another user is editing this vendor record. Trying again. ",!
  • Line Location: EDITV+28
Function Call: WRITE
  • Prompt: !,"Another user is editing this vendor record. Trying again. ",!
  • Line Location: EDITV+39
Function Call: WRITE
  • Prompt: !!?3,$C(7)_"You must be a holder of the FBAA LEVEL 2 security key to edit",!?3,"contracts and rates."
  • Line Location: CONTR+2
Function Call: WRITE
  • Prompt: !!,*7,"Cannot add contract information to this vendor until change has been",!,"approved by Austin."
  • Line Location: CONTR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: CONTR+5
Function Call: WRITE
  • Prompt: !,"This contract is being edited by another user, trying again.",!
  • Line Location: CONTR+8
Function Call: WRITE
  • Prompt: !!,*7,"You cannot change contract numbers or effective dates on",!,"a contract that has rates associated with it."
  • Line Location: CONTR+12
Function Call: WRITE
  • Prompt: !!,"Contract information reset"
  • Line Location: CONTR+13
Function Call: WRITE
  • Prompt: !
  • Line Location: RATE+0
Function Call: WRITE
  • Prompt: !,*7,"There are too many rates loaded for that contract! Please remove obsolete rates.",!
  • Line Location: RATE+2
Function Call: WRITE
  • Prompt: !,*7,"Rate already exists for that contract!",!
  • Line Location: RATE+3
Function Call: WRITE
  • Prompt: !,"Another user is editing this rate record. Trying again. ",!
  • Line Location: RETRY+1
Function Call: WRITE
  • Prompt: !?5,*7,"Vendor selected is not a Community Nursing Home.",!
  • Line Location: GETVEN+3
Routine Call
  • DIC
  • Line Location:
    • CONTR+6
Routine Call
  • DIE
  • Line Location:
    • EDITV+7
    • EDITV+8
    • EDITV+40
    • CONTR+9
    • CONTR+13
    • URATE+4
Routine Call
  • DIE
  • Line Location:
    • EDITV+35
Routine Call
  • DIR
  • Line Location:
    • RATE

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAAV - [#161.2] Classic Fileman Calls
^FBAA(161.21 - [#161.21] Classic Fileman Calls
^FBAA(161.22 - [#161.22] Classic Fileman Calls
^FBAA(161.23 - [#161.23] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FBAA(161.21 - [#161.21] CONTR+8, CONTR+9, CONTR+12, CONTR+14
^FBAA(161.22 - [#161.22] CONTR+11, RATE+3, RATE+4, RETRYRETRY+1, RETRY+3
^FBAA(161.23 - [#161.23] URATE+2, URATE+3
^FBAA(161.25 - [#161.25] EDITV+23, EDITV+24, CONTR+4
^FBAAV - [#161.2] EDITV+2, EDITV+5, EDITV+8, EDITV+10, EDITV+12, EDITV+13, EDITV+18, EDITV+22, EDITV+28, EDITV+29*
EDITV+30*, EDITV+31*, EDITV+33, EDITV+37, EDITV+39, EDITV+42, GETVEN+2
^XUSEC("FBAA LEVEL 2" CONTR+2

Label References

Name Line Occurrences
CONTR CONTR+6, GETVEN+4
END GETVEN
GETVEN GETVEN+3, GETVEN+4
RATE RATE+3, RETRY+4
RETRY RETRY
URATE CONTR+16

Naked Globals

Name Field # of Occurrence
^( EDITV+34
^("ADEL" EDITV+5
^("AMS" EDITV+5
^(0 EDITV+24
^(1 EDITV+5
^(3 EDITV+5, EDITV+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EDITV+2, EDITV+5, EDITV+6, EDITV+8, EDITV+10, EDITV+12, EDITV+13, EDITV+16, EDITV+22, EDITV+23
EDITV+24, EDITV+25, EDITV+36*, EDITV+40*, EDITV+43*, CONTR+3, CONTR+7*, CONTR+8, CONTR+9, CONTR+10
CONTR+11, CONTR+12, CONTR+14, CONTR+20, RATE!, GETVEN+1*, GETVEN+2, END!, URATE+1~, URATE+3*
URATE+4*
DD EDITV+27!, RETRY+2!
DIC EDITV+27*, CONTR+5*, CONTR+6!, RETRY+2*!, GETVEN+1!, END!
DIC("DR" RETRY+2*
DIC("S" CONTR+5*
DIC(0 EDITV+27*, CONTR+5*, RETRY+2*
DIE EDITV+4*, EDITV+9!, EDITV+40*!, CONTR+7*, CONTR+9!, CONTR+13*!, URATE+4*!
DIE("NO^" EDITV+4*, EDITV+8*, CONTR+9*
DIK EDITV+36*, URATE+3*!
DILOCKTM EDITV+2, EDITV+28, EDITV+39, CONTR+8, RETRY+1
DIR RATE+1!
DIR("?" RATE*
DIR("A" RATE*
DIR(0 RATE*
>> DIRUT RATE+1
DLAYGO EDITV+27*, CONTR+5*, CONTR+6!, RETRY+2*!
DO EDITV+27!, RETRY+2!
DR EDITV+4*, EDITV+8*, EDITV+40*, CONTR+9*!, CONTR+13*!, URATE+4*
>> DTOUT CONTR+15
DUZ CONTR+2
FBADT EDITV+2~, EDITV+13*, EDITV+16
FBCIEN CONTR+16!, CONTR+20*, RATE+3, RETRY+2, URATE+1*, URATE+2*, URATE+3, URATE+4
>> FBCNUM CONTR+7*, URATE+2
FBDA EDITV+2~*, EDITV+16, EDITV+18, EDITV+20
FBEXDT CONTR+16!
FBEXNDT CONTR+16!, URATE+2, URATE+3
FBFDA EDITV+32!, EDITV+35
FBFDA( EDITV+34*
FBIEN EDITV+27*, EDITV+28, EDITV+29, EDITV+30, EDITV+31, EDITV+34, EDITV+36, EDITV+37, EDITV+43, EDITV+44!
FBIEN1 EDITV+13*, EDITV+25*, EDITV+29, EDITV+30, EDITV+31, EDITV+33, EDITV+39, EDITV+40, EDITV+41, EDITV+42
EDITV+44!
FBLIEN CONTR+4*, END!
>> FBNPI EDITV+13*
FBPARCD CONTR+1, GETVEN+2*, GETVEN+3, END!
FBR RATE+1*, RATE+3!, RETRY+2
FBRATE GETVEN!
FBSG EDITV+44!
>> FBT EDITV+3*, EDITV+20, EDITV+22, EDITV+23*, EDITV+24*, EDITV+25
>> FBTXC EDITV+13*
FBURT CONTR+16!, URATE+1*, URATE+2*
FBVIEN CONTR+3*, CONTR+4, CONTR+5, END!
FBVNAME EDITV+13*, EDITV+27, EDITV+44!
FBX CONTR+20!
>> FEEO EDITV+4*, EDITV+25*
>> I EDITV+33*, EDITV+34
IFN GETVENGETVEN+1!, END!
U EDITV+5, EDITV+12, EDITV+13, EDITV+22, EDITV+24, EDITV+34, RATE+4, GETVEN+2
X EDITV+27*, EDITV+34*, CONTR+6, RATE+4*, RETRY*, RETRY+1, END!
Y EDITV+27, CONTR+6, CONTR+7, RATE+1, RETRY+3, END!
>> Z1 EDITV+5*, EDITV+12, EDITV+22
Z3 EDITV+5*, EDITV+12, EDITV+44!
Z4 EDITV+5*, EDITV+44!
Z5 EDITV+5*, EDITV+13, EDITV+44!
Z6 EDITV+2~, EDITV+5*, EDITV+12
ZO1 CONTR+9*, CONTR+10!, CONTR+12, CONTR+14!
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