RORPUT01 ;HCIOFO/SG - EDIT LOINC AND DRUG CODE MULTIPLES ; 5/19/06 11:48am
Source file <RORPUT01.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADD(REGIEN,SUBFILE,LSTREF) | ;
|
|
| CDCDEF() | ;
|
|
| COMPNEXT(PARAM) | ;
|
|
| LOINCADD(RORREG,RORLNCAD) | ;
|
|
| LOINCREM(RORREG,RORLNCRM) | ;
|
|
| REMOVE(REGIEN,SUBFILE,LSTREF) | ;
|
|
| UPDATE(RORREG,MAXNTSK,SUSPEND) | ;
|
| Name | Field # of Occurrence |
|---|---|
| FIND^DIC | REMOVE+10 |
| UPDATE^DIE | ADD+10 |
| ^DIK | REMOVE+14 |
| $$ROOT^DILFD | REMOVE+12 |
| $$DBS^RORERR | ADD+11, REMOVE+11 |
| $$ERROR^RORERR | COMPNEXT+12 |
| $$PARAM^RORKIDS | LOINCADD+4, LOINCADD+5, LOINCREM+4, LOINCREM+5, UPDATE+4, UPDATE+6, UPDATE+7 |
| BMES^RORKIDS | CDCDEF+2, LOINCADD+2, LOINCREM+2, UPDATE+2 |
| MES^RORKIDS | ADD+6, CDCDEF+9, LOINCADD+9, LOINCREM+9, REMOVE+6, UPDATE+11 |
| SETPARM^RORRP038 | CDCDEF+6 |
| $$UPDATE^RORUPD | UPDATE+9 |
| Name | Line Occurrences |
|---|---|
| $$ADD | LOINCADD+7 |
| $$COMPNEXT | ADD+2, REMOVE+2 |
| $$REMOVE | LOINCREM+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BUF | ADD+1~, ADD+4, ADD+5*, ADD+6, ADD+7*, ADD+8, LOINCREM+1~, REMOVE+1~, REMOVE+4, REMOVE+5* , REMOVE+6, REMOVE+7*, REMOVE+8 |
| DA | LOINCREM+1~, REMOVE+1~, REMOVE+14* |
| DA(1 | REMOVE+12* |
| >> DIERR | ADD+11, REMOVE+11 |
| DIK | LOINCREM+1~, REMOVE+1~, REMOVE+12* |
| EC | UPDATE+1~ |
| I | COMPNEXT+1~, COMPNEXT+7*, COMPNEXT+8 |
| IENS | ADD+1~, ADD+3*, ADD+9, ADD+11, LOINCREM+1~, REMOVE+1~, REMOVE+3*, REMOVE+10, REMOVE+11, REMOVE+12 |
| IR | LOINCREM+1~, REMOVE+1~, REMOVE+12*, REMOVE+13*, REMOVE+14 |
| ITEM | ADD+1~, ADD+8*, ADD+9, REMOVE+1~, REMOVE+8*, REMOVE+10 |
| LCI | LOINCREM+1~ |
| LI | ADD+1~, ADD+8*, REMOVE+1~, REMOVE+8* |
| LOINC | LOINCREM+1~ |
| LSTREF | ADD~, ADD+2, REMOVE~, REMOVE+2 |
| MAXNTSK | UPDATE~, UPDATE+6*, UPDATE+9 |
| N | COMPNEXT+1~, COMPNEXT+6*, COMPNEXT+7, COMPNEXT+8*, COMPNEXT+9, COMPNEXT+10 |
| NEXT | ADD+1~, ADD+2*, ADD+4, COMPNEXT+1~, COMPNEXT+3, COMPNEXT+4*, COMPNEXT+9, COMPNEXT+10*, LOINCREM+1~, REMOVE+1~ , REMOVE+2*, REMOVE+4 |
| PARAM | COMPNEXT~, COMPNEXT+1, COMPNEXT+3, COMPNEXT+4, COMPNEXT+6, COMPNEXT+7, COMPNEXT+8, COMPNEXT+10, COMPNEXT+12 |
| RC | ADD+1~, ADD+3*, ADD+4, ADD+8, ADD+11*, ADD+12, CDCDEF+1~, COMPNEXT+1~, COMPNEXT+6*, COMPNEXT+7* , COMPNEXT+8*, COMPNEXT+9, LOINCADD+1~, LOINCADD+7*, LOINCREM+1~, LOINCREM+7*, REMOVE+1~, REMOVE+3*, REMOVE+4, REMOVE+8 , REMOVE+11*, REMOVE+15, UPDATE+9* |
| REGIEN | ADD~, ADD+3, REMOVE~, REMOVE+3, REMOVE+12 |
| REGLST | UPDATE+1~, UPDATE+9 |
| REGLST( | UPDATE+5* |
| RESULTS | CDCDEF+1~, CDCDEF+6 |
| RESULTS(0 | CDCDEF+7 |
| RORBUF | CDCDEF+1~, CDCDEF+4*, CDCDEF+5*, CDCDEF+6, LOINCREM+1~, REMOVE+1~, REMOVE+9! |
| RORBUF("DILIST" | REMOVE+13, REMOVE+14 |
| RORFDA | ADD+1~ |
| RORFDA( | ADD+9* |
| RORLNCAD | LOINCADD~, LOINCADD+5*, LOINCADD+7 |
| RORLNCRM | LOINCREM~, LOINCREM+5*, LOINCREM+7 |
| RORMSG | ADD+1~, LOINCREM+1~, REMOVE+1~ |
| RORREG | LOINCADD~, LOINCADD+4*, LOINCADD+7, LOINCREM~, LOINCREM+4*, LOINCREM+7, UPDATE~, UPDATE+4*, UPDATE+5 |
| SUBFILE | ADD~, ADD+9, ADD+11, REMOVE~, REMOVE+10, REMOVE+11, REMOVE+12 |
| SUSPEND | UPDATE~, UPDATE+7*, UPDATE+9 |
| TLI | ADD+1~, ADD+4*, LOINCREM+1~, REMOVE+1~, REMOVE+4* |
| U | COMPNEXT+4, UPDATE+5 |
| >> XPDGREF | CDCDEF+4 |