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 gfOpenSelectUnit(pstrForm
, pstrUnitCodeField
, pstrUnitNameField
, pstrWindowWidth
, pstrWindowHeight
) {
var wstrUrl = '';
var wobjControl = eval('document.' + pstrForm + '.' + pstrUnitCodeField);
var wstrCodeData = wobjControl.value;
wstrUrl = '/scripts/Sel_Unit.asp'
+ '?fnm=' + pstrForm
+ '&inmcd=' + pstrUnitCodeField
+ '&inmnm=' + pstrUnitNameField
+ '&cddata=' + wstrCodeData
;
gfOpenWindow(wstrUrl
, 'SelectUnit'
, pstrWindowWidth
, pstrWindowHeight
);
wstrCodeData = null;
wobjControl = null;
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 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 gfOpenSelectChildMemberInvoice(pstrForm
, pstrChildMemberNameField
, pstrInvoice
, pstrSelBuy
) {
var wstrUrl = '';
wstrUrl = '/scripts/Sel_member.asp'
+ '?fnm=' + pstrForm
+ '&inm_1=' + pstrChildMemberNameField
+ '&invoice=' + pstrInvoice
+ '&selbuy=' + pstrSelBuy
;
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 gfOpenSelectCalendarEtc(pstrForm
, pstrDateField
, pstrAddParameter
) {
var wstrUrl = '';
wstrUrl = '/scripts/Sel_Calendar.asp'
+ '?i_date=' + eval(pstrForm + '.' + pstrDateField).value
+ '&fnm=' + pstrForm
+ '&inm=' + pstrDateField
+ pstrAddParameter
;
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 rollOnOff(pObjId
, pstrColor
, pObjRow
) {
if ( pstrColor=="" ){
pstrColor = "#90EE90";
}
eval( String(pObjId) + ".style.backgroundColor = '" + pstrColor + "'");
if ( pObjRow != "" ) { 
eval( String(pObjRow) + ".style.backgroundColor = '" + pstrColor + "'");
}
}
var os = navigator.platform.substr(0,3);
var cl = navigator.appName;
var fn = "";
if (os=="Win"){
if (cl=="Microsoft Internet Explorer"){
fn = "win_ie.css";
}
if (cl=="Netscape"){
fn = "win_nn.css";
}
}
if (os=="Mac"){
if (cl=="Microsoft Internet Explorer"){
fn = "mac_ie.css";
}
if (cl=="Netscape"){
fn = "mac_nn.css";
}
}
if (fn != ""){
document.writeln("<link rel=\"stylesheet\" type=\"text/css\" href=\"/trade/css/" + fn + "\" title=\"css\">");
}
function imgChange01(menu01){
document.menu01.src = menu01;
}
function imgChange02(menu02){
document.menu02.src = menu02;
}
function imgChange03(menu03){
document.menu03.src = menu03;
}
function imgChange04(menu04){
document.menu04.src = menu04;
}
function imgChange05(menu05){
document.menu05.src = menu05;
}
function imgChange06(menu06){
document.menu06.src = menu06;
}
function imgChange07(menu07){
document.menu07.src = menu07;
}
function imgChange08(menu08){
document.menu08.src = menu08;
}