XDRMERG0 ;SF-IRMFO.SEA/JLI - START OF NON-INTERACTIVE BATCH MERGE ;04/28/2005 12:11
Source file <XDRMERG0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| QUE | ; This is the entry point for queueing a merge process
|
|
| DQ | ; This is the entry point for actually processing the merge task
; Either as the initial entry or on restart. |
|
| DQTHREAD | ; START POINT FOR EXTRA THREADS
|
|
| RETHREAD | ; RESTART THREADS
|
|
| DQ1 | ; HANDLE MERGE OF SPECIAL FILES
|
|
| SETCOMPL | ; Indicate that a component of the process was completed
|
|
| ADDSPECL(PACKAGE) | ; Add a package identifier to merge process
; if already present, simply return the internal entry number ; (it would be present if re-starting) |
|
| ERR | ; On an error mark status as error, and save the error message
|