ISServicePrice.IsBulkBiller

Description

Returns True if the service is bulk biller.

Syntax

object.IsBulkBiller

Part	Attribute	Type	Description
`object`	Required	ISServicePrice	The `object` always implements the ISServicePrice interface

Restriction: This property is readonly.

Return Value

bool

Example

Display IsBulkBiller for the service.

Dim aFilter
Dim aService
Dim aServices
Dim aMessage
Dim aServicePrice

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

aMessage = "Services Count = " & aServices.Count & vbNewLine

for each aService in aServices
  set aServicePrice = aService.GetServicePrice
  if aServicePrice is nothing then
    aMessage =  vbNewLine & "No Service Price"
  else
    aMessage = aMessage & vbNewLine & "-----------------------------" & vbNewLine &_
    "Agency Code: " & aServicePrice.AgencyCode & vbNewLine &_
    "Amount: " & aServicePrice.Amount & vbNewLine &_
    "Amount Method: " & aServicePrice.AmountMethod & vbNewLine &_
    "Based On: " & aServicePrice.BasedOn & vbNewLine &_
    "Bulk Code: " & aServicePrice.BulkCode & vbNewLine &_
    "Code Method: " & aServicePrice.CodeMethod & vbNewLine &_
    "Custom Fee Per Unit: " & aServicePrice.CustomFeePerUnit & vbNewLine &_
    "Default Quantity: " & aServicePrice.DefaultQuantity & vbNewLine &_
    "End Date: " & aServicePrice.EndDate & vbNewLine &_
    "Service ID: " & aServicePrice.ServiceID & vbNewLine &_
    "Is Bulk Biller: " & aServicePrice.IsBulkBiller & vbNewLine 
  end if                                                               
next              
 
Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface the Bulk Biller checkbox can be checked in Maintain > Services > Edit the selected service > Financial > Bulk Biller.

Version information

Added in v7.8.0