Need to send value into the webservice

[saro_j]

In Class module

I have a struct called struct_RateWSO
It contains the following

Public OriginZip As String
Public DestZip As String
Public ShipDate As String
Public CustID As String
Public SCAC As String
Public ServiceLevel As String
Public ProfileID As String
Public Weight As Variant
Public RatedAmount As Double
Public RatedBEO As struct_RatedBEO
'"LTLBEOList" is an array with elements defined as struct_LtlBEO
'See Complex Types: Arrays in Web Service References Tool 2.0 Help
'for details on implementing arrays.
Public LTLBEOList As Variant

In Class module
I have a class called clsws_Service

Public Function wsm_RateShipment(ByVal ar_rateWSOList As Variant) As
Variant
'*****************************************************************
'Proxy function created from http://68.195.201.131/IGLLIVE/RateWebService/Service.asmx?wsdl.
'
'"wsm_RateShipment" is an array with elements defined as
struct_RateWSO
'"ar_rateWSOList" is an array with elements defined as
struct_RateWSO
'See Complex Types: Arrays in Web Service References Tool 2.0 Help
'for details on implementing arrays.
'*****************************************************************

'Error Trap
On Error GoTo wsm_RateShipmentTrap

wsm_RateShipment = sc_Service.RateShipment(ar_rateWSOList)

Exit Function
wsm_RateShipmentTrap:
ServiceErrorHandler "wsm_RateShipment"
End Function


I need to pass value into this from VBA code

Please help me out in this .
Thanks.
Saro