YNU_JEUS/app_home/himed/webapps/mis/miscommonweb/js/RSZ001.js

var PURCUSERAUTH_NODE = "/root/init/reqflaguth/reqauthlist";
var GOODFLAGAUTH_NODE = "/root/init/goodflagauth/goodflagauthinfo";

var RSCSYSINFT_NODE   = "/root/init/RscsysinftLists/rscsysinftlist";

var RSCSYSORDT_NODE   = "/root/init/RscsysordtLists/rscsysordtlist";

var drg_main_suplplcecd   = "2158155746";
var drg_main_suplplcenm   = "보나에스(주)";

var purc_main_suplplcecd  = "2148759299";
var purc_main_suplplcenm  = "평화드림(주)";

var purc_main_suplplcecd1 ="2148759299";  // 평화드림(주)
var purc_main_suplplcenm1 ="평화드림(주)";

var purc_main_suplplcecd2 ="2148821000";  // 하이드로메디(주)
var purc_main_suplplcenm2 =" 하이드로메디(주))";
var purc_main_suplplcecd3 ="2148804923";  // 평화이즈(주)
var purc_main_suplplcenm3 ="평화이즈(주)";

/*--------------------------------------------------------------
 * [2007.12.13 ] 
 * 평화드림과  보나에스의 주거래처 코드및 명을 가져온다.( gloval variable);
--------------------------------------------------------------*/
function rszfGetMainCust(pval)
{
  return pval;
}


//콤보에 공통코드 Setting
/*
pcdgrupid     : 공통코드군
pcontrol_name : Data를 받을 Control 
*/
function rszfComboComCdList(pcdgrupid, pcontrol_name) {
    var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/comcdref";
    var comcd_rsltnode = "/root/init/comcd";
    var comcd_itemset = "/root/init/" + control_id;
    
    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/cdgrupid");
    model.makeNode(comcd_node + "/cdid");
    model.makeNode(comcd_node + "/cdnm");
    model.makeNode(comcd_node + "/refcond");
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/comcdlist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "cdnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "cdid";
    
    model.setValue(comcd_node + "/cdgrupid", pcdgrupid);
  model.setValue(comcd_node + "/cdid","%");
  model.setValue(comcd_node + "/cdnm","%");
  
  model.removeChild("TRRSZ00101");
  model.createChild("xforms:submission", "id:TRRSZ00101;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00101");
  
    model.copyNode(comcd_itemset,comcd_rsltnode);
    
}

function rszfComboLrgCdList(preqflag, preqmthd, pcontrol_name) {
  var control_id = pcontrol_name.attribute("id");
  
  var comcd_node = "/root/send/lrgcdref";
  var comcd_rsltnode = "/root/init/lrgcd";
  var comcd_itemset = "/root/init/" + control_id;
  
  //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
  model.removeNodeset(comcd_node);
  model.removeNodeset(comcd_itemset);
  
  model.makeNode(comcd_node);
  model.makeNode(comcd_node + "/reqflag");
  model.makeNode(comcd_node + "/reqmthd");
  model.makeNode(comcd_node + "/cdid");
  model.makeNode(comcd_node + "/cdnm");
  model.makeNode(comcd_node + "/refcond");
  
  model.makeNode(comcd_rsltnode);
  model.makeNode(comcd_itemset);

  pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/basevollrgcdlist";
  pcontrol_name.choices.itemset.label.attribute("ref") = "cdnm";
  pcontrol_name.choices.itemset.value.attribute("ref") = "cdid";
    
  model.setValue(comcd_node + "/reqflag", preqflag);
  model.setValue(comcd_node + "/reqmthd", preqmthd);          
  model.setValue(comcd_node + "/cdid","%");
  model.setValue(comcd_node + "/cdnm","%");
  
  model.removeChild("TRRSD00111");
  model.createChild("xforms:submission", "id:TRRSD00111;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSD00111");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
}

//코드 HELP 화면 OPEN-Modal
/*
phelp_kind : "01" - 사번조회
             "02" - 부서코드
             "03" - 공통코드
             "04" - 우편번호
             "05" - 계정코드
             
pcontrol_name : OPEN하는 Control명(Grid,Input.....)
            "SPRSD00260" - 연구과제HELP. (return값은 연구과제번호, 연구명, 사원번호, 사원, 비고)
pcdgrupid : 공통코드일경우 코드군 ("Z0007","R0001"...)
precv_list: 리턴받을 Instance명 (마지막 Element만 ','로 분리)
pdefault_node : 부모 윈도우에서 넘어오는 칼럼id
pdefault_value : 부모 윈도우에서 넘어오는 값
pcheck_yn : 선택형 팝업창인지 아닌지를 체크
*/

function rszfOpenPopUpListByWndName(pcontrol_name, pcdgrupid, precv_list , window_name, pdefault_node, pdefault_value,nodebigo) {

  if( precv_list != "")
      var recv_list = precv_list.split(",");
    
    if(pdefault_value != "" && pdefault_value != null) {
        var default_value =  pdefault_value.split(",");
    }
    
    if(pdefault_node != "" && pdefault_node != null) {
        var pdefault_node =  pdefault_node.split(",");
    }
    
    //send/target는 mis.js와 연계되는 부분이 있어 같이 수정하기로 함
    //이 인스턴스 구문 오류는 mis.js 수정후 수정
    var recvref_node = "/root/source/recvref";
    var cdgrupid_node = "/root/source/cdgrupid";
    var recvitem_node = "/root/source/recvitem"
    var default_node = "/root/source/defaultvalue";
    var checkyn_node = "/root/source/checkyn";
    
  //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(recvref_node);
    model.removeNodeset(cdgrupid_node);
  model.removeNodeset(recvitem_node);
  model.removeNodeset(default_node);
  model.removeNodeset(checkyn_node);
  
  model.makeNode(recvref_node);
  model.makeNode(cdgrupid_node);
  model.makeNode(recvitem_node);
  model.makeNode(default_node);
  model.makeNode(checkyn_node);
  

  if ( precv_list != "" && recv_list.length > 0 ) {
    for (var k = 0; k <= recv_list.length - 1; k++) {
        model.makeValue(recvitem_node + "/" + recv_list[k], recv_list[k]);
//      model.setValue("/root/source/recvitem/" + recv_list[k],recv_list[k] );
    }
  }
  
  var obj = null;

  if (pcontrol_name.elementName == "xforms:datagrid") {
     //grid에서 호출하였을 경우
      
      pcontrol_name.endEditCell();
      if(pdefault_value != "" && pdefault_value != null) {
            for (var z = 0; z < default_value.length; z++) {
              obj = document.controls(default_value[z]);
              if (obj != null && obj.elementName != "xforms:datagrid" ) {
                  model.makeValue(default_node + "/" + pdefault_node[z] , model.getValue(obj.attribute("ref")));
//                  model.makeValue(default_node + default_value[z] , 
//                                  model.getValue(pcontrol_name.nodeset + "[" + (pcontrol_name.row - pcontrol_name.fixedRows + 1) "/" + default_value[z]));
                  
              }
              else {
                if(model.getValue(pcontrol_name.nodeset + "[" + (pcontrol_name.row - pcontrol_name.fixedRows + 1)+ "]/" + default_value[z]).length > 0)
                {
                    model.makeValue(default_node + "/" + pdefault_node[z] , 
                                    model.getValue(pcontrol_name.nodeset + "[" + (pcontrol_name.row - pcontrol_name.fixedRows + 1)+ "]/" + default_value[z]));
                }
                else
                {
                    model.makeValue(default_node + "/" + pdefault_node[z] ,default_value[z]);
                  }
              }
          }
      }
      
      model.setValue(recvref_node ,pcontrol_name.nodeset + "[" + (pcontrol_name.row - pcontrol_name.fixedRows + 1) + "]");
        
        
    }
    else {
        
        var node_path = pcontrol_name.attribute("ref").split("/");
        var source_path = "/root";
        
        for (var i = 2 ; i < node_path.length - 1; i++) {
            source_path = source_path + "/" + node_path[i];
        }
        
        if(pdefault_value != "" && pdefault_value != null) {
            for (var z = 0; z < default_value.length; z++) {
              obj = document.controls(default_value[z]);
              
              if (obj != null) {
                  model.makeValue(default_node + "/" + pdefault_node[z] , model.getValue(obj.attribute("ref")));
                  
              }
              else {
                  model.makeValue(default_node + "/" + pdefault_node[z] , default_value[z]);
              }
          }
      }
        
        model.setValue(recvref_node ,source_path);
    }
    
    
    if (pcdgrupid.length > 0 ) {
        model.setValue(cdgrupid_node ,pcdgrupid);
    }
    
    if(nodebigo != null && nodebigo.length > 0)model.makeValue(default_node +"/nodebigo",nodebigo);
    modal(window_name,"","","","","/root/source", "/root/target" );

}

// Validation Check??.
/*
rszfValidationCheck("TRRSD00181", "agtplcelist", "refcond,instcd,goodflag,prodcmpycd,agtplcenm","," + model.getValue(opt_instcd.attribute("ref")) +"," +  model.getValue(cmb_goodflag.attribute("ref")) +"," + 
                            model.getValue(ipt_prodcmpycd.attribute("ref")) +"," +  model.getValue(ipt_maincustlastsuplplce.attribute("ref")),"","maincustlastsuplplce,maincustlastsuplplcenm" ,ipt_maincustlastsuplplce,"SPRSD00180","goodflag,prodcmpycd,prodcmpynm","cmb_goodflag,ipt_prodcmpycd,opt_prodcmpynm");
*/ 
function rszfValidationCheck(pmapid, pmapresultlist, pmaprefcol , pmaprefvalue,pcdgrupid, precv_list , pcontrol_name,window_name,pdefault_node, pdefault_value,nodebigo) {
    
    try
    {
      var objID = event.currentTarget;
    var obj   = document.controls(objID);
    
      var validation_node = "/root/send/validation";
      var validation_rsltnode = "/root/init/main";
      
      var recv_node = precv_list.split(",");

    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
      //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
      //makenode로 노드 생성하는 로직으로 구현 
      model.removeNodeset(validation_node);
      model.removeNodeset(validation_rsltnode);
      model.makeNode(validation_node);
      model.makeNode(validation_rsltnode);
      
      if(pmaprefcol != "" && pmaprefcol != null) {
          pmaprefcol =  pmaprefcol.split(",");
      }
      
      if(pmaprefvalue != "" && pmaprefvalue != null) {
          pmaprefvalue =  pmaprefvalue.split(",");
      }
      
      if(pmaprefcol != "" && pmaprefcol != null) {
              for (var z = 0; z < pmaprefcol.length; z++) {
                model.makeValue(validation_node + "/" + pmaprefcol[z] , pmaprefvalue[z]);
              }
      }
      
      var result_path = "";
      if (obj.elementName == "xforms:datagrid")result_path = obj.nodeset;
      else {
          var node_path = obj.attribute("ref").split("/");
          result_path = "/root";
              
          for (var i = 2 ; i < node_path.length - 1; i++) {
                  result_path = result_path + "/" + node_path[i];
          }
      }
      
      model.removeChild(pmapid);
      
      model.createChild("xforms:submission", "id:" +pmapid + ";mediatype:application/x-www-form-urlencoded; method:post; ref:" + validation_node + "; resultref:" + validation_rsltnode + "; ");
      submit(pmapid);
      
      var rslt_node = new Array();
      var node = instance1.selectNodes(validation_rsltnode + "/" + pmapresultlist +"/*");
      
      for (var j = 0; j < node.length; j++) {
          if (obj.elementName == "xforms:datagrid") {
              rslt_node[j] = model.getValue(validation_rsltnode + "/" + pmapresultlist + "[1]/" + node.item(j).nodeName);
          }
          else {
              rslt_node[j] = model.getValue(validation_rsltnode + "/" + pmapresultlist  + "/" + node.item(j).nodeName);
          }
      }
      
      
      var node1 = instance1.selectNodes(validation_rsltnode + "/*");
      
    if (node1.length != 1) {
          model.removeNodeset("/root/source/validation");
          model.makeNode("/root/source/validation")
          model.copyNode("/root/source/validation", validation_rsltnode);
          
          rszfOpenPopUpListByWndName(pcontrol_name, pcdgrupid, precv_list , window_name, pdefault_node, pdefault_value,nodebigo)

      }
      else {
      
        if(nodebigo != null && nodebigo == "Y")
      {
          for (var i = 0; i < recv_node.length; i++) {
              if (obj.elementName == "xforms:datagrid") {
              
                //if(obj.colRef(recv_node[i]) != -1)model.setValue(result_path + "[" + (obj.row - obj.fixedRows + 1) + "]/" + recv_node[i], rslt_node[i]);
                if(obj.colRef(recv_node[i]) != -1)model.setValue(result_path + "[" + (obj.row - obj.fixedRows + 1) + "]/" + recv_node[i], model.getValue(validation_rsltnode + "/" + pmapresultlist  + "/" + recv_node[i]));
              }
              else {
                model.setValue(result_path + "/" + recv_node[i], rslt_node[i]);
              }
          }
          
      }
      else
      {    
          for (var i = 0; i < recv_node.length; i++) {
              
              if (obj.elementName == "xforms:datagrid") {               
                model.setValue(result_path + "[" + (obj.row - obj.fixedRows + 1) + "]/" + recv_node[i], rslt_node[i]);
              }
              else {
                model.setValue(result_path + "/" + recv_node[i], rslt_node[i]);
              }
          }
        }
      }
    }
    catch(Exception)
    {
    }
}

//콤보에 공통코드 Setting (사용자별 청구구분)
/*
pcdgrupid     : 공통코드군
pcontrol_name : Data를 받을 Control 
*/
function rszfReqFlagComboComCdList(puser_id,pcontrol_name,AllYn,pinst_cd,pblank) {
    var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/comcdref";
    var comcd_rsltnode = "/root/init/reqflag";
    var comcd_itemset = "/root/init/" + control_id;
    

  //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/userid");
    model.makeNode(comcd_node + "/cdid");
    model.makeNode(comcd_node + "/cdnm");
    model.makeNode(comcd_node + "/refcond");
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/AllYn");
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/comcdlist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "cdnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "cdid";
    
    model.setValue(comcd_node + "/AllYn", AllYn);
    model.setValue(comcd_node + "/instcd", pinst_cd);
    model.setValue(comcd_node + "/userid", puser_id);
  model.setValue(comcd_node + "/cdid","%");
  model.setValue(comcd_node + "/cdnm","%");

  
  model.removeChild("TRRSZ00102");
  model.createChild("xforms:submission", "id:TRRSZ00102;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  
  
  submit("TRRSZ00102");
  
  
  if(pblank != null && pblank == "Y")
  {
    model.makeValue(comcd_itemset+"/comcdlist[" +1+ "]/cdnm", "전체");
    model.makeValue(comcd_itemset+"/comcdlist[" +1+ "]/cdid", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);

    cnt = 1;
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())
    {
      model.makeValue(comcd_itemset+"/comcdlist[" +(cnt + 1)+ "]/cdnm", childNode.getXPathString(comcd_rsltnode + "/comcdlist[" +cnt + "]/cdnm"));
      model.makeValue(comcd_itemset+"/comcdlist[" +(cnt + 1)+ "]/cdid", childNode.getXPathString(comcd_rsltnode + "/comcdlist[" +cnt + "]/cdid"));
      cnt++;
    }

  }
  else  model.copyNode(comcd_itemset,comcd_rsltnode);
      
  if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}

/*------------------------------------------------------------------------
   청구자의 청구권한 내역을 가져온다.
   청구처리,발주등에서의 처리권한은 분리해야되네... 
   
   청구는 기준테이블: RSCMREAP 인데  청구처리사용자는 RSCMREUS 이다.`
   
   [2007.12.12 ] 청구주기 추가.

------------------------------------------------------------------------*/
function rszfGetPurcReqAuthInfo(pinstcd , preqflag, pdeptcd , pemplno, preqprid) {
    
    var reqaprv_node = "/root/send/reqaprv";
    var reqaprv_rsltnode = "/root/init/reqflaguth";

  //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(reqaprv_node);
    
    if(preqflag == null || preqflag.length == 0)return;
    
    model.makeNode(reqaprv_node);
    model.makeNode(reqaprv_node + "/instcd");
    model.makeNode(reqaprv_node + "/reqflag");
    model.makeNode(reqaprv_node + "/reqdeptcd");
    model.makeNode(reqaprv_node + "/emplno");
    model.makeNode(reqaprv_node + "/reqprid");
    
    model.makeNode(reqaprv_rsltnode);

    /*********test logic***************/
    if(pinstcd.length == 0)pinstcd = "012";
    if(pdeptcd.length == 0)pdeptcd = "1000000000";
    if(pemplno.length== 0)pemplno = "MIS";
    /********************************/

    model.setValue(reqaprv_node + "/instcd", pinstcd);
    model.setValue(reqaprv_node + "/reqflag", preqflag);
    model.setValue(reqaprv_node + "/reqdeptcd", pdeptcd);
    model.setValue(reqaprv_node + "/emplno", pemplno);
    model.setValue(reqaprv_node + "/reqprid", preqprid);

    
  model.removeChild("TRRSZ00103");
  model.createChild("xforms:submission", "id:TRRSZ00103;mediatype:application/x-www-form-urlencoded; method:post; ref:" + reqaprv_node + "; resultref:" + reqaprv_rsltnode + "; "); 
  
  submit("TRRSZ00103");
  
}

/*------------------------------------------------------------------------
   청구구분(REQFLAG) 에 대한 권한정보 instance값을 LOAD하는것 같다.  HBH
   naming이  purc권한을 가져오는것 같다.  reaflag값에 대한 권한값을 load한다.
-------------------------------------------------------------------------*/
function rszfGetPurcAuthInfoByCond(pnodeid)
{
  return model.getValue(PURCUSERAUTH_NODE + "/" + pnodeid);
}

/*------------------------------------------------------------------------
  [2007.10.29 ] GoodFlag 에 대한 권한값을 load
-------------------------------------------------------------------------*/
function rszfGetGoodFlagAuthInfoByCond(pnodeid)
{
  return model.getValue(GOODFLAGAUTH_NODE + "/" + pnodeid);
}

/*------------------------------------------------------------------------
  [ 2007.10.13 ]
  
   청구구분별 불출부서 또는 불출취합부서를 가져온다.
   
    중앙공급실물품 청구는 물품구분별 권한체크를 하지 않는다.  
    
    다른 청구프로그램은 rszfGetPurcReqAuthInfo 를 사용한다.
    
  [2007.10.29 ]
  
   구매재고 물품청구시 "일"청구도 권한체크를 하지 않는다.

------------------------------------------------------------------------*/
function rszfGetPurcReqFnlDeptcd(pinstcd , preqflag, preqdeptcd ) {
    
    var reqaprv_node = "/root/send/reqaprv";
    var reqaprv_rsltnode = "/root/init/reqfnldept";
    
  //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(reqaprv_node);
    
    if(preqflag == null || preqflag.length == 0)return;
    
    model.makeNode(reqaprv_node);
    model.makeNode(reqaprv_node + "/instcd");
    model.makeNode(reqaprv_node + "/reqflag");
    model.makeNode(reqaprv_node + "/reqdeptcd");
    
    model.makeNode(reqaprv_rsltnode);
    
    model.setValue(reqaprv_node + "/instcd", pinstcd);
    model.setValue(reqaprv_node + "/reqflag", preqflag);
    model.setValue(reqaprv_node + "/reqdeptcd", preqdeptcd);

    
  model.removeChild("TRRSZ00115");
  model.createChild("xforms:submission", "id:TRRSZ00115;mediatype:application/x-www-form-urlencoded; method:post; ref:" + reqaprv_node + "; resultref:" + reqaprv_rsltnode + "; "); 
  
  submit("TRRSZ00115");
  
}

/*------------------------------------------------------------------------
   청구분,발주처리자의 청구구분별 승인권한 내역을 가져온다.
   
   rszfGetPurcReqAuthInfo      : 청구권한
   rszfGetReqFlagRurcAuthInfo : 발주처리권한.
------------------------------------------------------------------------*/
function rszfGetReqFlagRurcAuthInfo(pinstcd , preqflag, pdeptcd , pemplno) {
    
    var reqaprv_node = "/root/send/reqaprv";
    var reqaprv_rsltnode = "/root/init/reqflagpurcarth";
    
  //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(reqaprv_node);
    
    if(preqflag == null || preqflag.length == 0)return;
    
    model.makeNode(reqaprv_node);
    model.makeNode(reqaprv_node + "/instcd");
    model.makeNode(reqaprv_node + "/reqflag");
    model.makeNode(reqaprv_node + "/reqdeptcd");
    model.makeNode(reqaprv_node + "/emplno");
    
    model.makeNode(reqaprv_rsltnode);

    /*********test logic***************/
    if(pinstcd.length == 0)pinstcd = "012";
    if(pdeptcd.length == 0)pdeptcd = "1000000000";
    if(pemplno.length== 0)pemplno = "MIS";
    /********************************/
    
    model.setValue(reqaprv_node + "/instcd", pinstcd);
    model.setValue(reqaprv_node + "/reqflag", preqflag);
    model.setValue(reqaprv_node + "/reqdeptcd", pdeptcd);
    model.setValue(reqaprv_node + "/emplno", pemplno);

    
  model.removeChild("TRRSZ00114");
  model.createChild("xforms:submission", "id:TRRSZ00114;mediatype:application/x-www-form-urlencoded; method:post; ref:" + reqaprv_node + "; resultref:" + reqaprv_rsltnode + "; "); 
  
  submit("TRRSZ00114");
  
}

//콤보에 공통코드 Setting (사용자별 청구구분)
/*
pcdgrupid     : 공통코드군
pcontrol_name : Data를 받을 Control 
수정 : 기타입고, 출고 프로그램에서 사용하는 코드를 분리하기 위해 각부서별 ( 구매,약국,영양) 사용FLAG 추가
         PURCETCCD ( 구매) ,  NUTETCCD ( 영양 ) , PARMETCCD ( 약국) ..........2007.8.8  황병현 
         사용FLAG : "E" -> ENTRY 화면에서 CALL  시 
                          "%" -> QUERY 화면에서 CALL시    ( DB값 은 'E','Q'가 있으며 'N'제외한다. )

*/
function rszfGetPurcIOFlagList(pcontrol_name,pinst_cd,pioflag,pall,purcetccd,nutetccd,parmetccd) {
    var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/comcdref";
    var comcd_rsltnode = "/root/init/ioflag";
    var comcd_itemset = "/root/init/" + control_id;
    
  //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);

    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/ioflag");
    model.makeNode(comcd_node + "/purcetccd");
    model.makeNode(comcd_node + "/nutetccd");
    model.makeNode(comcd_node + "/parmetccd");
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/comcodelist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "cdnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "cdid";
    
    model.setValue(comcd_node + "/instcd", pinst_cd);
    model.setValue(comcd_node + "/ioflag", pioflag);
    model.setValue(comcd_node + "/purcetccd", purcetccd);
    model.setValue(comcd_node + "/nutetccd", nutetccd);
    model.setValue(comcd_node + "/parmetccd", parmetccd);

  
  model.removeChild("TRRSZ00104");
  model.createChild("xforms:submission", "id:TRRSZ00104;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  
  
  submit("TRRSZ00104");
  
  
  if(pall != null && pall == "Y")
  {
    /*
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdnm", "????");
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdid", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);
    
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())tarnode.appendChild(childNode);
    */    
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdnm", "전체");
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdid", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);

    cnt = 1;
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())
    {
      model.makeValue(comcd_itemset+"/comcodelist[" +(cnt + 1)+ "]/cdnm", childNode.getXPathString(comcd_rsltnode + "/comcodelist[" +cnt + "]/cdnm"));
      model.makeValue(comcd_itemset+"/comcodelist[" +(cnt + 1)+ "]/cdid", childNode.getXPathString(comcd_rsltnode + "/comcodelist[" +cnt + "]/cdid"));
      cnt++;
    }

  }
  else  model.copyNode(comcd_itemset,comcd_rsltnode);
  
    
  if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;    
}

//collection control blank setting
//ex)rszfComboAppendBlankChild("cmb_instcd, cmb_goodflag"); 
function rszfComboAppendBlankChild(pcontrol_name_list)
{
  rszfComboAppendChild(pcontrol_name_list,"전체","");
}

//collection control append node
//ex)rszfComboAppendChild("cmb_instcd, cmb_goodflag","전체","%"); 
function rszfComboAppendChild(pcontrol_name_list,label,value)
{
  var comcd_rsltnode = "/root/init/appendcd";

    var control_list  = pcontrol_name_list.split(",");


  for (var i = 0; i < control_list.length; i++) {
  
    var control_id = control_list[i];
    var control = control_id.split(".");
    var obj = document.controls(control[0]);

    var lblnm = obj.choices.itemset.label.attribute("ref")
    var valnm = obj.choices.itemset.value.attribute("ref");

    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
      //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
      //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_rsltnode);
    model.makeNode(comcd_rsltnode);

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarparnode = instance1.selectSingleNode(obj.choices.itemset.attribute("nodeset")).parentNode;
    
    var parnodename = tarparnode.nodename;
    model.copynode( sourcenode, tarparnode);      
    model.removeNodeset(obj.choices.itemset.attribute("nodeset"));
    model.makeValue(obj.choices.itemset.attribute("nodeset") + "[1]/" + lblnm, label);
    model.makeValue(obj.choices.itemset.attribute("nodeset") + "[1]/" + valnm,value);

    tarnode = instance1.selectSingleNode(obj.choices.itemset.attribute("nodeset"));

    cnt = 1;
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())
    {
      model.makeValue(obj.choices.itemset.attribute("nodeset") +"[" +(cnt + 1)+ "]/" + lblnm, childNode.getXPathString(comcd_rsltnode + "/" + parnodename  + "[" +cnt + "]/" + lblnm));
      model.makeValue(obj.choices.itemset.attribute("nodeset") +"[" +(cnt + 1)+ "]/" + valnm, childNode.getXPathString(comcd_rsltnode + "/" + parnodename + "[" +cnt + "]/" + valnm));
      cnt++;
    }
    }      

    for (var i = 0; i < control_list.length; i++) {
  
    var control_id = control_list[i];
    var control = control_id.split(".");
    var obj = document.controls(control[0]);
    
      if(obj != null && obj.length == 1) obj.selectedindex= 0;
    }
    
}

function rszfUserInstList(pcontrol_name,pemplno,pall)
{
    //TEST LOGIC
    if(pemplno == null || pemplno.length == 0)pemplno ="12345678";
  
  var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/comcdref";
    var comcd_rsltnode = "/root/init/comcd";
    var comcd_itemset = "/root/init/" + control_id;
    
    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/emplno");
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/comcodelist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "cdnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "cdid";
    
  model.setValue(comcd_node + "/emplno",pemplno);
  
  model.removeChild("TRRSZ00105");
  model.createChild("xforms:submission", "id:TRRSZ00105;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00105");
  
  if(pall != null && pall == "Y")
  {
    /*
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdnm", "전체");
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdid", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);
    
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())tarnode.appendChild(childNode);
    */    
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdnm", "전체");
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdid", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);

    cnt = 1;
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())
    {
      model.makeValue(comcd_itemset+"/comcodelist[" +(cnt + 1)+ "]/cdnm", childNode.getXPathString(comcd_rsltnode + "/comcodelist[" +cnt + "]/cdnm"));
      model.makeValue(comcd_itemset+"/comcodelist[" +(cnt + 1)+ "]/cdid", childNode.getXPathString(comcd_rsltnode + "/comcodelist[" +cnt + "]/cdid"));
      cnt++;
    }

  }
  else  model.copyNode(comcd_itemset,comcd_rsltnode);
    
  if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}

/*----------------------------------------------------------------------
 [2007.10.29 ] : 사용자별 권한이 있는 물품구분 LIST 조회한다.
 
                               사용자와 무관한게 프로그램별 물품구분을 조회하는걸 추가
                               그이름하여 purcGoodFlagList (pcontrol_name,pall)
----------------------------------------------------------------------*/
function rszfUserGoodFlagList(pcontrol_name,pemplno,pall)
{
    //TEST LOGIC
    if(pemplno == null || pemplno.length == 0)pemplno ="12345678";
  
  var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/comcdref";
    var comcd_rsltnode = "/root/init/comcd";
    var comcd_itemset = "/root/init/" + control_id;

    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/emplno");
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/comcodelist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "cdnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "cdid";
    
  model.setValue(comcd_node + "/emplno",pemplno);
  
  model.removeChild("TRRSZ00106");
  model.createChild("xforms:submission", "id:TRRSZ00106;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00106");
  
  if(pall != null && pall == "Y")
  {
    /*
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdnm", "전체");
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdid", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);
    
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())tarnode.appendChild(childNode);
    */    
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdnm", "전체");
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdid", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);

    cnt = 1;
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())
    {
      model.makeValue(comcd_itemset+"/comcodelist[" +(cnt + 1)+ "]/cdnm", childNode.getXPathString(comcd_rsltnode + "/comcodelist[" +cnt + "]/cdnm"));
      model.makeValue(comcd_itemset+"/comcodelist[" +(cnt + 1)+ "]/cdid", childNode.getXPathString(comcd_rsltnode + "/comcodelist[" +cnt + "]/cdid"));
      cnt++;
    }

  }
  else  model.copyNode(comcd_itemset,comcd_rsltnode);
    
  if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}

/*----------------------------------------------------------------------
 [2007.10.29 ] : 사용자와 무관한게 프로그램별 물품구분을 조회하는걸 추가
                             : 권한과 무관하다..
----------------------------------------------------------------------*/
function rszfGoodFlagListByPgmGubn(pcontrol_name,ppurcpgmgubn,pall)
{
  
  var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/comcdref";
    var comcd_rsltnode = "/root/init/comcd";
    var comcd_itemset = "/root/init/" + control_id;

    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/purcpgmgubn");
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/goodflaglist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "goodflagnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "goodflag";
    
  model.setValue(comcd_node + "/purcpgmgubn",ppurcpgmgubn);
  
  model.removeChild("TRRSZ00116");
  model.createChild("xforms:submission", "id:TRRSZ00116;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00116");
  
  if(pall != null && pall == "Y")
  {
    model.makeValue(comcd_itemset+"/goodflaglist[" +1+ "]/goodflagnm", "전체");
    model.makeValue(comcd_itemset+"/goodflaglist[" +1+ "]/goodflag", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);

    cnt = 1;
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())
    {
      model.makeValue(comcd_itemset+"/goodflaglist[" +(cnt + 1)+ "]/goodflagnm", childNode.getXPathString(comcd_rsltnode + "/goodflaglist[" +cnt + "]/goodflagnm"));
      model.makeValue(comcd_itemset+"/goodflaglist[" +(cnt + 1)+ "]/goodflag", childNode.getXPathString(comcd_rsltnode + "/goodflaglist[" +cnt + "]/goodflag"));
      cnt++;
    }

  }
  else  model.copyNode(comcd_itemset,comcd_rsltnode);
    
  if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}

/*------------------------------------------------------------------------
  [2007.10.29 HBH ] 기관별,사용자별,물품구분별 권한을 가져온다. (MIS.RSCMGGBN)
  
------------------------------------------------------------------------*/
function rszfGetPurcGoodFlagAuthInfo(pinstcd , pgoodflag, pemplno, plrgcd) {
    
    var goodflagaprv_node = "/root/send/goodflagaprv";
    var goodflagaprv_rsltnode = "/root/init/goodflagauth";
                          
    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(goodflagaprv_node);
    model.removeNodeset(goodflagaprv_rsltnode);
    
    model.makeNode(goodflagaprv_node);
    model.makeNode(goodflagaprv_node + "/instcd");
    model.makeNode(goodflagaprv_node + "/goodflag");
    model.makeNode(goodflagaprv_node + "/emplno");
    model.makeNode(goodflagaprv_node + "/lrgcd");
    
    model.makeNode(goodflagaprv_rsltnode);

    model.setValue(goodflagaprv_node + "/instcd", pinstcd);
    model.setValue(goodflagaprv_node + "/goodflag", pgoodflag);
    model.setValue(goodflagaprv_node + "/emplno", pemplno);
    model.setValue(goodflagaprv_node + "/lrgcd", plrgcd);

    
  model.removeChild("TRRSZ00117");
  model.createChild("xforms:submission", "id:TRRSZ00117;mediatype:application/x-www-form-urlencoded; method:post; ref:" + goodflagaprv_node + "; resultref:" + goodflagaprv_rsltnode + "; "); 
  
  submit("TRRSZ00117");
  
}


/*--------------------------------------------------------------------------
 *  grid용으로 만들었으나  compbo column에서도 사용함
 *  2007.07.22 HBH
 *  combo sample : rszfGridComboLrgcdList("P", cmb_lrgcd, "lrgcd","Y");
--------------------------------------------------------------------------*/

function rszfGridComboLrgcdList(pgoodflag, pgrid_name, pcolumn_id, pall) 
{
    var control_id      = pgrid_name.attribute("id");
    

    var comcd_node = "/root/send/comcdref";
    var comcd_rsltnode = "/root/init/comcd";
    var comcd_itemset = "/root/init/" + control_id + "/" + pcolumn_id;
    
    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);

    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/goodflag");
    model.makeNode(comcd_node + "/lrgcd");
    model.makeNode(comcd_node + "/lrgnm");
    model.makeNode(comcd_node + "/refcond");
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
   
   if (pgrid_name.elementName == "xforms:datagrid") 
   {
      var column_id       = pgrid_name.colattribute(column_no, "id");
      var column_no     = pgrid_name.colRef(pcolumn_id);
      var column_name   = pgrid_name.colAttribute(column_no, "id");
      var column_obj    = document.controls(column_name);
      
      
      column_obj.choices.itemset.attribute("nodeset") = comcd_itemset+"/lrgcdlist";
      column_obj.choices.itemset.label.attribute("ref") = "lrgnm";
      column_obj.choices.itemset.value.attribute("ref") = "lrgcd";
   }
   else {
      pgrid_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/lrgcdlist";
      pgrid_name.choices.itemset.label.attribute("ref") = "lrgnm";
      pgrid_name.choices.itemset.value.attribute("ref") = "lrgcd";
   }

    
    model.setValue(comcd_node + "/goodflag", pgoodflag);
  model.setValue(comcd_node + "/lrgcd","%");
  model.setValue(comcd_node + "/lrgnm","%");
  
  model.removeChild("TRRSZ00107");
  model.createChild("xforms:submission", "id:TRRSZ00107;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00107");
  
  if(pall != null && pall == "Y")
  {
    /*
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdnm", "????");
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdid", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);
    
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())tarnode.appendChild(childNode);
    */    
    model.makeValue(comcd_itemset+"/lrgcdlist[" +1+ "]/lrgnm", "전체");
    model.makeValue(comcd_itemset+"/lrgcdlist[" +1+ "]/lrgcd", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);

    cnt = 1;
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())
    {
      model.makeValue(comcd_itemset+"/lrgcdlist[" +(cnt + 1)+ "]/lrgnm", childNode.getXPathString(comcd_rsltnode + "/lrgcdlist[" +cnt + "]/lrgnm"));
      model.makeValue(comcd_itemset+"/lrgcdlist[" +(cnt + 1)+ "]/lrgcd", childNode.getXPathString(comcd_rsltnode + "/lrgcdlist[" +cnt + "]/lrgcd"));
      
      cnt++;
    }

  }
  else
    model.copyNode(comcd_itemset,comcd_rsltnode);
    
  //if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}

/**----------------------------------------------------------------
 1. 해당 기관의  가능 청구권한을 가진 청구구분 가져오기
 
 * 재정의 : 청구프로그램에서의 기관(INSTCD)별 청구구분 가져오기 
                 기존에 발주 프로그램에서도 같이사용하며 기준테이블이 애매헤서 청리함
   
                 2007.09.26 추석마지막날 HBH
                 
    수정: 1. 기준TABLE 이 잘못됨.  MIS.RSCMREUS -> RSCMREAP 
   
             2. 청구구분 마스터중  프로그램별 구분자 ( 물품청구,약품,CSR등의 구분이 필요)
                :preqpgmgubn 추가.
    수정2 :1. pmainpgmgubn 추가  ( "C': 청구(default), "B" : 구매승인 및 발주 )
    
             : 청구프로그램 에서 조회되는 내역은  RSCMREAP 를기준으로한다.
             : 청구접수및 발주프로그램에서는 RSCMREUS 를 기준으로 한다.
             
    수정1,2는 청구프로그램에서 처리오류 및 발주처리에서의 같이사용을 목적으로 수정한다.         
    
    [ 수정 2007.10.12 HBH ]
    중앙공급실 프로그램에서는 사용자별 권한체크를 하지 않는다.
          pemplno = '' 로 셋팅합니다.

------------------------------------------------------------------*/

function rszfUserReqFlagList(pcontrol_name,pinstcd,pemplno,preqpgmgubn,pmainpgmgubn)
{
    //TEST LOGIC
    //if(pemplno == null || pemplno.length == 0)pemplno ="12345678";
    if(pinstcd == null || pinstcd == 0)pinstcd ="012";
    if(preqpgmgubn == null || preqpgmgubn.length == 0)preqpgmgubn ="%";
    if(pmainpgmgubn == null || pmainpgmgubn.length == 0)pmainpgmgubn ="C";
  
  var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/reqflagref";
    var comcd_rsltnode = "/root/init/reqflag";
    var comcd_itemset = "/root/init/" + control_id;
    
    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/emplno");
    model.makeNode(comcd_node + "/reqpgmgubn");
    model.makeNode(comcd_node + "/mainpgmgubn");
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/reqflaglist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "reqflagnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "reqflag";
    
  model.setValue(comcd_node + "/instcd",pinstcd);
  model.setValue(comcd_node + "/emplno",pemplno);
  model.setValue(comcd_node + "/reqpgmgubn",preqpgmgubn);
  model.setValue(comcd_node + "/mainpgmgubn",pmainpgmgubn);
  
  model.removeChild("TRRSZ00108");
  model.createChild("xforms:submission", "id:TRRSZ00108;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00108");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
    
  if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}

/**----------------------------------------------------------------
 1. 청구권한자의 INSTCD DATA LOAD
 
 * 재정의 : 청구프로그램에서의 기관(INSTCD)별 청구구분 가져오기 
                 기존에 발주 프로그램에서도 같이사용하며 기준테이블이 애매헤서 청리함
   
                 2007.09.26 추석마지막날 HBH
                 
    수정1: 1. 기준TABLE 이 잘못됨.  MIS.RSCMREUS -> RSCMREAP 
   
             2. 청구구분 마스터중  프로그램별 구분자 ( 물품청구,약품,CSR등의 구분이 필요)
                :preqpgmgubn 추가. ( default : '%')
               
                
    수정2 :1. pmainpgmgubn 추가  ( "C': 청구(default), "B" : 구매승인 및 발주 )
    
             : 청구프로그램 에서 조회되는 내역은  RSCMREAP 를기준으로한다.
             : 청구접수및 발주프로그램에서는 RSCMREUS 를 기준으로 한다.
             
    수정1,2는 청구프로그램에서 처리오류 및 발주처리에서의 같이사용을 목적으로 수정한다.          

------------------------------------------------------------------*/
function rszfUserReqInstList(pcontrol_name,pemplno,preqpgmgubn, pmainpgmgubn)
{
    //TEST LOGIC
    if(pemplno == null || pemplno.length == 0)pemplno ="12345678";
    if(preqpgmgubn == null || preqpgmgubn.length == 0)preqpgmgubn ="%";
    if(pmainpgmgubn == null || pmainpgmgubn.length == 0)pmainpgmgubn ="C";
    
  
  var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/reqinstref";
    var comcd_rsltnode = "/root/init/reqinst";
    var comcd_itemset = "/root/init/" + control_id;
    
    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/emplno");
    model.makeNode(comcd_node + "/reqpgmgubn");
    model.makeNode(comcd_node + "/mainpgmgubn");
    
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/reqinstlist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "instnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "instcd";
    
  model.setValue(comcd_node + "/emplno",pemplno);
  model.setValue(comcd_node + "/reqpgmgubn",preqpgmgubn);
  model.setValue(comcd_node + "/mainpgmgubn",pmainpgmgubn);
  
  model.removeChild("TRRSZ00109");
  model.createChild("xforms:submission", "id:TRRSZ00109;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00109");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
    
    if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
    
}

/*-------------------------------------------------------------------------
// 물품구분별 재고관리부서를 가져완다 ( RSCMWRHS )
// 2007.07.30 .
-------------------------------------------------------------------------*/
function rszfComboStockArthDeptcdList(pcontrol_name,pinstcd,pgoodflag,pall )
{
  
  var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/deptgref";
    var comcd_rsltnode = "/root/init/dept";
    var comcd_itemset = "/root/init/" + control_id;

    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/goodflag");
    model.makeNode(comcd_node + "/refcond");    
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/deptcdlist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "deptnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "deptcd";
    
  model.setValue(comcd_node + "/instcd",pinstcd);
  model.setValue(comcd_node + "/goodflag",pgoodflag);
  
  model.removeChild("TRRSZ00110");
  model.createChild("xforms:submission", "id:TRRSZ00110;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00110");
  
  if(pall != null && pall == "Y")
  {
    /*
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdnm", "????");
    model.makeValue(comcd_itemset+"/comcodelist[" +1+ "]/cdid", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);
    
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())tarnode.appendChild(childNode);
    */    
    model.makeValue(comcd_itemset+"/deptcdlist[" +1+ "]/deptnm", "전체");
    model.makeValue(comcd_itemset+"/deptcdlist[" +1+ "]/deptcd", "");

    sourcenode = instance1.selectSingleNode(comcd_rsltnode);
    tarnode = instance1.selectSingleNode(comcd_itemset);

    cnt = 1;
    var sourcenodelist = sourcenode.childNodes;
    while (childNode = sourcenodelist.nextNode())
    {
      model.makeValue(comcd_itemset+"/deptcdlist[" +(cnt + 1)+ "]/deptnm", childNode.getXPathString(comcd_rsltnode + "/deptcdlist[" +cnt + "]/deptnm"));
      model.makeValue(comcd_itemset+"/deptcdlist[" +(cnt + 1)+ "]/deptcd", childNode.getXPathString(comcd_rsltnode + "/deptcdlist[" +cnt + "]/deptcd"));
  
      cnt++;
    }

  }
  else
    model.copyNode(comcd_itemset,comcd_rsltnode);
  
  if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}

/*-------------------------------------------------------------------------
// 물품구분별 재고관리부서를 가져완다  data grid용 ( RSCMWRHS )
// 2007.09.24
// pgrid_name
// pcolumn_id

-------------------------------------------------------------------------*/
function rszfComboGridStockArthDeptcdList(pgrid_name, pcolumn_id,pinstcd,pgoodflag )
{
  
  var control_id = pgrid_name.attribute("id");
    
    var comcd_node = "/root/send/deptgref";
    var comcd_rsltnode = "/root/init/dept";
    var comcd_itemset = "/root/init/" + control_id + "/" + pcolumn_id;

    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/goodflag");
    model.makeNode(comcd_node + "/refcond");    
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);

   if (pgrid_name.elementName == "xforms:datagrid") 
   {
      var column_id       = pgrid_name.colattribute(column_no, "id");
      var column_no     = pgrid_name.colRef(pcolumn_id);
      var column_name   = pgrid_name.colAttribute(column_no, "id");
      var column_obj    = document.controls(column_name);
      
      column_obj.choices.itemset.attribute("nodeset") = comcd_itemset+"/deptcdlist";
      column_obj.choices.itemset.label.attribute("ref") = "deptnm";
      column_obj.choices.itemset.value.attribute("ref") = "deptcd";
    }
    else
    {
      pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/deptcdlist";
      pcontrol_name.choices.itemset.label.attribute("ref") = "deptnm";
      pcontrol_name.choices.itemset.value.attribute("ref") = "deptcd";
   }   
    
  model.setValue(comcd_node + "/instcd",pinstcd);
  model.setValue(comcd_node + "/goodflag",pgoodflag);
  
  model.removeChild("TRRSZ00110");
  model.createChild("xforms:submission", "id:TRRSZ00110;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00110");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
    
  //if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}

/*--------------------------------------------------------------------------------------
 * 중앙공급실 일자별 청구가능 청구차수를 가져온다.
 * 2007.09.05
 * pinstcd        : 기관기호 ,  
 * preqdeptcd,     : 청구부서 , 
 * preqdd         : 청구일자 , 
 * pcsrreqdeptcd : CSR 청구부서구분 ( 불출프로그램에서만 의미를 갖는다.)
 * pcurtm           : 청구시 시간
 * ppgmgubun      : 청구 프로그램과 불출 프로그램에서 보여주는 데이타가 틀리다. : "C" 청구,'B'불출

 * 관련 테이블 : RSCMREDE (CSR청구부서 ),  RSCMCCLO ( ) 
 
---------------------------------------------------------------------------------------*/
function rszfComboCsrReqseqList(pcontrol_name,pinstcd,preqdd,preqdeptcd,pcsrreqdeptcd,pcurtm,ppgmgubun )
{
  
  var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/reqseqgref";
    var comcd_rsltnode = "/root/init/reqseq";
    var comcd_itemset = "/root/init/" + control_id;

    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/reqdd");
    model.makeNode(comcd_node + "/reqdeptcd");
    model.makeNode(comcd_node + "/csrreqdeptcd");
    model.makeNode(comcd_node + "/curtm");
    model.makeNode(comcd_node + "/pgmgubun");
    model.makeNode(comcd_node + "/refcond");    
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/reqseqlist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "reqseqnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "reqseq";
    
  model.setValue(comcd_node + "/instcd",pinstcd);
  model.setValue(comcd_node + "/reqdd",preqdd);
  model.setValue(comcd_node + "/reqdeptcd",preqdeptcd);
  model.setValue(comcd_node + "/csrreqdeptcd",pcsrreqdeptcd);
  model.setValue(comcd_node + "/curtm",pcurtm);
  model.setValue(comcd_node + "/pgmgubun",ppgmgubun);
  
  
  model.removeChild("TRRSZ00111");
  model.createChild("xforms:submission", "id:TRRSZ00111;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00111");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
    
  if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}

/*--------------------------------------------------------------------------------------
 * 예산 계정 LOAD ( RSCMBGCD)
 * 2007.09.05
 * pinstcd        : 기관기호 ,  

 * 관련 테이블 :  RSCMBGCD
 
 * pgoodflag : 1 == 물품청구
         2 == 장비청구
         3 == 비품청구
---------------------------------------------------------------------------------------*/
function rszfComboBugtList(pcontrol_name,pinstcd,pgroupid, pgoodflag)
{
  pcontrol_name.value = "";
  
  var control_id = pcontrol_name.attribute("id");
    
    
    var comcd_node = "/root/send/bugtref";
    var comcd_rsltnode = "/root/init/bugt";
    var comcd_itemset = "/root/init/" + control_id;
    
    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/refcond");    
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/bugtlist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "bugtcdnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "bugtcd";
    
  model.setValue(comcd_node + "/instcd",pinstcd);
  
  if(pgroupid != null)
  {
    model.makeValue(comcd_node + "/supacntcd4",pgroupid);
  }
  
  if(pgoodflag != null)
  {
    model.makeValue(comcd_node + "/pgoodflag", pgoodflag);
  }
  
  
  model.removeChild("TRRSZ00112");
  model.createChild("xforms:submission", "id:TRRSZ00112;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00112");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
  
    pcontrol_name.refresh();
}
/*--------------------------------------------------------------------------------------
 * 예산 계정 LOAD GRID ( RSCMBGCD)
 
 * 2007.09.05
 * pinstcd        : 기관기호 ,  

 * 관련 테이블 :  RSCMBGCD HBH
 
---------------------------------------------------------------------------------------*/
function rszfGridComboBugtList(pgrid_name, pcolumn_id,pinstcd)
{
  
  var control_id = pgrid_name.attribute("id");
    
    var comcd_node = "/root/send/bugtref";
    var comcd_rsltnode = "/root/init/bugt";
    var comcd_itemset = "/root/init/" + control_id + "/" + pcolumn_id;
    
    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/bugtcd");
    model.makeNode(comcd_node + "/bugtcdnm");
    model.makeNode(comcd_node + "/refcond");    
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
   if (pgrid_name.elementName == "xforms:datagrid") 
   {
      var column_id       = pgrid_name.colattribute(column_no, "id");
      var column_no     = pgrid_name.colRef(pcolumn_id);
      var column_name   = pgrid_name.colAttribute(column_no, "id");
      var column_obj    = document.controls(column_name);
      
      column_obj.choices.itemset.attribute("nodeset") = comcd_itemset+"/bugtlist";
      column_obj.choices.itemset.label.attribute("ref") = "bugtcdnm";
      column_obj.choices.itemset.value.attribute("ref") = "bugtcd";
  }    
    
  model.setValue(comcd_node + "/instcd",pinstcd);
  model.setValue(comcd_node + "/bugtcd","%");
  model.setValue(comcd_node + "/bugtcdnm","%");
  
  
  model.removeChild("TRRSZ00112");
  model.createChild("xforms:submission", "id:TRRSZ00112;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00112");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
    
  //if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}

/*--------------------------------------------------------------------------------------
 * 기관별, 물품구분별 단위 코드 LOAD ( RSCMUNIT)
 
 * 2007.09.18
 
 * pinstcd        : 기관기호 ,  
 * pgoodflag      : 물품구분 ,  

 * 관련 테이블 :  RSCMUNIT
 
---------------------------------------------------------------------------------------*/
function rszfComboUnitList(pcontrol_name,pinstcd,pgoodflag)
{
  
  var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/unitref";
    var comcd_rsltnode = "/root/init/unit";
    var comcd_itemset = "/root/init/" + control_id;

    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/goodflag");
    model.makeNode(comcd_node + "/refcond");    
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/unitlist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "unitnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "unit";
    
  model.setValue(comcd_node + "/instcd",pinstcd);
  model.setValue(comcd_node + "/goodflag",pgoodflag);
  
  
  model.removeChild("TRRSZ00113");
  model.createChild("xforms:submission", "id:TRRSZ00113;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00113");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
    
  if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}


/**--------------------------------------------------------------------------------------
 * 대중소 분류 Load 
 * 2007.11.30 금요일    
 * From : 
 * pGood_Flag   : 물품구분 ,
 * pLrgcd       : 대분류코드 ,  
 * pMdlcd     : 중분류코드 ,
 * pSmlcd     : 소분류코드 ,
 * pControl_name  : 컨트롤 ID 또는 그리드 컬럼 아뒤,
 * pGrid_id     : 그리드에 사용할시 그리드 ID 입력,
 * pLMSflag     : 대중소분류 Table 구분  ex> 'L' 또는'M' 또는 'S' 입력.
 * pAllflag             : -전체- 포함 / 미포함 
 * pResultFlag      : 현업의 요청으로 인해 코드 명칭의 구분을 짓는다.  (명칭에 코드   포함   리턴 유무 )  default : "Y"
 *                     ex)   pResultFlag = '' 또는 null 일 경우 ..     code : 01  /  codename : 의료소모품
                                pResultFlag 의 값이 존재할 경우  ..     code : 01  /  codename :  01 : 의료소모품 
 * 관련 테이블 :  RSCMGUBN, RSCDGBN1, RSCDGBN2
 * 한번 호출 할때마다 하나의 컨트롤만 설정됩니다. 
---------------------------------------------------------------------------------------*/
function rszfLMSComboList(pGood_flag, pLrgcd, pMdlcd, pControl_name, pGrid_id, pLMSflag, pAllflag, pResultFlag){
  
  var sControl = document.controls(pControl_name);
  var send_Node = "/root/send/lmsitem";
  var result_Node = "/root/init/lmsflag/" + pLMSflag + "/" + pControl_name + "/lmslist";
  
  model.removeNodeset(send_Node);
  model.removeNodeset(result_Node);
  
  model.refresh();
  
  model.makeNode(send_Node);
  model.makeNode(result_Node);
  
  if(pGrid_id != null && pGrid_id.elementName == "xforms:datagrid")
  { 
    var column_no        = pGrid_id.colRef(pControl_name);
      var column_name      = pGrid_id.colAttribute(column_no, "id");
      var sGridControl_obj = document.controls(column_name);
      
    
    sGridControl_obj.choices.itemset.attribute("nodeset") = result_Node;
    sGridControl_obj.choices.itemset.label.attribute("ref") = "label";
    sGridControl_obj.choices.itemset.value.attribute("ref") = "value";
  }else{

    sControl.choices.itemset.attribute("nodeset") = result_Node;
    sControl.choices.itemset.label.attribute("ref") = "label";
    sControl.choices.itemset.value.attribute("ref") = "value";
  }
  
  if(pLMSflag == 'L'){
    model.makeValue(send_Node + "/goodflag", pGood_flag);       
  }else if(pLMSflag == 'M'){
    model.makeValue(send_Node + "/goodflag", pGood_flag);
    model.makeValue(send_Node + "/lrgcd", pLrgcd);    
  }else if(pLMSflag == 'S'){
    model.makeValue(send_Node + "/goodflag", pGood_flag);
    model.makeValue(send_Node + "/lrgcd", pLrgcd);
    model.makeValue(send_Node + "/mdlcd", pMdlcd);
  }else{
    messageBox("대,중,소 분류 구분자 입력 오류입니다.", "I999");
    return;
  }
  
  if ( pResultFlag == "Y" )
    model.makeValue(send_Node + "/resultflag", pResultFlag);
  
  model.makeValue(send_Node + "/lmsflag", pLMSflag);
  
  model.removeChild("TRRSZ00118");
  model.createChild("xforms:submission", "id:TRRSZ00118;mediatype:application/x-www-form-urlencoded; method:post; ref:" + send_Node + "; resultref:" + result_Node + ";");
  submit("TRRSZ00118");
  
  if(pAllflag != '')
  {
    if(pGrid_id != null && pGrid_id.elementName == "xforms:datagrid")
    {
    
    }else
    {
      if(model.getValue(result_Node + "[1]/value") != '')
      {
        var comboObj = document.all.item(pControl_name);
        
        // Combo ItemSet 정보
        var comboItemNodeSet = comboObj.choices.itemset.attribute("nodeset");
        var comboLabelRef = comboObj.choices.itemset.label.attribute("ref");
        var comboValueRef = comboObj.choices.itemset.value.attribute("ref");
        
        
        // Item 노드 생성
        var itemNode = instance1.createNode("element", instance1.selectSingleNode(comboItemNodeSet).nodeName, "");
        var labelNode = instance1.createNode("element", comboLabelRef, "");
        var valueNode = instance1.createNode("element", comboValueRef, "");
        
        if(pAllflag == 'Y'){
          labelNode.value = "- 전 체 -";
          itemNode.appendChild(labelNode);

          valueNode.value = '';
          itemNode.appendChild(valueNode);
        }else if(pAllflag == 'N')
        {
          labelNode.value = "- Choice -";
          itemNode.appendChild(labelNode);

          valueNode.value = '';
          itemNode.appendChild(valueNode);
        }
        
        var destNode = instance1.selectSingleNode(comboItemNodeSet); 
        var pDestNode = destNode.parentNode; 
        pDestNode.insertBefore(itemNode, destNode);
        
        comboObj.refresh();
      }
    }
  }
}


/*-------------------------------------------------------------------------
* [2007.12.09 ]
*  약국 보나에스 INTERFACE TABLE의 입고일자별  출고번호를 가져온다 
*  delivedd    : 보나에스 출고일자
*  winyn     : 입고처리여부 'N': 미입고처리된것 .  'Y': 기입고처리된것 , '':전체 
*  windeptcd : 입고처리부서
-------------------------------------------------------------------------*/
function rszfComboBiDeliveNoList(pcontrol_name,pinstcd,pdelivedd,pwindeptcd,pwinyn )
{
  
  var control_id = pcontrol_name.attribute("id");
    
    var comcd_node = "/root/send/bidelivenogref";
    var comcd_rsltnode = "/root/init/bideliveno";
    var comcd_itemset = "/root/init/" + control_id;

    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/delivedd");
    model.makeNode(comcd_node + "/windeptcd");
    model.makeNode(comcd_node + "/winyn");
    model.makeNode(comcd_node + "/refcond");
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/bidelivenolist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "bidelivenonm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "bideliveno";
    
  model.setValue(comcd_node + "/instcd",pinstcd);
  model.setValue(comcd_node + "/delivedd",pdelivedd);
  model.setValue(comcd_node + "/windeptcd",pwindeptcd);
  model.setValue(comcd_node + "/winyn",pwinyn);
  
  model.removeChild("TRRSZ00119");
  model.createChild("xforms:submission", "id:TRRSZ00119;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00119");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
  
//  if(pcontrol_name.length == 1) pcontrol_name.selectedindex= 0;
}


/**--------------------------------------------------------------------------------------
 * 청구구분별 청구주기 list 
 * pinstcd        : 기관기호 ,  
 * preqflag         : 청구구분
 * 관련 테이블    :  RSCMREPD
 
 * grid 시 추가      : pgid_name
 
 grid call sample :   rszfComboReqPridList("reqprid",       opt_instcd.value,cmb_reqflag.value,grd_reqpsnlist);       
 control   sample :    rszfComboReqPridList(cmb_reqpridflag,  opt_instcd.value,cmb_reqflag.value              );
 
 * 일반 control call 하고 있는데  grid 추가함.
    pgrid_name 이 null 이 들어오면   pgrid_name.elementName 에서 에로가나서  if절이 복잡해졌음. 
    양해바람,..나중에 시간되면 수정함.
 
---------------------------------------------------------------------------------------*/
function rszfComboReqPridList(pcontrol_name,pinstcd,preqflag, pgrid_name)
{

/*
   if (pgrid_name != null && pgrid_name.elementName == "xforms:datagrid")   
   {
      var control_id = pgrid_name.attribute("id");
    } 
   else
   {
      var control_id = pcontrol_name.attribute("id");
   }
 */  
 
   if (pgrid_name == null )   
   {
      var control_id = pcontrol_name.attribute("id");
    } 
   else if ( pgrid_name.elementName == "xforms:datagrid")
   {
      var control_id = pgrid_name.attribute("id");
    } 
    else
    { 
      var control_id = pcontrol_name.attribute("id");
   }
 
    var comcd_node = "/root/send/reqpridref";
    var comcd_rsltnode = "/root/init/reqprid";
    var comcd_itemset = "/root/init/" + control_id;
    
    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);

    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/reqflag");
    model.makeNode(comcd_node + "/refcond");    
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
   if (pgrid_name == null )   
   {
      pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/reqpridlist";
      pcontrol_name.choices.itemset.label.attribute("ref") = "reqpridnm";
      pcontrol_name.choices.itemset.value.attribute("ref") = "reqprid";
    }  
   else if (pgrid_name.elementName == "xforms:datagrid") 
   {
      var column_id       = pgrid_name.colattribute(column_no, "id");
      var column_no     = pgrid_name.colRef(pcontrol_name);
      var column_name   = pgrid_name.colAttribute(column_no, "id");
      var column_obj    = document.controls(column_name);
      
      
      column_obj.choices.itemset.attribute("nodeset") = comcd_itemset+"/reqpridlist";
      column_obj.choices.itemset.label.attribute("ref") = "reqpridnm";
      column_obj.choices.itemset.value.attribute("ref") = "reqprid";
   }
   else 
   {
      pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/reqpridlist";
      pcontrol_name.choices.itemset.label.attribute("ref") = "reqpridnm";
      pcontrol_name.choices.itemset.value.attribute("ref") = "reqprid";
   }
    
  model.setValue(comcd_node + "/instcd",pinstcd);
  model.setValue(comcd_node + "/reqflag",preqflag);
  
  
  model.removeChild("TRRSZ00120");
  model.createChild("xforms:submission", "id:TRRSZ00120;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00120");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
    
}


/*--------------------------------------------------------------------------------------
 * 멸균장비모드 COMBO SETTING
 * 2008.01.03 목요일    
 * From     : 
 * pInstcd    : (조회값) 기관코드.
 * pFixasetcd : (조회값) 장비코드.
 * pControl_name_list : 값을 표현할 컨트롤 ID.
---------------------------------------------------------------------------------------*/
//콤보에 평가공통코드 조회
function rszfModeGetComboList(pInstcd, pFixasetcd, pControl_name_list) {

    var control_list  = pControl_name_list.split(",");

    var send_node = "/root/send/item";
    var result_node = "/root/init/item/" + pFixasetcd + "/rscmeqmdlist" ;
    
    model.removeNodeset(result_node);
    model.removeNodeset(send_node);
    model.makeNode(result_node);
    model.makeNode(send_node);
    model.makeNode(send_node + "/instcd");
    model.makeNode(send_node + "/fixasetcd");
    
    for (var i = 0; i < control_list.length; i++) {
        var control_id = control_list[i];
        var control = control_id.split(".");
        var obj = document.controls(control[0]);
        var result_itemset = result_node;
        
        var sInstcdNode = instance1.selectSingleNode(send_node + "/instcd");
        var sFixasetcdNode = instance1.selectSingleNode(send_node + "/fixasetcd");
        
        var nInstcdNode = instance1.createNode("element", "instcd", "");
        var nFixasetcdNode = instance1.createNode("element", "fixasetcd", "");
        
        nFixasetcdNode.text = pFixasetcd;
        nInstcdNode.text = pInstcd;
        
        sInstcdNode.appendChild(nInstcdNode);
        sFixasetcdNode.appendChild(nFixasetcdNode);
      
        if (obj != null && obj.elementName == "xforms:datagrid") {
          obj = document.controls(obj.colAttribute(obj.colRef(control[1]), "id"));
        }
        
      obj.choices.itemset.attribute("nodeset") = result_itemset;
        obj.choices.itemset.label.attribute("ref") = "label";
        obj.choices.itemset.value.attribute("ref") = "value";
    }
    
    model.removeNodeset(result_itemset);
    model.makeNode(result_itemset);

  model.removeChild("TRRSS01303");
  model.createChild("xforms:submission", "id:TRRSS01303;mediatype:application/x-www-form-urlencoded; method:post; ref:" + send_node + "; resultref:" + result_node + "; ");

  submit("TRRSS01303");
}

/*--------------------------------------------------------------------------------------
 * 컴포넌트 그리드 및 일반컨트롤 Combo Item 추가.
 * 2008.01.10 목요일    
 * From     : 
 * control_list   : 콤보 컨트롤 리스트
 * label_list   : 라벨 값 리스트
 * value_list   : 벨류 리스트
 * position_list  : 추가한 item이 위에 보이게 할것인지 밑에 보이게 할것인지 설정. ex> "above" 위에 설정. 다른값이 들어왔을시 아래쪽에 설정 됨.
---------------------------------------------------------------------------------------*/
//콤보에 평가공통코드 조회
function rszfComboComCdListMultiS(control_list, label_list, value_list, position_list ) {
    
  // Combo ItemSet 정보
  var comboItemNodeSet,comboLabelRef,comboValueRef;
  
  // Item 노드 생성
  var itemNode,labelNode,valueNode;
  
    var control_list_id  = control_list.split(",");
    var label_list_id  = label_list.split(",");
    var value_list_id  = value_list.split(",");
    var position_list_id  = position_list.split(",");
    
    for (var i = 0; i < control_list_id.length; i++) {        
        
        var control_id = control_list_id[i];
        var control = control_id.split(".");
        var obj = document.controls(control[0]);
        
        
        if (obj != null && obj.elementName == "xforms:datagrid") {
            obj = document.controls(obj.colAttribute(obj.colRef(control[1]), "id"));
        }

        
      comboItemNodeSet = obj.choices.itemset.attribute("nodeset");
        comboLabelRef = obj.choices.itemset.label.attribute("ref");
        comboValueRef = obj.choices.itemset.value.attribute("ref");
        
        itemNode = instance1.createNode("element", instance1.selectSingleNode(comboItemNodeSet).nodeName, "");
        labelNode = instance1.createNode("element", comboLabelRef, "");
        valueNode = instance1.createNode("element", comboValueRef, "");

        
        if( label_list_id[i] == null || label_list_id[i] == "" ) label_list_id[i] = "- 전 체 -";
        
    labelNode.value = label_list_id[i];
    itemNode.appendChild(labelNode);
    
    if( value_list_id[i] == null || value_list_id[i] == "" ) value_list_id[i] = "";

    valueNode.value = value_list_id[i];

    itemNode.appendChild(valueNode);
        
    if( position_list_id[i] == null || position_list_id[i] == "" )
    {
      position_list_id[i] = "above";
    }
      
    var destNode = instance1.selectSingleNode(comboItemNodeSet); 
    var pDestNode = destNode.parentNode; 
        
        
        if( position_list_id[i] == "above" ) {
      pDestNode.insertBefore(itemNode, destNode);
    }
    else {
      pDestNode.appendChild(itemNode);
    }
        
        obj.refresh();        
    }
}



/*--------------------------------------------------------------------------------------
 * 코드 Validation Check한다.
 * 2008.01.11 금요일    
 * From     : 
 * pvali_kind   : Validation 종류(부서코드, 공통코드, 우편번호...)
                  "12" - 사번조회                
 * precv_list   : 자료를 받을 Instance Node(콤마로 분류해서 넘기면됨)
 * pValueControl: 조회값으로 넘길 데이터
 * pNodeNames   : 조회값을 넘겨주기 위한 노드명
---------------------------------------------------------------------------------------*/
function rszfValidationCheckS(pvali_kind, pcdgrupid, precv_list, pValueControl, pNodeNames, pRetrKind, pInstcd)
{
    var objID = event.currentTarget;
  var obj   = document.controls(objID);
  
  var arrCtrlNames = null;
  var arrNodeNames = null;
  
  if(obj != null && obj.elementName == "xforms:group")
  {
    objID = event.Target;
    obj = document.controls(objID);
  }
  
  if(pValueControl != null && pValueControl != "")
  {
    arrCtrlNames = pValueControl.split(",");
  }
  
  if(pNodeNames != null && pValueControl != "")
  {
    arrNodeNames = pNodeNames.split(",");
  }
  
  var vali_kind = pvali_kind.substr(0,2);
//  alert(obj.elementName);
  
  
    var validation_node = "/root/send/validation";
    var validation_rsltnode = "/root/init/validation";
    
    var recv_node = precv_list.split(",");
    
    model.removeNodeset(validation_node);
    model.removeNodeset(validation_rsltnode);
    model.makeNode(validation_node);
    
    if (pInstcd != null) {
      model.makeValue(validation_node + "/instcd", pInstcd);
    }
    model.makeValue(validation_node + "/cdgrupid", pcdgrupid);
    model.makeNode(validation_rsltnode);
    
    var result_path = "";

    model.makeValue(validation_node + "/getcond",    model.getValue(obj.attribute("ref")));
    model.makeValue(validation_node + "/retrkind",   pRetrKind);
    model.makeValue(validation_node + "/systemflag", "");
    model.makeValue(validation_node + "/classicyn",  "Y");

    if (obj.elementName == "xforms:datagrid") {
        result_path = obj.nodeset;
        model.makeValue(validation_node + "/getcond", model.getValue(result_path + "[" + (obj.row - obj.fixedRows + 1) + "]/" + obj.colAttribute(obj.col,"ref")));
    }
    else {
        var node_path = obj.attribute("ref").split("/");
        result_path = "/root";
            
        for (var i = 2 ; i < node_path.length - 1; i++) {
                result_path = result_path + "/" + node_path[i];
        }
    }

    if (model.getValue(validation_node + "/getcond") == null || model.getValue(validation_node + "/getcond") == "")
    {
        for (var i = 0; i < recv_node.length; i++)
        {
        if (obj.elementName == "xforms:datagrid")
        {
          model.setValue(result_path + "[" + (obj.row - obj.fixedRows + 1) + "]/" + recv_node[i], "");
        }
        else
        {
              model.setValue(result_path + "/" + recv_node[i], "");
          }
      }
        return; 
    }



  if (pvali_kind == "12")  //사원번호
    {
      model.setValue(validation_node + "/retrkind", "code");
        model.makeValue(validation_node + "/emplno",  "");
        model.makeValue(validation_node + "/emplnm",  "");
     

      model.removeChild("TRRPZ00102");
      model.createChild("xforms:submission", "id:TRRPZ00102;mediatype:application/x-www-form-urlencoded; method:post; ref:" + validation_node + "; resultref:" + validation_rsltnode + "; ");
      submit("TRRPZ00102");

      
      var rslt_node = new Array();
      var node = instance1.selectNodes(validation_rsltnode + "/empllist" + "/*");
      for (var j = 0; j < node.length; j++) {
          if (obj.elementName == "xforms:datagrid") {
              rslt_node[j] = model.getValue(validation_rsltnode + "/empllist" + "[1]/" + node.item(j).nodeName);
          }
          else {
              rslt_node[j] = model.getValue(validation_rsltnode + "/empllist" + "/" + node.item(j).nodeName);
          }
      }
    }

    var node1 = instance1.selectNodes(validation_rsltnode + "/*");
    
  if (node1.length != 1)
  {
        model.removeNodeset("/root/source/validation");
        model.makeNode("/root/source/validation")
        model.copyNode("/root/source/validation", validation_rsltnode);

        misfOpenPopUpList(vali_kind, obj, pcdgrupid, precv_list, pValueControl, pNodeNames)
    }
    else
    {
      for (var i = 0; i < recv_node.length; i++)
      {
        if (obj.elementName == "xforms:datagrid")
        {
          //alert(result_path + "[" + (obj.row - obj.fixedRows + 1) + "]/" + recv_node[i] + "*****" + rslt_node[i]);
          model.setValue(result_path + "[" + (obj.row - obj.fixedRows + 1) + "]/" + recv_node[i], rslt_node[i]);
        }
        else
        {
            model.setValue(result_path + "/" + recv_node[i], rslt_node[i]);
          }
      }
    }
}

/*--------------------------------------------------------------------------------------
 * 공통코드 단일 콤보설정.
 * 2008.01.17 목요일    
 * From       : 
 * pcdgrupid_name   : 공통코드군
 * pcontrol_name    : Data를 받을 Control ID
 * pLabel     : COM.ZBCMCODE Table의 컬럼중 특정 컬럼의 명칭이 들어온다. 
          ex> "dispseq"
            "cdsid"
            "cdgrupid"
            "detldesc"
            "cdval"
            "minval"
            "maxval"
            "minopercd"
            "maxopercd"
            "cdengabbrnm"
            "valifromdd"
            "valitodd"        <<--- 이컬럼을 Label로 보여줄수 있다.
---------------------------------------------------------------------------------------*/
function rszfGetLabelControlComboList(pcdgrupid_name, pcontrol_name, pLabel,pInstgbn)
{
    var comcd_node = "/root/send/comcdref";
    var comcd_rsltnode = "/root/init/lavelcombo";
    
    model.makeNode(comcd_rsltnode);
    model.removeNodeset(comcd_node);
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/refcond");
    model.makeNode(comcd_node + "/cdgrupid");
    model.makeNode(comcd_node + "/cdid");
    
    var sLabelName = ( pLabel == null ) ? "cdnm" : pLabel;
    
    model.makeNode(comcd_node + "/" + sLabelName);
    
    var control_id = pcontrol_name;
    
    var control = control_id.split(".");
    
    var obj = document.controls(control[0]);
    
    var comcd_itemset = comcd_rsltnode;
    
    var refcondNode = instance1.selectSingleNode(comcd_node + "/refcond");
    var cdgrupidNode = instance1.selectSingleNode(comcd_node + "/cdgrupid");
    
    var cdidNode = instance1.selectSingleNode(comcd_node + "/cdid");
    var cdnmNode = instance1.selectSingleNode(comcd_node + "/" + sLabelName);
    
    var refcondvalueNode = instance1.createNode("element", "refcondvalue", "");
    var cdgrupvalueNode = instance1.createNode("element", "cdgrupidvalue", "");
    var cdidvalueNode = instance1.createNode("element", "cdidvalue", "");
    var cdnmvalueNode = instance1.createNode("element", "cdnmvalue", "");
      
    cdgrupvalueNode.text = pcdgrupid_name;
    cdidvalueNode.text = "%";
    cdnmvalueNode.text = "%";
    refcondvalueNode.text = sLabelName;
    
    refcondNode.appendChild(refcondvalueNode);
    cdgrupidNode.appendChild(cdgrupvalueNode);
    cdidNode.appendChild(cdidvalueNode);
    cdnmNode.appendChild(cdnmvalueNode);
  
  comcd_itemset = comcd_itemset + "/" + pcdgrupid_name + "0" + "/" + pcdgrupid_name + "0";
  model.removeNodeset(comcd_itemset);
    model.makeNode(comcd_itemset);
    
    if (obj != null && obj.elementName == "xforms:datagrid") {
        obj = document.controls(obj.colAttribute(obj.colRef(control[1]), "id"));
    }
    
  obj.choices.itemset.attribute("nodeset") = comcd_itemset;
    obj.choices.itemset.label.attribute("ref") = sLabelName;
   if(pInstgbn == null || pInstgbn ==""){
    obj.choices.itemset.value.attribute("ref") = "cdid";
    }else {
    obj.choices.itemset.value.attribute("ref") = "cdnm";
  }

  model.removeChild("TRRPZ00304");
  model.createChild("xforms:submission", "id:TRRPZ00304;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRPZ00304");
}

/*------------------------------------------------------------------------
  [2008.01.20 ]
   
   청구reqflag 를 goodflag 와 매핑한다... 주로 청구프로그램에서 사용한다.
   
   일종의 하드코딩이지만  func으로 빼서 사용한다.
   
   혹 나중에 사용할지몰라 instcd  넣어놓는다
   [2010.08.26]AS-IS 코드 TO_BE 코드 전환을 위한 물품구분 변경 
-------------------------------------------------------------------------*/
function rszfGetGoodFlagByReqFlag(pinstcd, preqflag)
{
   var pgoodflag
   
   if      (preqflag == "A") pgoodflag =  "Y";
   else if (preqflag == "B") pgoodflag =  "Z";
   else if (preqflag == "C") pgoodflag =  "U";
   else if (preqflag == "D") pgoodflag =  "GE";
   else if (preqflag == "E") pgoodflag =  "PH";
   else if (preqflag == "F") pgoodflag =  "PH";
   else if (preqflag == "G") pgoodflag =  "EQ";
   else if (preqflag == "H") pgoodflag =  "PH";
   else if (preqflag == "I") pgoodflag =  "PH";
// else if (preqflag == "S") pgoodflag =  "Y";
   else if (preqflag == "X") pgoodflag =  "T";
   else if (preqflag == "Y") pgoodflag =  "T";
   else if (preqflag == "Z") pgoodflag =  "T";
   
  return pgoodflag;
}


/**--------------------------------------------------------------------------------------
 * 사용자 정보를 가져온다.
 * 2008.01.24 목요일    
 * From       : 
 * pEmplno      : 조회할 사용자 ID
 * pInstcd      : 조회할 기관코드
 * pResultNode    : 리턴받을 노드 위치.
 * MIS.RSCMREAP Table의 Data를 가져온다.
---------------------------------------------------------------------------------------*/
function rszfGetUserInfo(pEmplno, pInstcd){
    
  var send_Node = "/root/submit";
  var result_Node = "/root/init/resultdata/rscmreaplist";
  var frow = 0;
    
  model.removeNodeset(send_Node);
  model.removeNodeset(result_Node);
  
  model.makeNode(send_Node);
  model.makeNode(result_Node);
  
  model.makeValue(send_Node + "/instcd", pInstcd);
  model.makeValue(send_Node + "/emplno", pEmplno);  
    
  model.removeChild("TRRSZ00121");
  model.createChild("xforms:submission", "id:TRRSZ00121;mediatype:application/x-www-form-urlencoded; method:post; ref:" + send_Node + "; resultref:" + result_Node + ";");
  submit("TRRSZ00121");
  
    model.refresh();
    
    frow = instance1.selectNodes("/root/init/resultdata/rscmreaplist").length;
  
    return frow;
}


/**--------------------------------------------------------------------------------------
 * 연구계좌 그룹명을 가져온다.
 * 2008.01.29 화요일    
 * From       : 
 * pcontrol     : 컨트롤 id
 * pInstcd      : 기관코드
 * pgoodflag    : 1 == 물품청구
                2 == 장비청구
                3 == 비품청구
 * pitemvalue   : 연구계정.   넘어온 연구계정으로 그룹코드를 가져온다.
 * pgetgroupidyn  : 입력된 그룹코드만 가져오기위한 유무
 * MIS.RSCMBGCD Table의 Data를 가져온다.
---------------------------------------------------------------------------------------*/
function rszfComboBgcdBugtList(pcontrol_name, pInstcd, pgoodflag, pitemvalue, pgetgroupidyn)
{
    var send_node = "/root/submit";
    var result_node = "/root/init/rscmbgcdlist";

    var fcontrol = pcontrol_name.split(".");
    var obj = document.controls(fcontrol[0]);
    
    model.removeNodeset(send_node);   
    
    model.makeNode(send_node);
    
    
    model.makeValue(send_node + "/instcd", pInstcd);
    
    if(pgoodflag != null)
  {
    model.makeValue(send_node + "/pgoodflag", pgoodflag);
  }
  
  if(pitemvalue != null)
  {
    model.makeValue(send_node + "/pitemvalue", pitemvalue);
  }
  
    if(pgetgroupidyn == null || pgetgroupidyn == "")
    { 
      model.removeNodeset(result_node);
      model.makeNode(result_node);
      
      if (obj.elementName == "xforms:datagrid") 
      {
        var column_obj    = document.controls(obj.colAttribute(obj.colRef(fcontrol[1]), "id"));
                
        column_obj.choices.itemset.attribute("nodeset") = result_node;
        column_obj.choices.itemset.label.attribute("ref") = "label";
        column_obj.choices.itemset.value.attribute("ref") = "value";
      }
      else {
        obj.choices.itemset.attribute("nodeset") = result_node;
        obj.choices.itemset.label.attribute("ref") = "label";
        obj.choices.itemset.value.attribute("ref") = "value";
      }
      
      model.removeChild("TRRSZ00122");
    model.createChild("xforms:submission", "id:TRRSZ00122;mediatype:application/x-www-form-urlencoded; method:post; ref:" + send_node + "; resultref:" + result_node + "; ");
    submit("TRRSZ00122");
    
    obj.refresh();
    //pcontrol_name.select(0);
  }else
  {
    result_node = "/root/init/bgcdgroupvalue/rscmbgcdlist"
    model.removeNodeset(result_node);
      model.makeNode(result_node);
      
    model.removeChild("TRRSZ00122");
    model.createChild("xforms:submission", "id:TRRSZ00122;mediatype:application/x-www-form-urlencoded; method:post; ref:" + send_node + "; resultref:" + result_node + "; ");
    submit("TRRSZ00122");
    
    return model.getValue(result_node+ "/value");
  }
  
}


/************************************************************************************************
함수명 : rszGridAddComboItem ()
인자 :
      String comboID      - 해당 콤보 아이디
      String label      - 추가 할 아이템 Lavel
      String value      - 추가 할 아이템 Value
      String [postion]    - 추가 할 위치( "above" | "below" ) 
       
결과값 :  
함수설명 : 콤보 아이템 추가 함수
************************************************************************************************
작   성   자 : 
작   성   일 : 2008.02.01
************************************************************************************************/
function rszGridAddComboItem( pControl_name, label, value, position ) {
  
  var control = pControl_name.split(".");
    var obj = document.controls(control[0]);
        

   if (obj.elementName == "xforms:datagrid") 
   {
    var column_no     = obj.colRef(control[1]);
    var column_id     = obj.colattribute(column_no, "id");
    var column_name   = obj.colAttribute(column_no, "id");
    var column_obj    = document.controls(column_name);     
      
      // Combo ItemSet 정보
    var comboItemNodeSet = column_obj.choices.itemset.attribute("nodeset");
    var comboLabelRef = column_obj.choices.itemset.label.attribute("ref");
    var comboValueRef = column_obj.choices.itemset.value.attribute("ref");
   }
   else {
      // Combo ItemSet 정보
    var comboItemNodeSet = obj.choices.itemset.attribute("nodeset");
    var comboLabelRef = obj.choices.itemset.label.attribute("ref");
      var comboValueRef = obj.choices.itemset.value.attribute("ref");
   }

  var nodeNn = instance1.selectSingleNode(comboItemNodeSet);
  if (nodeNn == null) {
    model.makeNode(comboItemNodeSet);
    model.makeNode(comboItemNodeSet+"/"+comboLabelRef);
    model.makeNode(comboItemNodeSet+"/"+comboValueRef);
    position = "init";
  }
  
  // Item 노드 생성
  var itemNode = instance1.createNode("element", instance1.selectSingleNode(comboItemNodeSet).nodeName, "");
  var labelNode = instance1.createNode("element", comboLabelRef, "");
  var valueNode = instance1.createNode("element", comboValueRef, "");

  if( label == null || label == "" ) label = "- 전 체 -";
  labelNode.value = label;
  itemNode.appendChild(labelNode);
  
  if( value == null || value == "" ) value = "";
  valueNode.value = value;
  itemNode.appendChild(valueNode);
  
  if( position == null || position == "" ) 
    position = "above";
    
  var destNode = instance1.selectSingleNode(comboItemNodeSet); 
  var pDestNode = destNode.parentNode; 
  if( position == "above" ) {
    pDestNode.insertBefore(itemNode, destNode);
    
  } else if ( position == "init" ) {
    pDestNode.insertBefore(itemNode, destNode);
    pDestNode.removeChild(destNode);
  }
  else {
    pDestNode.appendChild(itemNode);
  }
  
  obj.refresh();
}



/************************************************************************************************
함수명   : rszCostflagItemAdd()
INPUT    :
       - pGrupid    : 검색할 공통코드 Group Code (대분류)
       - pCdid      : (중분류)
       - pTargetGrid  : Data가 입력될 그리드
       - pGridAddBtn  : 그리드의 Row 추가시 화면상에서 실제로 사용하는 그리드 Row 추가 버튼 ID
       - pAddNodeList : DB에서 가져온 DATA가 들어갈 그리드 컬럼 ID 
                  (ex> "code,codenm,중분류"     * 순서대로 입력해야함.)

함수설명 : 공통코드 조회시 그리드에 조회된 Data를 자동적으로 입력시켜주는 메서드.
************************************************************************************************
작   성   자 : 
작   성   일 : 2008.02.11
************************************************************************************************/
function rszCostflagItemAdd(pGrupid, pCdid, pTargetGrid, pGridAddBtn, pAddNodeList){
  var send_node = "/root/submit";
    var result_node = "/root/init/comcodelist";
    
    model.removeNodeset(send_node);
    model.removeNodeset("/root/init/comcd");
    
    model.makeNode(send_node);
    model.makeNode(result_node);    
    
    model.makeValue(send_node + "/refcond", "cdid");
    model.makeValue(send_node + "/cdgrupid", pGrupid);
    model.makeValue(send_node + "/cdid", pCdid);
  
  model.removeChild("TRRPZ00301");
  model.createChild("xforms:submission", "id:TRRPZ00301;mediatype:application/x-www-form-urlencoded; method:post; ref:" + send_node + "; resultref:" + result_node + "; ");
  submit("TRRPZ00301");
  
  model.refresh();
  
  var rowCount = instance1.selectNodes("/root/init/comcd/comcodelist").length + 1;
  
  var refName = pAddNodeList.split(",");
  
  for(var R = 1; R < rowCount; R++)
  {
    if(R != 1 )
    {
      pGridAddBtn.dispatch("DOMActivate");
    }
            
    pTargetGrid.valueMatrix(pTargetGrid.row, pTargetGrid.colRef(refName[0])) = model.getValue("/root/init/comcd/comcodelist["+ R +"]/cdid");
    pTargetGrid.valueMatrix(pTargetGrid.row, pTargetGrid.colRef(refName[1])) = model.getValue("/root/init/comcd/comcodelist["+ R +"]/cdnm");
    pTargetGrid.valueMatrix(pTargetGrid.row, pTargetGrid.colRef(refName[2])) = pCdid; 
    
    pTargetGrid.colDisabled(pTargetGrid.colRef(refName[2])) = true;
  }
  
  model.setFocus(pTargetGrid.attribute("id"));
    
  pTargetGrid.refresh();
}


/************************************************************************************************
함수명   : rszGridDelete()
인자     : pGrupid -- 삭제시킬 그리드 id 
************************************************************************************************
작   성   자 : 
작   성   일 : 2008.02.26
************************************************************************************************/
function rszGridDeleteRow(pGridDel){

  var list = pGridDel.selectedCells.length;
  var rowtemp = new Array();
  var rows = new Array();
  var bool = true;
  var count =0;
  var rowbool = true;
  var tempRank;
  
  if(pGridDel.selectedCells.item(0).row != '')
  {
    if(pGridDel.selectedCells.item(1).row != '')
    {
      if(pGridDel.selectedCells.item(0).row > pGridDel.selectedCells.item(1).row)
      {
        rowbool = false;
      }
    }
  }
  
  

  for(var s = 0;  s < list ; s++)
  {             
    rowtemp[s] = pGridDel.selectedCells.item(s).row;

    for(so = 0; so < rows.length; so++)
    {
      if(rowtemp[s] == rows[so])
      {
        bool = false;
      }
    }
    
    if(bool)
    {                            
           rows[count] = rowtemp[s];
           count +=  1;
    }else{
      bool = true;
    }
  }
  
  
  for(var rank = 0; rank < rows.length; rank++)
  {
    for(var rank2 = rank+1; rank2 < rows.length; rank2++)
    {
      if(rows[rank] > rows[rank2])
      {
        tempRank = rows[rank];
        rows[rank] = rows[rank2];
        rows[rank2] = tempRank;
      }
    }
  }
    
    
  for(var z = rows.length-1; z >= 0; z--)
  {
    if( (pGridDel.rowstatus(rows[z]) == 1) || (pGridDel.rowstatus(rows[z]) == 3) ) 
        {
      pGridDel.deleteRow(rows[z], false);
        }else if(pGridDel.rowstatus(rows[z]) == 4)
        {
          pGridDel.rowstatus(rows[z]) = 0;
        }
        else
        {
            pGridDel.addStatus(rows[z],"delete");
        }
  }
    
  pGridDel.refresh();
}

/*------------------------------------------------------------------------
  [2008.03.04 ]
   구매팀 부서코드를 가져온다 
   일종의 하드코딩이지만  func으로 빼서 사용한다.
   
   2010.04.15 CHR 기관별 구매시스템 기본정보로 변경
-------------------------------------------------------------------------*/
function rszfGetPurcDeptCd(pinstcd)
{
   rszfRscsysinftLists(pinstcd);
   var purcdeptcd = getRscsysinftInfo("purcdept");
   
   // if      (pinstcd    == "012") purcdeptcd =  "4080102000";   // 서울성모
   // else if (pinstcd    == "103") purcdeptcd =  "4080100000";   // 성의교정
   // else if (pinstcd    == "001") purcdeptcd =  "4080101000";   // 중앙의료원
   // else if (pinstcd    == "013") purcdeptcd =  "4080102000";   // 의정부성모
   // else if (pinstcd    == "014") purcdeptcd =  "4080101000";   // 성가병원
   // else if (pinstcd    == "017") purcdeptcd =  "4080300000";   // 빈센트병원     
   // else if (pinstcd    == "011") purcdeptcd =  "4080102000";   // 성모병원     
   // else     purcdeptcd =  "JS등록바람";
   
  return purcdeptcd;
}


/*--------------------------------------------------------------------------------------
 * 성의교정, 예산 계정 LOAD ( RSCMBGCD)
 * 2008.03.08 황금같은....토요일

 * pcontrol_name  : 설정될 컨트롤
 * pinstcd      : 기관코드
 * pgroupid     : 그룹코드
 * pgoodflag    : 청구구분
 * pacntyy      : 예산년도
 * preqdeptcd   : 청구부서
 
 * 관련 테이블 :  MIS.RSCMBGCD
          MIS.RBEMORGN
          MIS.RADMPROJ
 
 * pgoodflag : 1 == 물품청구
         2 == 장비청구
         3 == 비품청구
---------------------------------------------------------------------------------------*/
function rszfComboMarchBugtList(pcontrol_name,pinstcd,pgroupid, pgoodflag, pacntyy, preqdeptcd)
{
  if(pacntyy == ''  || pacntyy == null)
  {
    messageBox("예산년도를 입력하세요.","");    
    return;
  }

  if(preqdeptcd == ''  || preqdeptcd == null)
  {
    messageBox("청구부서를 입력하세요.","");
    return;
  }
  
  pcontrol_name.value = "";
    
  var control_id = pcontrol_name.attribute("id");
    
    
    var comcd_node = "/root/send/bugtref";
    var comcd_rsltnode = "/root/init/bugt";
    var comcd_itemset = "/root/init/" + control_id;
    
    //resetInstanceNode는 노드가 생성된 후에 초기화 하는 작업이므로
    //여기서는 처음 함수 호출시 생성되어 있는 노드가 존재하지 않아
    //makenode로 노드 생성하는 로직으로 구현 
    model.removeNodeset(comcd_node);
    model.removeNodeset(comcd_itemset);
    
    model.makeNode(comcd_node);
    model.makeNode(comcd_node + "/instcd");
    model.makeNode(comcd_node + "/acntyy");
    model.makeNode(comcd_node + "/deptcd");
    model.makeNode(comcd_node + "/refcond");    
    
    model.makeNode(comcd_rsltnode);
    model.makeNode(comcd_itemset);
    
    pcontrol_name.choices.itemset.attribute("nodeset") = comcd_itemset+"/bugtlist";
    pcontrol_name.choices.itemset.label.attribute("ref") = "bugtcdnm";
    pcontrol_name.choices.itemset.value.attribute("ref") = "bugtcd";
    
  model.setValue(comcd_node + "/instcd",pinstcd);
  model.setValue(comcd_node + "/acntyy",pacntyy);
  model.setValue(comcd_node + "/deptcd",preqdeptcd);  
  
  if(pgroupid != null)
  {
    model.makeValue(comcd_node + "/supacntcd4",pgroupid);
  }
  
  if(pgoodflag != null)
  {
    model.makeValue(comcd_node + "/pgoodflag", pgoodflag);
  }
  
  
  model.removeChild("TRRSZ00112");
  model.createChild("xforms:submission", "id:TRRSZ00112;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
  submit("TRRSZ00112");
  
  model.copyNode(comcd_itemset,comcd_rsltnode);
  
  pcontrol_name.select(0);
  
    pcontrol_name.refresh();
}


/*--------------------------------------------------------------------------------------
 * 성의교정, 예산 계정에 맞는 예산액 및 프로젝트명을 컨트롤에 설정
 * 2008.03.08 황금같은....토요일

 * PvalueControl  : Data를 가지고 있는 컨트롤
 * Pprojectnm   : 프로젝트명을 받을 컨트롤
 * Ptotamt      : 예산편성액을 받을 컨트롤
 * Pbugtexpcamt   : 예산추산액을 받을 컨트롤
 * Pbugtexecamt   : 예산집행액을 받을 컨트롤
 * Premainder   : 예산잔액을 받을 컨트롤
 

---------------------------------------------------------------------------------------*/
function rszfBugtControlValueSet(PvalueControl, Pprojectnm, Ptotamt, Pbugtexpcamt, Pbugtexecamt, Premainder, PconTrolYN_list)
{
  model.setValue( Pprojectnm.attribute("ref") , model.getValue(PvalueControl.choices.itemset.attribute("nodeset") + "["+ (PvalueControl.focusIndex + 1) +"]/projectnm"));
  model.setValue( Ptotamt.attribute("ref") , model.getValue(PvalueControl.choices.itemset.attribute("nodeset") + "["+ (PvalueControl.focusIndex + 1) +"]/totamt"));
  model.setValue( Pbugtexpcamt.attribute("ref") , model.getValue(PvalueControl.choices.itemset.attribute("nodeset") + "["+ (PvalueControl.focusIndex + 1) +"]/bugtexpcamt"));
  model.setValue( Pbugtexecamt.attribute("ref") , model.getValue(PvalueControl.choices.itemset.attribute("nodeset") + "["+ (PvalueControl.focusIndex + 1) +"]/bugtexecamt"));
  model.setValue( Premainder.attribute("ref") , model.getValue(PvalueControl.choices.itemset.attribute("nodeset") + "["+ (PvalueControl.focusIndex + 1) +"]/remainder"));
  
  var control_list = PconTrolYN_list.split(",");
  
  if(PconTrolYN_list != "" && control_list.length > 0)
  { 
    var obj = null;
    var YN = model.getValue(PvalueControl.choices.itemset.attribute("nodeset") + "["+ (PvalueControl.focusIndex + 1) +"]/projectyn");
    
    for(var count=0; count < control_list.length; count++)
    {
      obj = document.controls(control_list[count])
      obj.value = '';
            
      if(YN == 'Y')
      {       
        obj.disabled = true;
      }else{
        obj.disabled = false;
      }   
    }//for end
  }// first if end
}



/*--------------------------------------------------------------------------------------
 * 기관별 구매 계정코드 COMBO SETTING
 * 2008.03.29 토요일    
 * From     : 
 * pInstcd    : (조회값) 기관코드.
 * pGoodflag  : (조회값) 물품구분.
 * pControl : 값을 표현할 컨트롤 ID.
---------------------------------------------------------------------------------------*/
function rszfPuacGetComboList(pInstcd, pGoodflag, pControl) {
    
    var send_node = "/root/send/item";
    var result_node = "/root/init/item/rscmpuaclist" ;
    
    model.removeNodeset(result_node);
    model.removeNodeset(send_node);
    model.makeNode(result_node);
    model.makeNode(send_node);
    model.makeValue(send_node + "/instcd", pInstcd);
    model.makeValue(send_node + "/goodflag", pGoodflag);
    

    var control_id = pControl;
    var control = control_id.split(".");
    var obj = document.controls(control[0]);

    if (obj != null && obj.elementName == "xforms:datagrid") {
      obj = document.controls(obj.colAttribute(obj.colRef(control[1]), "id"));
    }
    
  obj.choices.itemset.attribute("nodeset") = result_node;
    obj.choices.itemset.label.attribute("ref") = "label";
    obj.choices.itemset.value.attribute("ref") = "value";
    
    model.removeNodeset(result_node);
    model.makeNode(result_node);

  model.removeChild("TRRSD00351");
  model.createChild("xforms:submission", "id:TRRSD00351;mediatype:application/x-www-form-urlencoded; method:post; ref:" + send_node + "; resultref:" + result_node + "; ");

  submit("TRRSD00351");
  
  addComboItem(pControl, "전체", "", "above");
  
  obj.select(0);
}


/*--------------------------------------------------------------------------------------
 * 사용자 부서 리스트 COMBO SETTING
 * 2008.04.02 수요일    
 * From     : 
 * pInstcd    : (조회값) 기관코드.
 * pEmplno    : (조회값) 사원번호.
 * pReqflag   : (조회값) 청구구분.
---------------------------------------------------------------------------------------*/
function rszfReqDeptGetComboList(pControl, pInstcd, pEmplno, pReqflag) {
    
    var send_node = "/root/send/item";
    var result_node = "/root/init/item/reqdeptlist" ;
    
    model.removeNodeset(result_node);
    model.removeNodeset(send_node);
    model.makeNode(result_node);
    model.makeNode(send_node);
    model.makeValue(send_node + "/instcd", pInstcd);
    model.makeValue(send_node + "/emplno", pEmplno);
    model.makeValue(send_node + "/reqflag", pReqflag);
    

    var control_id = pControl;
    var control = control_id.split(".");
    var obj = document.controls(control[0]);
    
    //컨트롤 값 초기화.
    obj.value = '';

    if (obj != null && obj.elementName == "xforms:datagrid") {
        obj = document.controls(obj.colAttribute(obj.colRef(control[1]), "id"));
    }
    
  obj.choices.itemset.attribute("nodeset") = result_node;
    obj.choices.itemset.label.attribute("ref") = "label";
    obj.choices.itemset.value.attribute("ref") = "value";
    
    model.removeNodeset(result_node);
    model.makeNode(result_node);

  model.removeChild("TRRSD00361");
  model.createChild("xforms:submission", "id:TRRSD00361;mediatype:application/x-www-form-urlencoded; method:post; ref:" + send_node + "; resultref:" + result_node + "; ");

  submit("TRRSD00361");

  obj.select(0);
}

 //--------------------------------------------------------
 // Left 빈자리 만큼 padStr 을 붙인다.
 // 2008.10.10 Choi HR
 //--------------------------------------------------------
 function lpad(pSrc, pLen, pPadStr){
          var rString = "";
          
          var vPadCnt = Number(pLen) - String(pSrc).length;
          
          for(var i=0; i<vPadCnt; i++) rString += String(pPadStr);
          
          return rString+pSrc;
 }
 
 //--------------------------------------------------------
 // Right 빈자리 만큼 pPadStr 을 붙인다.
 // 2008.10.10 Choi HR
 //--------------------------------------------------------
 function rpad(pSrc, pLen, pPadStr){
          var rString = "";
          var vPadCnt = Number(pLen) - String(pSrc).length;
          for(var i=0;i<vPadCnt;i++) rString += String(pPadStr);
          
          return pSrc+rString;
 }
 
 //--------------------------------------------------------
 // 콤마설정.
 // 2008.10.10 Choi HR
 //--------------------------------------------------------
    
 function putComma(pData) { 
  
          var vNum = pData;
     
           
          var rOut      = ""
          var dotPos    = (vNum+"").split(".")
          var IntPart   = dotPos[0]
          var FraPart   = dotPos[1]
          var commaFlag = IntPart.length%3
          
          //
          if    (vNum < 0) { 
                 vNum *= -1; 
                 var Minus = true
          }else{
                 var Minus = false
          }
          
          //  
          if (commaFlag) {
              rOut = IntPart.substring(0, commaFlag) 
              if (IntPart.length > 3) rOut += ","
          }
    
          for (var i=commaFlag; i < IntPart.length; i+=3) {
               rOut += IntPart.substring(i, i+3) 
               if( i < IntPart.length-3) rOut += ","
          }
    
         if (Minus) rOut = "-" + rOut
         
         if (FraPart ) return rOut + "." + FraPart
         else       return rOut 
 }
 
/*--------------------------------------------------------------------------------------
 * 기관별 구매시스템 기본정보를 조회한다
 * 2009.06.13 토요일 
 * From          :  CHR
 * pInstcd"      : (조회값) 기관코드    
---------------------------------------------------------------------------------------*/
function rszfRscsysinftLists(pInstcd)
{
         var vPathSend   = "/root/send/rscsysinft";
         var vPathResult = "/root/init/RscsysinftLists";
         
         model.removeNodeset(vPathSend);
         
         // Input Send정보 
         model.makeNode(vPathSend);
         model.makeNode(vPathSend + "/instcd");
         model.setValue(vPathSend + "/instcd",pInstcd);
         
         // 좌회결과 정보 
         model.makeNode(vPathResult);

         model.removeChild("TRRSC00010");
         
         model.createChild("xforms:submission", "id:TRRSC00010;mediatype:application/x-www-form-urlencoded; method:post; ref:" + vPathSend + "; resultref:" + vPathResult + "; "); 
  
         submit("TRRSC00010");
  
}

/*--------------------------------------------------------------------------------------
 * 기관별 구매발주자 기본정보를 조회한다
 * 2009.11.24  화요일  rscsysordt
 * From          :  CHR
 * pInstcd"      : (조회값) 기관코드    
---------------------------------------------------------------------------------------*/
function rszfRscsysordtLists(pInstcd,pPurcdept, pUserId)
{
         var vPathSend   = "/root/send/rscsysordt";
         var vPathResult = "/root/init/RscsysordtLists";
         
         model.removeNodeset(vPathSend);
         
         // Input Send정보 
         model.makeNode(vPathSend);
         model.makeNode(vPathSend + "/instcd"   );
         model.makeNode(vPathSend + "/purcdept" );
         model.makeNode(vPathSend + "/purcordid");
         model.setValue(vPathSend + "/instcd"   ,pInstcd  );
         model.setValue(vPathSend + "/purcdept" ,pPurcdept);
         model.setValue(vPathSend + "/purcordid",pUserId  );
         
         // 조회결과 정보 
         model.makeNode(vPathResult);

         model.removeChild("TRRSC08101");
         
         model.createChild("xforms:submission", "id:TRRSC08101;mediatype:application/x-www-form-urlencoded; method:post; ref:" + vPathSend + "; resultref:" + vPathResult + "; "); 
  
         submit("TRRSC08101");
  
}

/*--------------------------------------------------------------------------------------
 * 구매 인터페이스 거래처정보를 조회한다
 * 2009.06.13 토요일 
 * From          :  CHR
 * pInstcd"      : (조회값) 기관코드    
 * pEntrregno"   : (조회값) 거래처      
 * pMaindeptcd"  : (조회값) 관리부서코드
---------------------------------------------------------------------------------------*/
function rszfRscifcustLists(pControl, pInstcd, pEntrregno, pMaindeptcd, pCombo, pAllYN) {

         var vPathSend    = "/root/send/rscsysinft"    ;
         var vPathResult  = "/root/init/RscifcustLists";
         
         model.removeNodeset(vPathSend   );
         model.removeNodeset(vPathResult );
         
         // Input Send정보 
         model.makeNode(vPathSend);
         model.makeNode(vPathSend + "/instcd"    );
         model.makeNode(vPathSend + "/entrregno" );
         model.makeNode(vPathSend + "/maindeptcd");
         
         model.setValue(vPathSend + "/instcd"    , pInstcd    );
         model.setValue(vPathSend + "/entrregno" , pEntrregno );
         model.setValue(vPathSend + "/maindeptcd", pMaindeptcd);
         
         // 조회결과 정보 
         model.makeNode(vPathResult);


         model.removeChild("TRRSC00020");
         model.createChild("xforms:submission", "id:TRRSC00020;mediatype:application/x-www-form-urlencoded; method:post; ref:" + vPathSend + "; resultref:" + vPathResult + "; "); 
         submit("TRRSC00020");

         
         if (pCombo != "Y")  return;
         
         var vPathItemset = "/root/init/"+pControl.attribute("id");
         
         model.removeNodeset(vPathItemset);
         model.makeNode(vPathItemset);
         
         vPathItemsetChild = vPathItemset+ "/rscifcustlist";  // 거래처 Combo Path
         
         pControl.choices.itemset.attribute("nodeset")   = vPathItemsetChild;  // 거래처 Combo Path
         pControl.choices.itemset.label.attribute("ref") = "entrregnonnm"   ;  // 거래처명
         pControl.choices.itemset.value.attribute("ref") = "entrregno"      ;  // 거래처 코드
         
         if (pAllYN != null && pAllYN == "Y") {
             model.makeValue(vPathItemsetChild + "[" +1+ "]/entrregnonnm", "전체");
             model.makeValue(vPathItemsetChild + "[" +1+ "]/entrregno"   , ""    );
         }
         
         vNodeSource = instance1.selectSingleNode(vPathResult );
         
         Idx = 1;
         var vNodeSourcelist = vNodeSource.childNodes;
         
         while (childNode = vNodeSourcelist.nextNode())
         {
               model.makeValue(vPathItemsetChild + "[" + (Idx + 1) + "]/entrregnonnm", childNode.getXPathString(vPathResult + "/rscifcustlist[" + Idx + "]/entrregnonnm"));
               model.makeValue(vPathItemsetChild + "[" + (Idx + 1) + "]/entrregno"   , childNode.getXPathString(vPathResult + "/rscifcustlist[" + Idx + "]/entrregno"   ));
               Idx++;
         }
         
         if(pControl.length == 1) pControl.selectedindex= 0;
}
 
/* ----------------------------------------------------------
*  기관별 구매시스템 기본정보를 가져온다.
* ----------------------------------------------------------
*  instcd           기관코드                      
*  instcdnm         기관코드명칭                  
*  instnm           기관코드명칭                  
*  version          VERSION                       
*  installdt        설 치 일                      
*  operationdt      가 동 일                      
*  closecycle       마감주기 1:일,  2:주, 4:월    
*  instzip          기관우편번호                  
*  instaddr         기관주소                      
*  purcdept         구매담당부서                  
*  purcdeptnm       구매담당부서명                
*  purcdptjobid     구매담당자ID                  
*  purcdptjobidnm   구매담당자명                  
*  purcdptmgrid     구매부서장ID                  
*  purcdptmgridnm   구매부서장명                  
*  purcdepttel1     구매팀 전화번호1              
*  purcdepttel2     구매팀 전화번호2              
*  purcdeptfax      구매팀 FAX                    
*  purcacctdate     구매최종회계전송일자          
*  purccloseyymm    구매최종마감년월              
*  drugdept         약제담당부서                  
*  drugdeptnm       약제담당부서명                
*  drugdptjobid     약제담당자ID                  
*  drugdptjobidnm   약제담당자명                  
*  drugdptmgrid     약제부서장ID                  
*  drugdptmgridnm   약제부서장명                  
*  drugdepttel1     약제팀 전화번호1              
*  drugdepttel2     약제팀 전화번호2              
*  drugdeptfax      약제팀 FAX                    
*  drugacctdate     약제최종회계전송일자          
*  drugcloseyymm    약제최종마감년월              
*  nutrdept         영양담당부서                  
*  nutrdeptnm       영양담당부서명                
*  nutrdptjobid     영양담당자ID                  
*  nutrdptjobidnm   영양담당자명                  
*  nutrdptmgrid     영양부서장ID                  
*  nutrdptmgridnm   영양부서장명                  
*  nutrdepttel1     영양팀 전화번호1              
*  nutrdepttel2     영양팀 전화번호2              
*  nutrdeptfax      영양팀 FAX                    
*  nutracctdate     영양최종회계전송일자          
*  nutrcloseyymm    영양최종마감년월              
*  insucdeptcd      수가위원회부서(보험)          
*  insucdeptcdnm    수가위원회부서명              
*  yearcostdt       년간단가처리일자              
*  yearcostyn       년간단가선정여부              
*  valueinven       재고자산 평가방법 0:개별법,1:선입선출법,2:후입선출법,3:이동평균법,4:총평균법  
*  fstrgstrid       최초등록자ID                  
*  fstrgstdt        최초등록일시                  
*  lastupdtrid      최종수정자ID                  
*  lastupdtdt       최종수정일시               
*  deliveryplace    납품장소명칭                        
*  purcmgrflag      구매재고관리구분0:관리안함,1:관리함 
*  purcwhcd         구매재고관리코드                    
*  purcwhnm         구매재고관리명칭                    
*  purcbdflag       구매예산사용여부Y/N                 
*  purcbddept       구매예산부서코드                    
*  purcpcseyn       구매발주수정여부Y/N                 
*  purccustyn       구매거래처수정여부Y/N               
*  purcinptyn       구매입고수정여부Y/N                 
*  durgmgrflag      약제재고관리구분0:관리안함,1:관리함 
*  durgwhcd         약제재고관리코드                    
*  durgwhnm         약제재고관리명칭                    
*  durgbdflag       약제예산사용여부Y/N                 
*  durgbddept       약제예산부서코드                    
*  durgpcseyn       약제발주수정여부Y/N                 
*  durgcustyn       약제거래처수정여부Y/N               
*  durginptyn       약제입고수정여부Y/N                 
*  nutrmgrflag      영양재고관리구분0:관리안함,1:관리함 
*  nutrwhcd         영양재고관리코드                    
*  nutrwhnm         영양재고관리명칭                    
*  nutrbdflag       영양예산사용여부Y/N                 
*  nutrbddept       영양예산부서코드                    
*  nutrpcseyn       영양발주수정여부Y/N                 
*  nutrcustyn       영양거래처수정여부Y/N               
*  nutrinptyn       영양입고수정여부Y/N                 
----------------------------------------------------------*/
function getRscsysinftInfo(pDataName) {
         var vReturnData = model.getValue(RSCSYSINFT_NODE + "/"+pDataName);
         return vReturnData;
}

/* ----------------------------------------------------------------
 * MIS.RSCSYSORDT  기관별 구매발주자 기본정보 조회 
 *     INSTCD       01 기관코드            
 *     INSTCDNM     02 기관코드명칭        
 *     PURCDEPT     03 구매담당부서        
 *     PURCDEPTNM   04 구매담당부서명      
 *     PURCORDID    05 구매담당자id        
 *     PURCORDNM    06 구매담당자명        
 *     PURCTELNO    07 담당자전화번호      
 *     PURCFAXNO    08 담당자전화번호      
 *     PURCHPTEL    09 담당자휴대전화번호  
 *     PURCEMAIL    10 담당자 email        
 *     GOODFLAG     11 주관리물품구분      
 *     GOODFLAGNM   12 주관리물품구분명    
 *     CMT          13 비고                
 *     CMT2         14 비고2               
 *     VALUEINVEN   15 납품장소            
 *     FSTRGSTRID   16 최초등록자id        
 *     FSTRGSTDT    17 최초등록일시        
 *     LASTUPDTRID  18 최종수정자id        
 *     LASTUPDTDT   19 최종수정일시        
 * ---------------------------------------------------------------- */
function getRscsysordtInfo(pDataName) {
         var vReturnData = model.getValue(RSCSYSORDT_NODE + "/"+pDataName);
         return vReturnData;
}

//
/*---------------------------------------------------
 * @desc   : 부서명을 통한 부서코드를 조회한다. 
 * @
 * @param  : ref        - reference path
 *           rsltref    - result reference path
 * @return :
 * @author : 김영학
 * @---------------------------------------------------
 */
function getRszDeptCdList(ref, rsltref){
  var mmb_rsltref = "/root/hidden/mis/orddept";
  model.removeNode(mmb_rsltref);
  model.makeNode(mmb_rsltref);
  
//  model.removeNode(ref);

  if(submit("TRRSZ00123", "false", ref, mmb_rsltref)==true){
    model.copyNode(rsltref, mmb_rsltref);
    model.removeNode(mmb_rsltref);
  }
  model.refresh();
}

/**
 * @desc   : 콤보박스에 원하는 instance node와 value를 설정
 * @
 * @param  :
 * @event  :
 * @return :
 * @---------------------------------------------------
 */
function addComboInstance(combopath, nodename, nodeval, parentnode){
   var xmlNode = model.instances(0).selectSingleNode(combopath + "/" + parentnode);
   if(xmlNode == null){
      return;
   }
   nodename = nodename.split("^");
   nodeval  = nodeval.split("^");
   if(nodename.length != nodeval.length){
      return;
   }
   
   var label = model.instances(0).createElement(nodename[0]);
   var val   = model.instances(0).createElement(nodename[1]);
   var combo = model.instances(0).createElement(parentnode);
   label.value = "" + nodeval[0] + "";
   val.value   = "" + nodeval[1] + "";
   
   combo.appendChild(label);
   combo.appendChild(val);
   
   chkNode = model.instances(0).selectSingleNode(combopath);
   if(chkNode == null){
      model.makeNode(combopath);
      srcNode = model.instances(0).selectSingleNode(combopath);
   }else{
      srcNode = model.instances(0).selectSingleNode(combopath);
   }
   
   desNode = model.instances(0).selectSingleNode(combopath + "/" + parentnode);
   srcNode.insertBefore(combo, desNode);
   model.refresh();
}

/*************************************
* Instcd    기관코드
* Entrregno   세금계산서번호
*   Nodeset     Return Node
*************************************/

function radfGetDTIPassword() {     
         var comcd_node = "/root/send/comcdref";
         var comcd_rsltnode = "/root/init/comcd";
         
         model.removeNodeset(comcd_node);
         model.makeValue(comcd_node + "/emplno",  getUserInfo("userid"));
             
         model.makeNode(comcd_rsltnode);
             
         model.removeChild("TRRAZ00015");
         model.createChild("xforms:submission", "id:TRRAZ00015;mediatype:application/x-www-form-urlencoded; method:post; ref:" + comcd_node + "; resultref:" + comcd_rsltnode + "; ");
         submit("TRRAZ00015");
         
         
         var sPasswd = model.getValue("/root/init/comcd/comcodelist/passwd")
         var sLink = "http://222.106.233.111:8081/login.do?method=process1&userId=" + getUserInfo("userid") + "&password=" + sPasswd;
         
         if (sPasswd != "") {
              window.load(sLink, "html"); 
         }  
}

function fBugtDeptCdList(psendnode, ptrgtnode) {

    model.makeValue(psendnode + "/instcd", getUserInfo("dutplceinstcd"));  
    model.makeValue(psendnode + "/bugtflag", "3");  
    model.removeChild("TRRAD01501");
    model.createChild("xforms:submission", "id:TRRAD01501;mediatype:application/x-www-form-urlencoded; method:post; ref:" + psendnode + "; resultref:" + ptrgtnode + "; ");
    submit("TRRAD01501");

}

function fBugtAcntCdList(psendnode, ptrgtnode, deptcd) {

    model.makeValue(psendnode + "/instcd", getUserInfo("dutplceinstcd"));  
    model.makeValue(psendnode + "/bugtflag", "3");  
    model.makeValue(psendnode + "/deptcd"  , deptcd);  
    
    model.removeChild("TRRAD01503");
    model.createChild("xforms:submission", "id:TRRAD01503;mediatype:application/x-www-form-urlencoded; method:post; ref:" + psendnode + "; resultref:" + ptrgtnode + "; ");
    submit("TRRAD01503");

}

function fDeprcBaseList(psendnode, ptrgtnode) {


		model.removenode(psendnode);

    model.makeValue(psendnode + "/instcd"  , getUserInfo("dutplceinstcd"));  
    model.makeValue(psendnode + "/goodflag", model.getValue(opt_goodflag_search.attribute("ref")));  
    model.makeValue(psendnode + "/lrgcd"   , model.getValue(cmb_lrgcd.attribute("ref")));  
    model.makeValue(psendnode + "/mdlcd"   , model.getValue(cmb_mdlcd.attribute("ref")));      

    model.removeChild("TRRFC00302");
    model.createChild("xforms:submission", "id:TRRFC00302;mediatype:application/x-www-form-urlencoded; method:post; ref:" + psendnode + "; resultref:" + ptrgtnode + "; ");
    submit("TRRFC00302");

}
//--------------------------------------------------------
// End OF List 
//--------------------------------------------------------