var mobjWindowHandle;
var mblnWiondowOpen = false;
var mstrSaveFieldValue;

function gfOpenWindow(pstrUrl
, pstrWindowName
, pstrWindowWidth
, pstrWindowHeight
) {

var wstrWindowOption = '';

wstrWindowOption = 'width=' + pstrWindowWidth
+ ',height=' + pstrWindowHeight
+ ',scrollbars=yes'
+ ',resizable=yes'
;

mobjWindowHandle = window.open(pstrUrl
, pstrWindowName
, wstrWindowOption
);
mblnWiondowOpen = true;

}



function gfCloseWindow() {

if (!mblnWiondowOpen) return;

if (mobjWindowHandle.closed == false){
mobjWindowHandle.close();
}

}



function gfOpenSelectCustomer(pstrSelBuy
, pstrForm
, pstrCustomerNameField
, pstrWindowWidth
, pstrWindowHeight
) {

var wstrUrl = '';

wstrUrl = '/scripts/Sel_Customer.asp'
+ '?fnm=' + pstrForm
+ '&inm_1=' + pstrCustomerNameField
+ '&selbuy=' + pstrSelBuy
;

gfOpenWindow(wstrUrl
, 'select_customer_member'
, pstrWindowWidth
, pstrWindowHeight
);
return;

}

function gfOpenSelectCustomer2(pstrSelBuy
, pstrForm
, pstrCustomerNameField
, pstrWindowWidth
, pstrWindowHeight
, pstrinm_2
, pintRDflg
, pintsmt
) {

var wstrUrl = '';

wstrUrl = '/scripts/Sel_Customer.asp'
+ '?fnm=' + pstrForm
+ '&selbuy=' + pstrSelBuy
+ '&mcdflg=1'
+ '&inm_1=' + pstrCustomerNameField
+ '&return_direct=' + pintRDflg 
+ '&smt=' + pintsmt;
if (pintRDflg == 1){
wstrUrl = wstrUrl + '&inm_2=' + pstrinm_2 
}

gfOpenWindow(wstrUrl
, 'select_customer_member'
, pstrWindowWidth
, pstrWindowHeight
);
return;

}


function gfEmpOpenSelectCustomer(pstrSelBuy, pstrForm, pstrCustomerNameField, pstrViewGuide, pstrWindowWidth, pstrWindowHeight, pstrinm_2, pintRDflg, pintsmt) {

var wstrUrl;

wstrUrl = "";
wstrUrl = wstrUrl + "/scripts/Sel_Customer.asp";
wstrUrl = wstrUrl + "?fnm=" + pstrForm;
wstrUrl = wstrUrl + "&inm_1=" + pstrCustomerNameField;
wstrUrl = wstrUrl + "&selbuy=" + pstrSelBuy;
wstrUrl = wstrUrl + "&mcdflg=1";
wstrUrl = wstrUrl + "&view_guide=" + pstrViewGuide;
wstrUrl = wstrUrl + "&return_direct=" + pintRDflg 
wstrUrl = wstrUrl + "&smt=" + pintsmt;
if (pintRDflg == 1) {
wstrUrl = wstrUrl + "&inm_2=" + pstrinm_2
}

gfOpenWindow(wstrUrl, "select_customer_member", pstrWindowWidth, pstrWindowHeight);
return;

}


function gfOpenSelectDeriveryDirect(pstrForm, pstrCustomerNameField, w, h,pmcd,pmcd_b,pintsmt) {

var url
url = ''
url = url + '/scripts/Sel_Customer.asp'
url = url + '?fnm=' + pstrForm
url = url + '&inm_1=' + pstrCustomerNameField
url = url + '&direct_delivery=2'
url = url + '&chk_mcd_s=' + pmcd
url = url + '&ctrflg=BS'
url = url + '&ctr_mcd_b=' +pmcd_b
url = url + '&mcdflg=1'
url = url + '&smt=' +pintsmt

gfOpenWindow(url, 'select_customer_member', w, h)
return;
}

function gfOpenChangeMember( pstrMode, pstrCid, pstrTid, pstrWindowName ) {

var wstrUrl = '';

wstrUrl += '/trade/change_member.asp';
wstrUrl += '?mode=' + pstrMode;
wstrUrl += '&cid='  + pstrCid;
wstrUrl += '&tid='  + pstrTid;

gfOpenWindow(wstrUrl
, pstrWindowName
, 660
, 500
);
return;
}

function gfOpenChangeMemberNET( pstrMode, pstrCid, pstrTid, pstrWindowName ) {

var wstrUrl = '';

wstrUrl += '/trade/change_member.aspx';
wstrUrl += '?mode=' + pstrMode;
wstrUrl += '&cid='  + pstrCid;
wstrUrl += '&tid='  + pstrTid;

gfOpenWindow(wstrUrl
, pstrWindowName
, 660
, 500
);
return;
}


function gfOpenSelectChildMember(pstrForm
, pstrChildMemberNameField
, pstrMode
) {

var wstrUrl = '';

wstrUrl = '/scripts/Sel_member.asp'
+ '?fnm=' + pstrForm
+ '&inm_1=' + pstrChildMemberNameField
;

if (pstrMode != null) wstrUrl += '&mode=' + pstrMode;

gfOpenWindow(wstrUrl
, 'select_child_member'
, 450
, 350
);
return;

}



function gfOpenSelectGroupMemberCode(pstrForm
, pstrChildMemberNameField
, pstrChildMemberCodeField   
) {

var wstrUrl = '';

wstrUrl = '/scripts/Sel_group_member.asp'
+ '?fnm=' + pstrForm
+ '&inm_1=' + pstrChildMemberNameField
+ '&icd_1=' + pstrChildMemberCodeField
;

gfOpenWindow(wstrUrl
, 'select_child_member'
, 700
, 350
);
return;

}


function gfOpenSelectGroupMemberCodeEtc(pstrForm
, pstrChildMemberNameField
, pstrChildMemberCodeField
, pstrAddParameter
) {

var wstrUrl = '';

wstrUrl = '/scripts/Sel_group_member.asp'
+ '?fnm=' + pstrForm
+ '&inm_1=' + pstrChildMemberNameField
+ '&icd_1=' + pstrChildMemberCodeField
+ pstrAddParameter
;

gfOpenWindow(wstrUrl
, 'select_child_member'
, 700
, 350
);
return;

}



function gfOpenSelectChildMemberCode(pstrForm
, pstrChildMemberNameField
, pstrChildMemberCodeField
, pstrDisappearEmpOnlyFlg
) {

var wstrUrl = '';

wstrUrl = '/scripts/Sel_member.asp'
+ '?fnm=' + pstrForm
+ '&inm_1=' + pstrChildMemberNameField
+ '&inm_2=' + pstrChildMemberCodeField
+ '&emp='   + pstrDisappearEmpOnlyFlg
;

gfOpenWindow(wstrUrl
, 'select_child_member'
, 450
, 350
);
return;

}


function gfOpenSelectChildMemberCodeSel(pstrForm
,    pstrChildMemberNameField
,    pstrChildMemberCodeField
,    pstrKbnMember
) {

var wstrUrl = '';

wstrUrl = '/scripts/Sel_member.asp'
+ '?fnm=' + pstrForm
+ '&inm_1=' + pstrChildMemberNameField
+ '&inm_2=' + pstrChildMemberCodeField
+ '&membersel=' + pstrKbnMember
;

gfOpenWindow(wstrUrl
, 'select_child_member'
, 450
, 350
);
return;

}


function gfOpenSelectChildMemberCodeProd(pstrForm
, pstrChildMemberNameField
, pstrChildMemberCodeField
, pstrSubmit
) {

var wstrUrl = '';

wstrUrl = '/scripts/Sel_member.asp'
+ '?fnm=' + pstrForm
+ '&inm_1=' + pstrChildMemberNameField
+ '&inm_2=' + pstrChildMemberCodeField
+ '&Submit=' + pstrSubmit;
;

gfOpenWindow(wstrUrl
, 'select_child_member'
, 450
, 350
);
return;

}


function gfOpenSelectChildMemberCodeEtc(pstrForm
, pstrChildMemberNameField
, pstrChildMemberCodeField
, pstrAddParameter
) {

var wstrUrl = '';

wstrUrl = '/scripts/Sel_member.asp'
+ '?fnm=' + pstrForm
+ '&inm_1=' + pstrChildMemberNameField
+ '&inm_2=' + pstrChildMemberCodeField
+ pstrAddParameter
;

gfOpenWindow(wstrUrl
, 'select_child_member'
, 450
, 350
);
return;

}



function gfOpenSelectCalendar(pstrForm
, pstrDateField
) {

var wstrUrl = '';

wstrUrl = '/scripts/Sel_Calendar.asp'
+ '?i_date=' + eval(pstrForm + '.' + pstrDateField).value
+ '&fnm=' + pstrForm
+ '&inm=' + pstrDateField
;

gfOpenWindow(wstrUrl
, 'DaySelect'
, 300
, 384
);
return;

}



function gfSaveFieldValue(pobjObject) {

mstrSaveFieldValue = pobjObject.value;

}



function gfFormatDate(pobjObject
, pintMode
, pintLength
) {

var wstrWork = '';
var wobjWork = null;

wobjWork = eval(pobjObject);
wstrWork = gfTrim(wobjWork.value);


wobjWork.value = wstrWork;
if (wstrWork == "") return;

switch (pintMode){
case 1:
if (gfStrLen(wstrWork) > pintLength){
wobjWork.value = mstrSaveFieldValue;
}
break;

case 2:
var wstrYear, wstrMonth, wstrDay;
var wstrNewYear, wstrNewMonth, wstrNewDay;
var wblnCheck = false;

if (wstrWork.match(/^(([0-9]{4})\/|)([0-9]{1,2})\/([0-9]{1,2})$/)){
wstrYear = RegExp.$2;
wstrMonth = RegExp.$3;
wstrDay = RegExp.$4;
if (wstrYear.length == 0){
wstrYear = (new Date()).getYear();
}
if (gfIsDate(wstrYear, RegExp.$3, RegExp.$4)){
wstrNewYear = ('0000' + wstrYear);
wstrNewYear = wstrNewYear.substring(wstrNewYear.length - 4);

wstrNewMonth = ('00' + wstrMonth);
wstrNewMonth = wstrNewMonth.substring(wstrNewMonth.length - 2);

wstrNewDay = ('00' + wstrDay);
wstrNewDay = wstrNewDay.substring(wstrNewDay.length - 2);

wobjWork.value = wstrNewYear + '/' + wstrNewMonth + '/' + wstrNewDay;
return;

}else{
wblnCheck = true;
}
}else{
wblnCheck = true;
}

if (wblnCheck){
wobjWork.value = mstrSaveFieldValue;
}
break;
}

wobjWork = null;
wstrWork = null;

}



function gfIsDate(pstrYear,pstrMonth,pstrDay) {

var waryLastDays = new Array (31,28,31,30,31,30,31,31,30,31,30,31);
var wblnTemp = false;

if ((pstrYear % 100 == 0) && (pstrYear % 400 != 0)) {
wblnTemp = false;
} else if (pstrYear % 4 == 0){
wblnTemp = true;
}
if (wblnTemp) waryLastDays[1] = 29;

if ((pstrYear < 1) || (pstrYear > 9999)) return false;
if ((pstrMonth < 1) || (pstrMonth > 12)) return false;
if ((pstrDay < 1) || (pstrDay > waryLastDays[pstrMonth - 1])) return false;


waryLastDays = null
return true;

}



function gfStrLen(pstrExpression
, pintLength
, I
) {

pintLength = 0;
wstrWork = escape(pstrExpression);
for (I = 0; I < pstrExpression.length; I++, pintLength++) {
if (pstrExpression.charAt(I) == '%') {
if (pstrExpression.charAt(++I) == 'u') {
I += 3;
pintLength++;
}
I++;
}
}
return pintLength;

}



function gfTrim(pstrExpression) {

var wstrRtn = '';

wstrRtn = pstrExpression;
wstrRtn = wstrRtn.replace(/^[ �@]+/, '');
wstrRtn = wstrRtn.replace(/[ �@]+$/, '');

return(wstrRtn);

}



function gfPaging(pstrForm
, pstrPageNoField
, pintPageNoValue
) {

var wobjControl = eval(pstrForm + '.' + pstrPageNoField);

wobjControl.value = pintPageNoValue;
document[pstrForm].submit();


wobjControl = null;

}

function gfDisabledTarget(pobjObject
, pintSetFlg
, pintMode
) {

pobjObject.disabled = pintSetFlg;
if (pintMode) {
if (pintSetFlg) {
pobjObject.style.backgroundColor ="#dddddd";
}else{
pobjObject.style.backgroundColor ="#FFFFFF";
}
}

}

function gfCheckPeriod( pobjFrom, pobjTo, pintTarget, pstrValue ) {

var wstrFrom    = pobjFrom.value;
var wstrTo      = pobjTo.value;

if (wstrFrom > wstrTo ) {
if (pintTarget == 1) {
pobjFrom.value = pstrValue;
}
else {
pobjTo.value = pstrValue;
}
}
return;
}


function gfEmpChkInputValue(pobjVal, pobjTarget, pstrResult, pstrTarget2, pstrResult2) {

switch(arguments.length) {
case 3:
gfEmpCheckValue(pobjVal, pobjTarget, pstrResult);
break;

case 5:
gfEmpCheckValueChangeDiv(pobjVal, pobjTarget, pstrResult, pstrTarget2, pstrResult2);
break;

default:
gfEmpCheckValue(pobjVal, pobjTarget, pstrResult);
break;
}

}


function gfEmpCheckValue(pobjVal, pobjTarget, pstrResult) {

if(gfEmpTrim(pobjVal.value) != gfEmpTrim(mstrSaveFieldValue)) {
pobjTarget.value = pstrResult;
}

}


function gfEmpCheckValueChangeDiv(pobjVal, pobjTarget, pstrResult, pstrTarget2, pstrResult2) {

if (gfEmpTrim(pobjVal.value) != gfEmpTrim(mstrSaveFieldValue)) {
pobjTarget.value = pstrResult;

if (gfEmpTrim(pobjVal.value) != "" && gfEmpTrim(pstrTarget2) != "") {
if (gfEmpTrim(pstrResult2) != "") {
document.getElementById(pstrTarget2).style.display = "none";
document.getElementById(pstrTarget2).innerHTML = pstrResult2;
document.getElementById(pstrTarget2).style.display = "block";

} else {
document.getElementById(pstrTarget2).style.display = "none";

}

} else {
document.getElementById(pstrTarget2).innerHTML = "";
document.getElementById(pstrTarget2).style.display = "none";

}
}

}


function gfEmpTrim(pstrVal) {
pstrVal = pstrVal.replace(/^[ �@]+/, "");
pstrVal = pstrVal.replace(/[ �@]+$/, "");
return(pstrVal);
}


function gfEmpCheckNumericText(pobjValue){

var wstrValue = Trim(pobjValue.value);

if (wstrValue == "") {
return;
}

if (isNaN(wstrValue)) {
pobjValue.value = mstrSaveFieldValue;
return;
}

}