©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
AICDKWL1 ; IHS/OHPRD/ACC - PART 2 OF LOOKUP CONTROL PROGRAM FOR "AND"ING INVERTED SEARCH ;
Source file <AICDKWL1.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS ICD CPT Lookup and Grouper | 3 | ^AICDKSCH PREPSCH^AICDKWL2 ^AICDTOKN |
| Package | Total | Caller Graph |
|---|---|---|
| IHS ICD CPT Lookup and Grouper | 2 | AICDKWL AICDKWLD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DSPGRP | ||
| DSPDESC | ||
| ASKSEL | ; ASK FOR SELECTION AMONG HITS
|
|
| NOTSHRTX | ||
| CHKREP | ;
|
|
| VERIFY | ;
|
|
| EXIT2 | ;
|
|
| GETFRAG | ||
| ASKONEOK | ||
| EXIT | ;
|
|
| CHKREP2 | ||
| CHKREP3 | ||
| VERIFY2 | ||
| ASKONEX | ||
| NOTSHRT | ||
| DSPLY | ; DISPLAY CODE AND TEXT
|
|
| ASKONE | ; ASK IF SINGLE HIT IS ACCEPTABLE
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AICDKWLC - [#9001010] | CHKREP+1, CHKREP2+1 |
| ^DD( | VERIFY2 |
| ^UTILITY("AICDHITS" | NOTSHRTX+1!*, NOTSHRTX+2, VERIFY+2, VERIFY+3, ASKONEOK, DSPGRP, DSPGRP+3, DSPGRP+4, DSPGRP+5, DSPGRP+6 , DSPGRP+8, DSPLY+1 |
| Name | Line Occurrences |
|---|---|
| @( | DSPLY+3 |
| ASKONE | VERIFY+2 |
| ASKONEOK | ASKONE+1, ASKONE+2 |
| ASKONEX | ASKONE+8 |
| ASKSEL | VERIFY+3 |
| CHKREP | NOTSHRT+1 |
| CHKREP2 | CHKREP+1 |
| CHKREP3 | CHKREP2+2 |
| DSPGRP | DSPGRP+4, DSPGRP+5, DSPGRP+6 |
| DSPLY | ASKONE+5, DSPGRP+1 |
| EXIT | NOTSHRTX+2 |
| GETFRAG | DSPDESC |
| NOTSHRTX | NOTSHRT+4 |
| VERIFY | NOTSHRTX+3 |
| VERIFY2 | VERIFY+2 |
| Name | Field # of Occurrence |
|---|---|
| ^("ACT" | VERIFY2 |
| ^(0 | VERIFY2+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | DSPDESC* |
| AICDADFN | NOTSHRT+2! |
| AICDASK | NOTSHRT+4, NOTSHRT+5, NOTSHRTX+2, VERIFY+3, EXIT2+3!, ASKONE+2 |
| AICDAWRD | NOTSHRT+2! |
| AICDC | DSPDESC+2!, GETFRAG+1*, GETFRAG+2 |
| AICDDESC | ASKONEX!, DSPGRP+9!, DSPLY+6*, DSPDESC, GETFRAG*, GETFRAG+1, GETFRAG+2* |
| AICDDFN | NOTSHRT+2!, CHKREP+1*, CHKREP2+1 |
| AICDF | ASKONEX!, DSPGRP+9!, DSPDESC, DSPDESC+2!, GETFRAG*, GETFRAG+2* |
| AICDGBL | VERIFY2, EXIT2+3! |
| AICDGRP | ASKSEL+2*, DSPGRP, DSPGRP+1, DSPGRP+4*, DSPGRP+5*, DSPGRP+6*, DSPGRP+9! |
| AICDH | ASKONE+4*, ASKONEOK*, ASKONEX!, DSPGRP+1*, DSPGRP+8*, DSPGRP+9!, DSPLY+1, DSPLY+4 |
| AICDH2 | DSPGRP*, DSPGRP+1, DSPGRP+9! |
| AICDI | EXIT2+1!, DSPGRP+6*, DSPLY+1*, DSPLY+2 |
| AICDKSCH | EXIT2+3! |
| AICDKSCH("DSPLY" | DSPLY+3 |
| AICDKSCH("GBL" | ASKONE+1 |
| AICDKWCT | CHKREP+1, CHKREP2+1, EXIT2+1! |
| AICDL | EXIT2+3! |
| AICDMULT | ASKONE+4*, ASKONEX!, ASKSEL+2*, DSPGRP+9!, DSPLY+4, DSPDESC |
| AICDNUSE | NOTSHRT+2!*, NOTSHRT+4, NOTSHRT+5, NOTSHRTX! |
| AICDNUSE( | NOTSHRT+5 |
| AICDNWDS | NOTSHRT+4, NOTSHRT+5, NOTSHRTX+1, EXIT2+1! |
| AICDQ | NOTSHRT+5*, EXIT2+1!, ASKONE+6*, DSPGRP+3* |
| AICDREF | EXIT2+2! |
| AICDREF0 | EXIT2+2!, DSPLY+2* |
| AICDREF1 | VERIFY2+1, EXIT2+2!, DSPLY+2, DSPLY+5 |
| AICDREF2 | EXIT2+2! |
| AICDREF3 | EXIT2+2!, ASKONEOK, DSPGRP+8 |
| AICDREF4 | EXIT2+2! |
| AICDREP | CHKREP+2!, CHKREP2+1*, CHKREP3*, CHKREP3+1, CHKREP3+2*, CHKREP3+3* |
| >> AICDREPI | CHKREP3+1*, CHKREP3+2 |
| AICDREPT | CHKREP+2!, CHKREP2+2, CHKREP3+2*, CHKREP3+3* |
| AICDT | EXIT2+3! |
| AICDWD | NOTSHRT+5*, EXIT2+1! |
| AICDWORD | NOTSHRT+2!, CHKREP+1*, CHKREP2 |
| >> AICDWT( | CHKREP+1, CHKREP2!, CHKREP2+2* |
| AICDX | EXIT2+3! |
| AICDXSAV | EXIT2+4! |
| >> DIC(0 | ASKONEOK, DSPGRP+8 |
| DTIME | ASKONE+6, DSPGRP+3 |
| U | CHKREP2+1, VERIFY2, VERIFY2+1, ASKONE+1 |
| >> X | EXIT2+4*, ASKONE+6*, ASKONE+8, DSPGRP+3*, DSPGRP+4, DSPGRP+5, DSPGRP+6, DSPGRP+7, DSPGRP+8 |
| Y | NOTSHRTX+2*, VERIFY+1*, VERIFY2, VERIFY2+1*, ASKONE+7!, ASKONE+8*, ASKONEOK*, DSPGRP+7*, DSPGRP+8* |
| Y(0 | ASKONEOK*, DSPGRP+8* |