//---------------------------------------------------------------------------

#include <vcl.h>
#include <inifiles.hpp>
#pragma hdrstop

#include "HJerpAPI.h"
#include <stdio.h>
#include <windows.h>

//---------------------------------------------------------------------------

// HJ 호전실업용 API class 설계 - seungmin

const String HJerpAPI::ActionI = "I";
const String HJerpAPI::ActionC = "C";
const String HJerpAPI::ActionS = "S";

// ** 호전실업 서버 URL 변경시 이부분 변경해야함! - seungmin
const String HJerpAPI::BASE_URL;

// HJ ERP response list---------------
const String HJerpAPI::EDNF = "EDNF";
const String HJerpAPI::ESUE = "ESUE";
const String HJerpAPI::EDSE = "EDSE";
const String HJerpAPI::ESTO = "ESTO";//20191107 추가
const String HJerpAPI::SUCS = "SUCS";
// -----------------------------------

HJerpAPI::HJerpAPI(String task_parameter, TIdHTTP *http)
	: task_parameter(task_parameter), http(http)
{
	//20191107
	//호전실업에서 요청한 URL을 직접 입력할 수 있도록 텍스트 파일을 읽어서 대입하는 코드//////////////////////////////////////////////
	TIniFile * ini = new TIniFile("C:\\YoungWoo\\TexStylist4.0\\Bin\\BASE_URL.ini");
	TStringList * SecList = new TStringList;
	TStringList * ValueList = new TStringList;

	ini->ReadSections(SecList);
	for(int i=0; i<SecList->Count; i++){
		ini->ReadSectionValues(SecList->Strings[i], ValueList);
	}
	String url = ValueList->Strings[0];

	wchar_t * w_url = url.c_str();
	TStringList *split_url = new TStringList;
	ExtractStrings(TSysCharSet()<<'=', TSysCharSet(), w_url, split_url);

	String keyName = split_url->Strings[0];
	String keyValue = split_url->Strings[1];

	base_request_url = keyValue + "?seq=" + task_parameter;
	/////////////////////////////////////////////////////////////////////////////////////////////
}

String HJerpAPI::Action(String type) {
	String request = base_request_url + "&action=" + type;
	try {
		String response = http->Get(request);
		return response;
	}
	catch (const EIdHTTPProtocolException &e) {
		return "fail";
	}
	catch (const EIdException &e) {
		return "fail";
	}
}

String HJerpAPI::Seq() {
	try {
		String response = http->Get(base_request_url);
		return response;
	}
	catch (const EIdHTTPProtocolException &e) {
		return "fail";
	}
	catch (const EIdException &e) {
		return "fail";
	}
}

//TexStylist 호출 시 에러 메세지를 띄워달라는 요구사항에 관한 코드
//실제 ERP를 열어서 테스트를 했을 때 메세지가 뜨지 않는 다고 함
//개발 진행은 하지 않을 예정이나 추후 혹시 개발하게 될 가능성이 있음 - 20191114 - kisub
/*
int erpToStylistCount = 0; // ERP 에서 TexStylist 를 호출하는 횟수
void HJerpAPI::HandleResponse(String request, String response) {
	//EDNF, ESTO 때 에러 메세지 출력
	if(response.Pos(EDNF)){
		ShowMessage("API와 문제가 있습니다. 결과값 : " + EDNF);
	}
	else if(response.Pos(ESTO)){
		ShowMessage("API와 문제가 있습니다. 결과값 : " + ESTO);
	}
	else if(response.Pos(ESUE) || response.Pos(EDSE)){
		// TODO ESUE / EDSE 리턴시 수 초후 (2-3초) 재 호출
		if(erpToStylistCount == 0){
			Sleep(2000);
			http->Get(request);
			erpToStylistCount = erpToStylistCount + 1;
		}
		else if(erpToStylistCount == 1){
			if(response.Pos(ESUE)){
				ShowMessage("API와 문제가 있습니다. 결과값 : " + ESUE);
			}
			else if(response.Pos(EDSE)){
				ShowMessage("API와 문제가 있습니다. 결과값 : " + EDSE);
			}
			erpToStylistCount = erpToStylistCount - 1;
		}
	}
}
*/
#pragma package(smart_init)