I have a purchase order database that prints out purchase orders on paper, by just printing the form screen.  I want to print PDF's that will be created by pressing the command button.

Here is the code for that command:

var vTmp as Int
Var vShell as Int
Var vCOPY as String
AlternateDefaultPrinter("Microsoft Print to PDF")

vCopy = "T:\PURCHASE\PO-"+ P.O.# 
     If (@Mode() = 0) Or (@Mode() = 1)
     {
           // This prints the curent record with default settings.
           // See the documentation for @PrintAForm for other settings you can use.
           vTmp = @PrintAForm(0, 1, 1, 0, 28, -1, -1, -1, -1, 1, 1)
     }

RestoreDefaultPrinter()


What do I need to do so the PDF is save as "T:\PURCHASE\PO-3098" by just pressing the button?

Currently, I need to type it in manually after clicking the button.

Hi Carl,

That worked for what I need it to do. 

Here's the completed programming for the Print to PDF command

var vTmp as Int
Var vMess as String
Var vShell as String
Var vCOPY as String
Var vMacro as String

AlternateDefaultPrinter("Microsoft Print to PDF")

vCopy = "K:\PURCHASE\PO-"+ P.O.# 
SetCopyBuffer(vCopy)
@MsgBox("PRESS"," < Ctrl > + V ", "to generate Invoice# PDF")
     If (@Mode() = 0) Or (@Mode() = 1)
     {
           // This prints the curent record with default settings.
           // See the documentation for @PrintAForm for other settings you can use.
           vTmp = @PrintAForm(0, 1, 1, 0, 28, -1, -1, -1, -1, 1, 1)
     }


RestoreDefaultPrinter()

That way the user can opt to name the file differently if necessary.

Thanks