LEXQVSE2 ;ISL/TJH - Query - VA Extension SNOMED CT - Save ;01/25/2021
Source file <LEXQVSE2.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
|
|
| FUL | ; Full Display
|
|
| FUT | ; Future Activation
|
|
| BOD(X) | ; Based on Date
|
|
| COD(X,Y,LEXD,LEXLEN) | ; Code Line
|
|
| STAF(X,LEXLEN) | ; Status Line (Future)
|
|
| STAL(X,LEXLEN) | ; Status Line
|
|
| EXP(LEXSO,LEXCDT,LEXEX,LEXLEN) | ; Expressions
|
|
| SUBS(LEX,LEXLEN) | ; Subsets
|
|
| MAPS(LEX,LEXLEN) | ; Mappings
|
|
| CI(X,LEXD) | ; Code IENs
|
|
| LEN(X) | ; Length of Code
|
|
| BL | ; Blank Line
|
|
| TL(X) | ; Text Line
|
|
| CLR | ; Clear
|
|
| STUPD(X) | ; Status Update
|
|
| PREF(LEXSO,LEXCDT) | ; Get Preferred Expression for an Active Code
|
|
| FSN(LEXEX) | ; Get Count and Preferred Fully Specified Name
|
|
| HIST(CODE,ARY) | ; Activation History
|
|
| TM(X,Y) | ; Trim Character Y - Default " "
|
| Name | Field # of Occurrence |
|---|---|
| DSP^LEXQO | EN+2, EN+3 |
| $$DA^LEXQVSE | EXP+19 |
| $$NA^LEXQVSE | FUT+2 |
| DS^LEXQVSE | EXP+20 |
| IENS^LEXQVSE | FUL+6 |
| MAPS^LEXQVSE | FUL+10 |
| SUBS^LEXQVSE | FUL+8 |
| $$STATCHK^LEXSRC2 | CI+5 |
| $$HIST^LEXU | HIST+2 |
| $$PREF^LEXU | PREF+1 |
| PR^LEXU | COD+4, EXP+22 |
| $$DT^XLFDT | CI+5 |
| $$FMTE^XLFDT | STAF+7, STAL+8 |
| $$UP^XLFSTR | STUPD+1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LEX(757.01 - [#757.01] | FUL+2, FUL+5, FUT+3, EXP+14, EXP+21, FSN+3, FSN+5, FSN+6, FSN+7, FSN+8 |
| ^LEX(757.02 - [#757.02] | FUL+2, FUT+2, CI+2, CI+3, CI+4, LEN+1, LEN+2 |
| ^TMP("LEXQVSEO" | EN+1!, EN+2, EN+3, TL+2* |
| Name | Line Occurrences |
|---|---|
| $$CI | COD+1 |
| $$FSN | EXP+2 |
| $$HIST | STAL+3 |
| $$PREF | EXP+1 |
| $$STUPD | STAL+7 |
| $$TM | EXP+17 |
| BL | BOD+1, COD+5, STAF+9, STAL+12, EXP+3, SUBS+3, MAPS+5 |
| BOD | FUL+3, FUT+3 |
| COD | FUL+3, FUT+3 |
| EXP | FUL+7 |
| FUL | EN+3 |
| FUT | EN+2 |
| MAPS | FUL+11 |
| STAF | FUT+4 |
| STAL | FUL+4 |
| SUBS | FUL+9 |
| TL | BOD+1, COD+5, COD+8, STAF+9, STAL+12, EXP+29, EXP+31, EXP+32, EXP+33, EXP+39 , EXP+43, SUBS+8, MAPS+7, BL+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARY | HIST~, HIST+2 |
| CODE | HIST~, HIST+2 |
| LEX | FUL+1~, COD+7~*, COD+8, SUBS~, MAPS~ |
| LEX( | SUBS+4, SUBS+5, SUBS+6, MAPS+2, MAPS+5, MAPS+6 |
| LEX("" | SUBS+1, MAPS+1 |
| LEX1 | FUT+1~ |
| LEX2 | FUT+1~ |
| LEX3 | FUT+1~ |
| LEXACT | FSN+1~*, FSN+4*, FSN+10 |
| LEXBOD | BOD+1~* |
| LEXC | COD+1~*, COD+3 |
| LEXCD | EXP+35~, EXP+38~*, EXP+40, LEN+2~* |
| LEXCDT | FUL+3, FUL+7, FUL+10, FUT+2, STAL+5, EXP~, EXP+1, PREF~, PREF+1 |
| LEXCL | COD+1~, COD+2*, STAF+1~, STAF+2*, STAL+1~, STAL+2*, EXP+1~, EXP+3*, SUBS+1~, SUBS+2* , MAPS+1~, MAPS+3* |
| LEXCOD | FUL+1, FUT+2, HIST+1~ |
| LEXCOM | EXP+9~, EXP+11*, EXP+13*, EXP+15*, EXP+16*, EXP+17*, EXP+21 |
| LEXCT | EXP+35~*, EXP+39* |
| LEXD | COD~, COD+1*, EXP+9~, EXP+19*, EXP+33, CI~, CI+1*, CI+4*, CI+5* |
| LEXDA | EXP+9~ |
| LEXDES | FSN+2~, FSN+5*, FSN+6 |
| LEXDF | EXP+9~, EXP+14*, EXP+15 |
| LEXDS | EXP+9~, EXP+20 |
| LEXDS( | EXP+37, EXP+38 |
| LEXDS(0 | EXP+34 |
| LEXDT | EXP+1~, EXP+9~, EXP+22 |
| LEXDT( | EXP+30, EXP+31 |
| LEXDT(1 | EXP+21*, EXP+29 |
| LEXE | STAF+1~, STAF+7*, STAF+8 |
| LEXEEN | FUL+5, HIST+1~ |
| LEXEF | CI+2~*, CI+3, CI+4 |
| LEXEFF | EN+2, FUT+1~, STAL+5*, STAL+6, STAL+7, STAL+8 |
| LEXEI | EXP+9~, EXP+10*, EXP+13, EXP+14, EXP+16, EXP+18, EXP+19, EXP+20, EXP+21 |
| LEXELDT | EN+1, FUL+3, FUT+3, CLR+1~ |
| LEXEX | EXP~, EXP+2, FSN~ |
| LEXEX( | EXP+4, EXP+6, EXP+8, EXP+10 |
| LEXEX(0 | EXP+3 |
| LEXEX(2 | EXP+12, FSN+1, FSN+2 |
| LEXFN | EXP+6~*, EXP+7 |
| LEXFSC | EXP+1~, EXP+2*, EXP+13 |
| LEXFSN | EXP+1~, EXP+2*, EXP+12, EXP+13 |
| LEXFUL | FUL+1~, FUL+3* |
| LEXGET | CLR+1~ |
| LEXH | STAL+1~, STAL+3* |
| LEXHAR | FSN+2~, FSN+7* |
| LEXHI | STAL+1~, STAL+3, EXP+35~, EXP+38~*, EXP+39, EXP+41 |
| LEXHI( | STAL+5, STAL+6, STAL+7 |
| LEXHIS | FSN+2~, FSN+6*, FSN+7 |
| LEXI | FUT+1~, COD+1~, COD+6*, COD+7, STAL+6*, STAL+7, EXP+35~, EXP+37*, EXP+38, TL+2~* , FSN+1~*, FSN+2 |
| LEXIE | CI+3~*, CI+4 |
| LEXIEN | COD+1~*, COD+3, SUBS+5~, SUBS+6*, SUBS+7, CLR+1~, FSN+2~*, FSN+3, FSN+5, FSN+6 , FSN+7, FSN+8, FSN+9 |
| LEXIENS | FUL+1~, FUL+5!, FUL+6, FUL+7 |
| LEXIIEN | COD+3, EXP+16, SUBS+7, HIST+1~ |
| LEXINC | CLR+1~ |
| LEXL | FUL+1~*, FUL+3, FUL+4, FUL+7, FUL+9, FUL+10, FUL+11, FUT+1~*, FUT+3, FUT+4 , STAL+1~, STAL+2* |
| LEXLD | CLR+1~ |
| LEXLDR | STAL+1~, STAL+4*, STAL+9, STAL+12, STAL+13*, SUBS+1~, SUBS+3*, SUBS+8*, MAPS+1~, MAPS+4* , MAPS+7* |
| LEXLEN | FUL+1, FUT+1, COD~, COD+2, STAF~, STAF+2, STAL~, STAL+2, EXP~, EXP+3 , SUBS~, SUBS+2, MAPS~, MAPS+3, CLR+1~ |
| LEXLEX | CI+1~, CI+5*, CI+6* |
| LEXLL | COD+1~, COD+2*, COD+3, COD+8, STAF+1~, STAF+2*, STAL+1~, STAL+2*, STAL+10, EXP+1~ , EXP+3*, EXP+29, EXP+31, EXP+32, EXP+33, EXP+36, EXP+40, SUBS+1~, SUBS+2*, SUBS+8 , MAPS+1~, MAPS+3*, MAPS+4, MAPS+7 |
| LEXLN | EXP+6~*, EXP+7 |
| LEXLX | CLR+1~ |
| LEXMAPS | FUL+1~, FUL+10!, FUL+11 |
| LEXMAX | LEN+1~*, LEN+2*, LEN+3 |
| LEXMC | FUL+1~, FUL+5*, FUL+6, FUL+8 |
| LEXMD | CLR+1~ |
| LEXN | COD+1~, COD+4, MAPS+1~ |
| LEXN( | COD+6, COD+7 |
| LEXN(1 | COD+3*, COD+5 |
| LEXNA | FUT+1~, FUT+2*, FUT+4 |
| LEXNAM | FUL+1~, FUL+2*, FUL+3, FUT+1~, FUT+2*, FUT+3*, COD+1~*, COD+3* |
| LEXND | EXP+35~, EXP+38~* |
| LEXNL | EXP+38~*, EXP+41 |
| LEXNODP | EN+2, EN+3, HIST+1~ |
| LEXO | EXP+9~, EXP+30*, EXP+31 |
| LEXP | EXP+1~, EXP+9~, EXP+18*, EXP+32 |
| LEXPA | FSN+1~! |
| LEXPA( | FSN+9* |
| LEXPA(" " | FSN+10 |
| LEXPL | EXP+6~*, EXP+7*, EXP+24, EXP+27, SUBS+1~*, SUBS+3, MAPS+1~, MAPS+2*, MAPS+4 |
| LEXPREF | EXP+1~*, EXP+18 |
| LEXS | EXP+6~, EXP+8*, EXP+10, EXP+28 |
| LEXSA | SUBS+1~, SUBS+3*, SUBS+4*, SUBS+5, SUBS+6, MAPS+1~, MAPS+2*, MAPS+5*, MAPS+6 |
| LEXSAB | CI+1~, CI+5* |
| LEXSD | CLR+1~ |
| LEXSDO | CI+1~ |
| LEXSE | STAL+7~, STAL+8*, STAL+11 |
| LEXSEN | EN+2, FUL+2, FUT+2, HIST+1~ |
| LEXSI | SUBS+5~ |
| LEXSIEN | LEN+1~*, LEN+2 |
| LEXSN | SUBS+1~, SUBS+5~*, SUBS+6*, SUBS+7*, SUBS+8, MAPS+1~, MAPS+6~*, MAPS+7 |
| LEXSO | FUL+1~*, FUL+3, FUL+4, FUL+7, FUL+10, FUT+1~, FUT+2*, FUT+3, STAL+1~, STAL+3* , EXP~, EXP+1, CI+1~*, CI+2, CI+3, CI+5, PREF~, PREF+1 |
| LEXSR | CI+4~* |
| LEXST | STAL+7~*, STAL+10, CLR+1~ |
| LEXSTA | EN+2, HIST+1~ |
| LEXSUBS | FUL+1~, FUL+8!, FUL+9 |
| LEXT | BOD+1~*, COD+1~, COD+3*, COD+5*, COD+7~, COD+8*, STAF+1~, STAF+4*, STAF+5*, STAF+6* , STAF+8*, STAF+9, STAL+1~, STAL+7~, STAL+9*, STAL+10*, STAL+11*, STAL+12, EXP+9~, EXP+23* , EXP+24*, EXP+25*, EXP+26*, EXP+27*, EXP+28*, EXP+29*, EXP+31~*, EXP+32*, EXP+33*, EXP+35~ , EXP+38~, EXP+40*, EXP+41*, EXP+43, SUBS+5~, SUBS+8*, MAPS+6~, MAPS+7* |
| LEXTD | CI+2~*, CI+3, CI+4* |
| LEXTEST | TL+1, CLR+1~ |
| LEXTL | COD+1~, COD+2*, COD+4, STAF+1~, STAF+2*, STAL+1~, STAL+2*, EXP+1~, EXP+3*, EXP+22 , SUBS+1~, SUBS+2*, MAPS+1~, MAPS+3* |
| LEXTT | EXP+35~, EXP+36*, EXP+39* |
| LEXTY | EXP+4~*, EXP+5, EXP+6, EXP+8, EXP+10, EXP+11, EXP+23, EXP+24, EXP+25, EXP+26 , EXP+27 |
| LEXUP | STUPD+1~*, STUPD+2 |
| LEXWN | CLR+1~ |
| LEXX | STAF+1~, STAF+3*, STAF+7 |
| X | BOD~, BOD+1, COD~, COD+1, STAF~, STAF+3, STAL~, STAL+3, CI~, CI+1 , CI+6*, CI+7, LEN~, LEN+3*, LEN+4, TL~, TL+1, TL+2, STUPD~, STUPD+1* , STUPD+2*, STUPD+3, FSN+10*, FSN+11, TM~, TM+1*, TM+2*, TM+3*, TM+4 |
| Y | COD~, COD+1, TM~, TM+1*, TM+2, TM+3 |