PRB: Incorrect NUMERIC and DECIMAL conversions with non-English locales

#include "stdafx.h"

#include <windows.h>
#include <stdio.h>
#include <stddef.h>
#include <oledb.h>

int main(int argc, char* argv[])
{

	ICommandText * pICommandText;
	IDBCreateSession * pIDBCreateSession;
	IDBCreateCommand * pIDBCreateCommand;
	IDBInitialize * pIDBInitialize;
	IDBProperties * pIDBProperties;
	IRowset				*pIRowset;
	IAccessor				*pIAccessor;

	const ULONG nProps = 4;
	DBPROP InitProperties[nProps];
	DBPROPSET rgInitPropSet;
	ULONG			cRowsObtained;
	ULONG 			coutputBindings = 1;
	DBBINDING		outputBindings[1];
	DBBINDSTATUS 	outputStatus[1];
	HACCESSOR		hOutputAccessor;
	HROW 			rghRow;	// Row Handle
	HROW			*pRow = &rghRow;
	CLSID		clsid;
	HRESULT		hr;

	struct _outputBuffer{
		DWORD status;
		double value;
		int length;
	} outputBuffer;	
	
	outputBuffer.status = 0;
	outputBuffer.value = 0.0;



	if( FAILED(hr = CLSIDFromProgID(L"SQLOLEDB", &clsid) ) )
		return 0;

	hr = CoInitialize(NULL);

	hr = CoCreateInstance(clsid, NULL, CLSCTX_INPROC_SERVER,
	IID_IDBInitialize, (void**)&pIDBInitialize);


	for (ULONG i = 0; i < nProps; i++)
	{
		VariantInit(&InitProperties[i].vValue);
		InitProperties[i].dwOptions = DBPROPOPTIONS_REQUIRED;
		InitProperties[i].colid = DB_NULLID;
	}

	//Level of prompting that is performed to complete the connection process.
	InitProperties[0].dwPropertyID = DBPROP_INIT_PROMPT;
	InitProperties[0].vValue.vt = VT_I2;
	InitProperties[0].vValue.iVal = DBPROMPT_NOPROMPT;

	//datasource name
	InitProperties[1].dwPropertyID = DBPROP_INIT_DATASOURCE;
	InitProperties[1].vValue.vt = VT_BSTR;
	InitProperties[1].vValue.bstrVal = SysAllocString(OLESTR("YourServer"));

	//userid
	InitProperties[2].dwPropertyID = DBPROP_AUTH_USERID;
	InitProperties[2].vValue.vt = VT_BSTR;
	InitProperties[2].vValue.bstrVal = SysAllocString(OLESTR("sa"));

	//password
	InitProperties[3].dwPropertyID = DBPROP_AUTH_PASSWORD;
	InitProperties[3].vValue.vt = VT_BSTR;
	InitProperties[3].vValue.bstrVal = SysAllocString(OLESTR(""));

	//Assign the four property structures to property set.
	rgInitPropSet.guidPropertySet = DBPROPSET_DBINIT;
	rgInitPropSet.cProperties = nProps;
	rgInitPropSet.rgProperties = InitProperties;

	//Set initialization properties.
	pIDBInitialize->QueryInterface(IID_IDBProperties, (void **)&pIDBProperties);
	pIDBProperties->SetProperties(1, &rgInitPropSet);
	hr = pIDBInitialize->Initialize();


	//Get the DB Session object.
	hr = pIDBInitialize->QueryInterface(IID_IDBCreateSession,
				(void**)&pIDBCreateSession);


	//Create the session, getting an interface for command creation.
	hr = pIDBCreateSession->CreateSession(NULL, IID_IDBCreateCommand,
				(IUnknown**)&pIDBCreateCommand);
	pIDBCreateSession->Release();


	//Create the Command object.
	hr = pIDBCreateCommand->CreateCommand(NULL, IID_ICommandText,
				(IUnknown**)&pICommandText);
	pIDBCreateCommand->Release();


	//Set the command text.
	pICommandText->SetCommandText( DBGUID_DBSQL, L"select convert(decimal(10,2),12345678.09)");

	//Execute the command.
	hr = pICommandText->Execute(NULL, IID_IRowset,NULL,NULL,(IUnknown **)&pIRowset);

	outputBindings[0].iOrdinal = 1;			//Set ordinal.
	outputBindings[0].pTypeInfo = NULL;			//Reserved
	outputBindings[0].pObject = NULL;			//for an OLE object
	outputBindings[0].pBindExt = NULL;			//Reserved
	outputBindings[0].dwPart = DBPART_VALUE|DBPART_STATUS|DBPART_LENGTH;
	outputBindings[0].dwMemOwner = DBMEMOWNER_CLIENTOWNED;	//Client-owned memory
	outputBindings[0].eParamIO = DBPARAMIO_NOTPARAM;	//Not a parameter
	outputBindings[0].dwFlags = 0;			//Reserved
	outputBindings[0].obStatus = offsetof(_outputBuffer,status);	// Offset in consumers buffer
	outputBindings[0].obValue = offsetof(_outputBuffer,value);	// Offset in consumers buffer
	outputBindings[0].obLength = offsetof(_outputBuffer,length);	// Offset in consumers buffer
	outputBindings[0].cbMaxLen = sizeof(outputBuffer);		// Size in bytes of the value 
								// part in the consumers buffer
	outputBindings[0].wType = DBTYPE_R8;				// Data type indicator


	//Create the accessor.
	pIRowset->QueryInterface(IID_IAccessor, (void **)&pIAccessor);
	pIAccessor->CreateAccessor(
		DBACCESSOR_ROWDATA,	// Accessor will be used to retrieve row data.
		coutputBindings,		// Number of columns being bound
		outputBindings,		// Structure that contains bind info
		0,			// Not used for row accessors 
		&hOutputAccessor,		// Returned accessor handle
		outputStatus		// Information about binding validity
	);


	hr = pIRowset->GetNextRows(0, 0, 1,	&cRowsObtained,	&pRow );
		

	//Retrieve the data, and print it to a text file.
	hr = pIRowset->GetData( rghRow, hOutputAccessor, (void *)&outputBuffer);

	FILE *fp;
	fp = fopen( "c:\\outfile.txt", "wt" );
	fprintf( fp, "Value returned: %e, length: %i, status: %i\n",outputBuffer.value, outputBuffer.length, outputBuffer.status);
	fflush(fp);
	fclose(fp);
	

	//Release row handles.
	pIRowset->ReleaseRows( cRowsObtained,&rghRow, NULL, NULL, NULL );

	pIRowset->Release();

	//Release the output accessor.
	pIAccessor->ReleaseAccessor(hOutputAccessor,NULL);
	pIAccessor->Release();
	pICommandText->Release();

	
	return 0;
}