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* |