ISService.DefaultDeliveryTime

Description

The default delivery time of the service.

Syntax

object.DefaultDeliveryTime

Part Attribute Type Description
object Required
The object always implements the ISService interface

Return Value

int

Example

Display the number of the services loaded on the basis of the selected filter and some information about them, including the default delivery time of the services.

Dim aFilter
Dim aService
Dim aServices
Dim aMessage
Dim i

Set aFilter = Profile.CreateServicesFilter
aFilter.Description = "Injection"
set aServices = Profile.LoadServicesByFilter(aFilter)

aMessage = "Services Count = " & aServices.Count & vbNewLine
for i = 0 to aServices.Count - 1
  set aService = aServices.Item(i)
  aMessage = aMessage & vbNewLine & "----------------------------" & vbNewLine &_
    "Description: " & aService.Description & vbNewLine &_
    "Code: " & aService.Code & vbNewLine &_
    "Added: " & aService.Added & vbNewLine &_
    "Changed: " & aService.Changed & vbNewLine &_
    "Status: " & aService.Status & vbNewLine &_
    "ID: " & aService.ID & vbNewLine &_
    "Output Code: " & aService.OutputCode & vbNewLine &_
    "Default Delivery Time: " & aService.DefaultDeliveryTime 
next      

Profile.MsgBox(aMessage)       
Note:

In Profile Client v8 on User Interface Default Delivery Time can be found in Maintain > Services > Edit the selected service > Delivery > Default Delivery time.

Version information

Added in v8.1.0