이것은 일련의 튜토리얼 예제 중 10번째 모델입니다.더 보기...

#include "슬롯 사이트 추천h"
#include <iostream>
#include <벡터>
#include <QAxObject>
#include <Windows.h>

기능
문자열	getModelText ()

슬롯 사이트 추천매개변수	sheetToParameter(QAxObject *sheets, 문자열 sheetName,슬롯 사이트 추천데이터베이스db, 문자열 paramName, 문자열 paramText,GAMSSet설정)

슬롯 사이트 추천매개변수	sheetToParameter(QAxObject *sheets, 문자열 sheetName,슬롯 사이트 추천데이터베이스db, 문자열 paramName, 문자열 paramText,GAMSSet세트1,GAMSSet세트2)

int	메인(int argc, char *argv[])

자세한 설명

이것은 일련의 튜토리얼 예제 중 10번째 모델입니다.

여기서 보여드리겠습니다:

MS Excel에서 읽어 GAMSDatabase를 채우는 방법

파일의 정의transport10.cpp.

함수 문서

◆ getModelText()

string getModelText ( )

라인 정의49파일transport10.cpp.

{
    반환  " 세트 \n"
            "나는 식물을 통조림으로 만들고 있습니다 \n"
            " j 시장 \n"
            " \n"
            " 매개변수 \n"
            " a(i) 경우에 따라 공장 i의 용량 \n"
            " b(j) 경우의 시장 j 수요 \n"
            " d(i,j) 거리(천 마일 단위) \n"
            " 스칼라 f 운임(1,000 마일당 케이스당 달러 단위) /90/; \n"
            " \n"
            "$if gdxincname $abort '제공된 데이터 파일에 대한 포함 파일 이름이 설정되지 않았습니다'\n"
            "$gdxin %gdxincname% \n"
            "$load i j a b d \n"
            "$gdxin\n"
            " \n"
            " 매개변수 c(i,j) 운송 비용(케이스당 수천 달러) ; \n"
            " \n"
            " c(i,j) = f * d(i,j) / 1000 ; \n"
            " \n"
            " 변수 \n"
            " x(i,j) 배송 수량 \n"
            " z 총 운송 비용(단위: 수천 달러) ; \n"
            " \n"
            " 양수 변수 x ; \n"
            " \n"
            " 방정식 \n"
            " 비용 정의 목적 함수 \n"
            " 공급(i) 공장 i의 공급 제한 준수 \n"
            " 수요(j)는 시장 j의 수요를 충족시킵니다. \n"
            " \n"
            " 비용 .. z =e= sum((i,j), c(i,j)*x(i,j)) ; \n"
            " \n"
            " 공급(i) .. sum(j, x(i,j)) =l= a(i) ; \n"
            " \n"
            " 수요(j) .. sum(i, x(i,j)) =g= b(j) ; \n"
            " \n"
            " 모델 전송 /all/ ; \n"
            " \n"
            " z를 최소화하는 lp를 사용하여 전송 문제를 해결합니다. \n"
            " \n"
            " x.l, x.m 표시 ; \n";
}

참조자메인().

◆ 메인()

int 메인	(	int	argc,
		문자 *	argv[] )

라인 정의165파일transport10.cpp.

{
cout <<"---------- 수송 10 ------------"<< endl;
    시도해 보세요{
::CoInitialize(0);// ActiveX를 사용하도록 스레드 초기화(일부 시스템에는 CoInitializeEx가 필요할 수 있음)
 
        GAMSWorkspaceInfowsInfo;
        if(인수 > 1)
wsInfo.setSystemDirectory(argv[1]);
        슬롯 사이트 추천작업공간ws(wsInfo);
 
        // GAMSDatabase 생성 및 통합 문서 데이터 채우기
        슬롯 사이트 추천데이터베이스db = ws.addDatabase();
QString fileName = QString::fromStdString(ws.systemDirectory())+ cPathSep +"api파일"+ cPathSep +"데이터"+ cPathSep +"transport.xlsx";
 
QAxObject* 엑셀 =신규QAxObject("Excel.응용프로그램", 0 );
QAxObject* 통합 문서 = excel->querySubObject("통합문서");
QAxObject* 통합 문서 = 통합 문서->querySubObject("열기(const QString&)", 파일 이름 );
QAxObject* 시트 = 통합 문서->querySubObject("워크시트");
 
        GAMSSeti = db.추가세트("나", 1,"식물");
        GAMSSetj = db.추가세트("j", 1,"시장");
 
        //매개변수 읽기
        sheetToParameter(시트,"용량", DB,"a", "용량", i);
        sheetToParameter(시트,"수요",디비,"b", "수요", j);
        sheetToParameter(시트,"거리", DB,"d", "거리", i, j);
 
        // 정리하고 닫습니다
워크북->dynamicCall("닫기()");
excel->dynamicCall("종료()");
 
 
        // GAMSJob 생성 및 실행
        슬롯 사이트 추천옵션opt = ws.addOptions();
        GAMSJobt10 = ws.addJobFromString(getModelText());
선택.setDefine("gdxincname", DB.이름());
선택.setAllModelTypes("익스프레스");
t10.실행(선택, DB);
        for (GAMSVariableRecord기록 : t10.outDB().get변수("x"))
cout <<"x("<< 레코드.키(0) <<","<< 레코드.키(1) <<"): 레벨="<< 레코드.레벨() <<
                    " 한계="<< Record.marginal() << endl;
 
::CoUninitialize();
 
}잡기 (슬롯 사이트 추천예외&ex)
cout <<"슬롯 사이트 추천예외 발생: "<< ex.what() << endl;
}잡기(예외 &ex)
cout << ex.what() << endl;
}
 
    반환0;
}

◆ sheetToParameter()[1/2]

슬롯 사이트 추천매개변수sheetToParameter	(	QAxObject *	시트,
		문자열	시트이름,
		슬롯 사이트 추천데이터베이스	db,
		문자열	paramName,
		문자열	paramText,
		GAMSSet	설정 )

1차원 GAMSParameter를 생성하고 Excel 시트에서 데이터를 전송합니다(가로 정렬)

매개변수

시트	열린 Excel 통합 문서의 시트 개체
시트이름	읽을 시트의 이름
db	GAMSParameter가 생성된 GAMSDatabase
paramName	새 GAMSParameter의 이름
paramText	새 GAMSParameter에 대한 설명 텍스트
세트	GAMSParameter 차원에 대한 GAMSSet

반환: GAMSDatabase의 새로운 GAMSParameter

라인 정의104파일transport10.cpp.

{
QAxObject* 시트 = 시트->querySubObject("아이템(문자열)", sheetName.c_str() );
    슬롯 사이트 추천매개변수param = db.addParameter(paramName, paramText, set);
 
QAxObject* 사용 범위 = 시트->querySubObject("사용범위");
QAxObject * columns = Usedrange->querySubObject("열");
    intintCols = 열->속성("카운트").toInt();
 
    for (inti = 1; 나는 <= intCols; 나++)
std::string 이름 = 시트->querySubObject("셀( int, int )", 1, i)->dynamicCall("값()").toString().toStdString();
        더블값 = 시트->querySubObject("셀( int, int )", 2, i)->dynamicCall("값()").toDouble();
설정합니다.추가기록(이름);
        GAMSParameterRecordrec = 매개변수.추가기록(이름);
추천세트값(값);
}
    반환매개변수;
}