Moving System Software to Disc Sites



DPRG

%externalintegerfn DPRG(%string(31)FILE INDEX, FILE,
      %integer FSYS, %string(6)LABEL, %integer SITE)

 This privileged procedure moves the contents of file FILE belonging to
 file index FILE INDEX on disc-pack FSYS to site SITE on the EMAS 2900
 disc-pack labelled LABEL.

 SITE is an epage number which must be X'40'-aligned.  The physical
 size of the file must not exceed 256 Kbytes (512 Kbytes for sites
 X'380', X'400' and X'480'.


DUNPRG

%externalintegerfn DUNPRG(%string(31)FILE INDEX, FILE,
      %integer FSYS, %string(6)LABEL, %integer SITE)

 This privileged procedure creates a 256 Kbyte file FILE belonging to
 file index FILE INDEX on disc-pack FSYS and copies into it 256 Kbytes
 from site SITE on the EMAS 2900 disc-pack labelled LABEL.  [For sites
 X'380, X'400 and X'480, the size has been extended to 512 Kbytes]