Previous  Up  Next

Module InfoService_types


module InfoService_types: sig .. end
type __dummy = unit

type apiException = {
   apiException_code : int32;
   apiException_internal : bool;
   apiException_message : string option;
   apiException_trigger : string option;
   apiException_errors : apiError list;
}
type apiError = {
   apiError_index : int32;
   apiError_field : string option;
   apiError_textIndex : int32 option;
   apiError_textLength : int32 option;
   apiError_trigger : string option;
   apiError_code : int32;
   apiError_isExemptable : bool;
   apiError_detail : string;
} 
type fault = unit 
type email = string 
type clientEmail = string 
type password = string 
type useragent = string 
type token = string 
type applicationToken = string 
type developerToken = string 
type responseTime = int64 
type operations = int64 
type units = int64

type getOperationCount = {
   getOperationCount_startDate : OCSoap.date;
   getOperationCount_endDate : OCSoap.date;
}
type getOperationCountResponse = {
   getOperationCountResponse_getOperationCountReturn : int64;
} 
type getOperationsQuotaThisMonth = unit

type getOperationsQuotaThisMonthResponse = {
   getOperationsQuotaThisMonthResponse_getOperationsQuotaThisMonthReturn : int64;
} 
type getUsageQuotaThisMonth = unit

type getUsageQuotaThisMonthResponse = {
   getUsageQuotaThisMonthResponse_getUsageQuotaThisMonthReturn : int64;
} 
type getFreeUsageQuotaThisMonth = unit

type getFreeUsageQuotaThisMonthResponse = {
   getFreeUsageQuotaThisMonthResponse_getFreeUsageQuotaThisMonthReturn : int64;
}
type getMethodCost = {
   getMethodCost_service : string;
   getMethodCost_method : string;
   getMethodCost_date : OCSoap.date;
}
type getMethodCostResponse = {
   getMethodCostResponse_getMethodCostReturn : int32;
}
type getUnitCount = {
   getUnitCount_startDate : OCSoap.date;
   getUnitCount_endDate : OCSoap.date;
}
type getUnitCountResponse = {
   getUnitCountResponse_getUnitCountReturn : int64;
}
type getUnitCountForMethod = {
   getUnitCountForMethod_service : string;
   getUnitCountForMethod_method : string;
   getUnitCountForMethod_startDate : OCSoap.date;
   getUnitCountForMethod_endDate : OCSoap.date;
}
type getUnitCountForMethodResponse = {
   getUnitCountForMethodResponse_getUnitCountForMethodReturn : int64;
} 
val __dummy : unit
val node_of_apiException : ?a:(string * string) list ->
       OCSoap.ctx -> string -> apiException -> OCSoap.node
val apiException_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       apiException
val node_of_apiError : ?a:(string * string) list ->
       OCSoap.ctx -> string -> apiError -> OCSoap.node
val apiError_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       apiError
val node_of_fault : ?a:(string * string) list -> OCSoap.ctx -> string -> unit -> OCSoap.node
val fault_of_node : 'a -> 'b -> unit
val node_of_getOperationCount : ?a:(string * string) list ->
       OCSoap.ctx -> string -> getOperationCount -> OCSoap.node
val getOperationCount_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getOperationCount
val node_of_getOperationCountResponse : ?a:(string * string) list ->
       OCSoap.ctx ->
       string -> getOperationCountResponse -> OCSoap.node
val getOperationCountResponse_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getOperationCountResponse
val node_of_getOperationsQuotaThisMonth : ?a:(string * string) list -> OCSoap.ctx -> string -> unit -> OCSoap.node
val getOperationsQuotaThisMonth_of_node : 'a -> 'b -> unit
val node_of_getOperationsQuotaThisMonthResponse : ?a:(string * string) list ->
       OCSoap.ctx ->
       string ->
       getOperationsQuotaThisMonthResponse -> OCSoap.node
val getOperationsQuotaThisMonthResponse_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getOperationsQuotaThisMonthResponse
val node_of_getUsageQuotaThisMonth : ?a:(string * string) list -> OCSoap.ctx -> string -> unit -> OCSoap.node
val getUsageQuotaThisMonth_of_node : 'a -> 'b -> unit
val node_of_getUsageQuotaThisMonthResponse : ?a:(string * string) list ->
       OCSoap.ctx ->
       string -> getUsageQuotaThisMonthResponse -> OCSoap.node
val getUsageQuotaThisMonthResponse_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getUsageQuotaThisMonthResponse
val node_of_getFreeUsageQuotaThisMonth : ?a:(string * string) list -> OCSoap.ctx -> string -> unit -> OCSoap.node
val getFreeUsageQuotaThisMonth_of_node : 'a -> 'b -> unit
val node_of_getFreeUsageQuotaThisMonthResponse : ?a:(string * string) list ->
       OCSoap.ctx ->
       string -> getFreeUsageQuotaThisMonthResponse -> OCSoap.node
val getFreeUsageQuotaThisMonthResponse_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getFreeUsageQuotaThisMonthResponse
val node_of_getMethodCost : ?a:(string * string) list ->
       OCSoap.ctx -> string -> getMethodCost -> OCSoap.node
val getMethodCost_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getMethodCost
val node_of_getMethodCostResponse : ?a:(string * string) list ->
       OCSoap.ctx ->
       string -> getMethodCostResponse -> OCSoap.node
val getMethodCostResponse_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getMethodCostResponse
val node_of_getUnitCount : ?a:(string * string) list ->
       OCSoap.ctx -> string -> getUnitCount -> OCSoap.node
val getUnitCount_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getUnitCount
val node_of_getUnitCountResponse : ?a:(string * string) list ->
       OCSoap.ctx -> string -> getUnitCountResponse -> OCSoap.node
val getUnitCountResponse_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getUnitCountResponse
val node_of_getUnitCountForMethod : ?a:(string * string) list ->
       OCSoap.ctx ->
       string -> getUnitCountForMethod -> OCSoap.node
val getUnitCountForMethod_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getUnitCountForMethod
val node_of_getUnitCountForMethodResponse : ?a:(string * string) list ->
       OCSoap.ctx ->
       string -> getUnitCountForMethodResponse -> OCSoap.node
val getUnitCountForMethodResponse_of_node : string ->
       ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
       getUnitCountForMethodResponse