/*
  
      간호처방(집계) (SMMNW10300.xrw - JScript )

      - Version :
          1)  : Ver.1.00.01
 */

var comdondeptcd, stemcelldeptcd;

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : 김진아
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 화면 초기설정
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
 function fInit(){
     submit("TRMNW10301", false);   
     cmb_wardlist.refresh(); 
     
     model.setValue("root/main/cond/issdeptcd"        , getUserInfo("dutplcecd")                                                   ); // 부서설정     (로그인한 간호사의 소속부서)
     cmb_wardlist.value=getUserInfo("dutplcecd");
     model.setValue("/root/main/cond/sumfromdd"       , getCurrentDate()                                                           ); // 집계시작일자 (현재일자)
     model.setValue("/root/main/cond/sumtodd"         , getCurrentDate()                                                           ); // 집계종료일자 (현재일자)
     model.setValue("/root/main/cond/prcpattrflag"    , "3"                                                                        ); // 처방속성구분 ("3": 전체)
     model.setValue("/root/main/cond/deliveflag"      , "1"                                                                        ); // 불출구분     ("1": 전체)
     model.setValue("/root/main/cond/inputpsnflag"    , "2"                                                                        ); // 입력자       ("2": 간호사)
     model.setValue("/root/main/cond/sumtotm"         , "2359"                                                                     ); // 집계종료시간
     model.setValue("/root/main/cond/sumfromtm"       , "0000"                                                                     ); // 집계시작시간
     model.setValue("/root/main/cond/deltprcpsrchflag", "nm"                                                                       ); // 상세검색 구분 처방코드로 셋팅
     model.setValue("/root/main/cond/deptflag"        , model.getValue("/root/init/dept["+(cmb_wardlist.focusIndex+1)+"]/deptflag")); // 부서구분
     ipt_sumfromdd.disabled = true;  // 당일인 경우 날짜수정 불가(Default 당일)
     ipt_sumtodd.disabled   = true;
    
                                                   
     //* 그리드 초기화 *//
     model.removeNodeset("/root/main/sumprcplist"); // 처방별 집계현황
     model.removeNodeset("/root/main/sumpatlist" ); // 환자별 집계현황
     
     // 간호하드코딩 테이블 조회_20090416(ByJA)
	   var pCode = "'050', '051'";   // 조회할 CdGrupID 코드정보
	   var pDate = getCurrentDate(); // 조회기준일자
	   fGetNursHardCdInfo(pCode, pDate);
	    
	   for(var i=1; i<=getNodesetCount("/root/code/codeinfo/codelist"); i++){          
	      switch (model.getValue("/root/code/codeinfo/codelist["+i+"]/cdgrupid")){
	        case "050":  // 성분헌혈실
	          comdondeptcd = model.getValue("/root/code/codeinfo/codelist["+i+"]/cdid");
	          break;
	        case "051":  // 조혈모세포
	          stemcelldeptcd = model.getValue("/root/code/codeinfo/codelist["+i+"]/cdid");
	          break;
	      }
	   }
   
     model.refresh();
 }
 
 /**
 * @group  :
 * @ver    : 2007.10.09
 * @by     : 김진아
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 처방별 집계현황조회
 * @param  : sFlag 
              "Delt" - 상세처방명을 이용한 검색
              "HOME" - 가정간호 간호처방 집계
 * @return :
 * @---------------------------------------------------
 */
 function fSrchSumPrcpInfo(sFlag){
     // 조회조건 체크
     var issdeptcd = model.getValue("/root/main/cond/issdeptcd"); // 부서
     var sumfromdd = model.getValue("/root/main/cond/sumfromdd"); // 집계시작일자
     var sumtodd   = model.getValue("/root/main/cond/sumtodd");   // 집계종료일자
     if(cmb_wardlist.label==""){
        messageBox("부서가 선택되지 ","E007", "해당부서를 선택 후 다시 조회하십시오.");
        model.setFocus("cmb_wardlist");
        return;
     }
     if(sumfromdd.length < 8){
        messageBox("집계일시 값이 유효하지 않아 조회룰 수행 ","E001", "확인 후 다시 조회하십시오.");
        model.makeValue("/root/main/cond/sumfromdd" , ""); 
        ipt_sumfromdd.refresh();
        model.setFocus("ipt_sumfromdd");
        return;
     }
     if(sumtodd.length < 8){
        messageBox("집계일시 값이 유효하지 않아 조회룰 수행 ","E001", "확인 후 다시 조회하십시오.");
        model.makeValue("/root/main/cond/sumtodd" , ""); 
        ipt_sumtodd.refresh();
        model.setFocus("ipt_sumtodd");
        return;
     }
     if(sumfromdd > sumtodd){
        messageBox("집계일시 기간이 올바르지 않아 조회룰 수행 ","E001", "확인 후 다시 조회하십시오.");
        model.makeValue("/root/main/cond/sumfromdd" , getCurrentDate()); // 집계시작일자 (현재일자) 
        model.makeValue("/root/main/cond/sumtodd"   , getCurrentDate()); // 집계종료일자 (현재일자) 
        ipt_sumfromdd.refresh();
        ipt_sumtodd.refresh();
        model.setFocus("ipt_sumfromdd");
          return;
     }
     if(sFlag == "Delt"){
         if(model.getValue("/root/main/cond/deltprcpsrchflag")==""){
            messageBox("상세조회 처방구분이 선택되지","E007", "처방코드 또는 처방명을 선택 후 다시 검색하십시오.");
            model.setFocus("rdo_deltprcpsrchflag"); return;
         }
         if(model.getValue("/root/main/cond/deltprcpinfo")==""){
            messageBox("상세조회 텍스트가 입력되지","E007", "상세조회 텍스트를 입력 후 다시 검색하십시오.");
            model.setFocus("ipt_deltprcpinfo"); return;
         }
     }  

     fSrchInit();  // 초기화

     if(sFlag != "Delt"){
      model.setValue("/root/main/cond/deltprcpinfo", "");
     }

     model.removenode("/root/send");
     model.makeNode("/root/send/reqdata");
     model.makeValue("/root/send/reqdata/issdeptcd"   , model.getValue("/root/main/cond/issdeptcd")   ); // 부서정보
     model.makeValue("/root/send/reqdata/sumfromdt"   , model.getValue("/root/main/cond/sumfromdd")   ); // 집계시작일시
     model.makeValue("/root/send/reqdata/sumtodt"     , model.getValue("/root/main/cond/sumtodd")     ); // 집계종료일시
     model.makeValue("/root/send/reqdata/prcpattrflag", model.getValue("/root/main/cond/prcpattrflag")); // 처방속성구분
     model.makeValue("/root/send/reqdata/deliveflag"  , model.getValue("/root/main/cond/deliveflag")  ); // 불출구분
     model.makeValue("/root/send/reqdata/inputpsnflag", model.getValue("/root/main/cond/inputpsnflag")); // 입력자구분
     model.makeValue("/root/send/reqdata/deptflag"    , model.getValue("/root/main/cond/deptflag")    ); // 부서구분
     model.makeValue("/root/send/reqdata/deptelmnyn"  , model.getValue("/root/main/cond/deptelmnyn")  ); // 우리부서에서 발행한 처방제외여부
     
     // 간호하드코딩작업_20090416(ByJA)
     if(model.getValue("/root/main/cond/issdeptcd") == comdondeptcd){         // 성분헌혈실
     	 model.makeValue("/root/send/reqdata/deptflag", "comdon");
     }else if(model.getValue("/root/main/cond/issdeptcd") == stemcelldeptcd){ // 조혈모세포
     	 model.makeValue("/root/send/reqdata/deptflag", "stemcell");
     }else{
    	 model.makeValue("/root/send/reqdata/deptflag", model.getValue("/root/main/cond/deptflag"));
     }
    
     
     // 상세검색 시
     if(sFlag == "Delt"){
        model.makeValue("/root/send/reqdata/deltprcpsrchflag", model.getValue("/root/main/cond/deltprcpsrchflag"));  // 상세처방조회 구분
        model.makeValue("/root/send/reqdata/deltprcpinfo", model.getValue("/root/main/cond/deltprcpinfo"));            // 상세처방코드/처방명   
     }
     
     // 가정간호 간호처방 집계 시_20090109
     model.makeValue("/root/send/reqdata/unitflag", sFlag);  // 업무구분
     
     
     submit("TRMNW10302");     
       
     grd_sumprcpinfo.allStyle("all", "color") = "black";       // 글자 초기화(검정, 보통굵기)
     grd_sumprcpinfo.allStyle("all", "font-weight") = "normal";

     for(var i=0; i<grd_sumprcpinfo.rows; i++){
         if(model.getValue("/root/main/sumprcplist/sumprcpinfo["+i+"]/reqprid") == "3"){  // 불출구분("3": 월청구) 글자 지정(보라색, 굵게)
              grd_sumprcpinfo.rowstyle(i, "all", "color") = "#cc0099"; 
              grd_sumprcpinfo.rowstyle(i, "all", "font-weight") = "bold"; 
         }
     }
}

/**
 * @group  :
 * @ver    : 2007.10.10
 * @by     : 김진아
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 환자별 집계현황조회
 * @param  :pFlag
 * @return :
 * @---------------------------------------------------
 */
 function fSrchSumPatInfo(pFlag){
     iRow = grd_sumprcpinfo.row;
     iCol = grd_sumprcpinfo.col;

     model.removeNodeset("/root/main/sumpatlist");

     model.removenode("/root/send");
     model.makeNode("/root/send/reqdata");
     model.makeValue("/root/send/reqdata/issdeptcd"    , model.getValue("/root/main/cond/issdeptcd")   ); // 부서정보
     model.makeValue("/root/send/reqdata/sumfromdt"    , model.getValue("/root/main/cond/sumfromdd")   ); // 집계시작일시
     model.makeValue("/root/send/reqdata/sumtodt"      , model.getValue("/root/main/cond/sumtodd")     ); // 집계종료일시
     model.makeValue("/root/send/reqdata/prcpattrflag" , model.getValue("/root/main/cond/prcpattrflag")); // 처방속성구분
     model.makeValue("/root/send/reqdata/deliveflag"   , model.getValue("/root/main/cond/deliveflag")  ); // 불출구분
     model.makeValue("/root/send/reqdata/inputpsnflag" , model.getValue("/root/main/cond/inputpsnflag")); // 입력자구분
     model.makeValue("/root/send/reqdata/deptflag"     , model.getValue("/root/main/cond/deptflag")    ); // 부서구분
     model.makeValue("/root/send/reqdata/deptelmnyn"   , model.getValue("/root/main/cond/deptelmnyn")  ); // 우리부서에서 발행한 처방제외여부
     
     if(pFlag == "HOME"){  // 가정간호 간호처방 집계의 경우
        model.makeValue("/root/main/sumpatlist/prcpnm", model.getValue("/root/main/sortsumprcplist/sumprcpinfo["+ iRow +"]/prcpnm")); // 처방명
        model.makeValue("/root/main/sumpatlist/prcpcd", model.getValue("/root/main/sortsumprcplist/sumprcpinfo["+ iRow +"]/prcpcd")); // 처방코드
        
        /* 가정간호 처방집계 추가_20090107*/
        model.makeValue("/root/main/sumpatlist/prcpcnt"   , model.getValue("/root/main/sortsumprcplist/sumprcpinfo["+ iRow +"]/prcpcnt"));    // 처방수량
        model.makeValue("/root/main/sumpatlist/dcprcpcnt" , model.getValue("/root/main/sortsumprcplist/sumprcpinfo["+ iRow +"]/dcprcpcnt"));  // 반황수량
        model.makeValue("/root/main/sumpatlist/orgprcpcnt", model.getValue("/root/main/sortsumprcplist/sumprcpinfo["+ iRow +"]/orgprcpcnt")); // 실수량

        model.makeValue("/root/send/reqdata/prcpcd"       , model.getValue("/root/main/sortsumprcplist/sumprcpinfo["+ iRow +"]/prcpcd"));       // 처방코드
        model.makeValue("/root/send/reqdata/prcpnm"       , model.getValue("/root/main/sortsumprcplist/sumprcpinfo["+ iRow +"]/prcpnm"));       // 처방명
        model.makeValue("/root/send/reqdata/drugstndunit" , model.getValue("/root/main/sortsumprcplist/sumprcpinfo["+ iRow +"]/drugstndunit")); // 재료규격
        model.makeValue("/root/send/reqdata/prcpdd"       , model.getValue("/root/main/sortsumprcplist/sumprcpinfo["+ iRow +"]/prcpdd"));       // 처방일자 또는 반납일자
        model.makeValue("/root/send/reqdata/prcpclscd"    , model.getValue("/root/main/sortsumprcplist/sumprcpinfo["+ iRow +"]/prcpclscd"));    // 처방종류구분
        
     } else{
        model.makeValue("/root/main/sumpatlist/prcpnm", model.getValue("/root/main/sumprcplist/sumprcpinfo["+ iRow +"]/prcpnm")); // 처방명
        model.makeValue("/root/main/sumpatlist/prcpcd", model.getValue("/root/main/sumprcplist/sumprcpinfo["+ iRow +"]/prcpcd")); // 처방코드
        
        /* 가정간호 처방집계 추가_20090107*/
        model.makeValue("/root/main/sumpatlist/prcpcnt"   , model.getValue("/root/main/sumprcplist/sumprcpinfo["+ iRow +"]/prcpcnt"));    // 처방수량
        model.makeValue("/root/main/sumpatlist/dcprcpcnt" , model.getValue("/root/main/sumprcplist/sumprcpinfo["+ iRow +"]/dcprcpcnt"));  // 반황수량
        model.makeValue("/root/main/sumpatlist/orgprcpcnt", model.getValue("/root/main/sumprcplist/sumprcpinfo["+ iRow +"]/orgprcpcnt")); // 실수량
        
        model.makeValue("/root/send/reqdata/prcpcd"       , model.getValue("/root/main/sumprcplist/sumprcpinfo["+ iRow +"]/prcpcd"));       // 처방코드
        model.makeValue("/root/send/reqdata/prcpnm"       , model.getValue("/root/main/sumprcplist/sumprcpinfo["+ iRow +"]/prcpnm"));       // 처방명
        model.makeValue("/root/send/reqdata/drugstndunit" , model.getValue("/root/main/sumprcplist/sumprcpinfo["+ iRow +"]/drugstndunit")); // 재료규격
        model.makeValue("/root/send/reqdata/prcpdd"       , model.getValue("/root/main/sumprcplist/sumprcpinfo["+ iRow +"]/prcpdd"));       // 처방일자 또는 반납일자
        model.makeValue("/root/send/reqdata/prcpclscd"    , model.getValue("/root/main/sumprcplist/sumprcpinfo["+ iRow +"]/prcpclscd"));    // 처방종류구분
     }
     
     // 간호하드코딩작업_20090416(ByJA)
     if(model.getValue("/root/main/cond/issdeptcd") == comdondeptcd){         // 성분헌혈실
     	 model.makeValue("/root/send/reqdata/deptflag", "comdon");
     }else if(model.getValue("/root/main/cond/issdeptcd") == stemcelldeptcd){ // 조혈모세포
     	 model.makeValue("/root/send/reqdata/deptflag", "stemcell");
     }else{
    	 model.makeValue("/root/send/reqdata/deptflag", model.getValue("/root/main/cond/deptflag"));
     }
 
     submit("TRMNW10303");                                                                   

     grd_prcppotlist.colstyle(7, "data", "color") = "black"; // 입력자 글자색상 초기화(검정)

     for(var i=1; i<grd_prcppotlist.rows; i++){
        if(model.getValue("/root/main/sumpatlist/sumpatinfo["+i+"]/prcpauthflag") == "0"){  // 입력자가 의사일 경우 글자색상 지정(보라색)
            grd_prcppotlist.cellStyle("color", i, 7, i, 7) =  "#cc0099";  
            grd_prcppotlist.cellStyle("color", i, 9, i, 9) =  "#cc0099";  
        }
     }
}

/**
 * @group  :
 * @ver    : 2007.10.11
 * @by     : 김진아
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 처방별 집계현황 조회시 초기화
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
 function fSrchInit(){
     model.removeNodeset("/root/main/sumprcplist"); // 처방별 집계현황 초기화
     model.removeNodeset("/root/main/sumpatlist" ); // 환자별 집계현황 초기화
}

/**
 * @group  
 * @ver    : 2007.10.17
 * @by     : 김진아
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 출력기능
 * @param  : pFlag : "HOME"-가정간호
 * @return :
 * @---------------------------------------------------                                                                                                                                        
 */
function fExecPrint(pFlag){
     // 출력할 데이터가 없는 경우
     if(getNodesetCount("/root/main/sumprcplist/sumprcpinfo")==0){
         messageBox("출력할 데이터가", "I004");  return;
     }else{
        model.removenode("/root/send");                                                
        model.makeNode("/root/send/cond");                                             
        model.makeNode("/root/send/sumprcplist");                                      
        model.makeNode("/root/send/init");                                             
        model.copyNode("/root/send/cond"       , "/root/main/cond");    
        model.copyNode("/root/send/init"       , "/root/init");   
        model.makeValue("/root/send/cond/depthngnm", cmb_wardlist.label);                        
        if(pFlag == "HOME"){
        	model.copyNode("/root/send/sumprcplist", "/root/main/sortsumprcplist");            
        }else{
        	model.copyNode("/root/send/sumprcplist", "/root/main/sumprcplist");            
        }
                                                                                               
        var prcpattrflagval = model.getValue("/root/send/cond/prcpattrflag");          
        switch (prcpattrflagval){                                                      
              case "1": model.setValue("/root/send/cond/prcpattrflag","(재료)"  );   break; 
              case "2": model.setValue("/root/send/cond/prcpattrflag","(재료외)");   break; 
              case "3": model.setValue("/root/send/cond/prcpattrflag","(전체)"  );   break; 
        }    
        //exeReportPreview("RPMNW10300", "XMLSTR");                                      
           exeReportPreview("RPMNW10300", "XMLSTR","","","true","","","","","true");                                      
    } 
}

/**
 * @group  
 * @ver    : 2008.02.20
 * @by     : 김진아
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 처방검색팝업열기
 * @param  :
 * @return :
 * @---------------------------------------------------                                                                                                                                        
 */
function fPopPrcpList(){
    setParameter("prcpsrchflag", model.getValue("/root/main/cond/deltprcpsrchflag")); // 검색구분(처방명:nm, 처방코드:cd)                                             
    setParameter("srchtextval" , model.getValue("/root/main/cond/deltprcpinfo"));     // 조회텍스트                                                                   
    setParameter("rtnpath"     , "/root/temp/popprcpinfo");                           // 리턴받을경로인트턴스 (rtnpath)/prcpnm : 처방명, (rtnpath)/prcpcd : 처방코드 
    setParameter("scrnflag"     , "sum");                                              // 화면 구분(처방집계 : sum, 간호기록 : rec)
    setParameter("srchParam"   , "srchPRCD");                                         // 처방마스터 검색 (공통SET처방 추가시, 처방집계에서 검색)
    modal("SPMNW11100", 1);

    // 선택한 처방코드 및 처방명 셋팅
    if(model.getValue("/root/temp/popprcpinfo/prcpcd")!=""){
        if(model.getValue("/root/main/cond/deltprcpsrchflag")=="cd"){
           model.makeValue("/root/main/cond/deltprcpinfo", model.getValue("/root/temp/popprcpinfo/prcpcd"));
        }else if(model.getValue("/root/main/cond/deltprcpsrchflag")=="nm"){
           model.makeValue("/root/main/cond/deltprcpinfo", model.getValue("/root/temp/popprcpinfo/prcpnm"));
        }else{
           model.makeValue("/root/main/cond/deltprcpinfo"    , model.getValue("/root/temp/popprcpinfo/prcpnm"));
           model.makeValue("/root/main/cond/deltprcpsrchflag", "nm");
           rdo_deltprcpsrchflag.refresh();
        }
        ipt_deltprcpinfo.refresh();
        fSrchSumPrcpInfo("Delt"); // 처방별 집계현황조회
    }
}

/************************************************************************************************************************/
/**
 * @group  :
 * @ver    :
 * @by     : 김기용
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 그리드 별 엑셀저장
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function saveExcelAll(){
     var paramLen = saveExcelAll.arguments.length;

     // 마지막 인자가 Boolean일 경우 처리
     var extendsCaptionBool;
     if( typeof(saveExcelAll.arguments[paramLen - 1]) == "boolean" ) {
          extendsCaptionBool =  saveExcelAll.arguments[paramLen - 1];     
          paramLen = paramLen - 1;
      }
     else{
          extendsCaptionBool =  false;
     }
     var tmpParamArray = new Array();
     if( extendsCaptionBool ) {
         for( var i = 0; i < paramLen; i++ ) {
              tmpParamArray[i] =  saveExcelAll.arguments[i];  
         }
         saveExcelAllWithCaption(tmpParamArray);
     }   
     else{
         for( var i = 0; i < paramLen; i++ ) {
              tmpParamArray[i] =  saveExcelAll.arguments[i];  
         }
         saveExcelAllWithNotCaption(tmpParamArray);
     }
}

function saveExcelAllWithCaption( sheetArray ) {

  // alert(gridCaptionArray); 

  var fileName = window.fileDialog("save", ",", false, "excel", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");

  if( fileName == "" )
    return;

 // var sheetArray = new Array("grd_bizprescondstats|업무현황",  "grd_patprescondstats|환자현황", "grd_hdstatsinfo|혈액투석현황", "grd_pdstatsinfo|복막투석현황", "grd_pdbizstatsinfo|복막투석업무현황");
    var sheetArrayLen = sheetArray.length;
                    
    var gridId;
    var gridObj;
    for( var i = 0; i < sheetArray.length; i++ ) {
        
        gridId = sheetArray[i].split("|")[0]; 
        gridObj = document.all.item(gridId);
        // saveText() 함수는 Caption저장이 불가능 하여 SaveExcel()을 이용한다.
        gridObj.saveExcel("C:\\Temp\\tmp_TFExcel_" + i +".xls");
    }                               
    
    // excel application 실행함
              tfexcel.launchnewinstance(0);
                
               //실행된 excel application에서 새로운 workbook을 생성
    tfexcel.createworkbook();
              
    tfexcel.activatesheet(1);
              
    var sheetName;
    var nResult;
    for( var i = 0; i  < sheetArrayLen; i++ ) 
              {
                    sheetName = sheetArray[i].split("|")[1];
                    
                    if( i > 1 ) {
            nResult = tfexcel.activatesheet(i+1);
            tfexcel.sheetname(i+1) = sheetName;
        }
        else {
            nResult = tfexcel.addsheet(i+1, sheetName); 
        }
        if( nResult < 0 ) {
                messageBox(sheetName + " 저장을", "E009");
                // alert(sheetName + " 오류발생");
                return;
        }
         tfexcel.loadCSV("C:\\Temp\\tmp_TFExcel_" + i + ".xls");
              }
              
              //tfexcel.loadCSV("C:\\Temp\\tmp_TFExcel.xls"); 
 
    //workbook을 저장.
    tfexcel.save(fileName);
                        
    //excel application을 종료. excel application 생성 후 반드시 close해야함.
    tfexcel.close();
 
    var fso = new ActiveXObject("Scripting.FileSystemObject");
    for( var i = 0; i  < sheetArrayLen; i++ ) {
         fso.DeleteFile("C:\\Temp\\tmp_TFExcel_" + i + ".xls");
    }   
    
    var rmsg = messageBox("저장된 Excel을", "Q004");
    // var rmsg = window.alert("저장된 Excel을 실행하시겠습니까?", "알림", 36);
    if( rmsg == 6 )
        window.exec("excel.exe", '\"' + fileName + '\"');   
}

function saveExcelAllWithNotCaption( sheetArray ) {
    
    // alert(gridCaptionArray);
    
    var fileName = window.fileDialog("save", ",", false, "excel", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");
          
    if( fileName == "" )
        return;

     // excel application 실행함
    tfexcel.launchnewinstance(0);
            
               // 실행된 excel application에서 새로운 workbook을 생성
    tfexcel.createworkbook();
              
              // var sheetArray = new Array("grd_bizprescondstats|업무현황",  "grd_patprescondstats|환자현황", "grd_hdstatsinfo|혈액투석현황", "grd_pdstatsinfo|복막투석현황", "grd_pdbizstatsinfo|복막투석업무현황"); 
    var sheetArrayLen = sheetArray.length;
    var gridId;
    var gridObj;
    var sheetName;
    var nResult;
            
    for( var i = 0; i  < sheetArrayLen; i++ ) {

        gridId = sheetArray[i].split("|")[0]; 
        gridObj = document.all.item(gridId);

        sheetName = sheetArray[i].split("|")[1];
        
        if( i > 1 ) {
            nResult = tfexcel.activatesheet(i+1);
            tfexcel.sheetname(i+1) = sheetName;
        }
        else {
            nResult = tfexcel.addsheet(i+1, sheetName); 
        }
        if( nResult < 0 ) {
                messageBox(sheetName + " 저장을", "E009");
                // alert(sheetName + " 오류발생");
                return;
        }
        gridObj.saveText("C:\\Temp\\tmp_TFExcel.csv",  "\n", ",", '\:', true);
            tfexcel.loadCSV("C:\\Temp\\tmp_TFExcel.csv");       
    }
    
    //workbook을 저장.
    tfexcel.save(fileName);
                        
    //excel application을 종료. excel application 생성 후 반드시 close해야함.
    tfexcel.close();
    
    // CSV File 삭제
    var fso = new ActiveXObject("Scripting.FileSystemObject");
    fso.DeleteFile("C:\\Temp\\tmp_TFExcel.csv");        
    
    var rmsg = messageBox("저장된 Excel을", "Q004");
    // var rmsg = window.alert("저장된 Excel을 실행하시겠습니까?", "알림", 36);
    if( rmsg == 6 )
        window.exec("excel.exe", '\"' + fileName + '\"');       
}

function createTFExcel(tfExcelID, parentObj) {
    if( parentObj == null )
        parentObj = body;
    var tfExcelObj = parentObj.createChild("xforms:object", "id:" + tfExcelID + "; clsid:{fe8d1001-6a9d-424d-ae2a-301493bb12da}; left:100px; top:100px; width:100px; height:100px; ");
    return tfExcelObj;
}
/************************************************************************************************************************/