PdcApplication.GetEmptyStringsList

Declaration

GetEmptyStringsList as IStrings

Description

Returns an empty stringlist

Notes

This method returns an empty string list. Only this stringlist can be used for example for the method PdcApplication.GiveInProduction.

Code example

The code below creates an empty stringlist.

dim strlstCalcNumbers
dim intCnt

  Set strlstCalcNumbers = pdc.GetEmptyStringsList
  strlstCalcNumbers.Add "CalcNo1"
  strlstCalcNumbers.Add "CalcNo2"
  for intCnt = 0 to strlstCalcNumbers.Count - 1
    msgbox strlstCalcNumbers(intCnt)
  next
  Set strlstCalcNumbers = nothing

dim strlstCalcNumbers
 
  set strlstCalcNumbers = pdc.GetEmptyStringsList
  strlstCalcNumbers.Add "0801-000035"
  strlstCalcNumbers.Add "0801-000087"
 
  if pdc.GiveInProduction(strlstCalcNumbers, "", 0, False, False, False) then
    msgbox "in productie geven gelukt"
  else
    msgbox pdc.LastError
  end if

Availability

Available since June 2006 (From version 3.7).