LEXQVSEA ;ISL/TJH - Query - VA Extension SNOMED CT - Ask ;01/25/2021
Source file <LEXQVSEA.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 |
|---|---|---|
| SCT(X) | ; SNOMED CT Code Selection
; ; Output 7 piece "^" delimited String ; ; 1 Code IEN file 757.02 ; 2 Code ; 3 Status (1/0) ; 4 Effective date of Status ; 5 Initial Activation Date ; 6 Expression IEN file 757.01 ; 7 Expression ; |
|
| CODEW(X) | ; SNOMED CT Code Write
|
|
| CODEDAT(X,Y,Z) | ;
|
|
| SD(X) | ; Short Date
|
|
| CLR | ; Clear
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^LEX(757.02 - [#757.02] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LEX(757.01 - [#757.01] | CODEW+2, CODEDAT+30 |
| ^LEX(757.02 - [#757.02] | SCT+19, CODEW+2, CODEW+3, CODEDAT+24, CODEDAT+25 |
| ^LEX(757.03 - [#757.03] | SCT+20, CODEDAT+21 |
| Name | Line Occurrences |
|---|---|
| $$CODEDAT | SCT+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACT | CODEW+1~*, CODEW+4*, CODEW+5 |
| COD | CODEW+1~, CODEW+3*, CODEW+7 |
| DIC | SCT+13~, SCT+14*, CODEW+1 |
| DIC("A" | SCT+14* |
| DIC("S" | SCT+15* |
| DIC("W" | SCT+16* |
| DIC(0 | SCT+14* |
| DTOUT | SCT+13~, SCT+17, SCT+18 |
| DUOUT | SCT+13~, SCT+18 |
| EFF | CODEW+1~, CODEW+2*, CODEW+3 |
| EXP | CODEW+1~, CODEW+2* |
| HIS | CODEW+1~, CODEW+3* |
| IEN | CODEW+1~*, CODEW+2, CODEW+3 |
| LEXCD | CODEDAT+19~, CODEDAT+27*, CODEDAT+31 |
| LEXCDT | SCT+21, CLR+1~ |
| LEXCP | SCT+13~ |
| LEXCPT | CLR+1~ |
| LEXEF | CODEDAT+19~, CODEDAT+28*, CODEDAT+31 |
| LEXEIEN | SCT+13~, SCT+19* |
| LEXEN | CODEDAT+19~, CODEDAT+26*, CODEDAT+30, CODEDAT+31 |
| LEXETXT | SCT+13~ |
| LEXEXIT | SCT+12, SCT+17*, CLR+1~ |
| LEXIA | CODEDAT+19~, CODEDAT+29*, CODEDAT+31 |
| LEXIEN | SCT+13~, SCT+19* |
| LEXND | SCT+13~, SCT+19*, SCT+20, CODEDAT+19~, CODEDAT+25*, CODEDAT+26, CODEDAT+27 |
| LEXSAB | SCT+13~, SCT+20*, SCT+21, CODEDAT+19~, CODEDAT+20*, CODEDAT+21, CODEDAT+22 |
| LEXSN | CODEDAT+19~, CODEDAT+24*, CODEDAT+25, CODEDAT+31 |
| LEXSO | SCT+13~, SCT+20*, SCT+21, CODEDAT+19~, CODEDAT+20*, CODEDAT+22, CODEDAT+27 |
| LEXSRC | SCT+13~, SCT+20*, CODEDAT+19~, CODEDAT+21*, CODEDAT+24 |
| LEXST | CODEDAT+19~, CODEDAT+23*, CODEDAT+31 |
| LEXSTAT | CODEDAT+19~, CODEDAT+22*, CODEDAT+23, CODEDAT+24, CODEDAT+28, CODEDAT+29 |
| LEXTX | CODEDAT+19~, CODEDAT+30*, CODEDAT+31 |
| LEXVDT | SCT+14~, CODEDAT+19~, CODEDAT+20*, CODEDAT+21*, CODEDAT+22 |
| LEXVTXT | SCT+13~ |
| NOD | CODEW+1~, CODEW+2*, CODEW+3, CODEW+4 |
| PRE | CODEW+1~*, CODEW+4*, CODEW+5 |
| PRI | CODEW+1~*, CODEW+4*, CODEW+5 |
| QUA | CODEW+1~*, CODEW+5*, CODEW+6*, CODEW+7* |
| STA | CODEW+1~, CODEW+3*, CODEW+4 |
| STR | CODEW+1~, CODEW+7* |
| U | SCT+14*, SCT+20, CODEDAT+23, CODEDAT+24, CODEDAT+26, CODEDAT+27, CODEDAT+28, CODEDAT+29, CODEDAT+30, CODEDAT+31 |
| X | SCT~, SCT+17, SCT+18, SCT+21*, SCT+22, CODEW~, CODEW+1, CODEW+7*, CODEW+8, CODEDAT~ , CODEDAT+20, CODEDAT+31*, CODEDAT+32, SD~, SD+1 |
| Y | SCT+14~, SCT+19, CODEDAT~, CODEDAT+20 |
| Z | CODEDAT~, CODEDAT+20 |
