©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
DDWF ;SFISC/MKO-FIND, REPLACE ;8:14 AM 27 Mar 1996
Source file <DDWF.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | MSG^DDW SHIFT^DDW3 (IND,PAINT,UNMARK)^DDW7 (ASK,LINE)^DDWG |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CUP(Y,X) | ;Cursor positioning
|
|
| LOOKB | ;Look backward in arrays
|
|
| LOOK | ;Look in arrays
|
|
| FINDT(DDWT,DDWBACK) | ;Find DDWT
|
|
| RF(X,T) | ;Find last occurrence of T in X
|
|
| NEXT | ;Find next occurrence of same text
|
|
| UC(X) | ;Return uppercase of X
|
|
| REPOS(DDWY,DDWX,DDWT) | ;Define DDWMARK, paint if on screen
|
|
| POS(R,C,F) | ;Pos cursor based on char pos C
|
|
| FIND | ;Prompt and find text
|
| Name | Line Occurrences |
|---|---|
| Function Call: READ |
|
| Function Call: READ |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("DDW" | LOOKB+13 |
| ^TMP("DDW1" | LOOK+12 |
| Name | Line Occurrences |
|---|---|
| $$RF | LOOKB+2, LOOKB+3, LOOKB+7, LOOKB+13 |
| $$UC | FINDT+2, LOOK+2, LOOK+6, LOOK+12, LOOKB+2, LOOKB+3, LOOKB+7, LOOKB+13 |
| CUP | LOOK+20, LOOKB+21 |
| FIND | NEXT+2 |
| FINDT | NEXT+4, FIND+4 |
| LOOK | FINDT+5 |
| LOOKB | FINDT+4 |
| POS | REPOS+4 |
| REPOS | LOOK+3, LOOK+7, LOOK+15, LOOKB+4, LOOKB+8, LOOKB+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| C | POS~, POS+2*, POS+4, POS+6, POS+7, POS+8 |
| >> DDWA | LOOK+3, LOOK+7, LOOK+15, LOOKB+4, LOOKB+8, LOOKB+12, REPOS+2, REPOS+4 |
| DDWBACK | FINDT~, FINDT+3 |
| >> DDWC | LOOK+2, LOOK+20, LOOKB+2, LOOKB+3, LOOKB+21, POS+4* |
| DDWCOD | FIND+1~, FIND+2, FIND+4 |
| DDWF | FIND+1~, LOOK+1~, LOOK+2*, LOOK+3, LOOK+5, LOOK+7*, LOOK+8, LOOK+11, LOOK+16*, LOOK+17 , LOOKB+1~, LOOKB+2*, LOOKB+3*, LOOKB+4, LOOKB+6, LOOKB+8*, LOOKB+9, LOOKB+12, LOOKB+17*, LOOKB+18 |
| >> DDWFIND | NEXT+2, NEXT+3, FIND+2, FINDT+2* |
| >> DDWFIND(1 | NEXT+4, FINDT+4*, FINDT+5! |
| DDWI | LOOK+1~, LOOK+5*, LOOK+6, LOOK+7, LOOK+11*, LOOK+12, LOOK+15, LOOKB+1~, LOOKB+6*, LOOKB+7 , LOOKB+8, LOOKB+12*, LOOKB+13, LOOKB+16 |
| >> DDWL( | LOOK+2, LOOK+6, LOOKB+2, LOOKB+3, LOOKB+7, POS+2, POS+3 |
| >> DDWMARK | FINDT+1, REPOS+1*, REPOS+3 |
| >> DDWMR | LOOK+5, LOOK+15, REPOS+2 |
| >> DDWN | POS+3* |
| >> DDWOFS | REPOS+2, POS+6, POS+7, POS+8 |
| >> DDWRW | LOOK+2, LOOK+3, LOOK+5, LOOK+20, LOOKB+2, LOOKB+3, LOOKB+4, LOOKB+6, LOOKB+21, POS+4* |
| >> DDWSTB | LOOK+11, LOOK+15 |
| DDWT | NEXT+1~, NEXT+3*, NEXT+4, FIND+1~, FIND+2, FIND+3, FIND+4, FINDT~, FINDT+2*, LOOK+2 , LOOK+3, LOOK+6, LOOK+7, LOOK+12, LOOK+15, LOOKB+2, LOOKB+3, LOOKB+4, LOOKB+7, LOOKB+8 , LOOKB+13, LOOKB+16, REPOS~, REPOS+1 |
| DDWX | LOOK+1~, LOOK+6*, LOOK+7, LOOK+12*, LOOK+13, LOOK+15, LOOK+21*, LOOKB+1~, LOOKB+7*, LOOKB+8 , LOOKB+13*, LOOKB+14, LOOKB+16, LOOKB+22*, REPOS~, REPOS+1, REPOS+2, REPOS+4, REPOS+5, POS+1~ , POS+6*, POS+7 |
| DDWY | REPOS~, REPOS+1, REPOS+2, REPOS+4, REPOS+5 |
| >> DX | CUP+1*, POS+8* |
| >> DY | CUP+1*, POS+8* |
| F | POS~, POS+3, POS+4 |
| IOM | REPOS+2, POS+7 |
| >> IOTM | CUP+1, POS+8 |
| >> IOXY | CUP+1, POS+8 |
| R | POS~, POS+2, POS+3, POS+4, POS+8 |
| T | RF~, RF+2, RF+3 |
| U | FIND+4, REPOS+1 |
| X | UC~, UC+1, RF~, RF+2, RF+3, CUP~, CUP+1 |
| Y | RF+1~, RF+3*, RF+4, CUP~, CUP+1 |