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

Package: Fee Basis

Routine: FBAAUTL2


Information

FBAAUTL2 ;AISC/GRR - FEE UTILITY ROUTINE ;9/21/14 21:48

Source Information

Source file <FBAAUTL2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 ^%DT  NOW^%DTC  ^DIE  ^DIR  
Fee Basis 1 LIST^FBAAPPH  
IFCAP 1 ^PRCFSITE  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 15

Package Total Caller Graph
Fee Basis 15 FBAA SITE PARAMETERS  FBAAPIE  FBAAPP  FBAAV0  FBAAV2  FBAAV3  FBAAV4  FBAAV5  
FBAAV6  FBCTAU2  FBNHEAUT  FBNHEDAT  FBNHPAMS  FBPRICE  ^FBAA(161.21  

Entry Points

Name Comments DBIA/ICR reference
PAT
  • ICR #5106
    • Status: Active
    • Usage: Controlled Subscription
    CONDAT ;called from input transform in 161.21,.02-.03
    DATES ;ASK FROM AND TO DATES AND ENSURE THEY DO NOT OVERLAP PRIOR AUTHORIZATIONS
    ASKVOK
    END
    CHKDT
    POV ;GET POV/TREATMENT TYPE FROM 161 FOR TRANSMISSION OF PAYMENTS
    ; in K, L, M, N - IENs for File 162 service provided multiple
    ; out POV - purpose of visit (internal pointer) or null
    ; out FBTT - treatment type (internal code) or null
  • ICR #5106
    • Status: Active
    • Usage: Controlled Subscription
    UPDT ;UPDATE BATCH STATUS
    FBPH
    IFCAP
    PRPRDT
    ERRD
    EDAT
    EN1 ;CHECK WHETHER AUTHORIZATION FROM DATE OVERLAPS PREVIOUS ENTRIES
    ADD
    XREF ;SET X-REF FOR PRINT AUTHORIZATION FIELD (161.01,1)
    KILL
    VER(X) ;determine version of a file based on DD node
    FDAT
    CHKBO
    VENOUT

    External References

    Name Field # of Occurrence
    ^%DT FDAT, EDAT
    NOW^%DTC PRPRDT
    ^DIE UPDT+1
    ^DIR ASKVOK, FBPH
    LIST^FBAAPPH FBPH+1
    ^PRCFSITE IFCAP
    $$FMTE^XLFDT FDAT, EDAT

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,*7,"Date entered overlaps existing contract dates!",!
    • Line Location: CONDAT+4
    Function Call: WRITE
    • Prompt: !!?5,"There already is an active CNH authorization on file.",!?5,"Use the 'Edit CNH Authorization' option.",!
    • Line Location: CHKDT+2
    Function Call: WRITE
    • Prompt: !,*7,$S(FBLG=1:"FROM ",1:"TO "),"DATE entered overlaps a previous Authorization!",!
    • Line Location: ERRD+0
    Function Call: WRITE
    • Prompt: !
    • Line Location: FBPH+0
    Function Call: WRITE
    • Prompt: ?60,Y
    • Line Location: PRPRDT+0
    Routine Call
    • DIE
    • Line Location:
      • UPDT+1
    Routine Call
    • DIR
    • Line Location:
      • ASKVOK
      • FBPH

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^FBAA(161.7 - [#161.7] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD( VER+2
    ^DD("DD" PRPRDT
    ^DPT - [#2] FBPH+1
    ^FBAA(161.21 - [#161.21] CONDAT+2, CONDAT+3
    ^FBAAA - [#161] EN1+1, POV+9, XREF+1, XREF+3, ADD, KILL
    ^FBAAA("AF" ADD*, KILL!
    ^FBAAC - [#162] POV+6

    Label References

    Name Line Occurrences
    CHKBO EN1+3
    CHKDT EN1+3
    EN1 FDAT+1
    END FDAT, EDAT
    ERRD EN1+3
    FDAT EN1+4
    VENOUT ASKVOK
    XREF ADD, KILL

    Naked Globals

    Name Field # of Occurrence
    ^( EN1+1
    ^(0 CONDAT+2, EN1+1, FBPH+1, XREF+1
    ^(4 XREF+3

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % PRPRDT
    >> %DT FDAT*, EDAT*
    >> %DT("A" FDAT*, EDAT*
    >> %DT("B" FDAT*, EDAT*
    >> %DT(0 EDAT*!
    >> A PAT+4*
    >> DA CONDAT+3, UPDT+1*, XREF+1, ADD, KILL
    >> DA(1 XREF+1, XREF+3, ADD, KILL
    >> DFN EN1+1, FBPH+1*
    >> DIC UPDT+1*
    >> DIE UPDT+1*
    DIR ASKVOK!, FBPH!
    DIR("A" ASKVOK*, FBPH*
    DIR("B" ASKVOK*, FBPH*
    DIR(0 ASKVOK*, FBPH*
    DIRUT ASKVOK, VENOUT!
    >> DR UPDT+1*
    DT CHKDT+2
    >> FB("SITE" IFCAP+1*
    >> FB1 EDAT, EN1+2
    FBAAOUT FBPH+1~
    FBAUT DATES+2!, END!, CHKDT+2!
    FBAUT( EN1+1*, EN1+2!, EN1+3, CHKDT+2, CHKDT+3, CHKBO
    >> FBBEGDT FDAT*, EDAT, END*, CHKDT, CHKDT+1, CHKDT+2*, CHKDT+3, CHKBO
    >> FBDOB PAT+1*
    >> FBENDDT FDAT*, EDAT*, END*, CHKDT, CHKDT+1
    >> FBERR(1 IFCAP*
    >> FBFI PAT+4*
    >> FBFLAG DATES+2*, FDAT+1, EN1+3, EN1+4
    >> FBFLNAM PAT+2*
    FBHDFN FBPH+1*!
    FBLG EN1+1*, EN1+3, EN1+4, END!, CHKDT*, CHKDT+1*, CHKDT+2*, CHKBO*, ERRD
    >> FBLNAM PAT+2*, PAT+3*
    >> FBMI PAT+4*
    >> FBNAME PAT+2*, PAT+4
    >> FBO FDAT, EN1+2
    FBOUT CONDAT+1*, CONDAT+4*, EDAT*, EN1+1*, EN1+3, EN1+4*, END!, CHKDT*, CHKDT+1*, CHKDT+2*
    , CHKBO*
    >> FBPROG EN1+1, CHKDT+2, CHKDT+3
    >> FBSEX PAT*
    >> FBSSN PAT*
    >> FBTT POV+4*, POV+11*
    FBVCON CONDAT+4!, CONDAT+5!
    FBVCON( CONDAT+2*, CONDAT+3!, CONDAT+4
    >> FBVENO ASKVOK*
    >> FBVENOT VENOUT*
    >> FBVIEN CONDAT+2
    FBY POV+8~, POV+9*, POV+10, POV+11
    FBZZ XREF+1~
    FBZZ(0 XREF+1*, XREF+3
    FBZZ(1 XREF+1*, XREF+2
    FBZZ(2 XREF+2*
    FTP POV+5~, POV+6*, POV+7, POV+9
    >> J UPDT+1
    >> K POV+6, POV+9
    >> L POV+6
    >> M POV+6
    >> N FBPH+1*, POV+6
    >> PAD PAT+2
    >> POV POV+4*, POV+10*
    >> PRC("SITE" IFCAP*, IFCAP+1
    >> PRCF("X" IFCAP*
    U CONDAT+2, CONDAT+3, POV+6, VER+2
    X CONDAT+4!, VER~, VER+2
    >> Y FDAT, EDAT, ASKVOK, FBPH+1, PRPRDT*
    >> Y(0 PAT, PAT+1, PAT+2
    Z CONDAT+1*, CONDAT+2*, CONDAT+4*!, CONDAT+5!, EN1+1*, EN1+3*, END!, CHKDT, CHKDT+1, CHKDT+2
    , CHKDT+3, CHKBO
    Z(0 CONDAT+2*, EN1+1*
    >> ZZZ XREF+2*, XREF+3*, ADD*, KILL*
    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