©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
BSDSCDUP ;ihs/cmi/maw - BSD Find Duplicate Appointment entries caused by auto rebook and clean them up
Source file <BSDSCDUP.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MAIN | ;EP -- main routine entry point
|
|
| END | ;-- cleanup variables and quit
|
|
| CLEAN | ;-- clean up entries that have only one
|
|
| LOOP | ;-- loop through the hospital location file and find duplicates
|
|
| SCUP | ;-- now go back through the hospital location file and cleanup duplicate entries
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAW($J | LOOP+8*, LOOP+9*, CLEAN+2, CLEAN+3, CLEAN+4, CLEAN+5!, SCUP+3, SCUP+4, SCUP+5, END+1! |
| ^SC - [#44] | LOOP+3, LOOP+4, LOOP+5, LOOP+6, SCUP+6, SCUP+7, SCUP+8! |
| Name | Line Occurrences |
|---|---|
| CLEAN | MAIN+3 |
| END | MAIN+1, MAIN+5 |
| LOOP | MAIN+2 |
| SCUP | MAIN+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BDA | LOOP+1~, LOOP+3*, LOOP+4, LOOP+5, LOOP+6, LOOP+8, LOOP+9 |
| BIEN | LOOP+1~, LOOP+4*, LOOP+5, LOOP+6, LOOP+8, LOOP+9 |
| BOEN | LOOP+1~, LOOP+5*, LOOP+6 |
| >> CNT | LOOP+2* |
| PAT | LOOP+1~, LOOP+6*, LOOP+7, LOOP+8, LOOP+9 |
| SDA | SCUP+2~, SCUP+3*, SCUP+4, SCUP+5, SCUP+6, SCUP+7, SCUP+8 |
| SIEN | SCUP+2~, SCUP+4*, SCUP+5, SCUP+6, SCUP+7, SCUP+8 |
| SOEN | SCUP+2~, SCUP+6*, SCUP+7, SCUP+8 |
| SPAT | SCUP+2~, SCUP+5*, SCUP+7 |
| TDA | CLEAN+1~, CLEAN+2*, CLEAN+3, CLEAN+4, CLEAN+5 |
| TIEN | CLEAN+1~, CLEAN+3*, CLEAN+4, CLEAN+5 |
| TPAT | CLEAN+1~, CLEAN+4*, CLEAN+5 |
| U | LOOP+6, SCUP+7, SCUP+8 |