LEXQVSE ;ISL/TJH - Query - VA Extension SNOMED CT - Extract ;01/25/2021
Source file <LEXQVSE.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Main Entry Point
|
|
| IEN | ; Display with IENs
|
|
| LOOK | ; SNOMED CT Lookup Loop
|
|
| LOOK2 | ; Needs LEXCDT and LEXSCT
; Needs ; LEXCDT FileMan date ; LEXEXIT Exit Flag (0) ; LEXSCT SNOMED CT = SIEN^CODE^STA^EFF^EIEN^EXP |
|
| NA(X,Y) | ; Next Activation File 757.02 ACT index
|
|
| PF(X) | ; Preference File 757.02, Field 4 0;5
|
|
| TY(X) | ; Type File 757.01, Field 2 1;2
|
|
| DA(X) | ; Deactivated File 757.01, Field 9 1;5
|
|
| DS(X,LEX) | ; Designation Code Sub-file 757.118, Fields .01 and 2
|
|
| IENS(X,LEX) | ; Get IENS
|
|
| SUBS(X,LEX) | ; Get Subsets
|
|
| MAPS(X,LEX,LEXD,LEXL) | ; Get Mappings
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LEX(757.01 - [#757.01] | DS+12, DS+13, DS+14, IENS+14, IENS+15, SUBS+17, SUBS+18, MAPS+36 |
| ^LEX(757.018 - [#757.018] | DS+15 |
| ^LEX(757.02 - [#757.02] | NA+8, PF+1, TY+1, DA+1, MAPS+35 |
| ^LEX(757.03 - [#757.03] | MAPS+19, MAPS+31, MAPS+32 |
| ^LEX(757.21 - [#757.21] | SUBS+20, SUBS+21 |
| ^LEX(757.32 - [#757.32] | MAPS+17, MAPS+18, MAPS+19 |
| ^LEX(757.33 - [#757.33] | MAPS+20, MAPS+21, MAPS+22, MAPS+24, MAPS+25, MAPS+26, MAPS+28, MAPS+30 |
| ^LEXT(757.2 - [#757.2] | SUBS+21 |
| ^TMP("LEXQVSEO" | EN+1!, EN+4! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| LEX | DS~, DS+12!, IENS~, IENS+14!, SUBS~, SUBS+17!, MAPS~, MAPS+14! |
| LEX( | DS+18*, IENS+16*, SUBS+23*, MAPS+44* |
| LEX(" " | DS+18, MAPS+44 |
| LEXAD | EN+2~, EN+3*, LOOK2+6~, LOOK2+7* |
| LEXC | MAPS+21~*, MAPS+22, MAPS+43~, MAPS+44* |
| LEXCDT | EN+2~*, EN+3*, LOOK+1*, LOOK2+7, LOOK2+8, LOOK2+12, NA+7~*, NA+8 |
| LEXCLEN | LOOK2+6~, LOOK2+9* |
| LEXCOD | LOOK2+6~, LOOK2+10*, NA+7~*, NA+8 |
| LEXCODE | MAPS+23~, MAPS+30*, MAPS+33, MAPS+37 |
| LEXD | MAPS~, MAPS+15 |
| LEXDI | DS+13~*, DS+14 |
| LEXDS | DS+14~*, DS+15, DS+17 |
| LEXE | MAPS+22~*, MAPS+24, MAPS+25, MAPS+26, MAPS+28, MAPS+30 |
| LEXEDT | EN+2~, EN+3*, LOOK+1*, LOOK2+6~, LOOK2+8* |
| LEXEEN | LOOK+2~, LOOK2+12*, LOOK2+13 |
| LEXEF | MAPS+23~, MAPS+24*, MAPS+25 |
| LEXEFF | LOOK+2~, LOOK2+11* |
| LEXEIEN | LOOK2+6~, IENS+14~*, IENS+15, IENS+16, MAPS+23~, MAPS+35*, MAPS+36 |
| LEXELDT | LOOK2+5!, LOOK2+6~, LOOK2+13* |
| LEXENV | EN+1~* |
| LEXEXIT | EN+2~*, EN+3, LOOK+3* |
| LEXEXP | LOOK+2~, LOOK2+12*, MAPS+23~, MAPS+36*, MAPS+37 |
| LEXFA | LOOK2+6~, LOOK2+11* |
| LEXGET | LOOK2+5! |
| LEXHI | DS+14~, DS+15*, DS+16, DS+17, MAPS+23~, MAPS+25*, MAPS+26 |
| LEXHN | DS+14~, DS+15*, DS+16*, DS+17 |
| LEXI | DS+14~, DS+18*, IENS+15~, IENS+16*, MAPS+23~, MAPS+42*, MAPS+43, MAPS+44 |
| LEXIDT | LOOK+2~, LOOK2+11*, MAPS+14~, MAPS+15*, MAPS+24, MAPS+33 |
| LEXIEN | DS+12~*, SUBS+17~*, SUBS+18, SUBS+19*, SUBS+20, SUBS+23 |
| LEXIENS | SUBS+17~ |
| LEXIENS( | SUBS+18*, SUBS+19 |
| LEXIENS(0 | SUBS+19 |
| LEXIIEN | IEN+1~*, DS+16, MAPS+40 |
| LEXINC | LOOK2+6~ |
| LEXISO | MAPS+14~*, MAPS+20, MAPS+21, MAPS+22 |
| LEXL | MAPS~, MAPS+16 |
| LEXLD | LOOK2+5! |
| LEXLDT | LOOK2+5!, LOOK2+6~, LOOK2+12*, LOOK2+13 |
| LEXLEN | LOOK2+6~, LOOK2+9*, MAPS+14~, MAPS+16* |
| LEXLLEN | LOOK2+6~, LOOK2+9* |
| LEXLX | LOOK2+5! |
| LEXMA | MAPS+23~, MAPS+28*, MAPS+29*, MAPS+38 |
| LEXMC | IENS+14~*, SUBS+17~* |
| LEXMD | LOOK2+5!, MAPS+14~, MAPS+17*, MAPS+18, MAPS+19, MAPS+20, MAPS+21, MAPS+22 |
| LEXMIEN | MAPS+23~, MAPS+24*, MAPS+40 |
| LEXN | IENS+15~*, IENS+16, MAPS+23~, MAPS+41! |
| LEXN( | MAPS+42, MAPS+43 |
| LEXN(1 | MAPS+41* |
| LEXNA | NA+7~, NA+8* |
| LEXND | SUBS+21~*, SUBS+22 |
| LEXNOM | MAPS+23~, MAPS+31*, MAPS+37 |
| LEXO | DS+12~*, DS+13, MAPS+18~, MAPS+20*, MAPS+21, MAPS+22 |
| LEXSA | SUBS+21~, SUBS+22*, SUBS+23, MAPS+23~, MAPS+27*, MAPS+39 |
| LEXSAB | MAPS+23~, MAPS+32*, MAPS+33 |
| LEXSCT | LOOK+2~, LOOK+3*, LOOK2+10, LOOK2+11, LOOK2+12 |
| LEXSCTC | LOOK+2~ |
| LEXSD | LOOK2+5! |
| LEXSEN | LOOK+2~, LOOK2+10*, LOOK2+13 |
| LEXSF | SUBS+21~, SUBS+22*, SUBS+23 |
| LEXSI | SUBS+21~*, SUBS+23 |
| LEXSIEN | LOOK2+6~, SUBS+20*, SUBS+21, SUBS+23, MAPS+23~, MAPS+34*, MAPS+35 |
| LEXSRC | MAPS+18~*, MAPS+33*, MAPS+34 |
| LEXST | LOOK2+5!, MAPS+23~, MAPS+26*, MAPS+27 |
| LEXSTA | LOOK+2~, LOOK2+11* |
| LEXT | DS+14~, DS+17*, DS+18, IENS+15~*, MAPS+23~, MAPS+37*, MAPS+38*, MAPS+39*, MAPS+40*, MAPS+41 , MAPS+43~*, MAPS+44 |
| LEXTEST | EN+2~ |
| LEXTL | MAPS+14~, MAPS+16*, MAPS+41 |
| LEXTLEN | LOOK2+6~, LOOK2+9* |
| LEXTO | MAPS+18~, MAPS+19*, MAPS+31, MAPS+32 |
| LEXWN | LOOK2+5! |
| X | NA~, NA+7, NA+8*, NA+9, PF~, PF+1*, PF+2, TY~, TY+1*, TY+2 , DA~, DA+1*, DA+2, DS~, DS+12, DS+13, DS+14, IENS~, IENS+14, SUBS~ , SUBS+17, MAPS~, MAPS+14 |
| Y | NA~, NA+7 |