PXCOPY ;SLC/PKR - Copy various PCE files. ;05/21/2018
Source file <PXCOPY.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| COPY(FILENUM,IEN) | ;Copy an entry of ROOT into a new entry.
 | 
|
| GETNAM | ||
| EDIT(FILENUM,IEN) | ;Call the appropriate editor.
 | 
|
| GETFOIEN(ROOT) | ;Return the first open IEN in ROOT. This should be called
 | 
|
| INIEH(FILENUM,ROOT,IENN,IEN) | ;Initialize the change log after a copy.
 | 
|
| MERGE(IENN,IEN,ROOT) | ;Use MERGE to copy ROOT(IEN into ROOT(IENN.
 | 
|
| SCAS(FILENUM,IEN,CLASS,SPONSOR) | ;Set the class field to CLASS and the sponsor
 | 
|
| SETSTART(ROOT) | ;Set the starting value to add new entries. Start
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |