UploadAll

Выполняет загрузку данных в текущую базу данных из файла .dat.

void __cdecl UploadAll(CDataBase7 &DataBase, CDB7Stream &Stream,char const *pcszPathToDB);

Параметры

Data Base?

Stream

pcszPathToDB

Пример

Почти полностью рабочий пример загрузки данных в нераспределенную базу формата DBase:
void CConfTestModule::OnDownloadData() { UINT nConfigDocID = CConfigCont::DocID; CConfigCont *pConfig = (CConfigCont *)CTemplate7::GetDocument (nConfigDocID); // получаем объект CConfigCont if (!pConfig) return; pConfig->OnCloseDocument (); // закрываем контейнер метаданных CMetaDataCont *pMetaData = GetMetaData (); // получаем описание метаданных if (!pMetaData) return; pMetaData->DeleteAllData (TRUE); // очищаем описание метаданных CApp7 *pApp = (CApp7 *)AfxGetApp (); CProfile7 *pProfile = pApp->GetProps (); CString strMDPath = pProfile->GetStringProp (PROP_MD_PATH); // получаем путь к 1cv7.md текущей БД FileCopy ("E:/Temp/1cv7.md", (LPCTSTR)strMDPath); // замещаем МД-файл новым const char *pszMDTempPath = (LPCTSTR)CConfigCont::m_FullTempPath; FileCopy ("E:/Temp/1cv7.md", pszMDTempPath); // замещаем МД во временном каталоге новым pConfig->OnOpenDocument (pszMDTempPath); // открытие нового МД // Загрузка данных из нового МД int iNumPages = pConfig->m_objArray.GetSize (); for (int i = 0; i < iNumPages; i++) { pConfig->ReadPage (i); } CString strDDPath = pProfile->GetStringProp (PROP_DD_PATH); // получаем путь к файлы 1cv7.dd текущей БД CMetaDataFileService::ConvMDtoDD (pMetaData, strDDPath); // создаем новый 1cv7.dd на основе новой конфигурации // Такой код в config.dll: сначала сохраняем метаданные в промежуточный массив, потом восстанавливаем CItemList MetaDataList; pMetaData->SaveToList (MetaDataList); pMetaData->DeleteAllData (TRUE); pMetaData->LoadFromList (MetaDataList); CDB7Stream Stream; Stream.Open ("E:/Temp/1cv77.dat", 2); // Открываем поток для чтения CDataBase7 *pDataBase = CDataBase7::GetDefault (); // Получаем текущую базу данных pDataBase->Open (1, 1, 1, 1, 1); // Открываем базу данных CSystemSet *pSystemSet = GetSysSet (); CDBSign DBSign = pSystemSet->GetDBSign (); CObjID::SetDefDBSign (DBSign); // Устанавливаем стандартный код БД для объектов БД CString strDBPath = pProfile->GetStringProp (PROP_DB_PATH); // Получаем путь к текущей БД UploadAll (*pDataBase, Stream, (LPCTSTR)strDBPath); // Выполняем загрузку данных pApp->OnDBOpened (); // Отрабатываем событие "При открытии БД" RecalcProcess ((LPCTSTR)strDBPath); // Восстановление индексов, пересчет ссылок, пересчет бухгалтерских и оперативных итогов... pApp->OnDBClosing (); // Отрабатываем событие "При закрытии БД". Stream.Close (); // Закрываем поток pDataBase->Close (); // Закрываем БД }

Данный пример необходимо модифицировать для базы SQL (понадобится изменить код по созданию DD на создание DDS). Обнаружена неработоспособность примера в распределенной БД (данные выгружаются/загружаются только частично).