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

Package: Third Party Billing

Routine: ABMDTFED


Information

ABMDTFED ; IHS/ASDST/DMJ - REPORT OF 3P FEE SCHEDULES ;

Source Information

Source file <ABMDTFED.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Third Party Billing 5 $$CPT^ABMCVAPI  WHD^ABMDRHD  PAZ^ABMDRUTL  $$SDT^ABMDUTL  RANGE^ABMFEAPI  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 2 ^DIC  ^DIR  
IHS VA Utilities 1 ^XBFMK  

Entry Points

Name Comments DBIA/ICR reference
FEE
S2 ;start old code abm*2.6*3 FIXPMS10008
PRQUE ;EP - Entry Point for Taskman
XIT
HDB
W1 ;EP
QUE ;EP
SEL
HD

External References

Name Field # of Occurrence
^%ZIS W1+13, W1+15
HOME^%ZIS W1+14
^%ZISC XIT
^%ZTLOAD QUE+13
$$CPT^ABMCVAPI S2+32, S2+33
WHD^ABMDRHD HDB+1
PAZ^ABMDRUTL HD
$$SDT^ABMDUTL SEL+28, S2+13
RANGE^ABMFEAPI S2+15
^DIC FEE+5
^DIR SEL+4, SEL+33, W1+14
^XBFMK SEL+30

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: FEE+0
Function Call: WRITE
  • Prompt: !!,"======== FEE SCHEDULE CATEGORIES ========",!
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: !,"Looking for effective dates..."
  • Line Location: SEL+20
Function Call: WRITE
  • Prompt: !!,"Possible effective dates:"
  • Line Location: SEL+26
Function Call: WRITE
  • Prompt: !?3,$$SDT^ABMDUTL(ABMEFFDT)
  • Line Location: SEL+28
Function Call: WRITE
  • Prompt: !!!
  • Line Location: W1+1
Function Call: WRITE
  • Prompt: !!,"As specified in the 3P Site Parameters File FORCED QUEUEING is in effect!",!
  • Line Location: W1+9
Function Call: WRITE
  • Prompt: " (cont)"
  • Line Location: S2+20
Function Call: WRITE
  • Prompt: ?10
  • Line Location: S2+39
Function Call: WRITE
  • Prompt: ?15
  • Line Location: S2+40
Function Call: WRITE
  • Prompt: ?60,+$P($G(^TMP("ABM-FS",$J,ABMCD)),U,2)
  • Line Location: S2+49
Function Call: WRITE
  • Prompt: !?44,"GLOBAL",?56,"TECH",?68,"PROF"
  • Line Location: HDB+2
Function Call: WRITE
  • Prompt: !?44,"GLOBAL",?56,"TECH",?68,"PROF"
  • Line Location: HDB+3
Function Call: WRITE
  • Prompt: !,"CPT CODE",?10,"SHORT NAME",?44,"CHARGE",?56,"CHARGE",?68,"CHARGE"
  • Line Location: HDB+4
Function Call: WRITE
  • Prompt: !,"ADA CODE",?15,"SHORT NAME",?44,"CHARGE",?56,"CHARGE",?68,"CHARGE"
  • Line Location: HDB+5
Function Call: WRITE
  • Prompt: !,"DRUG",?44,"PRICE PER DISPENSING UNIT"
  • Line Location: HDB+6
Function Call: WRITE
  • Prompt: !,"NDC",?18,"DRUG",?55,"PRICE PER DISPENSING UNIT"
  • Line Location: HDB+7
Function Call: WRITE
  • Prompt: !,"REV CODE",?10,"STANDARD ABBREV.",?44,"CHARGE",?56,"CHARGE",?68,"CHARGE"
  • Line Location: HDB+8
Function Call: WRITE
  • Prompt: !,"CHARGE MASTER",?44,"CHARGE",?56,"CHARGE",?68,"CHARGE"
  • Line Location: HDB+9
Function Call: WRITE
  • Prompt: !,ABM("LINE")
  • Line Location: HDB+10
Routine Call
  • %ZIS
  • Line Location:
    • W1+14
Routine Call
  • DIC
  • Line Location:
    • FEE+5
Routine Call
  • DIR
  • Line Location:
    • SEL+4
    • SEL+33
    • W1+14
Routine Call
  • %ZIS
  • Line Location:
    • W1+13
    • W1+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ABMDFEE - [#9002274.01] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMCM - [#9002274.75] S2+27
^ABMDFEE - [#9002274.01] SEL+22, SEL+24
^ABMDPARM( FEE+4
^AUTTADA - [#9999999.31] S2+35
^AUTTREVN - [#9999999.72] S2+36
^PSDRUG - [#50] S2+24, S2+25
^TMP("ABM-FS" S2+14!, S2+18, S2+24, S2+25, S2+35, S2+43, S2+44, S2+45, S2+48, S2+49

Label References

Name Line Occurrences
FEE FEE+7
HD S2+20
HDB S2+16
QUE W1+14
XIT FEE+6, SEL+5

Naked Globals

Name Field # of Occurrence
^(0 FEE+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS W1+11*
>> %ZIS("A" W1+12*
ABM SEL+6*, XIT+1!
ABM("CAT" SEL+9*, SEL+10*, SEL+11*, SEL+12*, SEL+13*, SEL+14*, SEL+15*, SEL+16*, SEL+17*, SEL+18*
, SEL+22, SEL+24, S2+15, S2+23, S2+27, S2+28, S2+31, S2+35, S2+36, S2+39
, S2+40, S2+42, S2+46, S2+47, S2+49, HDB+3, HDB+4, HDB+5, HDB+7, HDB+8
, HDB+9
ABM("EFFDT" SEL+36*, S2+13, S2+15, S2+32
ABM("FEE" FEE+8*, SEL+22, SEL+24, S2+13, S2+15
ABM("HD" S2+12*, S2+13*
ABM("LINE" HDB+10*!
ABM("PG" S2+11*, HDB*
ABM("S" SEL+2*, SEL+7*, SEL+9, SEL+10, SEL+11, SEL+12, SEL+13, SEL+14, SEL+15, SEL+16
, SEL+17, SEL+18, S2+12
>> ABMCD S2+17*, S2+18*, S2+24, S2+25, S2+27, S2+28, S2+32, S2+33, S2+36, S2+43
, S2+44, S2+45, S2+48, S2+49
>> ABMCODE SEL+21*, SEL+22*, SEL+24, S2+19*, S2+24*, S2+27*, S2+28*, S2+35, S2+37
>> ABMDESC S2+19*, S2+25*, S2+32*, S2+33*, S2+35*, S2+36*, S2+41
>> ABMEFFDT SEL+23*, SEL+24*, SEL+25, SEL+27*, SEL+28*
>> ABMELST( SEL+25*, SEL+28
DIC FEE!, FEE+1*
DIC("A" FEE+3*
DIC("B" FEE+4*
DIC(0 FEE+2*
DIR SEL+1!, SEL+34!, W1+14!
DIR("A" SEL+3*, SEL+32*
DIR(0 SEL+2*, SEL+31*, W1+14*
>> DIROUT SEL+5, SEL+35, S2+18, S2+20, HD
>> DIRUT SEL+5
DT S2+33
>> DTOUT FEE+6, SEL+35, S2+18, S2+20, HD
>> DUOUT FEE+6, SEL+35, S2+18, S2+20, HD
DUZ(2 FEE+4
IO W1+14
IO("S" W1+15
IO(0 W1+14
ION W1+15
>> IOP W1+15*
IOSL S2+20
>> POP W1+13
U ABMDTFED+10*, FEE+4, SEL+7, S2+24, S2+25, S2+27, S2+32, S2+33, S2+35, S2+36
, S2+43, S2+44, S2+45, S2+48, S2+49
>> Y FEE+7, FEE+8, SEL+6, SEL+7, SEL+36
>> ZTDESC QUE+10*
>> ZTRTN QUE+9*
>> ZTSAVE("ABM*" QUE+11*
ZTSK QUE+12!, QUE+14
Info |  Source |  Call 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