©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
SROGMTS0 ;BIR/ADM - SURGERY HEALTH SUMMARY ; [ 02/18/04 7:12 AM ]
Source file <SROGMTS0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STATUS | ; get status of summary in TIU
|
|
| DICT | ; get dictation from TIU completed
|
|
| ED(X) | ; external date
|
|
| EN(X) | ; Convert Case
|
|
| UP(X) | ||
| SP | ; Special Characters
; Special Cases of Special Characters |
|
| LD(X) | ||
| CASE(X,J) | ; Set to Mixed/lower/UPPER case
|
|
| TRIM(X) | ||
| EN2(X) | ; Convert Case 2
|
|
| EDT(X) | ; external date and time
|
|
| MX(X) | ||
| CK(X) | ;
|
|
| SRWORD | ; Convert word
|
|
| LO(X) |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SRF - [#130] | DICT+2, STATUS+2, STATUS+5 |
| ^TMP("SRLQ" | DICT+3! |
| Name | Line Occurrences |
|---|---|
| $$CASE | SP+12, SP+20, SRWORD+2 |
| $$CK | EN2+1 |
| $$EN | EN2+1 |
| $$LD | SP+23, CK+9 |
| $$MX | CASE+6 |
| $$TRIM | EN+16 |
| $$UP | EN+2, SP+2, SP+3, SP+4, CASE+1 |
| @( | CASE+4 |
| SP | EN+11 |
| SRWORD | EN+12 |
| STATUS | DICT+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> IEN | DICT+2 |
| J | CASE~ |
| >> REC(130 | DICT+4*, DICT+7*, DICT+8* |
| SRCHR | SP+6~, SP+9*, SP+12, SP+13, SP+14 |
| SRCT | DICT+1~, DICT+4*, DICT+7, DICT+8, DICT+9* |
| SRCTR | EN+1~, EN+4*, EN+5, SP+23 |
| SRL | DICT+1~ |
| SRLEAD | EN+1~, EN+6*, EN+7*, EN+13 |
| SRLW | SP+17~*, SP+21 |
| SRNON | DICT+1~, DICT+2*, STATUS+1, STATUS+4 |
| SROC | EN+1~, EN+10* |
| SROK | EN+1~, EN+10*, EN+11, EN+12, SP+6~ |
| SROW | SP+17~, SP+18*, SP+19*, SP+20*, SP+21 |
| SROY | DICT+1~, DICT+5, DICT+6, DICT+7, DICT+8, DICT+10 |
| SRPC | EN+1~, EN+2*, EN+6* |
| SRPRE | EN+1~, SP+10*, SP+11*, SP+12, SP+19*, SP+20, SRWORD+1*, SRWORD+2 |
| SRPSN | SP+16~*, SP+17, SP+18 |
| SRRTN | CASE+1~*, CASE+2*, CASE+4* |
| SRSTAT | DICT+1~, DICT+3*, STATUS+2*, STATUS+3, STATUS+5*, STATUS+6 |
| SRSUM | DICT+1~, DICT+3*, DICT+4, STATUS+3*, STATUS+6* |
| SRT | DICT+1~, DICT+6*, DICT+7, DICT+8 |
| SRTAG | CASE+1~*, CASE+2*, CASE+3, CASE+4 |
| SRTIU | DICT+1~, DICT+5, STATUS+2*, STATUS+5* |
| SRTLR | EN+1~, EN+6*, EN+8*, EN+14 |
| SRTN | DICT+1~, DICT+2*, DICT+4, DICT+7, DICT+8, STATUS+2, STATUS+5 |
| SRTR | EN+1~, EN+2*, EN+15*, EN+16 |
| SRW | SP+6~, SP+7*, SP+9, SP+11*, SP+12*, SP+13*, SP+14*, SP+15, SP+16, SP+17 , SP+18, SP+21*, SP+22 |
| SRWCTR | SP+6~, SP+8*, SP+9 |
| SRWD1 | SP+6~, SP+7*, SP+8, SP+9, SP+24! |
| SRWD2 | SP+6~, SP+7*, SP+13*, SP+20, SP+22*, SP+23, SP+24! |
| SRWORD | EN+1~, EN+2*, EN+5*, EN+7*, EN+8*, EN+10, EN+13*, EN+14*, EN+15, SP+2* , SP+3*, SP+4*, SP+5*, SP+7, SP+23*, SRWORD+1*, SRWORD+2* |
| X | ED~, ED+1*, ED+2*, ED+3, EDT~, EDT+1*, EDT+2*, EDT+3, EN~, EN+2* , EN+4, EN+5, EN+16*, EN2~, EN2+1*, CASE~, CASE+1*, CASE+3, CASE+5*, CASE+6* , CASE+7, LO~, UP~, MX~, LD~, TRIM~*, TRIM+1*, TRIM+2, CK~, CK+1* , CK+2*, CK+3*, CK+4*, CK+5*, CK+6*, CK+7*, CK+8*, CK+9*, CK+10*, CK+11 |
| Y | EN+1~, CASE+1~*, CASE+5 |