CAXA装配图中单击序号，有图开图，无图建图

//点序号，有图开图，无图建图
void cmdOpenDrawFromSN()
{
    //所有图纸文件必须在一个文件夹内，且图纸文件名必须为“图纸编号+图纸名称.exb”这种。
    // 且必包含至少一个"-"，如“ABC-01法兰.exb”，该图纸标题栏中图纸编号是"ABC-01"，图纸名称是"法兰"。
    crx_name en;    
    crx_point pt;
    CRxGePoint3d pB; //单行文字的基点
    CRxGePoint3d pS; //选择实体时的单击点
    int iRT = crxedEntSel(_T("\n请选择要打开图纸的序号（单击右键打开父图）："), en, pt);
     switch (iRT)
    {
    case RTNORM: //正常获取了图元
        //OP(_T("正常获取了图元"));
        break;
    case RTNONE: //点了鼠标右键，开始打开父图
        //OP(_T("单击了鼠标右键"));
        return;
        break;
    default:
        //OP(_T("用户点了退出键"));
        return;
    }
    //类型判断
     pS = asPnt3d(pt);
    //crx_name转到objID
    CRxDbObjectId objID;
    CDraft::ErrorStatus es = crxdbGetObjectId(objID, en);
    if (es != CDraft::eOk)    return;
    //objID转到pEnt
    CRxDbEntity* pEnt=NULL;
    es = crxdbOpenObject(pEnt, objID, CRxDb::kForWrite);
    if (es != CDraft::eOk || !pEnt->isKindOf(CRxDbPartNo::desc()))    return; //打开失败或者所拾非序号则退出
    
    //炸开，找数字
    CRxDbVoidPtrArray pVa;
    CRxDbEntity* pEx=NULL;
    CxCHAR* num=_T("");    
    if (pEnt->explode(pVa)!= CDraft::eOk) return; //如果是单个图元则程序崩溃？？
    //打散后的实体数量，1个序号是6，2个连在一起的序号是9，3个连一起的是12
    int count = pVa.length();
    //遍历打散后的实体指针，找数字
    double dist = 0; //单击点与text基点的距离    
    for (int i=0;i<count;i++) 
    {
        pEx = (CRxDbEntity*)pVa[i];
        if (pEx->isKindOf(CRxDbText::desc()))
        {
            CRxDbText* pText = CRxDbText::cast(pEx);
            pB= pText->position();
            if (dist == 0) 
            {
                dist = pS.distanceTo(pB);
                num = pText->textString();
            }
            else
            {
                if(pS.distanceTo(pB) <dist )    num = pText->textString();
            }
            pText->close();
        }
    }
    //删除打散后的实体
    for (int i = 0; i < count; i++)
    {
        pEx = (CRxDbEntity*)pVa[i];
        pEx->erase();
    }
    pEx->close();
    pEnt->close();

    //如果数字是空则退出
    if (wcscmp(num,_T("")) == 0) return;

    // 打开当前图形模型空间块表记录
    CRxDbPaperTable* pTable;
    es = crxdbHostApplicationServices()->workingDatabase()->getPaperTable(pTable, CRxDb::kForRead);
    if (es != CDraft::eOk)    return;

    CRxDbPaperTableRecord* pRecord;
    es=pTable->getAt(_T("Model"), pRecord, CRxDb::kForRead);
    if (es != CDraft::eOk || pRecord==NULL ) return;

    //如果记录不为空，则读取明细表内容
    CRxTableInfoObject* pBomInfo;
    pRecord->getBomInfo(&pBomInfo);
    CxCHAR* DrawNumber_this; //当前图图号
    CxCHAR* DrawNumber_father; //当前图父图号
    CxCHAR* DrawNumber; //图号
    CxCHAR* DrawName;    //图名
    CxCHAR* DrawAmount;    //数量
    CxCHAR* DrawMaterial;    //材料
    CxCHAR* DrawProjectName;    //项目名称
    CxCHAR* DrawDesigner;    //设计者
    CString str_date = getDate();
    CxCHAR* DrawDate= str_date.AllocSysString();    //设计日期
    CxCHAR* DrawNumHead=_T(""); //图号头
    int i = _wtoi(num)-1; //把读取的字符转化为明细表序号数字    
    if (i>pBomInfo->getRowCount()) return;
    pBomInfo->getBomItemAt(i, 1, DrawNumber); //获取序号对应零件图号
    pBomInfo->getBomItemAt(i, 2, DrawName);    //获取图纸名称
    pBomInfo->getBomItemAt(i, 3, DrawAmount);//获取该零件数量
    pBomInfo->getBomItemAt(i, 4, DrawMaterial);//获取该零件材料

    //提取标题栏信息
    CRxAttCollInfoObject* pTitleInfo;
    pRecord->getTitleInfo(&pTitleInfo);
    pTitleInfo->getAttributeValue(DrawNumber_this, _T("图纸编号"));
    pTitleInfo->getAttributeValue(DrawProjectName, _T("项目名称"));
    pTitleInfo->getAttributeValue(DrawDesigner, _T("设计"));
    //截取当前图图号头、当前图父图号
    CString str_drawNumber(DrawNumber_this);
    if (!str_drawNumber.IsEmpty())
    {
        str_drawNumber = str_drawNumber.Left(str_drawNumber.Find(_T("-"))); //提取第一个 - 之前的为图号头
        DrawNumHead = str_drawNumber.AllocSysString(); 
    }    

    pRecord->ReleaseTableInfoObject(pBomInfo); //释放
    pRecord->ReleaseAttCollInfoObject(pTitleInfo); //释放
    pRecord->close();
    pTable->close();

    CString str(curDoc()->fileName());
    str=str.Left(str.ReverseFind(_T('\\')))+_T("\\")+ DrawNumber + DrawName+ _T(".exb");
    CxCHAR* filename = str.AllocSysString();
    //选择图元复制到新图
    crx_name ssName; // 选择集名称
    long length = 0; //选择集长度
    //若该序号对应的图纸文件存在则打开
    if (PathFileExists(filename))    crxDocManager->appContextOpenDocument(filename);
    //若该序号对应的图纸不存在则新建之
    else 
    {        
        //若子图号中找不到父图图号头，说明是标准件或外购件，返回
        if (wcsstr(DrawNumber, DrawNumHead) == NULL) return;
        //拷贝图形
        //crxedSSGet(_T("请选择新建图的图元："), NULL, NULL, NULL, ssName);
        //新建图形
        crxDocManager->appContextNewDocument(_T("D:\\ZAD\\CAXA\\GB-A4(4N).tpl"));
        // 获得得当前图形数据库
        //CRxDbDatabase* pDb = crxdbHostApplicationServices()->workingDatabase();
        //CRxDbDatabase* pDb = curDoc()->database();
        CRxDbDatabase* pDb;
        //遍历文档，激活最后一个文档（新建的）
        CRxApDocumentIterator* itr = crxDocManager->newAcApDocumentIterator();
        int i = 0,j=0;
        for (; !itr->done(); itr->step(),i++) {}
        itr = crxDocManager->newAcApDocumentIterator();
        for (; !itr->done();itr->step() ,j++) 
        {
            if(j==(i-1)) pDb = itr->document() ->database();
        }
        delete itr;
        
        // 打开当前图形模型空间块表记录
        CRxDbPaperTable* pTable;
        CDraft::ErrorStatus es = pDb->getPaperTable(pTable, CRxDb::kForWrite);
        if (es != CDraft::eOk)    return;
        CRxDbPaperTableRecord* pRecord;
        es=pTable->getAt(_T("Model"), pRecord, CRxDb::kForWrite);
        if (es != CDraft::eOk || pRecord==NULL)    return;
        //如果记录不为空，则设置标题栏内容
        CRxAttCollInfoObject* pTitleInfo;
        if (pRecord != NULL)
        {
            pRecord->getTitleInfo(&pTitleInfo);
            if (es != CDraft::eOk)    return;
            int iCount = pTitleInfo->getAttributesCount();
            for (int i = 0; i < iCount; i++)
            {
                CxCHAR* cAttName;
                pTitleInfo->getAttributeName(cAttName, i);
                if (wcscmp(cAttName,_T("图纸编号")) == 0) pTitleInfo->setAttributeValue(DrawNumber, i);
                else if (wcscmp(cAttName, _T("图纸名称")) == 0) pTitleInfo->setAttributeValue(DrawName, i);
                else if (wcscmp(cAttName, _T("数量")) == 0) pTitleInfo->setAttributeValue(DrawAmount, i);
                else if (wcscmp(cAttName, _T("材料名称")) == 0) pTitleInfo->setAttributeValue(DrawMaterial, i);
                else if (wcscmp(cAttName, _T("项目名称")) == 0) pTitleInfo->setAttributeValue(DrawProjectName, i);
                else if (wcscmp(cAttName, _T("设计")) == 0) pTitleInfo->setAttributeValue(DrawDesigner, i);
                else if (wcscmp(cAttName, _T("设计日期")) == 0) pTitleInfo->setAttributeValue(DrawDate, i);
            }
        }
        es=pRecord->setTitleInfo(pTitleInfo);
        if (es != CDraft::eOk)    return;
        pRecord->ReleaseAttCollInfoObject(pTitleInfo); //释放

        es = pRecord->close();
        es = pTable->close();

    }
}