Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: AICDADK1

Package: IHS ICD CPT Lookup and Grouper

Routine: AICDADK1


Information

AICDADK1 ; IHS/OHPRD/ACC - PART 2 OF ADD KEYWORDS TO "OTHER KEYWORDS" FIELD IN ^ICD0/9 ;

Source Information

Source file <AICDADK1.m>

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS ICD CPT Lookup and Grouper 1 AICDADK  

Entry Points

Name Comments DBIA/ICR reference
SET ; SET WORDS IN WORD TABLE INTO ^ICD0/9 UNDER 'NCODE'
GETKWD ; GET WORD STRING AND BUILD WORD TABLE
NONCON
LIST ; LIST KEYWORDS FOR CODE
REMQT
CANONIC
OPCODE
DXCODE
DECIDE ; DECIDE WHETHER TO SET OR KILL
KILLWD ; KILL WORD IN ^ICD0/9
CHKCODE ; CHECK FORMAT OF CODE
SETWD ; SET WORD INTO ^ICD0/9
TOKNDX ; BREAK WORD INTO TOKENS AND INDEX
SETLOOP
GETSEQ ; GET NEXT AVAIILABLE SUB-DFN

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Keywords: "
  • Timeout: DTIME,!
  • Variable: AICDL
  • Line Location: GETKWD+2
Function Call: WRITE
  • Prompt: *7,"-- control characters not allowed in input!",!
  • Line Location: GETKWD+4
Function Call: WRITE
  • Prompt: AICDWD,!
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: AICDBB," -- '",AICDWD,"' not in ",AICDNUMB,!
  • Line Location: KILLWD+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: KILLWD+2

Label References

Name Line Occurrences
DECIDE SET+5
GETKWD GETKWD+3, GETKWD+4
GETSEQ SETWD+2
KILLWD DECIDE+2
LIST GETKWD+3
OPCODE CHKCODE+1
REMQT REMQT
SET SETLOOP
SETLOOP NONCON, CANONIC
SETWD DECIDE+3
TOKNDX KILLWD+2, SETWD+7

Naked Globals

Name Field # of Occurrence
^( KILLWD+2!
^(0 SET+3*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AICDBB KILLWD+1
>> AICDCDFN LIST+1, LIST+2
>> AICDCNT SET+4*, SET+6, KILLWD+2*, SETWD+3*
>> AICDCODE NONCON, CANONIC, SETLOOP, DXCODE*, DXCODE+1, DXCODE+2, DXCODE+3, DXCODE+4*, OPCODE*, OPCODE+1
, OPCODE+2*
>> AICDDFN SET+1*, SET+2, SET+3, SET+4, SET+6, KILLWD+1, KILLWD+2, SETWD+1, SETWD+4, SETWD+5
, GETSEQ+1
>> AICDEXEC KILLWD+2*, SETWD+6*, REMQT+1, REMQT+5
>> AICDFLD LIST+1, LIST+2, SET+2, SET+3, SET+4, SET+6, KILLWD+1, KILLWD+2, SETWD+1, SETWD+4
, SETWD+5, GETSEQ+1
>> AICDGBL SETLOOP, LIST+1, LIST+2, SET+1, SET+2, SET+3, SET+4, SET+6*, KILLWD+1, KILLWD+2
, SETWD+1, SETWD+4, SETWD+5, GETSEQ+1, CHKCODE+1
>> AICDI REMQT*, REMQT+3*, REMQT+5*
>> AICDL GETKWD+2*, GETKWD+3, GETKWD+4, GETKWD+5*, GETKWD+6, LIST+2*
>> AICDNUMB NONCON*, CANONIC*, SETLOOP*, SET+1, KILLWD+1
>> AICDNW GETKWD+5*, GETKWD+6*
>> AICDNWS GETKWD+6
>> AICDQ SETLOOP*, GETKWD+5*, KILLWD+2*
>> AICDSQN KILLWD+2*, SETWD+4, SETWD+5, GETSEQ+1*
>> AICDW SET+5*
>> AICDWC REMQT+2*, REMQT+3*, REMQT+4*, REMQT+5
>> AICDWD GETKWD+6*, LIST+2*, SET+5*, DECIDE+1, DECIDE+2*, DECIDE+3*, KILLWD+1, KILLWD+2, SETWD+1, SETWD+4
, SETWD+5, REMQT*, REMQT+1, REMQT+2, REMQT+3, REMQT+4, REMQT+5*, REMQT+6*
>> AICDWF REMQT+3*, REMQT+4
>> AICDWS REMQT+2*, REMQT+6
>> AICDWSV DECIDE+1*, DECIDE+2, DECIDE+3
AICDWT GETKWD+1!*, GETKWD+6*
AICDWT( GETKWD+6*, SET+5
DTIME GETKWD+2
U GETKWD+2, SET+4, SET+6
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Label References |  Naked Globals |  Local Variables |  All