smstypes.fs

smstypes.fs

module SmsTypes
open PSWinCom.Gateway.Client;

type SmsStatus = Response of MessageResult | Error of System.Exception

type FdkSms = string * string

type UnknownError = { Error: string}

type SmsLogMessage = { ReceiverNumber : string;
                       Body: string;
                       MessageStatus : string;
                       MessageStatusText : string;
                       UserReference : string}
                       override m.ToString() = Printf.sprintf "%A" m