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

Package: IHS ICD CPT Lookup and Grouper

Routine: AICDTICD


Information

AICDTICD ; IHS/OHPRD/ACC - DRIVER ROUTINE FOR ICD LOOKUP UTILITY ;

Source Information

Source file <AICDTICD.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIE  
IHS ICD CPT Lookup and Grouper 1 (CPTOP,ICDDX,ICDOP)^AICDKWLD  

Entry Points

Name Comments DBIA/ICR reference
C
CODE
D
NARR
P
LOOKUP ;
COMMON

External References

Name Field # of Occurrence
CPTOP^AICDKWLD NARR
ICDDX^AICDKWLD NARR
ICDOP^AICDKWLD NARR
^DIC CODE
^DIE LOOKUP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"AICDTICD CANNOT BE ENTERED AT THE TOP.",!!
  • Line Location: AICDTICD+3
Function Call: READ
  • Prompt: "NARRATIVE: "
  • Timeout: $S($D(DTIME):DTIME,1:300)
  • Variable: X
  • Line Location: COMMON+0
Function Call: WRITE
  • Prompt: !
  • Line Location: COMMON+0
Function Call: WRITE
  • Prompt: !
  • Line Location: COMMON+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOKUP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CODE+0
Function Call: WRITE
  • Prompt: !
  • Line Location: NARR+0
Routine Call
  • DIE
  • Line Location:
    • LOOKUP+1
Routine Call
  • DIC
  • Line Location:
    • CODE

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AICDKWLC - [#9001010] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AICDKWLC("B" LOOKUP+1

Label References

Name Line Occurrences
COMMON P, D, C
LOOKUP COMMON
NARR LOOKUP+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AICDTTYP P*, D*, C*, COMMON+2!, LOOKUP+1, LOOKUP+3, LOOKUP+4, CODE, NARR
>> DA LOOKUP+1*
DIC COMMON+2!, LOOKUP+2!, CODE*
DIC("S" LOOKUP+2*, LOOKUP+3*, LOOKUP+4*
DIC(0 CODE*
>> DIE LOOKUP+1*
>> DR LOOKUP+1*
DTIME COMMON
Q COMMON*, COMMON+2!
>> X COMMON*, LOOKUP+1, LOOKUP+5
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All