Peoplecode to zip/archive files

Following is a way to archive, compress or zip up files via peoplecode. Alternative would be to use command line calls to products like winzip, 7-zip etc. For this test I am running PT 8.59.x. The same should also be possible in slightly older Peopletools releases too, like PT 8.56.x

Oracle provides java classes that can be used for this task. This method will create a new archive file and add files to the root location of the archive or zip file. 

The solution uses the following three java classes that are delivered with PeopleTools

1. java.io.FileOutputStream

2. java.util.zip.ZipOutputStream

3. java.util.zip.ZipEntry

/* initialize Java Obejct &myArchive */
Local JavaObject &myArchive = CreateJavaObject("java.util.zip.ZipOutputStream", CreateJavaObject("java.io.FileOutputStream", &zipFileName, True));

In the above line of code &zipFileName is the complete path of the archive file that we will create.

&fileNametoAdd - will have the complete path to the file that we will be adding to the archive. 

In order to get the filename value from the file path do the following.

&FilePath = Split(&fileNametoAdd, "\");
&fname = &FilePath [&FilePath.Len];

Local JavaObject &ArchiveEntry = CreateJavaObject("java.util.zip.ZipEntry", &fname);

/* Add Archive entry to OutputStream */

&myArchive.putNextEntry(&ArchiveEntry);

/* now add the file to the archive */

/* Read source file into input stream */

Local JavaObject &in = CreateJavaObject("java.io.FileInputStream", &fileNametoAdd);

/* Java Array that will read bytes from input file */

Local JavaObject &filebuffer = CreateJavaArray("byte[]", 1024);

Local number &byteCount = &in.read(&filebuffer);

   

/* Read bytes from input file and load it byte array  - Do until all bytes are read*/

While &byteCount > 0

      /* Write Bytes of Data to corresponding Archive Output Stream */

      &myArchive.write(&filebuffer, 0, &byteCount);

      &byteCount = &in.read(&filebuffer);

End-While;

   

/* Close input stream */

&in.close();

/* Close archive */

&myArchive.close();