acrobat 0.1.0 → 0.3.0

data/samples_other/form.vb

@@ -0,0 +1,393 @@
+Option Strict Off
+Option Explicit On
+Friend Class FormsAutomation
+	Inherits System.Windows.Forms.Form
+#Region "Windows Form Designer generated code "
+	Public Sub New()
+		MyBase.New()
+		If m_vb6FormDefInstance Is Nothing Then
+			If m_InitializingDefInstance Then
+				m_vb6FormDefInstance = Me
+			Else
+				Try 
+					'For the start-up form, the first instance created is the default instance.
+					If System.Reflection.Assembly.GetExecutingAssembly.EntryPoint.DeclaringType Is Me.GetType Then
+						m_vb6FormDefInstance = Me
+					End If
+				Catch
+				End Try
+			End If
+		End If
+		'This call is required by the Windows Form Designer.
+		InitializeComponent()
+	End Sub
+	'Form overrides dispose to clean up the component list.
+	Protected Overloads Overrides Sub Dispose(ByVal Disposing As Boolean)
+		If Disposing Then
+			If Not components Is Nothing Then
+				components.Dispose()
+			End If
+		End If
+		MyBase.Dispose(Disposing)
+	End Sub
+	'Required by the Windows Form Designer
+	Private components As System.ComponentModel.IContainer
+	Public ToolTip1 As System.Windows.Forms.ToolTip
+	Public WithEvents ExitButton As System.Windows.Forms.Button
+	Public WithEvents StatusBox As System.Windows.Forms.TextBox
+	Public WithEvents CreateFieldsButton As System.Windows.Forms.Button
+	Public WithEvents StatusLabel As System.Windows.Forms.Label
+	'NOTE: The following procedure is required by the Windows Form Designer
+	'It can be modified using the Windows Form Designer.
+	'Do not modify it using the code editor.
+	<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container
+        Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
+        Me.ExitButton = New System.Windows.Forms.Button
+        Me.StatusBox = New System.Windows.Forms.TextBox
+        Me.CreateFieldsButton = New System.Windows.Forms.Button
+        Me.StatusLabel = New System.Windows.Forms.Label
+        Me.SuspendLayout()
+        '
+        'ExitButton
+        '
+        Me.ExitButton.BackColor = System.Drawing.SystemColors.Control
+        Me.ExitButton.Cursor = System.Windows.Forms.Cursors.Default
+        Me.ExitButton.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ExitButton.ForeColor = System.Drawing.SystemColors.ControlText
+        Me.ExitButton.Location = New System.Drawing.Point(152, 15)
+        Me.ExitButton.Name = "ExitButton"
+        Me.ExitButton.RightToLeft = System.Windows.Forms.RightToLeft.No
+        Me.ExitButton.Size = New System.Drawing.Size(113, 25)
+        Me.ExitButton.TabIndex = 3
+        Me.ExitButton.Text = "Exit"
+        Me.ExitButton.UseVisualStyleBackColor = False
+        '
+        'StatusBox
+        '
+        Me.StatusBox.AcceptsReturn = True
+        Me.StatusBox.BackColor = System.Drawing.SystemColors.ButtonFace
+        Me.StatusBox.Cursor = System.Windows.Forms.Cursors.IBeam
+        Me.StatusBox.Enabled = False
+        Me.StatusBox.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.StatusBox.ForeColor = System.Drawing.SystemColors.WindowText
+        Me.StatusBox.Location = New System.Drawing.Point(64, 56)
+        Me.StatusBox.MaxLength = 0
+        Me.StatusBox.Name = "StatusBox"
+        Me.StatusBox.ReadOnly = True
+        Me.StatusBox.RightToLeft = System.Windows.Forms.RightToLeft.No
+        Me.StatusBox.Size = New System.Drawing.Size(200, 19)
+        Me.StatusBox.TabIndex = 1
+        '
+        'CreateFieldsButton
+        '
+        Me.CreateFieldsButton.BackColor = System.Drawing.SystemColors.Control
+        Me.CreateFieldsButton.Cursor = System.Windows.Forms.Cursors.Default
+        Me.CreateFieldsButton.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.CreateFieldsButton.ForeColor = System.Drawing.SystemColors.ControlText
+        Me.CreateFieldsButton.Location = New System.Drawing.Point(16, 15)
+        Me.CreateFieldsButton.Name = "CreateFieldsButton"
+        Me.CreateFieldsButton.RightToLeft = System.Windows.Forms.RightToLeft.No
+        Me.CreateFieldsButton.Size = New System.Drawing.Size(113, 25)
+        Me.CreateFieldsButton.TabIndex = 0
+        Me.CreateFieldsButton.Text = "Create Fields"
+        Me.CreateFieldsButton.UseVisualStyleBackColor = False
+        '
+        'StatusLabel
+        '
+        Me.StatusLabel.BackColor = System.Drawing.SystemColors.Control
+        Me.StatusLabel.Cursor = System.Windows.Forms.Cursors.Default
+        Me.StatusLabel.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.StatusLabel.ForeColor = System.Drawing.SystemColors.ControlText
+        Me.StatusLabel.Location = New System.Drawing.Point(16, 58)
+        Me.StatusLabel.Name = "StatusLabel"
+        Me.StatusLabel.RightToLeft = System.Windows.Forms.RightToLeft.No
+        Me.StatusLabel.Size = New System.Drawing.Size(40, 17)
+        Me.StatusLabel.TabIndex = 2
+        Me.StatusLabel.Text = "Status:"
+        '
+        'FormsAutomation
+        '
+        Me.AcceptButton = Me.ExitButton
+        Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
+        Me.BackColor = System.Drawing.SystemColors.Control
+        Me.ClientSize = New System.Drawing.Size(281, 89)
+        Me.Controls.Add(Me.ExitButton)
+        Me.Controls.Add(Me.StatusBox)
+        Me.Controls.Add(Me.CreateFieldsButton)
+        Me.Controls.Add(Me.StatusLabel)
+        Me.Cursor = System.Windows.Forms.Cursors.Default
+        Me.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Location = New System.Drawing.Point(11, 30)
+        Me.MaximizeBox = False
+        Me.Name = "FormsAutomation"
+        Me.RightToLeft = System.Windows.Forms.RightToLeft.No
+        Me.Text = "Acrobat Forms Automation Demo"
+        Me.ResumeLayout(False)
+
+    End Sub
+#End Region 
+#Region "Upgrade Support "
+	Private Shared m_vb6FormDefInstance As FormsAutomation
+	Private Shared m_InitializingDefInstance As Boolean
+	Public Shared Property DefInstance() As FormsAutomation
+		Get
+			If m_vb6FormDefInstance Is Nothing OrElse m_vb6FormDefInstance.IsDisposed Then
+				m_InitializingDefInstance = True
+				m_vb6FormDefInstance = New FormsAutomation()
+				m_InitializingDefInstance = False
+			End If
+			DefInstance = m_vb6FormDefInstance
+		End Get
+		Set
+			m_vb6FormDefInstance = Value
+		End Set
+	End Property
+#End Region 
+	
+	' ADOBE SYSTEMS INCORPORATED
+	' Copyright (C) 1994-2003 Adobe Systems Incorporated
+	' All rights reserved.
+	'
+	' NOTICE: Adobe permits you to use, modify, and distribute this file
+	' in accordance with the terms of the Adobe license agreement
+	' accompanying it. If you have received this file from a source other
+	' than Adobe, then your use, modification, or distribution of it
+	' requires the prior written permission of Adobe.
+	'
+	' -------------------------------------------------------------------
+	'
+	' FormsAutomation.vbp
+	'
+	' - The application shows how to add Text boxes, combo boxes, radio
+	'   buttons and action buttons to a PDF. In this case, the PDF is
+	'   empty and we are adding form fields to it.
+	'
+	' - To run the sample:
+	'
+	'   Run the sample and click on the Create Fields button. The
+    '   sample will open the IAC\TestFiles\FormsAutomation.pdf file 
+    '   in Acrobat and add form fields to it.
+	
+	
+	Dim formApp As AFORMAUTLib.AFormApp
+	Dim acroForm As AFORMAUTLib.Fields
+	Dim field As AFORMAUTLib.Field
+	Dim bOK As Boolean
+	Dim avDoc As Acrobat.CAcroAVDoc
+	Dim pdDoc As Acrobat.CAcroPDDoc
+	Dim radiobuttonArray(5) As String
+	
+	Private Sub CreateFieldsButton_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles CreateFieldsButton.Click
+		
+		'Set the mouse icon to display an hourglass
+		System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.WaitCursor
+		
+		'Disable the create fields button
+		CreateFieldsButton.Enabled = False
+		
+		'Update the status box
+		StatusBox.Text = "Opening PDF Document..."
+		
+		' Open the sample PDF file
+        avDoc = CreateObject("AcroExch.AVDoc")
+        Dim file As String = System.Windows.Forms.Application.StartupPath & "\..\..\..\..\TestFiles\FormsAutomation.pdf"
+
+        bOK = avDoc.Open(file, "Forms Automation Demo")
+		
+		'If everything was OK opening the PDF, we now instantiate the Forms
+		'Automation object.
+		If (bOK) Then
+			formApp = CreateObject("AFormAut.App")
+			acroForm = formApp.Fields
+        Else
+            System.Runtime.InteropServices.Marshal.ReleaseComObject(avDoc)
+            avDoc = Nothing
+            MsgBox("Failed to open PDF Document. Aborting...")
+            End
+        End If
+
+        'Update the status box
+        StatusBox.Text = "Creating Form Fields..."
+
+        'Add a Text Field to the PDF
+        ' Fields.Add takes seven parameters:
+        '   FieldName is the The fully-qualified name of the field.
+        '   FieldType is the field type for the newly created field. Valid types are:
+        '             "text", "button", "combobox", "listbox", "checkbox", "radiobutton".
+        '              You must spell the field type names exactly as shown, including
+        '              use the quotation marks.
+        '   PageNum   is the zero-based page number to add the field to.
+        '   Left      A float for the left most position of the rectangle placement.
+        '   Top       A float for the top of the rectangle placement.
+        '   Right     A float for the right most position of the rectangle placement.
+        '   Bottom    A float for the bottom of the rectangle placement.
+        field = acroForm.Add("Name", "text", 0, 100, 650, 450, 675)
+
+        'Next use Field.SetBorderColor to set the color of the fields borders in
+        'Gray scale, Transparent, RGB or CMYK color. All values are floating point numbers
+        'between 0 and 1. In the example below, we are using RGB color space. So the last
+        'parameter is set to "0"
+        field.SetBorderColor("RGB", 0.7, 0.5, 0.3, 0)
+
+        'Field.TextSize sets the font size of the field. You can also use Field.TextFont
+        'to use a specific font. See the Acrobat Forms API Reference for more information
+        'on various font names.
+        field.TextSize = CShort("12")
+        'field.TextFont = "Times-Roman"
+
+        'You can use Field.DefaultValue to set the default value of a field.
+        field.DefaultValue = "Enter your full name here"
+
+        'Create a date field formatted to be "mm/dd/yyyy". The SetJavaScriptAction
+        'method sets the keystoke and format properties to the proper date format
+        'using JavaScript
+        field = acroForm.Add("Creation Date", "text", 0, 375, 680, 450, 715)
+        field.SetBorderColor("RGB", 0.7, 0.5, 0.3, 0)
+        field.TextSize = CShort("12")
+        field.DefaultValue = "01/01/2000"
+        field.SetJavaScriptAction("keystroke", "AFDate_KeystrokeEx(""mm/dd/yyyy"");")
+        field.SetJavaScriptAction("format", "AFDate_FormatEx(""mm/dd/yyyy"");")
+
+        'Now add a few more fields for address, city, state, zip code. The zip code
+        'field introduces a new functionality - using JavaScript to format the
+        'field values.
+        field = acroForm.Add("Address", "text", 0, 100, 620, 450, 645)
+        field.SetBorderColor("RGB", 0.7, 0.5, 0.3, 0)
+        field.TextSize = CShort("12")
+        field.DefaultValue = "Enter your address here"
+
+        field = acroForm.Add("City", "text", 0, 100, 590, 345, 615)
+        field.SetBorderColor("RGB", 0.7, 0.5, 0.3, 0)
+        field.TextSize = CShort("12")
+        field.DefaultValue = "Enter your City"
+
+        field = acroForm.Add("State", "text", 0, 350, 590, 375, 615)
+        field.SetBorderColor("RGB", 0.7, 0.5, 0.3, 0)
+        field.TextSize = CShort("12")
+        field.DefaultValue = "CA"
+
+        field = acroForm.Add("Zip", "text", 0, 385, 590, 450, 615)
+        field.SetBorderColor("RGB", 0.7, 0.5, 0.3, 0)
+        field.TextSize = CShort("12")
+        field.DefaultValue = "99999"
+        field.SetJavaScriptAction("keystroke", "AFSpecial_Keystroke(0);")
+        field.SetJavaScriptAction("format", "AFSpecial_Format(0);")
+
+        'To create a series of radio buttons. Create the field, then call
+        'Fields.Add again to create the children
+        field = acroForm.Add("Radio", "radiobutton", 0, 150, 500, 165, 515)
+        field.SetBorderColor("RGB", 0.75, 0.55, 0.35, 0)
+
+        field = acroForm.Add("Radio", "radiobutton", 0, 180, 500, 195, 515)
+        field.SetBorderColor("RGB", 0.75, 0.55, 0.35, 0)
+
+        field = acroForm.Add("Radio", "radiobutton", 0, 210, 500, 225, 515)
+        field.SetBorderColor("RGB", 0.75, 0.55, 0.35, 0)
+
+        field = acroForm.Add("Radio", "radiobutton", 0, 240, 500, 255, 515)
+        field.SetBorderColor("RGB", 0.75, 0.55, 0.35, 0)
+
+        field = acroForm.Add("Radio", "radiobutton", 0, 270, 500, 285, 515)
+        field.SetBorderColor("RGB", 0.75, 0.55, 0.35, 0)
+
+        'Build an array then call SetExportValues
+        radiobuttonArray(0) = "Red"
+        radiobuttonArray(1) = "Green"
+        radiobuttonArray(2) = "Blue"
+        radiobuttonArray(3) = "Yellow"
+        radiobuttonArray(4) = "Black"
+        radiobuttonArray(5) = "White"
+        field.SetExportValues(radiobuttonArray)
+
+        'Create a list box. This section of code will create a list box on the
+        'PDF and populate the list box with items.
+        field = acroForm.Add("My Combo Box", "combobox", 0, 100, 450, 380, 475)
+        field.SetBorderColor("RGB", 0.75, 0.55, 0.35, 0)
+        field.TextSize = CShort("12")
+
+        'Now that the list box is complete, let's build two arrays that
+        'will be used to populate the list box.
+        'First is an array of items that will be displayed to the user
+        Dim arrayOfItems(4) As String
+        arrayOfItems(0) = "[Choose an item from the list]"
+        arrayOfItems(1) = "Bird"
+        arrayOfItems(2) = "Cat"
+        arrayOfItems(3) = "Dog"
+        arrayOfItems(4) = "Gold Fish"
+
+        'Then the exported value that will come back in the FDF
+        Dim arrayOfExportValues(4) As String
+        arrayOfExportValues(0) = "X"
+        arrayOfExportValues(1) = "a"
+        arrayOfExportValues(2) = "b"
+        arrayOfExportValues(3) = "c"
+        arrayOfExportValues(4) = "d"
+
+        'Next, use the PopulateListOrComboBox method to add values into the
+        'combo box
+        field.PopulateListOrComboBox(arrayOfItems, arrayOfExportValues)
+
+        'Now, create a new submit button for the user to click on. Set the border
+        'style, the button caption, the color of the background. Field.Highlight sets
+        'the property of the button to look like it was pushed in.
+        field = acroForm.Add("Submit Button", "button", 0, 100, 50, 150, 100)
+        field.BorderStyle = "beveled"
+        field.SetButtonCaption("N", "Submit")
+        field.SetBackgroundColor("G", 0.85, 0.85, 0, 0)
+        field.Highlight = "push"
+
+        'Set the SubmitForm action to point to a web server.
+        field.SetSubmitFormAction("up", "http://your-webserver.com/cgi-bin/myscript", 0)
+
+        'Create a reset button just in case users want to change there minds a
+        'reset all the fields on the newly created PDF.
+        field = acroForm.Add("Reset Button", "button", 0, 175, 50, 225, 100)
+        field.BorderStyle = "beveled"
+        field.SetButtonCaption("N", "Reset")
+        field.SetBackgroundColor("G", 0.85, 0.85, 0, 0)
+        field.Highlight = "push"
+        'Set the ResetForm action for the button.
+        field.SetResetFormAction("up", 0)
+
+        'Update the Status box.
+        StatusBox.Text = "Fields have been added successfully."
+
+        'This section converts a AVDoc to a PDDoc. Then we use PDDoc.Save to
+        'save the PDF since there isn't a viewer level method to save an AVDoc.
+
+        'These lines are commented out to provide user feedback
+        'If present, no doc is visible and original form is changed
+        'so it isn't obvious what the sample did, and it doesn't work
+        'twice in a row.
+        'It's best to have Acrobat open and visible to see form creation
+        '''''''''
+        'Set pdDoc = avDoc.GetPDDoc
+        'bOK = pdDoc.Save(1, "C:\FormsAutomation.pdf")
+        'If bOK = False Then
+        'MsgBox "Unable to Save the PDF file"
+        'End If
+
+        ' Close the AVDoc
+        'avDoc.Close (False)
+        '''''''''
+        'End provide User Feedback
+
+CleanUp:
+        'Change the mouse pointer to display normal cursor and enable the Exit button
+        System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.Default
+
+        'Enable the create fields button
+        CreateFieldsButton.Enabled = True
+	End Sub
+	
+	Private Sub ExitButton_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles ExitButton.Click
+		' End the program
+		End
+		
+	End Sub
+
+    Private Sub FormsAutomation_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
+        StatusBox.Text = "Click Create Fields Button..."
+    End Sub
+End Class

data/sig/generated/acrobat/app.rbs

@@ -0,0 +1,94 @@
+# Generated from lib/acrobat/app.rb with RBS::Inline
+
+module Acrobat
+  class FileNotFound < StandardError
+    def initialize: (untyped path) -> untyped
+  end
+end
+
+module FileSystemObject
+  def self.instance: () -> untyped
+
+  def self.windows_path: (untyped path) -> untyped
+end
+
+module ACRO
+end
+
+module Acrobat
+  class App
+    # [WIN32_OLE] ole_obj
+    attr_reader ole_obj: untyped
+
+    def initialize: () -> untyped
+
+    def self.close: (untyped path) -> untyped
+
+    # Runs the adobe app and quits at the end
+    # @example
+    #   Acrobat::App.run do |app|
+    #     doc = app.open('doc.pdf')
+    #     doc.fill_form( city: 'City', state: 'ST')
+    #     doc.save_as('filled.pdf')
+    #   end
+    #
+    # @rbs return Void
+    def self.run: () -> Void
+
+    def self.replace_pages: (untyped pdf_file, untyped replacement, output_name: untyped, **untyped opts) -> untyped
+
+    # Fills the form with updates in a hash
+    # @example
+    #    Acrobat::App.fill_form(myform.pdf, output_name: 'filled.pdf
+    #                                 , update_hash: { name: 'dom', filled_date: 1/20/2013
+    # @rbs pdf_form: String -- the String path of a fillable pdf file
+    # @rbs output_name: String -- the name of the saved filled pdf file
+    # @rbs update_hash: Hash -- the hash with updates
+    def self.fill_form: (String pdf_form, output_name: String, update_hash: Hash) -> untyped
+
+    # @rbs return Array[AvDoc]
+    # @rbs &: (AvDoc) -> Void
+    def avdocs: () { (AvDoc) -> Void } -> Array[AvDoc]
+
+    # show the Adobe Acrobat application
+    def show: () -> untyped
+
+    # hide the Adobe Acrobat application
+    def hide: () -> untyped
+
+    # Finds the pdfs in a dir
+    # @rbs dir: String -- the directory to find pdfs in
+    # @rbs return Array[Pathname] -- of pdf files
+    def find_pdfs_in_dir: (String dir) -> Array[Pathname]
+
+    def merge_pdfs: (*untyped pdfs) -> untyped
+
+    # merges the pdfs in directory
+    # @rbs dir: String -- the path of the directory
+    # @rbs name: String | Nil -- the name of the returned pdf file
+    #    if the name is nil, the name is "merged.pdf"
+    # @rbs output_dir: String | Nil -- the name of the output dir
+    #    if the output_dir is nil, the output dir is the dir param
+    # return [Boolean] if the merge was successful or not
+    def merge_pdfs_in_dir: (String dir, ?name: String | Nil, ?output_dir: String | Nil) -> untyped
+
+    # quit the Adobe App.
+    #   closes the open adobe documents and quits the program
+    # @rbs return nil
+    def quit: () -> nil
+
+    attr_reader docs: untyped
+
+    # open the file.
+    # @rbs file: String | Pathname -- #to_path
+    # @rbs &: (PDoc) -> Nil
+    # @rbs return PDoc -- the open file as a Pdoc instance
+    def open: (String | Pathname file) { (PDoc) -> Nil } -> PDoc
+
+    def form: () -> untyped
+
+    private
+
+    def load_constants: (untyped ole_obj) -> untyped
+  end
+end

data/sig/generated/acrobat/avdoc.rbs

@@ -0,0 +1,15 @@
+# Generated from lib/acrobat/avdoc.rb with RBS::Inline
+
+module Acrobat
+  class AvDoc
+    attr_reader ole_obj: WIN32OLE
+
+    attr_reader pdoc_name: String
+
+    def initialize: (untyped ole) -> untyped
+
+    # Close the AvDoc
+    # @rbs save: Boolean -- if true asks to save if false closes without saving
+    def close: (?Boolean save) -> untyped
+  end
+end

data/sig/generated/acrobat/jso.rbs

@@ -0,0 +1,37 @@
+# Generated from lib/acrobat/jso.rb with RBS::Inline
+
+module Acrobat
+  class Jso
+    attr_reader doc: untyped
+
+    attr_reader ole_obj: untyped
+
+    def initialize: (untyped doc, untyped ole) -> untyped
+
+    def find_field: (untyped name_or_number) -> untyped
+
+    def ole_get_field: (untyped field) -> untyped
+
+    def console: () -> untyped
+
+    def show_console: () -> untyped
+
+    def field_names: () -> untyped
+
+    def export_as_fdf: (untyped name) -> untyped
+
+    def import_fdf: (untyped path) -> untyped
+
+    def fields_hash: () -> untyped
+
+    def set_field: (untyped name, untyped value) -> untyped
+
+    def get_field: (untyped name) -> untyped
+
+    def field_count: () -> untyped
+
+    def clear_form: () -> untyped
+
+    def fill_form: (untyped hash) -> untyped
+  end
+end

data/sig/generated/acrobat/pdoc.rbs

@@ -0,0 +1,63 @@
+# Generated from lib/acrobat/pdoc.rb with RBS::Inline
+
+module Acrobat
+  class PDoc
+    attr_reader ole_obj: untyped
+
+    attr_reader path: Path | Nil
+
+    def self.from_path: (untyped path) -> untyped
+
+    def initialize: (untyped ole, ?untyped path) -> untyped
+
+    def show: (?untyped name) -> untyped
+
+    # @rbs return Fixnum -- the number of pages in the pdf
+    def page_count: () -> Fixnum
+
+    def last_page: () -> untyped
+
+    # merges the doc to the
+    #   @rbs doc: PDoc|String|Pathname --  an open PDoc to merge or filename
+    # @rbs return Boolean -- whether the doc was merged correctly
+    def merge: (PDoc | String | Pathname doc) -> Boolean
+
+    # opens and/or returns PDoc
+    #   @rbs doc: String|Pathname|Pdoc  -- the String path of a pdf file
+    def open_ole_pdoc: (String | Pathname | Pdoc doc) -> untyped
+
+    def fill_and_save: (untyped results, ?name: untyped, ?dir: untyped) -> untyped
+
+    def prepend_pages: (src_path: untyped, ?src_page_start: untyped, ?src_page_end: untyped) -> untyped
+
+    # returns [Pathname] of d
+    #   @rbs dir: [String, Nil] the String path
+    # @rbs return dir [Pathname] Pathname of dir or of working directory
+    def default_dir: ([ String, Nil ] dir) -> dir[Pathname]
+
+    def save_as: (untyped name, ?dir: untyped) -> untyped
+
+    def name: () -> untyped
+
+    def close: () -> untyped
+
+    def replace_pages: (untyped doc, ?start: untyped, ?replace_start: untyped, ?num_of_pages: untyped, ?merge_annotations: untyped) -> untyped
+
+    # return the instance of JSO object
+    # @rbs return [Jso] a WIN32OLE wrapped Jso object 'javascript object'
+    def jso: () -> [ Jso ]
+
+    # return the field_names of the pdf form
+    def field_names: () -> untyped
+
+    def fill_form: (untyped results) -> untyped
+
+    def ole_insert_pages: (untyped merge_doc, ?self_start_page: untyped, ?merge_doc_page_start: untyped, ?number_pages: untyped, ?bookmarks: untyped) -> untyped
+
+    def ole_replace_pages: (untyped merge_doc, ?self_start_page: untyped, ?merge_doc_page_start: untyped, ?number_pages: untyped, ?bookmarks: untyped) -> untyped
+
+    def insert_pages: (src: untyped, ?insert_after: untyped, ?src_page_start: untyped, ?src_page_end: untyped) -> untyped
+
+    def merge_pdoc: (untyped doc, **untyped options) -> untyped
+  end
+end

data/sig/generated/acrobat/version.rbs

@@ -0,0 +1,5 @@
+# Generated from lib/acrobat/version.rb with RBS::Inline
+
+module Acrobat
+  VERSION: ::String
+end

data/sig/generated/acrobat.rbs

@@ -0,0 +1,6 @@
+# Generated from lib/acrobat.rb with RBS::Inline
+
+module Acrobat
+  class Error < StandardError
+  end
+end

data/sig/prototype/lib/acrobat/app.rbs

@@ -0,0 +1,3 @@
+module FileSystemObject
+  self.@instance: untyped
+end

data/sig/prototype/lib/acrobat/jso.rbs

@@ -0,0 +1,5 @@
+module Acrobat
+  class Jso
+    @console: untyped
+  end
+end

data/sig/prototype/lib/acrobat/pdoc.rbs

@@ -0,0 +1,5 @@
+module Acrobat
+  class PDoc
+    @jso: untyped
+  end
+end

data/vba/overlay.vba

@@ -0,0 +1,40 @@
+Private Function ApplyBackgroundToPDF(BasePDF As String, BackgroundPDF As String)
+    Dim pdDoc As Acrobat.CAcroPDDoc
+    Dim pdTemplate As Acrobat.CAcroPDDoc
+    Dim template As Variant
+    Dim lngPage As Long
+    
+    'Open base document
+        Set pdDoc = CreateObject("AcroExch.PDDoc")
+        pdDoc.Open BasePDF
+        DoEvents
+    
+    'Open background document
+        Set pdTemplate = CreateObject("AcroExch.PDDoc")
+        pdTemplate.Open BackgroundPDF
+        DoEvents
+    
+    'Add background document to base document
+        pdDoc.InsertPages pdDoc.GetNumPages - 1, pdTemplate, 0, 1, 0
+    
+    'Create a template from the inserted background document
+        Set template = pdDoc.GetJSObject.CreateTemplate("background", pdDoc.GetNumPages - 1)
+    
+    'Place the template as a background to all pages
+        For lngPage = 0 To pdDoc.GetNumPages - 2
+            template.Spawn lngPage, True, True
+        Next
+    
+    'Delete last page (used for template creation purposes only)
+        pdDoc.DeletePages pdDoc.GetNumPages - 1, pdDoc.GetNumPages - 1
+    
+    'Save
+        pdDoc.Save 1, BasePDF
+    
+    'Close & Destroy Objects
+        pdDoc.Close
+        Set pdDoc = Nothing
+        
+        pdTemplate.Close
+        Set pdTemplate = Nothing
+End Function