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

Package: Quasar

Routine: ACKQAS3


Information

ACKQAS3 ;AUG/JLTP BIR/PTD-Enter Cost Information for Procedures ; [ 02/14/96 3:30 PM ]

Source Information

Source file <ACKQAS3.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Quasar 3 $$PROVCHK^ACKQASU4  $$STACT^ACKQUTL  $$PROCTXT^ACKQUTL8  
VA FileMan 3 ^DIC  ^DIE  ^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: 1

Package Total Caller Graph
Quasar 1 ACKQAS COST ENTRY  

Entry Points

Name Comments DBIA/ICR reference
ACCESS ;Only A&SP staff designated as supervisors can access this option.
OPTN ;Introduce option.
CHOOSE ;Display user choices: edit selected entries or all entries.
LOOP ;Edit the cost of all CPT-4 procedure codes.
EXIT ;Kill variables and exit routine.
SINGLE ;Edit the cost of a selected CPT-4 code.
COST ;Enter cost data for a single CPT-4 procedure code.
MOD ;Edit cost of modifier codes.

External References

Name Field # of Occurrence
$$PROVCHK^ACKQASU4 ACCESS+2
$$STACT^ACKQUTL ACCESS+4
$$PROCTXT^ACKQUTL8 COST+6
^DIC SINGLE+1
^DIE COST+9, MOD+5
^DIR CHOOSE+3, COST+8, MOD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ACCESS+3
Function Call: WRITE
  • Prompt: !,"You are not listed in the A&SP STAFF file (#509850.3).",!,"Access denied."
  • Line Location: ACCESS+3
Function Call: WRITE
  • Prompt: !,"Only clinicians may access this option!"
  • Line Location: ACCESS+4
Function Call: WRITE
  • Prompt: !,"The A&SP STAFF file (#509850.3) indicates that you have been inactivated.",!,"Access denied."
  • Line Location: ACCESS+5
Function Call: WRITE
  • Prompt: !,"You must be listed as a SUPERVISOR in the A&SP STAFF file (#509850.3)",!,"in order to use this option. Access denied."
  • Line Location: ACCESS+6
Function Call: WRITE
  • Prompt: @IOF,!,"This option allows you to enter cost data for each procedure code",!,"in the A&SP PROCEDURE CODE file (#509850.4). The information is",!,"used to generate the Cost Comparison Report.",!
  • Line Location: OPTN+1
Function Call: WRITE
  • Prompt: !,"The CPT file (#81) is required."
  • Line Location: OPTN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SINGLE+1
Function Call: WRITE
  • Prompt: !!,"File 81, CPT, needs to be updated. Code "_ACK_" is missing."
  • Line Location: COST+5
Function Call: WRITE
  • Prompt: !!,$P(^ICPT(ACK,0),U)," ",$$PROCTXT^ACKQUTL8(ACK,"")
  • Line Location: COST+6
Routine Call
  • DIC
  • Line Location:
    • SINGLE+1
Routine Call
  • DIE
  • Line Location:
    • COST+9
    • MOD+5
Routine Call
  • DIR
  • Line Location:
    • CHOOSE+3
    • COST+8
    • MOD+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ACK(509850.4 - [#509850.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACK(509850.3 - [#509850.3] ACCESS+3, ACCESS+6
^ACK(509850.4 - [#509850.4] LOOP+1, MOD+1
^ICPT - [#81] COST+5, COST+6
^ICPT(0 OPTN+2

Label References

Name Line Occurrences
COST LOOP+1, SINGLE+3
EXIT ACCESS+3, ACCESS+4, ACCESS+5, ACCESS+6, OPTN+2, CHOOSE+3, SINGLE+1, SINGLE+3
SINGLE CHOOSE+4, SINGLE+4

Naked Globals

Name Field # of Occurrence
^( LOOP+1, MOD+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT+1!
%W EXIT+1!
%Y EXIT+1!
ACK LOOP+1*, EXIT+1!, SINGLE+2*, COST+5, COST+6, COST+9, MOD+1, MOD+4
ACK(1 EXIT+1!, MOD+1*, MOD+4
ACK0 LOOP+1*, EXIT+1!, SINGLE+2*, COST+4, COST+7
ACK1 EXIT+1!, MOD+1*, MOD+2, MOD+3
ACKANS CHOOSE+4*!, EXIT+1!
ACKDUZ ACCESS+1~, ACCESS+2*, ACCESS+3, ACCESS+4, ACCESS+6
ACKM EXIT+1!, MOD+1*, MOD+2
C EXIT+1!
DA EXIT+1!, COST+9*, MOD+4*, MOD+5!
DA(1 MOD+4*
DIC EXIT+1!, SINGLE+1*!
DIC("A" SINGLE+1*
DIC(0 SINGLE+1*
DIE EXIT+1!, COST+9*!, MOD+4*, MOD+5!
DIR CHOOSE+1!, CHOOSE+3!, CHOOSE+4!, EXIT+1!
DIR("?" CHOOSE+2*, COST+2*
DIR("??" CHOOSE+3*, COST+3*
DIR("A" CHOOSE+1*, CHOOSE+2*, COST+2*
DIR("B" COST+4*, COST+8!, MOD+3*!
DIR(0 CHOOSE+1*, COST+2*
DIRUT CHOOSE+3, LOOP+1, EXIT+1!, COST+8!, COST+9, MOD+1, MOD+3!
DR EXIT+1!, COST+9*, MOD+4*, MOD+5!
DTOUT EXIT+1!, COST+8, MOD+3
DUOUT EXIT+1!, MOD+3
DUZ ACCESS+2
IOF ACCESS+3, OPTN+1
U COST+4, COST+6, COST+7, MOD+2, MOD+3
X ACCESS+4*, ACCESS+5, CHOOSE+1!, CHOOSE+4!, EXIT+1!
Y CHOOSE+1!, CHOOSE+4!, EXIT+1!, SINGLE+1, SINGLE+2, COST+8, COST+9, MOD+4
Y(0 SINGLE+2
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