function sortFunctionAlpha (a any in, b any in) returns(int)

	aString string = a as string;
	bString string = b as string;

	if (aString < bString) 
		return -1;
	end 
	
	if (aString > bString)
		return 1;
	end
	 
	return 0;

end 


function sortFunctionInteger (a any in, b any in) returns(int)

	return (a as int - b as int);

end 

	// Portfolio transactions are sorted by transaction type within date; the 
	// earliest BUY transaction would be first 
	function sortTransactions(a any in, b any in) returns(int)
		aTransaction portfolioRecord = a as portfolioRecord;
		bTransaction portfolioRecord = b as portfolioRecord;
		case
			when ( aTransaction.trndate > bTransaction.trndate )
				return 1;
			when ( aTransaction.trndate < bTransaction.trndate )
				return -1;
			otherwise
				case
					when ( aTransaction.trntype > bTransaction.trntype )
						return 1;
					when ( aTransaction.trntype < bTransaction.trntype )
						return -1;
					otherwise
						return 0;
				end
		end
	end