PdcPurchaseInvoices.Open: Difference between revisions

From External Bemet Wiki
Jump to navigation Jump to search
No edit summary
No edit summary
 
(2 intermediate revisions by the same user not shown)
Line 1: Line 1:
== Declaration ==
== Declaration ==
Open(ID as string) as [[PdcPurchaseInvoiceHeader]]
Open(BookNo as string) as [[PdcPurchaseInvoiceHeader]]


== Description ==
== Description ==
Line 6: Line 6:


== Notes ==
== Notes ==
ID = the invoice number to open in an object (PIH_BOOKNUMBER).
BookNo = the invoice number to open in an object (PIH_BOOKNUMBER).


== Code example ==
== Code example ==
Line 17: Line 17:
     objPI.InvoiceNo = "12345"
     objPI.InvoiceNo = "12345"
     objPI.InvoiceDate = Date - 2
     objPI.InvoiceDate = Date - 2
     objPI.save
     if not objPI.Save then
      msgbox objPI.ErrorMessages
    end if
   else
   else
     msgbox "The invoice number is not found in PdC."
     msgbox "The invoice number is not found in PdC."

Latest revision as of 10:27, 19 August 2015

Declaration

Open(BookNo as string) as PdcPurchaseInvoiceHeader

Description

Returns an opened purchase invoice object of the supplied number.

Notes

BookNo = the invoice number to open in an object (PIH_BOOKNUMBER).

Code example

The following code example opens an existing purchase invoice, changes the invoice number, invoice date and saves the purchase invoice.

dim objPI

  set objPI = Pdc.logistics.PurchaseInvoices.Open("00027")
  if IsValid(objPI) then
    objPI.InvoiceNo = "12345"
    objPI.InvoiceDate = Date - 2
    if not objPI.Save then
      msgbox objPI.ErrorMessages
    end if
  else
    msgbox "The invoice number is not found in PdC."
  end if

Availability

Available since April 2014 (Version 4.3 onwards)