PdcSerialNumber.Print

Declaration

Print(LayoutName as String) as Boolean

Description

Print a layout for this serial number

Notes

This function prints the provided layout for this serial number.

Code example

Print a serial number layout and show the calculation text.

sub PrintSerialLayout
dim objSerialno
dim objCalc
    set objSerialNo = pdc.ProductRegistration.Serialnumbers.Open("0900001-0001")
    if isValid(objSerialNo) then
       objSerialNo.Print "(SN)Barcode serienummer"
       set objCalc = pdc.OpenCalculation(objSerialNo.CalcNo)
       if isValid(objCalc) then
          Msgbox objCalc.Text
       end if
    end if
    set objSerialNo = nothing
    set objCalc = nothing
end sub

Availability

Available since March 2009 (from version 3.9).