added sysprog entities

SYSPROG/STPROC/RTI_VSPRINTER_CUTEPDF.txt

@@ -0,0 +1,48 @@
+subroutine RTI_VSPRINTER_CUTEPDF(pdfPrinterName, pdfOutputName, destFilePath, bDoCopy, bPostGeneration)
+/* --------------------------------------------------------------------------
+
+
+     PURPOSE    : Sample "helper" routine to generate PDF Output from OIPI "Classic" in 10.0.x using CutePDF Writer
+
+     AUTHOR     : Bryan Shumsky
+
+     CREATED    : September 23, 2020
+
+     REVISION HISTORY           (Most CURRENT first) :
+
+     DATE        IMPLEMENTOR     FUNCTION
+     --------    -----------     ------------------------------------------------------------------------------------------------
+     MM-DD-YY    initials        Modification
+     11-19-20    bzs             Allow for "post generation" flag
+     
+     
+-------------------------------------------------------------------------- */
+* CutePDF (v4.0+) allows you to specify a location for PDF output
+* HKEY_CURRENT_USER\Software\CutePDF Writer\
+* BypassSaveAs (string value): 0=no/1=yes
+* OutputFile (string value): full path and file name
+* bPostGeneration (string value): 0=no (pre)/1=yes (post)
+
+If Assigned(bPostGeneration) Else bPostGeneration = ""
+
+Declare Function REGISTRY_METHOD
+
+Begin Case
+     Case bPostGeneration = "1"
+          * PDF generation should be complete - do we need to do anything?
+          * Delay for a few seconds so it can "wrap up" processing
+          call delay(2)
+          
+     Case 1
+          * called before PDF generation has happened 
+          * set us up for processing
+          rslt = registry_method("WRITE", "HKEY_CURRENT_USER\Software\CutePDF Writer\BypassSaveAs", "1")
+          rslt = registry_method("WRITE", "HKEY_CURRENT_USER\Software\CutePDF Writer\OutputFile", destFilePath)
+
+          * set bDoCopy to 1 if we want OIPI to copy from pdfOutputName to destFilePath
+          * set bDoCopy to 0 if our helper program means no copy is necessary
+
+          bDoCopy = 0
+End Case
+
+Return 0