#include "stdafx.h"
//#include <arxtools.h>
#include "tapi.h"
#include "XFilePathName.h"   
#include "Block.h"



BOOL CreateTKFile(const TCHAR *pszFile)
{
    FieldInfo fields[13];
    fields[0] = FieldInfo(_T("ConType"), _T('C'), 32); 
	/*导体类型 0：钢芯铝绞线 （架空线）
	           1：铝绞线     （架空线）
			   2：聚氯乙烯绝缘聚氯乙烯护套铜芯  （电缆）
			   3：聚氯乙烯绝缘聚氯乙烯护套铝芯  （电缆）
			   4：聚氯乙烯绝缘内钢带铠装聚氯乙烯护套铜芯  （电缆）
			   5：聚氯乙烯绝缘内钢带铠装聚氯乙烯护套铝芯  （电缆）
												   */
    fields[1] = FieldInfo(_T("MainSec"), _T('N'), 32, 6);
	//            电缆主线芯截面(mm*mm)  （电缆）
	//            导体截面(mm*mm)        （架空线）
    fields[2] = FieldInfo(_T("NeutralSec"), _T('N'), 32, 6);
	//            电缆中性线芯截面(mm*mm)（电缆）
    fields[3] = FieldInfo(_T("ResistAl"), _T('N'), 32, 6);
	//            铝芯电缆电阻（欧/公里）（电缆）
    fields[4] = FieldInfo(_T("ResistCu"), _T('N'), 32, 6);
	//            铜芯电缆电阻（欧/公里）（电缆）

    fields[5] = FieldInfo(_T("Reactance"), _T('N'), 32, 6);
	//            电缆电抗（欧/公里）    （电缆）
    fields[6] = FieldInfo(_T("Capacity15"), _T('N'), 32, 6);
	//            导体载流量(A) 20   
    fields[7] = FieldInfo(_T("Capacity20"), _T('N'), 32, 6);
	//            导体载流量(A) 20   
    fields[8] = FieldInfo(_T("Capacity25"), _T('N'), 32, 6);
	//            导体载流量(A)   
    fields[9] = FieldInfo(_T("Capacity30"), _T('N'), 32, 6);
	//            导体载流量(A)   
    fields[10] = FieldInfo(_T("Capacity35"), _T('N'), 32, 6);
	//            导体载流量(A)   
    fields[11] = FieldInfo(_T("Capacity40"), _T('N'), 32, 6);
	//            导体载流量(A)   


    CodeBase db1;

//	#ifndef _WIN64
//		XDbfTable *pTable1 = db1.Create(pszFile, fields);
//	#else
		XDbfTable *pTable1 = db1.Create(pszFile, fields, 4);
//	#endif 

    if(!pTable1) 
		return FALSE;

	CString type[] = {_T("VV_1"), _T("VLV_1"), _T("VV22_1"), _T("VLV22_1")};
 
	double nMainSec,nNeutralSec, nZll20, nZll25, nZll30, nZll35, nZll40, nResistAl, nResistCu,nReactance;
	CodeBase db;
	db.read_only =1;
	int nModel;
	XDbfTable *pTable = db.Open(_T("d:\\TELCALC.DBF"));
	if(!pTable) return 0;
	pTable->MoveFirst();
	while(!pTable->IsEOF())	{
	 
		GET_FIELD(pTable, _T("ConModel"), nModel);
		GET_FIELD(pTable, _T("MainSec"), nMainSec);
		GET_FIELD(pTable, _T("NeutralSec"), nNeutralSec);
		GET_FIELD(pTable, _T("Capacity20"), nZll20);
		GET_FIELD(pTable, _T("Capacity25"), nZll25);
		GET_FIELD(pTable, _T("Capacity30"), nZll30);
		GET_FIELD(pTable, _T("Capacity35"), nZll35);
		GET_FIELD(pTable, _T("Capacity40"), nZll40);

		GET_FIELD(pTable, _T("ResistAl"), nResistAl);
		GET_FIELD(pTable, _T("ResistCu"), nResistCu);
		GET_FIELD(pTable, _T("Reactance"), nReactance);
 
		if(nModel>1){
			pTable1->AppendBegin();
			SET_FIELD(pTable1, _T("ConType"), (const TCHAR*)type[nModel-2]);
			SET_FIELD(pTable1, _T("MainSec"), nMainSec);
			SET_FIELD(pTable1, _T("NeutralSec"), nNeutralSec);
			SET_FIELD(pTable1, _T("ResistAl"), nResistAl);
			SET_FIELD(pTable1, _T("ResistCu"), nResistCu);
			SET_FIELD(pTable1, _T("Capacity15"), -1);
			SET_FIELD(pTable1, _T("Capacity20"), nZll20);
			SET_FIELD(pTable1, _T("Capacity25"), nZll25);
			SET_FIELD(pTable1, _T("Capacity30"), nZll30);
			SET_FIELD(pTable1, _T("Capacity35"), nZll35);
			SET_FIELD(pTable1, _T("Capacity40"), nZll40);
			SET_FIELD(pTable1, _T("Reactance"), nReactance);
			pTable1->AppendEnd();
		}

		pTable->MoveNext();
	}
	BOOL bRet = (pTable!=NULL);
	pTable->Close();
	return bRet;
    
}



void TgMakeSlide()
{
    TCHAR dwgPrefix[256]=_T("");
    GetTempPath(255, dwgPrefix);
    if(dwgPrefix[_tcslen(dwgPrefix)-1]!=_T('\\'))
        _tcscat(dwgPrefix, _T("\\"));
    XString xsFullSld;
    xsFullSld << dwgPrefix  << _T("_ELECBLK") << _T(".sld");
    ///////////////////////////////////////////////////////////////////////////////////
    ZOOME;
    ads_command(RTSTR, _T("REGEN"), RTNONE);
    ads_command(RTSTR, _T("MSLIDE"), RTSTR, (TCHAR *)xsFullSld, RTNONE);
    ZOOMP;
    
}

//是否全部为数字
//BOOL IsDigital(const TCHAR *pStr) 
//{
//    ASSERT(pStr);
//    int nLen=_tcslen(pStr);
//    if(!nLen)
//        return FALSE;
//    for(int i=0; i<nLen; i++) {
//        if(!_istdigit(pStr[i]))
//            return FALSE;
//    }
//    return TRUE;
//}
int GetNextDrawing(const TCHAR *tkName, TCHAR *dwg)
{
	CodeBase db;
	XDbfTable *pTable = db.Open(tkName);
	if(!pTable) 
	{
		CString csTmp;
		csTmp.Format(_T("%s文件只读或损坏！"), tkName);
        AfxMessageBox(csTmp);
		
	//	AfxMessageBox(_T("TK文件只读或损坏！"));
		return RTERROR;
	}
	Array<CString> recs;
	CString str;
	CString sTemp;
	for (pTable->MoveFirst(0);!pTable->IsEOF();pTable->MoveNext(0))
	{	
		GET_FIELD(pTable,_T("Drawing"), sTemp);
		str = sTemp;
		if (IsDigital(str)&&_tcslen(str)==8)
			recs.AddTail(LPCTSTR(str));
	}	
	if (recs.GetLength() >= 1)
	{
		CString maxStr = recs[0];
		int i = 1;
		while (i < recs.GetLength())
		{
			if (maxStr<recs[i])
				maxStr = recs[i];
			i++;
		}
		if(maxStr && IsDigital(maxStr))
		{
			int slen = (int)_tcslen(maxStr);
			TCHAR a1=maxStr[slen-1], a2=maxStr[slen-2], a3=maxStr[slen-3],a4 = maxStr[slen-4],a5 = maxStr[slen-5],a6 = maxStr[slen-6];
			if(a1>=_T('0') && a1<_T('9')) a1++;
			else if(a1==_T('9') && a2>=_T('0') && a2<_T('9')) 
			{ a1=_T('0'); a2++; }
			else if(a1==_T('9') && a2==_T('9') && a3>=_T('0') && a3<_T('9'))
			{ a1=a2=_T('0'); a3++; }
			else if(a1==_T('9') && a2==_T('9') && a3==_T('9') && a4>=_T('0') &&a4<_T('9'))
			{ a1=a2=a3=_T('0'); a4++; }
			else if(a1==_T('9') && a2==_T('9') && a3==_T('9') && a4==_T('9') && a5>=_T('0')&&a5<_T('9'))
			{ a1=a2=a3=a4=_T('0'); a5++; }
			else if(a1==_T('9') && a2==_T('9') && a3==_T('9') && a4==_T('9') && a5==_T('9')&&a6>=_T('0')&&a6<_T('9'))
			{a1=a2=a3=a4=a5=_T('0'); a6++; }
			maxStr.Delete(slen-6,6);
            maxStr = maxStr + a6;
			maxStr = maxStr + a5;
			maxStr = maxStr + a4;
			maxStr = maxStr + a3;
			maxStr = maxStr + a2;
			maxStr = maxStr + a1;		
			_tcscpy(dwg, maxStr);
		}
	}
	else
	{
		_tcscpy(dwg, _T("00000001"));
		return RTNORM;
	}
    return RTNORM;
}

CString AddNewDwg2Dwb(const TCHAR* szTKName,
					  const TCHAR* szDwgName, 
					  const TCHAR* szSldName,
					  const TCHAR* szType, 
					  const TCHAR* szDesName)
{

    CString csTKName = szTKName;
    CString csDwgName = szDwgName;
    CString csSldName = szSldName;
    CString csType = szType;
    CString csDesName = szDesName;

	int len = csTKName.GetLength();
	CString csDwbFileName = csTKName.Left(len - 2) + _T("dwb");
	CString csSlbFileName = csTKName.Left(len - 2) + _T("slb");
	XString xsRetStr;
	CString csErr = _T("");
	
	CodeBase db;
	XDbfTable *pTable = db.Open(csTKName);
	if(!pTable) {
		CString csTmp;
		csTmp.Format(_T("%s文件只读或损坏！"), csTKName);
        AfxMessageBox(csTmp);
		
	//	AfxMessageBox(_T("TK文件只读或损坏！"));
		return csErr;
	}
	
	if(GetNextDrawing((const TCHAR*)csTKName, xsRetStr)!=RTNORM)	{
		AfxMessageBox(_T("无法向DWB中增加记录"));
		return csErr;
	}

	XString xsNewDwgName, xsNewSldName;
	XFilePathName xfpn = csDwgName;
		 
	xsNewDwgName << (const TCHAR*)xfpn.getDriver() 
		<< (const TCHAR*)xfpn.getDir() << (const TCHAR*)xsRetStr << _T(".dwg");
	xsNewSldName << (const TCHAR*)xfpn.getDriver() 
		<< (const TCHAR*)xfpn.getDir() << (const TCHAR*)xsRetStr << _T(".sld");
//	xsNewDwgName << (const TCHAR*)xfpn.getDriver() 
//		<< (const TCHAR*)xfpn.getDir() << _T("\\") << (const TCHAR*)xsRetStr << _T(".dwg");
//	xsNewSldName << (const TCHAR*)xfpn.getDriver() 
//		<< (const TCHAR*)xfpn.getDir() << _T("\\") << (const TCHAR*)xsRetStr << _T(".sld");

	XSlideLib  slbMan(csSlbFileName);
	if(!slbMan) {
		AfxMessageBox(_T("无法打开Slb文件"));
		return csErr;
		_tremove(csSldName);
	}
	int ret;
	_trename(csSldName,xsNewSldName);
	ret = slbMan.Append(xsNewSldName);
	slbMan.Close();
	_tremove(xsNewSldName);

	XDrawingLib dwbMan(csDwbFileName);
	if(!dwbMan) {
		AfxMessageBox(_T("无法打开DWB文件"));
		return csErr;
		_tremove(csDwgName);
	}
	_trename(csDwgName,xsNewDwgName);

	ret = dwbMan.Append(xsNewDwgName);
	

    dwbMan.Close();
	_tremove(xsNewDwgName);
     


	pTable->AppendBegin();
	SET_FIELD(pTable, _T("kind"), (const TCHAR*)csType);
	SET_FIELD(pTable, _T("item"), (const TCHAR*)csDesName);
	SET_FIELD(pTable, _T("Drawing"), (const TCHAR*)xsRetStr);
	pTable->AppendEnd();
	pTable->Close(); //sr add  11.15
	CString csRet = (const TCHAR*)xsRetStr;
	return csRet;

}

CString RebuildDwgInDwb(const TCHAR* szTKName,
						const TCHAR* szDwgName, 
						const TCHAR* szSldName,
						const TCHAR* szDesName,
						const TCHAR* szRecord)
{
    CString csTKName = szTKName;
    CString csDwgName = szDwgName;
    CString csSldName = szSldName;
    CString csDesName = szDesName;
    CString csRecord = szRecord;
        
	int len = csTKName.GetLength();
	CString csDwbFileName = csTKName.Left(len - 2) + _T("dwb");
	CString csSlbFileName = csTKName.Left(len - 2) + _T("slb");
	XString xsRetStr;
	CString csErr = _T("");
	
	CodeBase db;
	XDbfTable *pTable = db.Open(csTKName);
	if(!pTable) {
		CString csTmp;
		csTmp.Format(_T("%s文件只读或损坏！"), csTKName);
        AfxMessageBox(csTmp);
		
	//	AfxMessageBox(_T("TK文件只读或损坏！"));
		return csErr;
	}
	
	if(GetNextDrawing((const TCHAR*)csTKName, xsRetStr)!=RTNORM)	{
		AfxMessageBox(_T("无法想DWB中增加记录"));
		return csErr;
	}

	XString xsNewDwgName, xsNewSldName;
	XFilePathName xfpn = csDwgName;
		 
	xsNewDwgName << (const TCHAR*)xfpn.getDriver() 
		<< (const TCHAR*)xfpn.getDir() << _T("\\") << (const TCHAR*)xsRetStr << _T(".dwg");
	xsNewSldName << (const TCHAR*)xfpn.getDriver() 
		<< (const TCHAR*)xfpn.getDir() << _T("\\") << (const TCHAR*)xsRetStr << _T(".sld");

	XSlideLib  slbMan(csSlbFileName);
	if(!slbMan) {
		AfxMessageBox(_T("无法打开Slb文件"));
		return csErr;
		_tremove(csSldName);
	}
	int ret;
	_trename(csSldName,xsNewSldName);
	ret = slbMan.Append(xsNewSldName);
	slbMan.Close();
	_tremove(xsNewSldName);

	XDrawingLib dwbMan(csDwbFileName);
	if(!dwbMan) {
		AfxMessageBox(_T("无法打开DWB文件"));
		return csErr;
		_tremove(csDwgName);
	}
	_trename(csDwgName,xsNewDwgName);
	ret = dwbMan.Append(xsNewDwgName);
    dwbMan.Close();
	_tremove(xsNewDwgName);
	for(pTable->MoveFirst();!pTable->IsEOF();pTable->MoveNext()){
		CString sDrawing;
		GET_FIELD(pTable, _T("drawing"), sDrawing);
		if(_tcscmp(sDrawing, csRecord) == 0)	{
			SET_FIELD(pTable, _T("drawing"), (const TCHAR*)xsRetStr);
			if(csDesName != _T(""))
				SET_FIELD(pTable, _T("item"), (const TCHAR*)csDesName);
			break;
		}
	}
	CString csRet = (const TCHAR*)xsRetStr;
	return csRet;
}


BOOL GetTKType(const TCHAR* szFileName, CStringList &lstType)
{

	CodeBase db;
	db.read_only =1;
	XDbfTable *pTable = db.Open(szFileName);
	if(!pTable) return FALSE;
	CString sKind;
	CBlockStruct Blk;
	pTable->MoveFirst();
	while(!pTable->IsEOF())	{
		GET_FIELD(pTable, _T("kind"), sKind);
		if(sKind != _T("")){
			POSITION pos;
			pos = lstType.Find((const TCHAR*)sKind);
			if(pos == NULL){
				pos = lstType.GetTailPosition();
				pos = lstType.InsertAfter(pos, (const TCHAR*)sKind);    //在链表尾插入 块 结构
			}
		}
		pTable->MoveNext();
	}
	pTable->Close(); //sr add  11.15
	return TRUE;
}

BOOL GetTypeRecord(const TCHAR* szFileName, 
				   const TCHAR* szBlkType,
				   CList<CBlockStruct, CBlockStruct&> &lstBlock)
{
    CString csBlkType = szBlkType;
	CodeBase db;
	db.read_only = 1;
	XDbfTable *pTable = db.Open(szFileName);
	if(!pTable) return FALSE;
	CString sKind, sItem, sDrawing;
	
	CBlockStruct Blk;
	pTable->MoveFirst();
	while(!pTable->IsEOF())	{
		GET_FIELD(pTable, _T("kind"), sKind);
		GET_FIELD(pTable, _T("item"), sItem);
		GET_FIELD(pTable, _T("Drawing"), sDrawing);
		if((sKind == (const TCHAR *)csBlkType) && (sDrawing != _T(""))) {
			Blk.m_csDesName = sItem;
			Blk.m_csRecord = sDrawing;
		    POSITION pos1; 
			pos1 = lstBlock.GetTailPosition();
			pos1 = lstBlock.InsertAfter(pos1, Blk);    //在链表尾插入 块 结构
		}
		pTable->MoveNext();
	}
	pTable->Close(); //sr add  11.15
	return TRUE;
}


BOOL IsTgBlkExist(const TCHAR* szBlkName)
{
	CString csTk, csRecord;
	CString sDrawing;
	SplitBlkStr(szBlkName, csTk, csRecord);
	CodeBase db;
	db.read_only = 1;
	CString csTmpTKName = g_sDwbPath + csTk + _T(".tk");
	XDbfTable *pTable = db.Open(csTmpTKName);
	if(!pTable) 
		return FALSE;
	for(pTable->MoveFirst();!pTable->IsEOF();pTable->MoveNext()){
		GET_FIELD(pTable, _T("Drawing"), sDrawing);
		if(sDrawing == (const TCHAR *)csRecord){
			return TRUE;
		}
	}
	return FALSE;
}

CString GetTgBlkTypeInTk(const TCHAR* szBlkName)
{
	CString csTk, csRecord, csRet;
	CString sKind, sDrawing;
	SplitBlkStr(szBlkName, csTk, csRecord);
	CodeBase db;
	db.read_only = 1;
	CString csTmpTKName = g_sDwbPath + csTk + _T(".tk");
	XDbfTable *pTable = db.Open(csTmpTKName);
	if(!pTable) 
		return csRet;
	for(pTable->MoveFirst();!pTable->IsEOF();pTable->MoveNext()){
		GET_FIELD(pTable, _T("Drawing"), sDrawing);
		GET_FIELD(pTable, _T("kind"), sKind);
		if(sDrawing == (const TCHAR *)csRecord){
			csRet = (const TCHAR *)sKind;
			return csRet;
		}
	}
	return csRet;
}



BOOL GetTypeAllRecord(const TCHAR* szFileName, 
			     	  const TCHAR* szBlkType,
			    	  CList<CBlockStruct, CBlockStruct&> &lstBlock,
				      BOOL bOnlyCurType)
{
    CString csFileName = szFileName; 
    CString csBlkType = szBlkType;

	CBlockStruct Blk;

	if(!bOnlyCurType && csFileName == _T("equip")){  //读高频设备
		int iLastBlkMaxNum = 6;
		XStringList lstLastEq;
		CRegProperty regProp2(GetRegLocation(), _T("TElecConfig"));    
		regProp2.SetTopRootKey(HKEY_CURRENT_USER);
		regProp2.GetValue(_T("LastBlkMaxNum"), iLastBlkMaxNum);
		if(iLastBlkMaxNum < 0)
			iLastBlkMaxNum = 6;
		CRegProperty regProp(GetRegLocation(), _T("LastInsEquip"));    
		regProp.SetTopRootKey(HKEY_CURRENT_USER);
		for(int i=0;i<iLastBlkMaxNum;i++) {
			XString sKey(256);
			CString csValue;
			sKey << _T("The recent InsBlk") << (i + 1);
			regProp.GetValue(sKey, csValue);
			if(csValue.IsEmpty() || csValue.GetLength() > 255) continue;
			lstLastEq.Append(tstrnew(csValue));
		}
		for(int j=0;j<lstLastEq.Length();j++){
			CString csTmp = lstLastEq[j];
			if(!IsTgBlkExist((const TCHAR*)csTmp))
				continue;
			CString csTk, csRecord;
			SplitBlkStr(csTmp, csTk, csRecord);
			CString csTmpTKName = g_sDwbPath + csTk + _T(".tk");
			if((csTk != _T("")) && (csRecord != _T(""))) {
				Blk.m_csTKName = csTmpTKName;
				Blk.m_csDesName = _T("*最近使用图块*");
				Blk.m_csRecord = csRecord;
				lstBlock.InsertAfter(lstBlock.GetTailPosition(), Blk);    //在链表尾插入 块 结构
			}
		}
	}
 
	CodeBase db;
	db.read_only = 1;
	CString sKind, sItem, sDrawing;

	CString csUserTKName = g_sDwbPath + csFileName + _T("_U.tk");
	if(FindFile(csUserTKName)){
		XDbfTable *pTable2 = db.Open(csUserTKName);
		if(!pTable2) return FALSE;
 
		pTable2->MoveFirst();
		while(!pTable2->IsEOF())	{
			GET_FIELD(pTable2, _T("kind"), sKind);
			GET_FIELD(pTable2, _T("item"), sItem);
			GET_FIELD(pTable2, _T("Drawing"), sDrawing);
			if((sKind == (const TCHAR *)csBlkType) && (sDrawing != _T(""))) {
				Blk.m_csTKName = csUserTKName;
				Blk.m_csDesName = sItem;
				Blk.m_csRecord = sDrawing;
				lstBlock.InsertAfter(lstBlock.GetTailPosition(), Blk);    //在链表尾插入 块 结构
			}
			pTable2->MoveNext();
		}
	}

	CString csSysTKName = g_sDwbPath + csFileName + _T(".tk");
	XDbfTable *pTable = db.Open(csSysTKName);
	if(!pTable) return FALSE;
	pTable->MoveFirst();
	while(!pTable->IsEOF())	{
		GET_FIELD(pTable, _T("kind"), sKind);
		GET_FIELD(pTable, _T("item"), sItem);
		GET_FIELD(pTable, _T("Drawing"), sDrawing);
		if((sKind == (const TCHAR *)csBlkType) && (sDrawing != _T(""))) {
			Blk.m_csTKName = csSysTKName;
			Blk.m_csDesName = sItem;
			Blk.m_csRecord = sDrawing;
			lstBlock.InsertAfter(lstBlock.GetTailPosition(), Blk);    //在链表尾插入 块 结构
		}
		pTable->MoveNext();
	}

	
	return TRUE;
}


CString GetBlkDesName(const TCHAR* szRecord,const TCHAR* szTKName)
{
	CString csName;
	CodeBase db;
	db.read_only = 1;
	XDbfTable *pTable = db.Open(szTKName);
	if(!pTable) {
		CString csTmp;
		csTmp.Format(_T("%s无法打开！"), szTKName);
		adsout << (const TCHAR *)csTmp;
	//	AfxMessageBox(_T("TK文件只读或损坏！"));
		return CString();
	}
	for(pTable->MoveFirst();!pTable->IsEOF();pTable->MoveNext()){
		CString sDrawing, sItem;
		GET_FIELD(pTable, _T("drawing"), sDrawing);
		GET_FIELD(pTable, _T("item"), sItem);
		if(_tcscmp(sDrawing, szRecord) == 0)	{
			csName = (const TCHAR*)sItem;
			return csName;
		}
	}
	return CString();
}


AcDbObjectId InsertBlock(const TCHAR*szBlkName, AcGePoint3d pt, double XScale, double YScale, double Rotation, const TCHAR* szLayer)
{
    AcDbObjectId retId;
    CBlock blk(szBlkName, pt, XScale, Rotation, szLayer);
    blk.Insert(TRUE);
    Entity ent;
    ent.GetLast();
    acdbGetObjectId(retId, ent);
    return retId;
}

BOOL InsertBlock(const TCHAR*szBlkName, XPoint pt, double nScale, double Rotation, const TCHAR* szLayer)
{
    InitBlock(szBlkName);
    AcDbBlockTable *pBlockTable;
    AcDbBlockTableRecord*  pRecord;
    acdbCurDwg()->getBlockTable(pBlockTable, AcDb::kForRead);
    if ((pBlockTable->getAt(szBlkName, pRecord, AcDb::kForRead)) != Acad::eOk) 
        return FALSE;
    pBlockTable->close();
    AcDbObjectId BlockId;
    BlockId = pRecord->objectId();
    pRecord->close();
    AcDbBlockReference *pBlkRef = new AcDbBlockReference;
    pBlkRef->setBlockTableRecord(BlockId);
    pBlkRef->setRotation(Rotation);
    pBlkRef->setPosition(AcGePoint3d(pt));
    pBlkRef->setScaleFactors(nScale);
    pBlkRef->setLayer(szLayer);
    PostToDb(pBlkRef);
    pBlkRef->close();
    return TRUE;
}