EASXDRPT ;ALB/AEG - DUP PT RELATION REPORT ;7-12-02
Source file <EASXDRPT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RPT | ; Option Entry Point.
|
|
| EN1 | ; Device Handler.
|
|
| START | ;
|
|
| INIT | ; Setup scratch globals and initialize processing.
|
|
| FIND | ; Search for potential dups in file #408.12
|
|
| ACTIVE(REC12) | ; Is relation entry active ?
|
|
| PURGE | ; Purge non-duplicate from temp globals.
|
|
| MORE | ; Purge of non-dups continued.
|
|
| NAME | ; Check names
|
|
| QUIT | ; Cleanup and quit.
|
|
| STOPIT | ;
|
|
| QUEIT | ; Que task
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^DGPR(408.12 - [#408.12] | GET1^DIQ |
| 408.1275 | GET1^DIQ |
| ^DGMT(408.31 - [#408.31] | GET1^DIQ |
| ^DG(408.33 - [#408.33] | GET1^DIQ |