Add test for banking responses

This also adds a generic response equality testing framework, a missing
Status field to all current responses, and Equal() methods to all basic
types.

banking_test.go

@@ -2,6 +2,8 @@ package ofxgo_test
 
 import (
 	"github.com/aclindsa/ofxgo"
+	"math/big"
+	"strings"
 	"testing"
 	"time"
 )
@@ -71,3 +73,142 @@ func TestMarshalBankStatementRequest(t *testing.T) {
 
 	marshalCheckRequest(t, &request, expectedString)
 }
+
+func TestUnmarshalBankStatementResponse(t *testing.T) {
+	responseReader := strings.NewReader(`<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<?OFX OFXHEADER="200" VERSION="203" SECURITY="NONE" OLDFILEUID="NONE" NEWFILEUID="NONE"?>
+<OFX>
+	<SIGNONMSGSRSV1>
+		<SONRS>
+			<STATUS>
+				<CODE>0</CODE>
+				<SEVERITY>INFO</SEVERITY>
+			</STATUS>
+			<DTSERVER>20060115112303</DTSERVER>
+			<LANGUAGE>ENG</LANGUAGE>
+			<DTPROFUP>20050221091300</DTPROFUP>
+			<DTACCTUP>20060102160000</DTACCTUP>
+			<FI>
+				<ORG>BNK</ORG>
+				<FID>1987</FID>
+			</FI>
+		</SONRS>
+	</SIGNONMSGSRSV1>
+	<BANKMSGSRSV1>
+		<STMTTRNRS>
+			<TRNUID>1001</TRNUID>
+			<STATUS>
+				<CODE>0</CODE>
+				<SEVERITY>INFO</SEVERITY>
+			</STATUS>
+			<STMTRS>
+				<CURDEF>USD</CURDEF>
+				<BANKACCTFROM>
+					<BANKID>318398732</BANKID>
+					<ACCTID>78346129</ACCTID>
+					<ACCTTYPE>CHECKING</ACCTTYPE>
+				</BANKACCTFROM>
+				<BANKTRANLIST>
+					<DTSTART>20060101</DTSTART>
+					<DTEND>20060115</DTEND>
+					<STMTTRN>
+						<TRNTYPE>CHECK</TRNTYPE>
+						<DTPOSTED>20060104</DTPOSTED>
+						<TRNAMT>-200.00</TRNAMT>
+						<FITID>00592</FITID>
+						<CHECKNUM>2002</CHECKNUM>
+					</STMTTRN>
+					<STMTTRN>
+						<TRNTYPE>ATM</TRNTYPE>
+						<DTPOSTED>20060112</DTPOSTED>
+						<DTUSER>20060112</DTUSER>
+						<TRNAMT>-300.00</TRNAMT>
+						<FITID>00679</FITID>
+					</STMTTRN>
+				</BANKTRANLIST>
+				<LEDGERBAL>
+					<BALAMT>200.29</BALAMT>
+					<DTASOF>200601141600</DTASOF>
+				</LEDGERBAL>
+				<AVAILBAL>
+					<BALAMT>200.29</BALAMT>
+					<DTASOF>200601141600</DTASOF>
+				</AVAILBAL>
+			</STMTRS>
+		</STMTTRNRS>
+	</BANKMSGSRSV1>
+</OFX>`)
+	var expected ofxgo.Response
+	GMT := time.FixedZone("GMT", 0)
+
+	expected.Version = "203"
+	expected.Signon.Status.Code = 0
+	expected.Signon.Status.Severity = "INFO"
+	expected.Signon.DtServer = ofxgo.Date(time.Date(2006, 1, 15, 11, 23, 03, 0, GMT))
+	expected.Signon.Language = "ENG"
+	dtprofup := ofxgo.Date(time.Date(2005, 2, 21, 9, 13, 0, 0, GMT))
+	expected.Signon.DtProfUp = &dtprofup
+	dtacctup := ofxgo.Date(time.Date(2006, 1, 2, 16, 0, 0, 0, GMT))
+	expected.Signon.DtAcctUp = &dtacctup
+	expected.Signon.Org = "BNK"
+	expected.Signon.Fid = "1987"
+
+	var trnamt1, trnamt2 big.Rat
+	trnamt1.SetFrac64(-20000, 100)
+	trnamt2.SetFrac64(-30000, 100)
+	dtuser2 := ofxgo.Date(time.Date(2006, 1, 12, 0, 0, 0, 0, GMT))
+
+	banktranlist := ofxgo.TransactionList{
+		DtStart: ofxgo.Date(time.Date(2006, 1, 1, 0, 0, 0, 0, GMT)),
+		DtEnd:   ofxgo.Date(time.Date(2006, 1, 15, 0, 0, 0, 0, GMT)),
+		Transactions: []ofxgo.Transaction{
+			{
+				TrnType:  "CHECK",
+				DtPosted: ofxgo.Date(time.Date(2006, 1, 4, 0, 0, 0, 0, GMT)),
+				TrnAmt:   ofxgo.Amount(trnamt1),
+				FiTId:    "00592",
+				CheckNum: "2002",
+			},
+			{
+				TrnType:  "ATM",
+				DtPosted: ofxgo.Date(time.Date(2006, 1, 12, 0, 0, 0, 0, GMT)),
+				DtUser:   &dtuser2,
+				TrnAmt:   ofxgo.Amount(trnamt2),
+				FiTId:    "00679",
+			},
+		},
+	}
+
+	var balamt, availbalamt big.Rat
+	balamt.SetFrac64(20029, 100)
+	availbalamt.SetFrac64(20029, 100)
+
+	availdtasof := ofxgo.Date(time.Date(2006, 1, 14, 16, 0, 0, 0, GMT))
+
+	statementResponse := ofxgo.StatementResponse{
+		TrnUID: "1001",
+		Status: ofxgo.Status{
+			Code:     0,
+			Severity: "INFO",
+		},
+		CurDef: "USD",
+		BankAcctFrom: ofxgo.BankAcct{
+			BankId:   "318398732",
+			AcctId:   "78346129",
+			AcctType: "CHECKING",
+		},
+		BankTranList: &banktranlist,
+		BalAmt:       ofxgo.Amount(balamt),
+		DtAsOf:       ofxgo.Date(time.Date(2006, 1, 14, 16, 0, 0, 0, GMT)),
+		AvailBalAmt:  (*ofxgo.Amount)(&availbalamt),
+		AvailDtAsOf:  &availdtasof,
+	}
+	expected.Banking = append(expected.Banking, statementResponse)
+
+	response, err := ofxgo.ParseResponse(responseReader)
+	if err != nil {
+		t.Fatalf("Unexpected error unmarshalling response: %s\n", err)
+	}
+
+	checkResponsesEqual(t, &expected, response)
+}