charset="EUC-KR";

/*=======================================================================================
###현재 정의되어 있는 함수 리스트###
- g_Srch_Detail_Info(a_gubun, a_control_no, a_marc_data, a_conv)
            ----------------------------------------------------------------------------
            기  능 : Marc데이타를 잘라서
                     gs_Detail_Disp_Code[], gs_Detail_Disp_Name[] 배열에 저장

            인  수 : String a_gubun       ==> "mm", "ss", "aa", ab"
                     Int    a_control_no  ==> 제어번호
                     String a_marc_data   ==> ct_master 혹은 rt_master의 marc_data값
                     String a_conv        ==> "한글", "한자"
            RETURN : Array 갯수
            ----------------------------------------------------------------------------
            gs_Detail_Disp_Name[] 값의 첫째값이 `이면 다음문자를 제외하고 보여주어야 함 (꼬리물기검색용)
                                                예)  `A이종훈 ==> 이종훈 보여준다.
                                                      A의 값은 저자라는것을 의미함
            ---------------------------------------------------------------------------- 
=========================================================================================*/
/*Global Variable---------------- */
/*
	090ab  (1개)
	100a, 110a, 111a, 700a, 710a, 711a   (6개)
	240a, 246a, 247a, 440a, 490a, 740a, 760t, 762t, 765t, 767t, 770t, 772t, 773t, 774t, 775t, 776t, 777t, 780t, 785t, 787t, 830a
240a, 440a, 490a, 740a, 830a, 246a, 247a    (7)
	260b
	600, 610, 611, 630, 650, 651, 653, 655 -- all  (8개)

760, 762, 765, 767, 770, 772, 773, 774, 775, 776, 777, 787   ==> t  (14)
780, 785,
*/

gstag_line     = new Array();
//gstag_line[0]  = ' 001    제어번호 ';
gstag_line[0]  = ' 088  보고서번호 ';
gstag_line[1]  = ' 002    자료유형 ';

gstag_line[01] = ' 088   보고서번호 ';
gstag_line[02] = ' 000    청구기호 ';	//090
gstag_line[03] = ' 000    청구기호 '; //099
gstag_line[04] = ' 245   서명/논제 ';
gstag_line[05] = 'A100        저자 ';
gstag_line[06] = ' 700  부출(저자) ';
gstag_line[07] = 'A110저자(단체명) ';
gstag_line[08] = 'A710부출(단체명) ';
gstag_line[09] = 'A111저자(회의명) ';
gstag_line[10] = 'A711부출(회의명) ';
gstag_line[11] = 'T246    변형표제 ';
gstag_line[12] = 'T247    변형표제 ';
gstag_line[13] = 'T240    통일서명 ';
gstag_line[14] = ' 440      총서명 ';
gstag_line[15] = ' 490총서명(변형) ';
gstag_line[16] = ' 250      판사항 ';
gstag_line[17] = ' 260    발행사항 ';
gstag_line[18] = ' 300    형태사항 ';
gstag_line[19] = 'S600  주제(인명) ';
gstag_line[20] = 'S610주제(단체명) ';
gstag_line[21] = 'S611주제(회의명) ';
gstag_line[22] = 'S630  주제(서명) ';
gstag_line[23] = 'S650  주제(일반) ';
gstag_line[24] = 'S651  주제(지명) ';
gstag_line[25] = 'S653비통제주제어 ';
gstag_line[26] = 'S655비통제주제어 ';
gstag_line[27] = 'T740  부출(변형) ';
gstag_line[28] = ' 830  부출(통일) ';
gstag_line[29] = 't760    상위총서 ';
gstag_line[30] = 't762    하위총서 ';
gstag_line[31] = 't765    원저저록 ';
gstag_line[32] = 't767    번역저록 ';
gstag_line[33] = 't770 보유/특별호 ';
gstag_line[34] = 't772  모체레코드 ';
gstag_line[35] = 't773    기본저록 ';
gstag_line[36] = 't774    기타저록 ';
gstag_line[37] = 't775   異版 저록 ';
gstag_line[38] = ' 776기타형태저록 ';
gstag_line[39] = 't777동시발간저록 ';
gstag_line[40] = 't780    선행저록 ';
gstag_line[41] = 't785    후속저록 ';
gstag_line[42] = 't787    관계저록 ';
gstag_line[43] = ' 500    일반주기 ';
gstag_line[44] = ' 501  합철본주기 ';
gstag_line[45] = ' 502    학위주기 ';
gstag_line[46] = ' 503    내력주기 ';
gstag_line[47] = ' 504    서지주기 ';
gstag_line[48] = ' 505    내용주기 ';
gstag_line[49] = ' 506    제한주기 ';
gstag_line[50] = ' 507    원서주기 ';
gstag_line[51] = ' 533    복제주기 ';
gstag_line[52] = ' 525부록주기사항 ';
gstag_line[53] = ' 550출판정보주기 ';
gstag_line[54] = ' 010     L C C N ';
gstag_line[55] = ' 020     I S B N ';
gstag_line[56] = ' 022     I S S N ';
gstag_line[57] = ' 950	   가    격';

var gstag_cnt = 57;

/* 상세정보 표시 */
var    gs_Detail_Disp_Tag  = null;
var    gs_Detail_Disp_Code = null;
var    gs_Detail_Disp_Name = null;

function g_Srch_Detail_Info(a_gubun, a_control_no, a_marc_data, a_conv)
{
	gs_Detail_Disp_Tag  = new Array();
    gs_Detail_Disp_Code = new Array();
    gs_Detail_Disp_Name = new Array();

	var    i;
	var    l_tag_code  = new Array();
	var    l_tag_name  = new Array();
	var    l_tag_href  = new Array();
	var    l_tag_cnt;
	var    l_buf0 = "";
	var    l_buf1 = "";
	var    l_buf2 = "";
	var    l_smae = "";
	var    l_smae_old = "";
	var    ls_buf = '';
	var    j;
	var    p;
	var    ll_Cnt;
	var    l_chk ;
	var    p1;
	var    ls_text1;
	var    ls_text2;

	l_tag_cnt = 0;
	ll_Cnt = 0;

	for(i=1;i<=gstag_cnt;i++)
	{
		l_buf0 = gstag_line[i].substr(0, 1);
		l_buf1 = gstag_line[i].substr(1, 3);
		l_buf2 = gstag_line[i].substr(4);
		l_buf0 = gf_Trim(l_buf0,'a');
		l_buf1 = gf_Trim(l_buf1,'a');
		l_buf2 = gf_Trim(l_buf2,'a');

		if (l_buf1 != "" && l_buf2 != "")
		{
			l_tag_code[l_tag_cnt] = l_buf1;
			l_tag_name[l_tag_cnt] = l_buf2;
			l_tag_href[l_tag_cnt] = l_buf0;

			//기사의 경우 청구기호 꼬리물기 하지 않음
			if ((a_gubun == "a") && (l_tag_href[l_tag_cnt] == "L") )
				l_tag_href[l_tag_cnt] = "";

			l_tag_cnt++;
		}
	}

//0123456789012345678901234567890123456789012345
//kcam1k 960226s        ja            000a  jpn
	l_smae = a_marc_data;
/*
	l_smae = l_smae + '\n' + '》999    ' + a_marc_data.substr(42,3)
	l_smae = l_smae + '\n' + '》001    ' + a_control_no + '\n' + '》001'
*/
/*
	l_smae = l_smae + '》999    ' + a_marc_data.substr(42,3);
	l_smae = l_smae + '》001    ' + a_control_no + '》001';
	if ((a_gubun == "aa") || (a_gubun == "논문"))
		l_smae = l_smae + '》002    ' + "논문" + '》002';
	else if ((a_gubun == "ab") || (a_gubun == "평석"))
		l_smae = l_smae + '》002    ' + "평석" + '》002';
	else if ((a_gubun == "mm") || (a_gubun == "단행본"))
		l_smae = l_smae + '》002    ' + "단행본" + '》002';
	else if ((a_gubun == "ss") || (a_gubun == "정간물"))
		l_smae = l_smae + '》002    ' + "정기간행물" + '》002';
	else
		l_smae = l_smae + '》002    ' + "비도서" + '》002';

*/
	l_smae = l_smae + '》999    ' + a_marc_data.substr(42,3);

	if (a_gubun == "a")
		a_control_no = a_control_no - 80000000;

	l_smae = l_smae + '》001    ' + a_control_no + '》001';

	l_mle_old_text = '';


	for(i=0;i<l_tag_cnt;i++)
	{

		if ((a_gubun == "a") && (l_tag_code[i] == '773'))
			continue;

		l_smae_old = l_smae;
		j = 0;
		p = 0;
		while(1)
		{
			ls_buf = gf_string_return_position(l_smae_old, '》'+l_tag_code[i], '》' ,true, p);
			//if(l_tag_code[i] == "950"){     //가격 '￦' 표기
			//     alert(ls_buf);
			//     var BeforeChar = IsTrimStr("\ ");
			//     ls_buf = gf_Char_Replace(ls_buf,BeforeChar,"￦");
			//}

        	//'--'추가
        	//alert(l_tag_code[i]+"\n"+l_tag_name[i]+"\n"+l_tag_href[i]+"\n"+ls_buf);

        	if(l_tag_code[i] == '600') ls_buf = gf_string_rep(ls_buf, "a,v,x,y,z");
        	else if(l_tag_code[i] == '610') ls_buf = gf_string_rep(ls_buf, "a,b,v,x,y,z");
        	else if(l_tag_code[i] == '611') ls_buf = gf_string_rep(ls_buf, "a,e,p,v,x,y,z");
        	else if(l_tag_code[i] == '630') ls_buf = gf_string_rep(ls_buf, "a,p,v,x,y,z");
        	else if(l_tag_code[i] == '650') ls_buf = gf_string_rep(ls_buf, "a,v,x,y,z");
        	else if(l_tag_code[i] == '651') ls_buf = gf_string_rep(ls_buf, "a,v,x,y,z");
        	else if(l_tag_code[i] == '653') ls_buf = gf_string_rep(ls_buf, "a");
        	else if(l_tag_code[i] == '655') ls_buf = gf_string_rep(ls_buf, "a,v,x,y,z");

			p = eval(ls_buf.substr(0, 6));
			ls_buf = ls_buf.substr(6);
			if (p == 999999) break;
			ls_buf = gf_Trim(ls_buf,'a');
			if (ls_buf == '') break;

			if (l_tag_href[i] == "A" || l_tag_href[i] == "T")
			{
				ls_buf = gf_aaaa(ls_buf, "a");
			}
			else if (l_tag_href[i] == "t")
			{
				ls_buf = gf_aaaa(ls_buf, "t");
			}
			else if (l_tag_href[i] == "P")
			{
				ls_buf = gf_aaaa(ls_buf, "b");
			}

			l_chk = 0;
			if (l_tag_href[i] != "")
			{
				if (ls_buf.length > 6)
				{
					if (ls_buf.substr(0,6) == "999999")
						l_chk = 1;
				}
			}
			/**
			if (l_tag_code[i] == "245") {
				// 여기서 아래 타면 표시가 사라지니까 여기서 제목만 뽑아내..
				// 저기 GF_string_cut 보면 알수있을거야.. 삼각형하고 머 그런것들로 분리해서 제목을 가져와
				var z = "";
				var x = "";
				var c = "";
				
				z = gf_Pos(ls_buf,'▼',0);
				//if (l_p < 0)
				//	break;
				x = ls_buf.substr(z,2)   //'▼' 1자리로 간주함  '▼a 이종훈'
				//c = gf_Str_Replace(l_data,x,a_ch);
				alert(z);
				alert(x);
				alert(ls_buf);
			}
			*/
			ls_buf = gf_string_cut(ls_buf, ' ');
			ls_buf = gf_Trim(ls_buf,'a');
			if (ls_buf.length <= 0)
				continue;
			
			/**
			if (l_tag_code[i] == "245") {
				// 여기서 아래 타면 표시가 사라지니까 여기서 제목만 뽑아내..
				// ?ㅇㅃㅂ
				
				alert(">>>>" + ls_buf);
			}
			*/
			//주제어 및 청구기호
			if ( (l_tag_href[i] == "S") || (l_tag_href[i] == "L"))
			{
                		ls_buf = "`" + ls_buf + "`";
                		l_chk = 1;
			}

			if (a_conv == "한글")
				ls_buf = gf_hanja_to_hangle(ls_buf);

			if ((l_tag_href[i] != "") && l_chk == 1)
			{
				if (l_tag_href[i] == "t")      //서명의 $t
					ls_buf = "`" + "T" + ls_buf;
				else
					ls_buf = "`" + l_tag_href[i] + ls_buf;
			}

			if (j == 0)
			{
				gs_Detail_Disp_Tag[ll_Cnt]  = l_tag_code[i];
				gs_Detail_Disp_Code[ll_Cnt] = l_tag_name[i];
				gs_Detail_Disp_Name[ll_Cnt] = ls_buf;
			}
			else
			{
				gs_Detail_Disp_Tag[ll_Cnt]  = l_tag_code[i];
				gs_Detail_Disp_Code[ll_Cnt] = '';
				gs_Detail_Disp_Name[ll_Cnt] = ls_buf;
			}
			ll_Cnt++;
			j++;
		}
	}
	return(ll_Cnt);
}
function gf_string_rep(a_data, a_ch)
{
	// string에서 역삼각형을 찾아서 '--'로 바꿈.
	// 10 ▼a 法學協會雜誌/ ▼d 東京大學法學協會 編.' + '\n'
	// -->10 ▼a 法學協會雜誌/  ▼d -- 東京大學法學協會 編.' + '\n'
	var l_ret = "";
	var l_retpos = 0;
	var before_ret = "";
	var after_ret = "";

	l_ret = a_ch.split(",");

	l_retpos = gf_Pos(a_data,'▼',0);
	if(l_retpos<0) return a_data;

	before_ret = a_data.substr(0,l_retpos+2);
	after_ret = a_data.substr(l_retpos+2,a_data.length);
    after_ret = gf_Trim(after_ret,'a');
    
    if(after_ret == "" || l_retpos == "999999") return a_data;
    
	for(var a=0;a<l_ret.length;a++)
	{
	    l_retpos = gf_Pos(after_ret,'▼'+l_ret[a],0);
	    if(l_retpos<0) continue;
	    after_ret = gf_Strplus_Replace(after_ret,'▼'+l_ret[a],"--▼"+l_ret[a]);
	}
	return before_ret+" "+after_ret;
}

function gf_string_cut(a_data, a_ch)
{
	// string에서 역삼각형을 찾아서 없엔다.
	// 10 ▼a 法學協會雜誌/ ▼d 東京大學法學協會 編.' + '\n'
	//01234567890
	var l_p;
	var l_data;
	var l_aaaa;

	l_p = gf_Pos(a_data,'▼',0);
	if (l_p < 0)
		return(a_data);
	l_data = a_data.substr(l_p);

	l_data = gf_Trim(l_data,'a');
	if (l_data.length <= 0)
		return(l_data);
	while(1)
	{
		l_p = gf_Pos(l_data,'▼',0);
		if (l_p < 0)
			break;
		l_aaaa = l_data.substr(l_p,2)   //'▼' 1자리로 간주함  '▼a 이종훈'
		l_data = gf_Str_Replace(l_data,l_aaaa,a_ch);
	}
	return(l_data);
}

//꼬리물기검색
function gf_aaaa(a_data, a_gubun)
{
	var l_char   = '';
	var l_retstr = '';
	var i, j, l_chk;

	l_chk = 0;
	for (i = 0; i < a_data.length; i++)
	{
		l_char = a_data.substr(i, 1);
		if (l_char == '▼')
		{
			l_retstr += l_char;
			i = i + 1;
			l_char = a_data.substr(i, 1);
			if (l_char == a_gubun)
			{
				l_retstr += l_char;
				i = i + 1;
				l_str1 = "";
				for (j = i; j < a_data.length; j++)
				{
					l_char = a_data.substr(j, 1);
					if (l_char == '▼')
					{
						j = j - 1;
						break;
					}
					l_str1 += l_char;
				}
				l_str1 = gf_Trim(l_str1,'a');
				if (l_str1.length > 0)
				{
					l_retstr += "`";
					l_retstr += l_str1;
					l_retstr += "`  ";
					l_chk++;
				}
				i = j;
			}
			else
				l_retstr += l_char;
		}
		else
			l_retstr += l_char;
	}
	if (l_chk > 0)
		l_retstr = "999999" + l_retstr;
	return(l_retstr);
}