ATSERCHA ; TUCSON/DG;DISPLAY RESULT OF COMPARISON VALUES [ 10/25/91 3:20 PM ]
Source file <ATSERCHA.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ;GET VALUES OUT OF ^UTILITY("ATSEARCH",$J,"MERGED",3
|
|
| PTRFILE | ;DISPLAYS .01 FIELD ONLY FROM POINTER FILE IF MERGED RESULTS
|
|
| EOJ | ;
|
|
| DISPLAY | ;
|
|
| NOTPTRFL | ;DISPLAYS .01 FIELD AND COMMON FIELD VALUE FROM NOT
|
| Name | Field # of Occurrence |
|---|---|
| EN^DIQ1 | PTRFILE+2, NOTPTRFL+4 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZIS("C" | START+3 |
| ^DIC - [#1] | PTRFILE+4, NOTPTRFL+6 |
| ^UTILITY("ATSEARCH" | START+1 |
| ^UTILITY("DIQ1" | PTRFILE+3, PTRFILE+5!, NOTPTRFL+5, NOTPTRFL+6, NOTPTRFL+7! |
| Name | Line Occurrences |
|---|---|
| @( | START+1 |
| DISPLAY | ATSERCHA+3 |
| EOJ | ATSERCHA+5 |
| START | ATSERCHA+4 |
| Name | Field # of Occurrence |
|---|---|
| ^( | PTRFILE+3, NOTPTRFL+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ATSEARCH("FILELINK" | START+1, PTRFILE+2, PTRFILE+3, PTRFILE+4, PTRFILE+5, NOTPTRFL+2, NOTPTRFL+4, NOTPTRFL+5, NOTPTRFL+6, NOTPTRFL+7 |
| >> ATSEARCH("PTRFILENUM" | START+1 |
| >> ATSEARCH(1 | NOTPTRFL+2 |
| >> ATSEARCH(2 | NOTPTRFL+3 |
| ATSECMPT | START+1*, PTRFILE+2, NOTPTRFL+4, EOJ+1! |
| ATSEVLU | NOTPTRFL+5*, EOJ+1! |
| >> DA | PTRFILE+2*, PTRFILE+3, PTRFILE+4, PTRFILE+5, NOTPTRFL+4*, NOTPTRFL+5, NOTPTRFL+6, NOTPTRFL+7 |
| >> DIC | PTRFILE+2*, NOTPTRFL+4* |
| >> DR | PTRFILE+2*, NOTPTRFL+2*, NOTPTRFL+3*, NOTPTRFL+5 |
| DTIME | START+2 |
| IO | DISPLAY+2, START+2, START+3 |
| IO(0 | START+2, START+3 |
| IOF | DISPLAY+1 |
| >> L | START+1* |
| U | PTRFILE+4, NOTPTRFL+6 |
| >> X | START+2* |