YNU_JEUS/app_home/himed/xpapps/emr/opanstxp/xp/SMMNP03000.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[var Ccrtstat         = ""; // 01 Cart상태
var Ccrtstatnm       = ""; // 02 Cart상태명
var Opflagcd         = ""; // 03 구분
var Opflagnm         = ""; // 04 구분명
var Oproomcd         = ""; // 05 수술실
var Oproomcdnm       = ""; // 06 수술실명
var Opfromtmcd       = ""; // 07 수술시간
var Opfromtmcdnm     = ""; // 08 수술시간명
var Orddeptcd        = ""; // 09 진료과
var Orddeptcdnm      = ""; // 10 진료과명
var Roomcd           = ""; // 11 병실
var Hngnm            = ""; // 12 환자명
var Pid              = ""; // 13 환자번호
var Sexage           = ""; // 14 S/A
var Diagcd           = ""; // 15 진단코드
var Diagcdnm         = ""; // 16 진단명
var Opcd             = ""; // 17 수술코드
var Opcdnm           = ""; // 18 수술명
var Perfdrid         = ""; // 19 집도의
var Perfdridnm       = ""; // 20 집도의명
var Anstdetlmthdcd   = ""; // 21 마취방법
var Anstdetlmthdcdnm = ""; // 22 마취방법명
var Oprsrvno         = ""; // 23 수술예약번호
var Ophistcd         = ""; // 24 수술이력구분
var Ophistno         = ""; // 25 수술이력번호
var Opcnfmdd         = ""; // 26 수술일자
var gTimerID;              // 자동 재조회 타이머 ID

var chkuserinfo = "false";
/////////////////////////////////////////////////

/* ------------------------------------------------- */
 /* SMMNP003000_CCR MAIN                              */
 /* On Load 시 Call                                   */
 /* ------------------------------------------------- */
 /* group  : EMR 간호 수술마취                        */
 /* ver    : 2007.10.08                               */
 /* by     : 최학록                                   */
 /* --------------------------------------------------*/
 /* type   : function                                 */
 /* access : public                                   */
 /* desc   : xforms-ready시 수행한다                  */
 /* return :                                          */
 /* --------------------------------------------------*/

 function fFormInit() {
	//2009-06-22 K.J.M 병원별 Display 여부	
	ds_send.clearData();
	ds_send.addRow();		
	
	dsf_makeValue(ds_send_reqdata, "cdgrupid", "string", "106");//병원별 Display 여부
	dsf_makeValue(ds_send_reqdata, "supcdid", "string", "");//서브구분
	dsf_makeValue(ds_send_reqdata, "cdid", "string", "");//서브구분

	var oParam = {};
		oParam.id          = "TRMNP04903";
		oParam.service     = "opanstapp.OpAnstRef";
		oParam.method      = "reqGetOpCommonCd";
		oParam.inds        = "reqdata=ds_send_reqdata";
		oParam.outds       = "ds_init_hardcodeinfo=hardcodeinfo";
		oParam.async       = false;		

	tranf_submit(oParam);
	
	if( utlf_transNullToEmpty(ds_init_hardcodeinfo.getColumn(0, "cdid")).substr(7, 1) == "Y" ) {//수술명 디폴트 셋팅 여부 Y:한글, N:영문
		ds_init_querykey.setColumn(0, "opnmkr", "Y");//한글
		sw_ord.case5.grd_oprslist.setFormatColProperty(sw_ord.case5.grd_oprslist.getBindCellIndex("body", "opcdenm"),"size",0);
		sw_ord.case5.grd_oprslist.setFormatColProperty(sw_ord.case5.grd_oprslist.getBindCellIndex("body", "opcdknm"),"size",245);
		sw_ord.case5.grd_oprslist.setFormatColProperty(sw_ord.case5.grd_oprslist.getBindCellIndex("body", "afopnm"),"size",0);				
	}else {
		ds_init_querykey.setColumn(0, "opnmen", "Y");//영문
		sw_ord.case5.grd_oprslist.setFormatColProperty(sw_ord.case5.grd_oprslist.getBindCellIndex("body", "opcdenm"),"size",245);
		sw_ord.case5.grd_oprslist.setFormatColProperty(sw_ord.case5.grd_oprslist.getBindCellIndex("body", "opcdknm"),"size",0);
		sw_ord.case5.grd_oprslist.setFormatColProperty(sw_ord.case5.grd_oprslist.getBindCellIndex("body", "afopnm"),"size",0);	
	}	
	ds_send_reqdata.clearData();
	ds_send_reqdata.addRow();	
	ds_main_opPatlist_opPatInfo.clearData();
	
	grp_sea.ipt_opcnfmdd.value = utlf_getCurrentDate();
	grp_sea.ipt_opcntodd.value = utlf_getCurrentDate();
	
	ds_init_userinfo.clearData();
	ds_init_userinfo.addRow();
	
	dsf_makeValue(ds_init_userinfo, "userid", "string", sysf_getUserInfo("userid"));
	dsf_makeValue(ds_init_userinfo, "usernm", "string", sysf_getUserInfo("usernm"));

	//2009.04.08 하드코딩 소스 변경
	dsf_makeValue(ds_send, "cdgrupid", "string", "038");
	
	var oParam = {};
		oParam.id          = "TRMNP00323";
		oParam.service     = "opanstapp.OpAnstRec";
		oParam.method      = "reqGetViewerCtrlInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_viewctrl_viewctrllist_viewctrlinfo=viewctrlinfo";
		oParam.async       = false;		

	tranf_submit(oParam);
	
	ds_init_querykey.setColumn(0, "cartgubn", ds_init_viewctrl_viewctrllist_viewctrlinfo.getColumn(0, "cdnm"));//CCR Main
	
	//20101124_KNUH_Start
	var cdnm = ds_init_querykey.getColumn(0, "cartgubn");
	
	if(cdnm != "O" || cdnm != "A") {
		ds_init_querykey.setColumn(0, "cartgubn", "O");		
	}
	//20101124_KNUH_End
	ds_init_WorkData_cond.setColumn(0, "cartgubn", ds_init_viewctrl_viewctrllist_viewctrlinfo.getColumn(0, "cdnm"));//간호처방 화면
	
	// 수술실(Rosette) 가져오기
	var oParam = {};
		oParam.id          = "TRMNP03004";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqGetRosettelist";
		oParam.inds        = "";
		oParam.outds       = "ds_init_rosettelist=rosettelist";
		oParam.async       = false;		

	tranf_submit(oParam);
	
	frmf_addComboItem("grp_sea.cmb_rosette","전체","","above");
	grp_sea.cmb_rosette.value = "";
	
	dsf_makeValue(ds_send, "opcnfmdd" , "string", grp_sea.ipt_opcnfmdd.value );
	dsf_makeValue(ds_send, "rosette" , "string", ds_init_querykey.getColumn(0, "oprosette"));	
	// 수술실코드 가져오기
	var oParam = {};
		oParam.id          = "TRMNP03002";
		oParam.service     = "opanstapp.OpAnstCCrtGoodMngt";
		oParam.method      = "reqGetOmcdlist";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_oproomlist=oproomlist";
		oParam.async       = false;		

	tranf_submit(oParam);

	frmf_addComboItem("grp_sea.cmb_omcd","전체","","above");
	grp_sea.cmb_omcd.value = "";

	// AllCheck 구분	
	ProgramCls = "P";   // C:CCR MAIN, P:간호처방
	AloneFlag  = "N";   // 단독실행여부

	fOpDataQuery();    // 수술정보 가져오기
	//fTimer();
	fOpDataQuery();
			
	dsf_makeValue(ds_send_reqdata, "cdgrupid", "string", "OP");

	var oParam = {};
		oParam.id          = "TRMND03901";
		oParam.service     = "dialapp.DialPatMngt";
		oParam.method      = "reqGetBaseInfo";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_main_baseinfo_baseinfolist=baseinfolist";
		oParam.async       = false;

	tranf_submit(oParam);
}

//--------------------------------------------------
 // 수술방정보 가져오기
 //--------------------------------------------------

 function fOpDataQuery() {
    //초기화 작업 2017-12-27 
    ds_init_querykey.setColumn(0, "prntcst", "");
	ds_init_querykey.setColumn(0, "prntpad", "");
    
    ds_send.clearData();
    ds_send.addRow();
    dsf_makeValue(ds_send, "opcnfmdd", "string", ds_init_querykey.getColumn(0, "opcnfmdd")); // 수술시작일자
    dsf_makeValue(ds_send, "opcntodd", "string", ds_init_querykey.getColumn(0, "opcntodd")); // 수술종료일자
    dsf_makeValue(ds_send, "omcd", "string", ds_init_querykey.getColumn(0, "omcd")); // 수술시코드
    dsf_makeValue(ds_send, "dept", "string", ds_init_querykey.getColumn(0, "orddept")); // 부서코드
    dsf_makeValue(ds_send, "perfdrid", "string", ds_init_querykey.getColumn(0, "perfdrid")); // 집도의
    dsf_makeValue(ds_send, "refdeptflag", "string", ds_init_querykey.getColumn(0, "cartgubn")); // 카트구분
    dsf_makeValue(ds_send, "oppatflagcd", "string", ds_init_querykey.getColumn(0, "oppatflagcd")); // 환자구분
    dsf_makeValue(ds_send, "opflagcd", "string", ds_init_querykey.getColumn(0, "opflagcd")); // 수술구분
    dsf_makeValue(ds_send, "anstmthdcd", "string", ds_init_querykey.getColumn(0, "anstmthdcd")); // 마취종류
    dsf_makeValue(ds_send, "ccrtstat", "string", ds_init_querykey.getColumn(0, "ccrtstat")); // 상태
    dsf_makeValue(ds_send, "angioyn", "string", ds_init_querykey.getColumn(0, "angioyn")); // ANGIO 제외 여부
    dsf_makeValue(ds_send, "eyyn", "string", ds_init_querykey.getColumn(0, "eyyn")); // 안과 제외 여부
    dsf_makeValue(ds_send, "dryn", "string", ds_init_querykey.getColumn(0, "dryn")); // 분만실 제외 여부
    dsf_makeValue(ds_send, "oprosette", "string", ds_init_querykey.getColumn(0, "oprosette")); // rosette
    dsf_makeValue(ds_send, "goodcls", "string", ds_init_querykey.getColumn(0, "goodcls")); // rosette
    dsf_makeValue(ds_send, "cnclflag", "string", ds_init_querykey.getColumn(0, "cnclflag")); // 취소
    
	ds_main_opPatlist_opPatInfo.clearData();
    
    // 수술 정보 가져오기
    var oParam = {};
		oParam.id          = "TRMNP03001";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqGetOprslist";
		oParam.inds        = "reqdata=ds_send";
		oParam.outds       = "ds_main_opPatlist_opPatInfo=opPatInfo";
		oParam.async       = false;		

	tranf_submit(oParam);

	ds_main_opPatlist_opPatInfo.addColumn("disp1imgbkimg", "string");
	ds_main_opPatlist_opPatInfo.addColumn("disp2imgbkimg", "string");
	ds_main_opPatlist_opPatInfo.addColumn("disp3imgbkimg", "string");
	ds_main_opPatlist_opPatInfo.addColumn("color", "string");
	ds_main_opPatlist_opPatInfo.addColumn("chk", "string");
	ds_main_opPatlist_opPatInfo.addColumn("colBack", "string");

    var iRows = ds_main_opPatlist_opPatInfo.rowcount;
    if (iRows > 0) {
        var ii = 0;
        var wCnfmDT = "";
        var sRoomCd = "";
        var wRoomCd = ds_main_opPatlist_opPatInfo.getColumn(0, "oproomcd");

        for (var i = 0; i < iRows; i++) {
            sRoomCd = 	ds_main_opPatlist_opPatInfo.getColumn(i, "oproomcd");
            callyn = 	ds_main_opPatlist_opPatInfo.getColumn(i, "callyn");
            opflagcd = 	ds_main_opPatlist_opPatInfo.getColumn(i, "opflagcd");

            if (wRoomCd != sRoomCd) {
                ii++;
                wRoomCd = sRoomCd;
            }

            //감염정보
            if (ds_main_opPatlist_opPatInfo.getColumn(i, "disp1") == "Y") {                
                ds_main_opPatlist_opPatInfo.setColumn(i, "disp1imgbkimg", "URL(IMG::lis/injector_en.gif)");
            } else {                
                ds_main_opPatlist_opPatInfo.setColumn(i, "disp1imgbkimg", "") ;
            }
            if (ds_main_opPatlist_opPatInfo.getColumn(i, "disp2") == "Y") {                
                ds_main_opPatlist_opPatInfo.setColumn(i, "disp2imgbkimg", "URL(IMG::lis/touch_en.gif)");
            } else {                
                ds_main_opPatlist_opPatInfo.setColumn(i, "disp2imgbkimg", "");
            }
            if (ds_main_opPatlist_opPatInfo.getColumn(i, "disp3") == "Y") {                
                ds_main_opPatlist_opPatInfo.setColumn(i, "disp3imgbkimg", "URL(IMG::lis/air_en.gif)");
            } else {                
                ds_main_opPatlist_opPatInfo.setColumn(i, "disp3imgbkimg", "");
            }

            //
            if (ii % 2 == 0) { //짝수
				ds_main_opPatlist_opPatInfo.setColumn(i, "colBack", "#FFFFFF");
                //grd_oprslist.rowstyle(i, "data", "background-color") = "#FFFFFF";
            } else {
				ds_main_opPatlist_opPatInfo.setColumn(i, "colBack", "#F7FFF7");
                //grd_oprslist.rowstyle(i, "data", "background-color") = "#F7FFF7";
            }

            //
            if (callyn == "Y") { //호출여부                
                ds_main_opPatlist_opPatInfo.setColumn(i, "color", "#4d4d4d");
            }
            if ((opflagcd == "1") || (opflagcd == "3")) { //정규, 추가                
                ds_main_opPatlist_opPatInfo.setColumn(i, "color", "#2D2D2D");
            }
            if (opflagcd == "2") { //응급                
                ds_main_opPatlist_opPatInfo.setColumn(i, "color", "#D22D2D");
            }            
            if (opflagcd == "4") { //취소                
                ds_main_opPatlist_opPatInfo.setColumn(i, "color", "#2D2DD2");
            }
            //
            if (utlf_transNullToEmpty(ds_main_opPatlist_opPatInfo.getColumn(i, "opstatcd")).substr(1, 1) == "9") {                
                ds_main_opPatlist_opPatInfo.setColumn(i, "color", "#2D2DD2");
            }
        }
    }
}

function fCalcdate(calcn, calcd){
					
	calcd = calcd.toDate("YYYYMMDD");
	calcd = calcd.getAddDate(calcn , "D");
	calcd = calcd.getDateFormat("YYYYMMDD");
	
	return calcd;
}

/**
 * @group  :
 * @ver    : 2008.07.19
 * @by     : Grace
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 출력
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fPrntSche(){    
    ds_send.clearData();    
    ds_send_report.setColumn(0, "opnmflag", "");    
    
    var objDOM = rptf_createDOM();				                													// DOM 객체 설정	
 	rptf_setNodeListToDOM(objDOM, "root/main/opPatlist/opPatInfo", ds_main_opPatlist_opPatInfo);									// 데이터셋
	
    var opnmen = ds_init_querykey.getColumn(0, "opnmen");
    var diagnmen = ds_init_querykey.getColumn(0, "opnmkr");
    
    if( opnmen == "Y" ) {
		rptf_setValueToDOM(objDOM, "/root/send/report/opnmflag", "E");
    }else {
		rptf_setValueToDOM(objDOM, "/root/send/report/opnmflag", "H");
    }
	
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source;													// 최상의노드 XML 스트링 추출
	
	if( opnmen == "Y" ) {
		objParam.opnmflag = "E";
    }else {
		objParam.opnmflag = "H";
    }
		
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
	
	rptf_exeReportPreview30(["RPMNP00100"],[objParam], option);
}

/**
 * @group  :
 * @ver    : 2007.10.17
 * @by     : 김 진 명
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Exel 저장
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSaveExcel(){
    grdf_exportExcel(sw_ord.case5.grd_oprslist, "수술스케쥴_" + utlf_getCurrentDate(), "sheetname1" , true, "" , "" , true);
}

/**
 * @group  :
 * @ver    : 2007.11.09
 * @by     : 김 진 명
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : CaseCart 불출 취소
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fDeliveCncl(pFlag, sFlag) {
    var rtnflag = "";
    var oprsrvno = "";
    var oproomcd = ""
    var ophistno = "";
    var cartgubn = "";
    var prntgood = "";
    var prntinstr = "";
    var prntpad = "";
    var varcureflag = ""
    var prntinstrstat;
    var prntgoodstat;
    var prcntcststat;
    var cnt = 0;
    var cnt2 = 0;
    var iRows = ds_main_opPatlist_opPatInfo.rowcount;
    var sOPRSPath = ds_main_opPatlist_opPatInfo;
    var sCnclData = "oprsrvno▦opcnfmdd▦pid▦cartgubn▦deliveflag▦prntgood▦prntinstr▦varcureflag▦goodcrflag▦callflag▩";
    
    ds_temp.clearData();
    for (var i = 0; i < iRows; i++) {
        if (ds_main_opPatlist_opPatInfo.getColumn(i, "chk") == "true" || ds_main_opPatlist_opPatInfo.getColumn(i, "chk") == "1") {
            cnt += 1;
            if (pFlag == "S") { //정규
                if (ds_main_opPatlist_opPatInfo.getColumn(i, "ccrtstat") == "3") { //불출 카트 취소
                    cnt2 += 1;

                    oprsrvno = ds_main_opPatlist_opPatInfo.getColumn(i, "oprsrvno");
                    oproomcd = ds_main_opPatlist_opPatInfo.getColumn(i, "oproomcd");
                    ophistno = ds_main_opPatlist_opPatInfo.getColumn(i, "ophistno");
                    cartgubn = ds_init_querykey.getColumn(0, "cartgubn");
                    prntinstr = ds_init_querykey.getColumn(0, "prntinstr");
                    prntgood = ds_init_querykey.getColumn(0, "prntgood");
                    prntpad = ds_init_querykey.getColumn(0, "prntpad");


                    if (prntgood == "G") {
                        if (ds_main_opPatlist_opPatInfo.getColumn(i, "goodstat") == "3") {
                            prntgoodstat = "G1";
                            varcureflag = "'1', '2', '3', '5', '7', '8', '9'";
                        } else {
                            prntgoodstat = "G3";
                        }
                    } else {
                        prntgoodstat = "G" + ds_main_opPatlist_opPatInfo.getColumn(i, "goodstat");
                    }

                    if (sFlag == "CCR") {
                        if (prntinstr == "I") {
                            if (ds_main_opPatlist_opPatInfo.getColumn(i, "instrstat") == "3") {
                                prntinstrstat = "I1";
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'4', '6', '10'";
                                } else {
                                    varcureflag = varcureflag + ", '4', '6', '10'";
                                }
                            } else {
                                prntinstrstat = "I3";
                            }
                        } else {
                            prntinstrstat = "I" + ds_main_opPatlist_opPatInfo.getColumn(i, "instrstat");
                        }
                    } else {
                        if (ds_main_opPatlist_opPatInfo.getColumn(i, "instrstat") == "3") {

                            prntinstrstat = "I1";
                            if (prntinstr == "I") {
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'4'";
                                } else {
                                    varcureflag = varcureflag + ", '4'";
                                }
                            }
                            if (prntinstr == "C") {
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'6'";
                                } else {
                                    varcureflag = varcureflag + ", '6'";
                                }
                            }
                            if (prntinstr == "P") {
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'10'";
                                } else {
                                    varcureflag = varcureflag + ", '10'";
                                }
                            }
                        } else {
                            prntinstrstat = "I3";
                        }
                    }

                    prntcststat = "C1";

                    sCnclData = sCnclData + ds_main_opPatlist_opPatInfo.getColumn(i, "oprsrvno") +
                        "▦" + ds_main_opPatlist_opPatInfo.getColumn(i, "opcnfmdd") +
                        "▦" + ds_main_opPatlist_opPatInfo.getColumn(i, "pid") +
                        "▦" + ds_init_querykey.getColumn(0, "cartgubn") +
                        "▦" + prntgoodstat + prntinstrstat + prntcststat +
                        "▦" + prntgood +
                        "▦" + prntinstr +
                        "▦" + varcureflag +
                        "▦" + pFlag +
                        "▦" + sFlag + "▩";
                        
                }
            } else { //응급불출취소
                if (ds_main_opPatlist_opPatInfo.getColumn(i, "ccrtstat") >= "3" || (ds_main_opPatlist_opPatInfo.getColumn(i, "instrstat") < "9" && ds_main_opPatlist_opPatInfo.getColumn(i, "instrstat") > "2")) { //불출 카트 취소
                    cnt2 += 1;

                    oprsrvno = ds_main_opPatlist_opPatInfo.getColumn(i, "oprsrvno");
                    oproomcd = ds_main_opPatlist_opPatInfo.getColumn(i, "oproomcd");
                    ophistno = ds_main_opPatlist_opPatInfo.getColumn(i, "ophistno");
                    cartgubn = ds_init_querykey.getColumn(0, "cartgubn");
                    prntinstr = ds_init_querykey.getColumn(0, "prntinstr");
                    prntgood = ds_init_querykey.getColumn(0, "prntgood");
                    varcureflag = "'4', '6', '10'";

                    sCnclData = sCnclData + ds_main_opPatlist_opPatInfo.getColumn(i, "oprsrvno") +
                        "▦" + ds_main_opPatlist_opPatInfo.getColumn(i, "opcnfmdd") +
                        "▦" + ds_main_opPatlist_opPatInfo.getColumn(i, "pid") +
                        "▦" + ds_init_querykey.getColumn(0, "cartgubn") +
                        "▦" + prntgoodstat + prntinstrstat + prntcststat +
                        "▦" + prntgood +
                        "▦" + "I" +
                        "▦" + varcureflag +
                        "▦" + pFlag +
                        "▦" + sFlag + "▩";
                }
            }
        }
    }

    if (cnt < 1) {
        sysf_messageBox("출력할 환자를 ", "C002");
    }
    if (cnt2 < 1) {
        sysf_messageBox("불출 카트를 제외하고는 불출 취소를 ", "E001");
    } else {        
        dsf_setCSVToDs("ds_temp", sCnclData);
        
        var oParam = {};
			oParam.id          = "TXMNP03002";
			oParam.service     = "opanstapp.OpAnstCCrtGoodMngt";
			oParam.method      = "reqSetCaseCartStat";
			oParam.inds        = "savedata=ds_temp";
			oParam.outds       = "";
			oParam.async       = false;

		tranf_submit(oParam);

        fOpDataQuery();
    }
}

//--------------------------------------------------
// Cart 라벨 출력
//--------------------------------------------------
function fPrntCartLabel() {    
    frmf_modal("SPMNP03000", "SPMNP03000", "", null, "", "", "", null, null, null, null, null, "M");
    var sMsg = frmf_getParameter("SPMNP03000_Param");
    var sOPRSPath:Dataset;
    sOPRSPath = ds_main_opPatlist_opPatInfo;
    var sCartLabelPath:Dataset; 
    sCartLabelPath = ds_init_querykey_oprsinfo_oprslist;
    var sOPRow = -1;
    var deptflagnm = "";
    var deptflag = ds_init_querykey.getColumn(0, "cartgubn");
    if (deptflag == "O") {
        deptflagnm = "수술";
    } else if (deptflag == "A") {
        deptflagnm = "마취";
    }
    var labellist = "oprsrvno";
    
    sCartLabelPath.clearData();
    
    if (utlf_isNull(sMsg)) return;
    if (sMsg == 1) { // 선택한 환자만 출력
        for (var iRow = 0; iRow < ds_main_opPatlist_opPatInfo.rowcount; iRow++) {
            if (sOPRSPath.getColumn(iRow, "chk") == "true" || sOPRSPath.getColumn(iRow, "chk") == "1") {
                if (parseInt(sOPRSPath.getColumn(iRow, "opstatcd")) > 39) { //수술부터는 출력안됨.
                    return;
                }
                sOPRow++;
                dsf_makeValue(sCartLabelPath, "weekname", "string", 		sOPRSPath.getColumn(iRow, "weekname"), sOPRow);
                dsf_makeValue(sCartLabelPath, "oproomcdnm", "string", 		sOPRSPath.getColumn(iRow, "oproomcdnm"), sOPRow);
                dsf_makeValue(sCartLabelPath, "orddeptcdnm", "string", 		"(" + sOPRSPath.getColumn(iRow, "depthngnm") + ")", sOPRow);
                dsf_makeValue(sCartLabelPath, "hngnm", "string", 			sOPRSPath.getColumn(iRow, "hngnm"), sOPRow);
                dsf_makeValue(sCartLabelPath, "pid", "string", 				sOPRSPath.getColumn(iRow, "pid"), sOPRow);
                dsf_makeValue(sCartLabelPath, "opfromtmcdnm", "string", 	"수술시간[" + sOPRSPath.getColumn(iRow, "fstrgstdt").substr(11, 5) + "]", sOPRow);
                dsf_makeValue(sCartLabelPath, "perfdridnm", "string", 		"집도의[" + sOPRSPath.getColumn(iRow, "perfdridnm1") + "]", sOPRow);
                dsf_makeValue(sCartLabelPath, "opcdnm", "string", 			sOPRSPath.getColumn(iRow, "opcdknm"), sOPRow);
                dsf_makeValue(sCartLabelPath, "opcnfmdd", "string", 		sOPRSPath.getColumn(iRow, "opcnfmdd"), sOPRow);
                dsf_makeValue(sCartLabelPath, "sexage", "string", 			"(" + sOPRSPath.getColumn(iRow, "sa") + ")", sOPRow);
                dsf_makeValue(sCartLabelPath, "deptflagnm", "string", 		deptflagnm, sOPRow);
                labellist = labellist + "▩" + sOPRSPath.getColumn(iRow, "oprsrvno");
            }
        }
    } else if (sMsg == 2) { // 해당일의 전체 환자 출력
        for (var iRow = 0; iRow < ds_main_opPatlist_opPatInfo.rowcount; iRow++) {
            if (parseInt(sOPRSPath.getColumn(iRow, "opstatcd")) > 39) { //수술부터는 출력안됨.
                continue;
            }

            sOPRow++;
            dsf_makeValue(sCartLabelPath, "weekname", "string", 		sOPRSPath.getColumn(iRow, "weekname"), sOPRow);
            dsf_makeValue(sCartLabelPath, "oproomcdnm", "string", 		sOPRSPath.getColumn(iRow, "oproomcdnm"), sOPRow);
            dsf_makeValue(sCartLabelPath, "orddeptcdnm", "string", 		"(" + sOPRSPath.getColumn(iRow, "depthngnm") + ")", sOPRow);
            dsf_makeValue(sCartLabelPath, "hngnm", "string", 			sOPRSPath.getColumn(iRow, "hngnm"), sOPRow);
            dsf_makeValue(sCartLabelPath, "pid", "string", 				"(" + sOPRSPath.getColumn(iRow, "pid") + ")", sOPRow);
            dsf_makeValue(sCartLabelPath, "opfromtmcdnm", "string", 	"수술시간[" + sOPRSPath.getColumn(iRow, "fstrgstdt").substr(11, 5) + "]", sOPRow);
            dsf_makeValue(sCartLabelPath, "perfdridnm", "string", 		"집도의[" + sOPRSPath.getColumn(iRow, "perfdridnm1") + "]", sOPRow);
            dsf_makeValue(sCartLabelPath, "opcdnm", "string", 			sOPRSPath.getColumn(iRow, "opcdknm"), sOPRow);
            dsf_makeValue(sCartLabelPath, "opcnfmdd", "string", 		sOPRSPath.getColumn(iRow, "opcnfmdd"), sOPRow);
            dsf_makeValue(sCartLabelPath, "deptflagnm", "string", 		deptflagnm, sOPRow);
            labellist = labellist + "▩" + sOPRSPath.getColumn(iRow, "oprsrvno");
        }
    }
  
    if (sOPRow < 0) {
        sysf_messageBox("라벨을 출력할 데이터가", "I004");
        return;
    }

	//미리보기출력
	var objDOM = rptf_createDOM();			
	rptf_setNodeListToDOM(objDOM, "root/init/querykey/oprsinfo/oprslist", ds_init_querykey_oprsinfo_oprslist);	// 데이터셋 1	
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출
	
	var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=0;";	
	rptf_exeReportPreview30(["RPMNP03000"],[objParam], option);

    labellist = labellist + "▩";
    
    ds_send_savedata.clearData();
    dsf_setCSVToDs("ds_send_savedata", labellist);
        
    //라벨 출력 여부 업데이트 2009.03.10
    var oParam = {};
		oParam.id          = "TXMNP03004";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqSetLabelPrntFlag";
		oParam.inds        = "savedata=ds_send_savedata";
		oParam.outds       = "";
		oParam.async       = false;		

	tranf_submit(oParam);

    fOpDataQuery();
}

/* --------------------------------------------------*/
/* type   : function                                 */
/* access : public                                   */
/* desc   : 집계표 출력                              */
/* param  :                                          */
/* return :                                          */
/* --------------------------------------------------*/
function fPrntCartSumList(){

    var curtDate = utlf_getCurrentDate();
    curtDate  = curtDate.substr(0, 4) +"/"+ curtDate.substr(4, 2) +"/"+ curtDate.substr(6, 2);
    
    ds_send_report.clearData();
    
    dsf_makeValue(ds_send_report, "opcnfmdd", "string", ds_init_querykey.getColumn(0, "opcnfmdd"));
    dsf_makeValue(ds_send_report, "opcntodd", "string", ds_init_querykey.getColumn(0, "opcntodd"));
    dsf_makeValue(ds_send_report, "prntdd",   "string", curtDate);
    dsf_makeValue(ds_send_report, "instcd",   "string", sysf_getUserInfo("dutplceinstcd"));
	dsf_makeValue(ds_send_report, "cartgubn",   "string", ds_init_querykey.getColumn(0, "cartgubn"));

	var oParam = {};
		oParam.id          = "TXMNP03005";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqGetCCRPrintETC";
		oParam.inds        = "req=ds_send_report";
		oParam.outds       = "ds_print_suture=suture ds_print_supplies=supplies ds_print_sheet=sheet ds_print_glove=glove";
		oParam.async       = false;		

	tranf_submit(oParam);
		
	
	//미리보기출력
	var objDOM = rptf_createDOM();			
	rptf_setNodeListToDOM(objDOM, "root/main/send", ds_send_report);	
	rptf_setNodeListToDOM(objDOM, "root/main/suture", ds_print_suture);	
	rptf_setNodeListToDOM(objDOM, "root/main/supplies", ds_print_supplies);
	rptf_setNodeListToDOM(objDOM, "root/main/sheet", ds_print_sheet);
	rptf_setNodeListToDOM(objDOM, "root/main/glove", ds_print_glove);
	
	var objParam = new Object();	
	objParam.xml_data_XML1 = objDOM.documentElement.source;			
	
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";	
	rptf_exeReportPreview30(["RPMNP03002"],[objParam], option);
}

//--------------------------------------------------
// 처방상세내역 POPUP
//--------------------------------------------------
function fCartDetailInfo(sFlag) {
    var RowCnt = ds_main_opPatlist_opPatInfo.rowcount;
    var sPatFlag = "";
    var iRow = ds_main_opPatlist_opPatInfo.rowposition;
    var OprsPath:Dataset;
    OprsPath = ds_main_opPatlist_opPatInfo;     
    if (RowCnt == 0) {        
        ds_main_opPatlist_opPatInfo.rowposition = 0;
        return;
    }
    if(ds_main_opPatlist_opPatInfo.rowposition < 0){
		return;
    }    

    if (utlf_transNullToEmpty(OprsPath.getColumn(iRow, "opstatcd")).substr(1, 1) == "9") {
        alert("취소된 자료는 선택할 수 없습니다.");
        return;
    }

    sToggle = 1;
    fViewToggle(sToggle); // 줄이기
  
	ds_init_MmohoprsKey.setColumn(0, "oprsrvno", OprsPath.getColumn(iRow, "oprsrvno")); // 수술예약(의뢰)번호 (년도 + 일련번호)
    ds_init_MmohoprsKey.setColumn(0, "ophistcd", OprsPath.getColumn(iRow, "ophistcd")); // 수술예약(의뢰)번호 (년도 + 일련번호)
    ds_init_MmohoprsKey.setColumn(0, "ophistno", OprsPath.getColumn(iRow, "ophistno")); // 수술예약(의뢰)번호 (년도 + 일련번호)
    ds_init_WorkData_cond.setColumn(0, "cartgubn", ds_init_querykey.getColumn(0, "cartgubn")); //조회 카트구분을 처방조회 부서구분으로 셋팅
    if (sFlag == "S") { //처음일때만 물품이 기본 셋팅        
        grp_ord.switch1.tabindex = 0;        
    }
    fQueryData(); // 조회버튼 Click시 보여주기
}

/**
 * @group  :
 * @ver    : 2009.08.05
 * @by     : K. J. M
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 팝업메뉴 처리
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fShowPopup(pData){
    var PopupName = "확정간호처방조회     #"
                  + "확정간호처방출력     #"
                  + "반납리스트조회       #"
                  + "물품 상세 재출력      ";

    var PopupNm = PopupName.split("#");
    var Idx     = Number(pData);
    var sPath:Dataset;
    sPath = ds_main_opPatlist_opPatInfo;
    fSetParam();    // 상단정보 올리기
   
    switch(Idx) {
        case 0://확정간호처방조회
            var sTmpIndd    = ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "iindd");
            var orddeptcd   = ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "orddeptcd");
            var opcnfmdd    = ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "opcnfmdd");
            var sCurrentdd  = utlf_getCurrentDate();

            if(utlf_isNull(sTmpIndd)){
                var iCurrentrow = ds_main_opPatlist_opPatInfo.rowposition;

                if(iCurrentrow >= 0){
                    var sOprsrvno =   ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "oprsrvno");
                    var sInstcd   =   ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "instcd");
                    var sOphistno =   ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "ophistno");
                    var sOphistcd =   ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "ophistcd");
                    
					sysf_setModelAttribute("SuSulOrder_Oprsinfo_oprsrvno", sOprsrvno);
					sysf_setModelAttribute("SuSulOrder_Oprsinfo_instcd"  , sInstcd);
					sysf_setModelAttribute("SuSulOrder_Oprsinfo_ophistno", sOphistno);
					sysf_setModelAttribute("SuSulOrder_Oprsinfo_ophistcd", sOphistcd);
                }
            }       
                 
            frmf_open("SMMNP01800", "SMMNP01800", null, null, 1, 100, 100, null, null, null, null, null, "M");
            break;
        case 1://확정간호처방출력
            sw_ord.case5.group4.visible = true;
            break;
        case 2://반납리스트조회
            var iRow = -1;
            iRow = ds_main_opPatlist_opPatInfo.rowposition;

            var patnm        = ds_main_opPatlist_opPatInfo.getColumn(iRow, "hngnm");
            var pid          = ds_main_opPatlist_opPatInfo.getColumn(iRow, "pid");
            var roomcd       = ds_main_opPatlist_opPatInfo.getColumn(iRow, "roomcd");
            var sa           = ds_main_opPatlist_opPatInfo.getColumn(iRow, "sa");
            var perfdeptabbr = ds_main_opPatlist_opPatInfo.getColumn(iRow, "depthngnm");
            var perfnm       = ds_main_opPatlist_opPatInfo.getColumn(iRow, "perfdridnm1");
            if( ds_init_querykey.getColumn(0, "opnmen") == "Y" ) {//영문
                var opnm         = ds_main_opPatlist_opPatInfo.getColumn(iRow, "opcdenm");
            }else {
                var opnm         = ds_main_opPatlist_opPatInfo.getColumn(iRow, "opcdknm");
            }
            var oproomnm     = ds_main_opPatlist_opPatInfo.getColumn(iRow, "oproomnm");
            var wardnm       = ds_main_opPatlist_opPatInfo.getColumn(iRow, "wardnm");
            var optype       = ds_main_opPatlist_opPatInfo.getColumn(iRow, "opflagcdnm");
            var tm           = ds_main_opPatlist_opPatInfo.getColumn(iRow, "tm");
            var patinfo      = wardnm + "  " + roomcd + "  " + patnm + "  " + sa + "  " + pid;
            var opcnfmdd     = ds_main_opPatlist_opPatInfo.getColumn(iRow, "opcnfmdd");
            var opinfo       = perfdeptabbr + "  " + oproomnm + "  " + perfnm + "  " + opnm;
            var disp1 	     = ds_main_opPatlist_opPatInfo.getColumn(iRow, "disp1");
            var disp2 	     = ds_main_opPatlist_opPatInfo.getColumn(iRow, "disp2");
            var disp3 	     = ds_main_opPatlist_opPatInfo.getColumn(iRow, "disp3");
            var patflagcd 	 = ds_main_opPatlist_opPatInfo.getColumn(iRow, "patflagcd");
            var ccrtstat     = ds_main_opPatlist_opPatInfo.getColumn(iRow, "ccrtstat");
            var oproomcd     = ds_main_opPatlist_opPatInfo.getColumn(iRow, "oproomcd");

            if( ccrtstat == "4" ) {
                sysf_messageBox("Cart 상태가 처방입니다. 수술방에 확인해 주세요.!", "I000");
                return;
            }

            frmf_setParameter("patinfo", patinfo);
            frmf_setParameter("opcnfmdd", opcnfmdd);
            frmf_setParameter("opinfo", opinfo);
            frmf_setParameter("patnm", patnm);
            frmf_setParameter("pid", pid);
            frmf_setParameter("roomcd", roomcd);
            frmf_setParameter("sa", sa);
            frmf_setParameter("perfdeptabbr", perfdeptabbr);
            frmf_setParameter("opnm", opnm);
            frmf_setParameter("perfnm", perfnm);
            frmf_setParameter("oproomnm", oproomnm);
            frmf_setParameter("wardnm", wardnm);
            frmf_setParameter("optype", optype);
            frmf_setParameter("patflagcd", patflagcd);
            frmf_setParameter("disp1", disp1);
            frmf_setParameter("disp2", disp2);
            frmf_setParameter("disp3", disp3);
            frmf_setParameter("tm", tm);
            frmf_setParameter("oproomcd", oproomcd);
            frmf_setParameter("oprsrvno", ds_main_opPatlist_opPatInfo.getColumn(iRow, "oprsrvno"));
            frmf_setParameter("opdd",     opcnfmdd);
            frmf_setParameter("cartgubn", ds_init_querykey.getColumn(0, "cartgubn"));
            
            frmf_open("SMMNP03600", "SMMNP03600", null, null, 1, 100, 100, null, null, null, null, null, "M");
            break;
        case 3: //상세출력 (재출력)
            fRePrntCartDetailCnts(); //KNUH, cart청구리스트 재출력 기능 (2011.01.19 JJE)
            break;
		default :
			break;
	}
}

/**
 * @group  :
 * @ver    : 2010.01.26
 * @by     : K. J. M
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 환자 상단정보 설정
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSetParam(){
    // 입원환자 화면상단정보 설정
    if(ds_main_opPatlist_opPatInfo.rowcount == 0){
        return;
    } else {
        var sPath:Dataset;
        sPath = ds_main_opPatlist_opPatInfo;
        var sPatFlag = sPath.getColumn(sPath.rowposition, "oppatflagcd");

        if (utlf_transNullToEmpty(sPath.getColumn(sPath.rowposition, "opstatcd")).substr(1,1)=="9") {
			sysf_messageBox('취소된 자료는 선택', 'E001');
			return;
        }

        //2008-08-28 오전 9:26:44 taebum add 수술기록 관련 요구사항 처리중        
        var sOpenSusulOprsrvno = sysf_getModelAttribute("susulrec_oprsrvno");
        var sCurrentOprsrvno   = ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "oprsrvno");

        if(!utlf_isNull(sOpenSusulOprsrvno)){
            if(sOpenSusulOprsrvno != sCurrentOprsrvno){                
                var sOpenSusulPid   = sysf_getModelAttribute("susulrec_pid");
                var sOpenSusulHngnm = sysf_getModelAttribute("susulrec_hngnm");
                sysf_messageBox("등록번호 : "+sOpenSusulPid+"  "+sOpenSusulHngnm+"님의 수술기록 작성 중 입니다. 작성완료 후 수술기록을 닫으시기 바랍니다.", "");
                return;
            }
        }

        //2008-09-26 오전 11:05:01 taebum DSC 뿐 아니라 외래로 확정한 케이스에도 CartList 저장 및 상단 정보 생성요청 적용중.
        var sTmpIndd = ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "iindd");
        var orddeptcd   = ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "orddeptcd");
        var opcnfmdd    = ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "opcnfmdd");
        var sCurrentdd  = utlf_getCurrentDate();

        if(utlf_isNull(sTmpIndd)){
            var sTmpPid      = ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "pid");
            
            ds_send_reqdata.clearData();
            ds_send_reqdata.addRow();
            //저장 후 조회조건            
            dsf_makeValue(ds_send_reqdata, "pid"     ,  "string", sTmpPid);
            dsf_makeValue(ds_send_reqdata, "opcnfmdd",  "string", opcnfmdd);
            dsf_makeValue(ds_send_reqdata, "orddeptcd", "string", orddeptcd);

            var oParam = {};
				oParam.id          = "TRMNP00108";
				oParam.service     = "opanstapp.OpAnstPatMngt";
				oParam.method      = "reqGetPidOtptInfo";
				oParam.inds        = "reqdata=ds_send_reqdata";
				oParam.outds       = "ds_HideData_otptinfo=otptinfo";
				oParam.async       = false;				

			tranf_submit(oParam);

            if(!utlf_isNull(ds_HideData_otptinfo.getColumn(0, "pid"))){
                if (utlf_isNull(sPatFlag)) {
                    sPatFlag  = "O";
                }

                var param = "";
                if(sPatFlag == "D" || sPatFlag == "I" || sPatFlag == "E"){
                	 //외래환자 상단올리기
                	 //2009-05-11 YCD 외래 환자 상단정보 세팅 변경
                    param = ds_HideData_otptinfo.getColumn(0, "ordtype")  + "▦"
                          + ds_HideData_otptinfo.getColumn(0, "pid")      + "▦"
                          + ds_HideData_otptinfo.getColumn(0, "orddd")    + "▦"
                          + ds_HideData_otptinfo.getColumn(0, "cretno")   + "▦"
                          + ds_HideData_otptinfo.getColumn(0, "instcd")   + "▦"
                          + ""      + "▦"
                          + ds_HideData_otptinfo.getColumn(0, "orgorddd");
                }else {
                    param = "T▦"                                                                   // 01 O:외래, I:입원구분, T:수술예약
                          +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "pid") + "▦"     // 02 등록번호
                          +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "opcnfmdd") + "▦"     // 03 수술시작일자
                          +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "cretno") + "▦"     // 04 cretno(없는 경우 ""로 처리)
                          +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "instcd") + "▦"     // 05 기관코드
                          +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "perfdeptcd") + "▦"     // 06 집도과부서
                          +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "perfdrid1") + "▦"     // 07 집도의ID
                          +  sPatFlag                                                    + "▦"     // 08 환자구분
                          +                                                               "F▦"     // 09 F -처리구분 무조건 F로 설정
                          +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "oprsrvno") + "▦"     // 10 수술예약번호
                          +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "ophistno") + "▦"     // 11 수술이력번호
                          +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "opcnfmdd") + "▦";    // 12 조회일자   2007-09-13 오지훈 추가...
                }
				appf_initPatientInfo(param);	//상단정보 셋팅
            }
        }else {

            if (sPatFlag == "") {
                sPatFlag  = "I";
            }

            var param = "T▦"                                                                   // 01 O:외래, I:입원구분, T:수술예약
                      +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "pid") + "▦"     // 02 등록번호
                      +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "opcnfmdd") + "▦"     // 03 수술시작일자
                      +                                                                "▦"     // 04 cretno(없는 경우 ""로 처리)
                      +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "instcd") + "▦"     // 05 기관코드
                      +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "perfdeptcd") + "▦"     // 06 집도과부서
                      +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "perfdrid1") + "▦"     // 07 집도의ID
                      +  sPatFlag                                                    + "▦"     // 08 환자구분
                      +                                                               "F▦"     // 09 F -처리구분 무조건 F로 설정
                      +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "oprsrvno") + "▦"     // 10 수술예약번호
                      +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "ophistno") + "▦"     // 11 수술이력번호
                      +  ds_main_opPatlist_opPatInfo.getColumn(ds_main_opPatlist_opPatInfo.rowposition, "opcnfmdd") + "▦";    // 12 조회일자   2007-09-13 오지훈 추가...          

            appf_initPatientInfo(param);	//상단정보 셋팅
        }
        var curNurType2Obj   = frmf_findPopup("SMMNP00200");
        if( !utlf_isNull(curNurType2Obj) ){//준비확인이 열려있으면 상단 환자로 재조회2010.01.04 K.J.M
            curNurType2Obj.fFormInit();
        }
    }
}

function fPrntFlagChk(){
    var prntgood  = ds_init_querykey.getColumn(0, "prntgood");
    var prntinstr = ds_init_querykey.getColumn(0, "prntinstr");
    var prntcst   = ds_init_querykey.getColumn(0, "prntcst");
    var prntpad   = ds_init_querykey.getColumn(0, "prntpad");
    if(  utlf_isNull(prntgood) && utlf_isNull(prntinstr) &&utlf_isNull(prntcst) ) {
        sysf_messageBox("출력할 구분을 선택하세요.", "E000");
        return false;
    }else {
        return true;
    }
}

function fPrntPrcpList() {

    ds_main_MmohoprsLists_mmohoprslist.addColumn("prnti", "string");
    dsf_makeValue(ds_main_MmohoprsLists_mmohoprslist,"prnti"	, "string", ds_init_querykey.getColumn(0, "prnti"));
    dsf_makeValue(ds_main_MmohoprsLists_mmohoprslist,"prntii"	, "string", ds_init_querykey.getColumn(0, "prntii"));
	dsf_makeValue(ds_main_MmohoprsLists_mmohoprslist,"prntiii"	, "string", ds_init_querykey.getColumn(0, "prntiii"));
	dsf_makeValue(ds_main_MmohoprsLists_mmohoprslist,"prntiv"	, "string", ds_init_querykey.getColumn(0, "prntiv"));
	dsf_makeValue(ds_main_MmohoprsLists_mmohoprslist,"cartgubn"	, "string", ds_init_querykey.getColumn(0, "cartgubn"));
	
	//미리보기출력
	var objDOM = rptf_createDOM();			
	rptf_setNodeListToDOM(objDOM, "root/main/prtinfo/MmohoprsLists/mmohoprslist", ds_main_MmohoprsLists_mmohoprslist);	// 데이터셋 1	
	rptf_setNodeListToDOM(objDOM, "root/main/prtinfo/CartOrdData/ListDiposit"	, ds_main_CartOrdData_ListDiposit);		// 데이터셋 2	
	rptf_setNodeListToDOM(objDOM, "root/main/prtinfo/CartOrdData/ListSupplies"	, ds_main_CartOrdData_ListSupplies);	// 데이터셋 3	
	rptf_setNodeListToDOM(objDOM, "root/main/prtinfo/CartOrdData/ListDrug"		, ds_main_CartOrdData_ListDrug);		// 데이터셋 4	
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출
	
	var option = "open=1;save=1;directprint=1;print=1;zoom=0;printdialog=0;";
	rptf_exeReportPreview30(["RPMNP01800"],[objParam], option);
}

//--------------------------------------------------
// Cart 상세내역 출력
//--------------------------------------------------
function fPrntCartDetailCnts(pFlag, sFlag) {
    var rtnflag = "";
    var oprsrvno = "";
    var oproomcd = "";
    var ophistno = "";
    var cartgubn = "";
    var prntgoodstat = "";
    var prntinstrstat = "";
    var prntcststat = "";
    var varcureflag = "";
    var cnt = 0;
    var cnt2 = 0;
    var prntgood = ds_init_querykey.getColumn(0, "prntgood");
    var prntinstr = ds_init_querykey.getColumn(0, "prntinstr");
    var prntcst = ds_init_querykey.getColumn(0, "prntcst");
    var prntpad = ds_init_querykey.getColumn(0, "prntpad");

    var iRows = ds_main_opPatlist_opPatInfo.rowcount;
    var sPatOPRSInfoPath:Dataset;
    sPatOPRSInfoPath = ds_init_querykey_patoprsinfo;
    var sOPRSPath: Dataset;
    sOPRSPath = ds_main_opPatlist_opPatInfo;
    var cartbaglist = "m▦rownum▦oprsrvno▦oproomcd▦cartgubn▦deliveflag▦prntgood▦prntinstr▦prntcst▦varcureflag▦goodcrflag▦callflag▩";
    var sSaveFlag = false;
    var sSaveData = "cartstat▦oprsrvno▦ophistno▦cartgubn▩";
    var deptflagnm = "";
    var deptflag = ds_init_querykey.getColumn(0, "cartgubn");
    if (deptflag == "O") {
        if (pFlag == "S") {
            deptflagnm = "수술 Cart 청구리스트 [정규]";
        } else if (pFlag == "E") {
            deptflagnm = "수술 Cart 청구리스트 [응급]";
        } else {
            deptflagnm = "수술 Cart 청구리스트 [추가]";
        }
    } else if (deptflag == "A") {
        if (pFlag == "S") {
            deptflagnm = "마취 Cart 청구리스트 [정규]";
        } else if (pFlag == "E") {
            deptflagnm = "마취 Cart 청구리스트 [응급]";
        } else {
            deptflagnm = "마취 Cart 청구리스트 [추가]";
        }
    }

    //정규, 응급 불출로 변경2009.07.01 K.J.M
    //물품, 기구, 소모품 ==> 물품, 기구/소모품으로 두가지로 출력물 통합
    if (pFlag == "S") { //정규(물품불출)
        if (iRows < 1) {
            sysf_messageBox("출력을 원하는 환자를 먼저", "C002");
            return;
        } else {
            for (var i = 0; i < iRows; i++) {

                if (sOPRSPath.getColumn(i, "chk") == "true" || sOPRSPath.getColumn(i, "chk") == "1") {
                    oprsrvno = sOPRSPath.getColumn(i, "oprsrvno");
                    oproomcd = sOPRSPath.getColumn(i, "oproomcd");
                    ophistno = sOPRSPath.getColumn(i, "ophistno");
                    cartgubn = ds_init_querykey.getColumn(0, "cartgubn");
                    cnt2 += 1;

                    if (sOPRSPath.getColumn(i, "goodstat") < "3") {
                        if (prntgood == "G") {
                            prntgoodstat = "G3";
                            varcureflag = "'1', '2', '3', '5', '7', '8', '9'";
                        } else {
                            prntgoodstat = "G1";
                        }
                    } else {
                        prntgoodstat = "G" + sOPRSPath.getColumn(i, "goodstat");
                    }

                    if (sFlag == "CCR") { //CCR일때 기구출력
                        if (sOPRSPath.getColumn(i, "instrstat") < "3") {
                            if (prntinstr == "I") {
                                prntinstrstat = "I3";
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'4', '6', '10'";
                                } else {
                                    varcureflag = varcureflag + ", '4', '6', '10'";
                                }
                            } else {
                                prntinstrstat = "I1";
                            }
                        } else {
                            prntinstrstat = "I" + sOPRSPath.getColumn(i, "instrstat");
                        }
                    } else if (sFlag == "CSR") {
                        if (sOPRSPath.getColumn(i, "instrstat") < "3") {
                            if (prntinstr == "I" || prntcst == "C" || prntpad == "P") {
                                prntinstrstat = "I3";
                                if (prntinstr == "I") {
                                    if (utlf_isNull(varcureflag)) {
                                        varcureflag = "'4'";
                                    } else {
                                        varcureflag = varcureflag + ", '4'";
                                    }
                                }
                                if (prntcst == "C") {
                                    if (utlf_isNull(varcureflag)) {
                                        varcureflag = "'6'";
                                    } else {
                                        varcureflag = varcureflag + ", '6'";
                                    }
                                }
                                if (prntpad == "P") {
                                    if (utlf_isNull(varcureflag)) {
                                        varcureflag = "'10'";
                                    } else {
                                        varcureflag = varcureflag + ", '10'";
                                    }
                                }
                            } else {
                                prntinstrstat = "I" + sOPRSPath.getColumn(i, "instrstat");
                            }
                        }
                    }

                    prntcststat = "C1";

                    if (sFlag == "CCR") { //CCR에서 기구 불출시 전체 출력
                        if (prntinstr == "I") {
                            ds_init_querykey.setColumn(0, "prntcst", "C");
                            ds_init_querykey.setColumn(0, "prntpad", "P");
                            prntcst = "C";
                            prntpad = "P";
                        }

                    }
                    if (utlf_isNull(prntgood) && utlf_isNull(prntinstr) && utlf_isNull(prntcst) && utlf_isNull(prntpad)) {
                        sysf_messageBox("하나라도 체크를 하셔야 합니다.", "E000");
                        return;
                    }

                    if (sOPRSPath.getColumn(i, "goodstat") > "2" && sOPRSPath.getColumn(i, "instrstat") > "2") { //물품, 기구 불출이면 상태값처리 안함.
                    } else {
                        if ((sOPRSPath.getColumn(i, "goodstat") < "3") || (sOPRSPath.getColumn(i, "instrstat") < "3")) { //물품, 기구 불출이전이면
                            cnt += 1;
                            cartbaglist = cartbaglist + "u" + "▦" + cnt + "▦" + oprsrvno + "▦" + oproomcd + "▦" + cartgubn +
                                "▦" + prntgoodstat + prntinstrstat + prntcststat + "▦" + prntgood + "▦" + prntinstr +
                                "▦" + prntcst + "▦" + varcureflag + "▦" + "S" + "▦" + sFlag + "▩";
                        } else { //추가 및 재출력
                            cnt += 1;
                            cartbaglist = cartbaglist + "su" + "▦" + cnt + "▦" + oprsrvno + "▦" + oproomcd + "▦" + cartgubn +
                                "▦" + prntgoodstat + prntinstrstat + prntcststat + "▦" + prntgood + "▦" + prntinstr +
                                "▦" + prntcst + "▦" + varcureflag + "▦" + "S" + "▦" + sFlag + "▩";
                        }
                    }
                    sPatOPRSInfoPath.clearData();
                    sPatOPRSInfoPath.addRow();
                    dsf_makeValue(sPatOPRSInfoPath, "oproomcdnm", "string", sOPRSPath.getColumn(i, "oproomcdnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "roomcd", "string", sOPRSPath.getColumn(i, "roomcd"));
                    dsf_makeValue(sPatOPRSInfoPath, "orddeptcdnm", "string", sOPRSPath.getColumn(i, "depthngnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "opfromtmcdnm", "string", utlf_transNullToEmpty(sOPRSPath.getColumn(i, "fstrgstdt")).substr(11, 5));
                    dsf_makeValue(sPatOPRSInfoPath, "pid", "string", sOPRSPath.getColumn(i, "pid"));
                    dsf_makeValue(sPatOPRSInfoPath, "hngnm", "string", sOPRSPath.getColumn(i, "hngnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "sexage", "string", sOPRSPath.getColumn(i, "sa"));
                    dsf_makeValue(sPatOPRSInfoPath, "diagcdnm", "string", sOPRSPath.getColumn(i, "diagcdnm"));
                    if (ds_init_querykey.getColumn(0, "opnmen") == "Y") { //영문
                        dsf_makeValue(sPatOPRSInfoPath, "opcdnm", "string", sOPRSPath.getColumn(i, "opcdenm"));
                    } else {
                        dsf_makeValue(sPatOPRSInfoPath, "opcdnm", "string", sOPRSPath.getColumn(i, "opcdknm"));
                    }
                    dsf_makeValue(sPatOPRSInfoPath, "perfdridnm", "string", sOPRSPath.getColumn(i, "perfdridnm1"));
                    dsf_makeValue(sPatOPRSInfoPath, "opcnfmdd", "string", sOPRSPath.getColumn(i, "opcnfmdd"));
                    dsf_makeValue(sPatOPRSInfoPath, "oprsrvno", "string", sOPRSPath.getColumn(i, "oprsrvno"));
                    dsf_makeValue(sPatOPRSInfoPath, "instcd", "string", sOPRSPath.getColumn(i, "instcd"));
                    dsf_makeValue(sPatOPRSInfoPath, "cartgubn", "string", deptflag);
                    dsf_makeValue(sPatOPRSInfoPath, "deptflagnm", "string", deptflagnm);
                    dsf_makeValue(sPatOPRSInfoPath, "prntinstr", "string", prntinstr);
                    dsf_makeValue(sPatOPRSInfoPath, "prntcst", "string", prntcst);
                    dsf_makeValue(sPatOPRSInfoPath, "prntpad", "string", prntpad);
                    dsf_makeValue(sPatOPRSInfoPath, "goodcrflag", "string", "S");
                    dsf_makeValue(sPatOPRSInfoPath, "usernm", "string", ds_init_userinfo.getColumn(0, "usernm"));

                    //20110103_KNUH_Start                        
                    dsf_makeValue(ds_send_reqdata, "oprsrvno", "string", sOPRSPath.getColumn(i, "oprsrvno"));
                    dsf_makeValue(ds_send_reqdata, "cartgubn", "string", ds_init_querykey.getColumn(0, "cartgubn"));

                    var goodstat = sOPRSPath.getColumn(i, "goodstat");

                    if ((goodstat < "3") && (prntinstr == "I" || prntcst == "C" || prntpad == "P"))
                        dsf_makeValue(ds_send_reqdata, "openflag", "string", "ALL");
                    else if (goodstat < "3")
                        dsf_makeValue(ds_send_reqdata, "openflag", "string", "CCR");
                    else if (prntinstr == "I" || prntcst == "C" || prntpad == "P")
                        dsf_makeValue(ds_send_reqdata, "openflag", "string", "CSR");

                    var oParam = {};
						oParam.id          = "TRMNP03008";
						oParam.service     = "opanstapp.OpAnstStocMngt";
						oParam.method      = "reqGetCcrtList";
						oParam.inds        = "reqdata=ds_send_reqdata";
						oParam.outds       = "ds_init_cartinfo_cartlist=cartlist";
						oParam.async       = false;						

					tranf_submit(oParam);
                    
                    ds_temp_prtlist.clearData();
                                        
                    ds_temp_prtlist_suture.clearData();
                    ds_temp_prtlist_supply.clearData();
                    ds_temp_prtlist_sheet.clearData();
                    ds_temp_prtlist_glove.clearData();
					
					ds_init_querykey_patoprsinfo_instrument.clearData();
					ds_init_querykey_patoprsinfo_supplies.clearData();
					ds_init_querykey_patoprsinfo_linen.clearData();

                    var cureflag;

                    var len;
                    var inst = 0;
                    var suture = 0;
                    var sheet = 0;
                    var glove = 0;
                    var instrument = 0;
                    var supplies = 0;
                    var linen = 0;

                    dsf_makeValue(ds_temp_prtlist, "oproomcdnm", "string", 		sOPRSPath.getColumn(i, "oproomcdnm"));
                    dsf_makeValue(ds_temp_prtlist, "roomcd", "string", 			sOPRSPath.getColumn(i, "roomcd"));
                    dsf_makeValue(ds_temp_prtlist, "orddeptcdnm", "string", 	sOPRSPath.getColumn(i, "depthngnm"));
                    dsf_makeValue(ds_temp_prtlist, "opfromtmcdnm", "string", 	utlf_transNullToEmpty(sOPRSPath.getColumn(i, "fstrgstdt")).substr(11, 5));
                    dsf_makeValue(ds_temp_prtlist, "pid", "string", 			sOPRSPath.getColumn(i, "pid"));
                    dsf_makeValue(ds_temp_prtlist, "hngnm", "string", 			sOPRSPath.getColumn(i, "hngnm"));
                    dsf_makeValue(ds_temp_prtlist, "sexage", "string", 			sOPRSPath.getColumn(i, "sa"));

                    dsf_makeValue(ds_temp_prtlist, "diagcdnm", "string",		sOPRSPath.getColumn(i, "diagcdnm"));
                    //KNUH, 수술번호 함께 출력 요청 (2011.01.24 JJE)
                    var newOpcdNm = "";
                    if (ds_init_querykey.getColumn(0, "opnmen") == "Y") { //영문
                        newOpcdNm = sOPRSPath.getColumn(i, "opcdenm");
                    } else {
                        newOpcdNm = sOPRSPath.getColumn(i, "opcdknm");
                    }
                    newOpcdNm = newOpcdNm + " (수술번호: " + sOPRSPath.getColumn(i, "oprsrvno") + ")";
                    dsf_makeValue(ds_temp_prtlist, "opcdnm", "string", 		newOpcdNm);
                    dsf_makeValue(ds_temp_prtlist, "perfdridnm", "string", 	sOPRSPath.getColumn(i, "perfdridnm1"));
                    dsf_makeValue(ds_temp_prtlist, "opcnfmdd", "string", 	sOPRSPath.getColumn(i, "opcnfmdd"));
                    dsf_makeValue(ds_temp_prtlist, "oprsrvno", "string", 	sOPRSPath.getColumn(i, "oprsrvno"));
                    dsf_makeValue(ds_temp_prtlist, "instcd", "string", 		sOPRSPath.getColumn(i, "instcd"));
                    dsf_makeValue(ds_temp_prtlist, "deptflagnm", "string", 	deptflagnm);
                    dsf_makeValue(ds_temp_prtlist, "curdd", "string", 		utlf_getCurrentDate());
                    dsf_makeValue(ds_temp_prtlist, "curtm", "string", 		utlf_getCurrentTime());
                    dsf_makeValue(ds_temp_prtlist, "usernm", "string", 		ds_init_userinfo.getColumn(0, "usernm"));

                    len = ds_init_cartinfo_cartlist.rowcount;

                    ds_temp_prtlist_suture.copyData(ds_init_cartinfo_cartlist);
					ds_temp_prtlist_suture.clearData();
					ds_temp_prtlist_supply.copyData(ds_init_cartinfo_cartlist);
					ds_temp_prtlist_supply.clearData();
					ds_temp_prtlist_sheet.copyData(ds_init_cartinfo_cartlist);
					ds_temp_prtlist_sheet.clearData();
					ds_temp_prtlist_glove.copyData(ds_init_cartinfo_cartlist);
					ds_temp_prtlist_glove.clearData();
					ds_init_querykey_patoprsinfo_instrument.copyData(ds_init_cartinfo_cartlist);
					ds_init_querykey_patoprsinfo_instrument.clearData();
					ds_init_querykey_patoprsinfo_supplies.copyData(ds_init_cartinfo_cartlist);
					ds_init_querykey_patoprsinfo_supplies.clearData();
					ds_init_querykey_patoprsinfo_linen.copyData(ds_init_cartinfo_cartlist);
					ds_init_querykey_patoprsinfo_linen.clearData();

					for (var j = 0; j < len; j++) {

						cureflag = ds_init_cartinfo_cartlist.getColumn(j, "cureflag");

						if (cureflag == "1") {                            							
							var addrow = ds_temp_prtlist_suture.addRow();
							ds_temp_prtlist_suture.copyRow(addrow, ds_init_cartinfo_cartlist, j);
						} else if (cureflag == "2") {                                                        
							var addrow = ds_temp_prtlist_supply.addRow();
							ds_temp_prtlist_supply.copyRow(addrow, ds_init_cartinfo_cartlist, j);                            
						} else if (cureflag == "7") {                                                        
							var addrow = ds_temp_prtlist_sheet.addRow();
							ds_temp_prtlist_sheet.copyRow(addrow, ds_init_cartinfo_cartlist, j);                            
						} else if (cureflag == "8") {                            
							var addrow = ds_temp_prtlist_glove.addRow();
							ds_temp_prtlist_glove.copyRow(addrow, ds_init_cartinfo_cartlist, j);
						} else if (cureflag == "4") {                                                        
							var addrow = ds_init_querykey_patoprsinfo_instrument.addRow();
							ds_init_querykey_patoprsinfo_instrument.copyRow(addrow, ds_init_cartinfo_cartlist, j);
						} else if (cureflag == "6") {                            
							var addrow = ds_init_querykey_patoprsinfo_supplies.addRow();
							ds_init_querykey_patoprsinfo_supplies.copyRow(addrow, ds_init_cartinfo_cartlist, j);
						} else if (cureflag == "10") {                            
							var addrow = ds_init_querykey_patoprsinfo_linen.addRow();
							ds_init_querykey_patoprsinfo_linen.copyRow(addrow, ds_init_cartinfo_cartlist, j);
						}
					}
					
                    //20110105_KNUHStart
                    // makeReportPreview(0,0,10, 10, "");
                    //@@ 아래 < "3" 제거, 조회 sql도 변경/추가 필요! @@
                    if (sOPRSPath.getColumn(i, "goodstat") < "3") { //임시, 저장일 경우만 출력
                        if (prntgood == "G") {                                                       
                            if(ds_temp_prtlist_suture.rowcount == 0){
								ds_temp_prtlist_suture.addRow();
							}
							if(ds_temp_prtlist_supply.rowcount == 0){
								ds_temp_prtlist_supply.addRow();
							}
							if(ds_temp_prtlist_sheet.rowcount == 0){
								ds_temp_prtlist_sheet.addRow();
							}
							if(ds_temp_prtlist_glove.rowcount == 0){
								ds_temp_prtlist_glove.addRow();
							}
                            
                            if(sysf_getUserInfo("dutplceinstcd") == "032"){
								var objDOM = rptf_createDOM();			
								rptf_setNodeListToDOM(objDOM, "root/temp/prtlist", ds_temp_prtlist);	// 데이터셋 1	
								rptf_setNodeListToDOM(objDOM, "root/temp/prtlist/suture", ds_temp_prtlist_suture);	// 데이터셋 1	
															
								var objDOM2 = rptf_createDOM();
								rptf_setNodeListToDOM(objDOM2, "root/temp/prtlist/supply", ds_temp_prtlist_supply);		// 데이터셋 2	
								rptf_setNodeListToDOM(objDOM2, "root/temp/prtlist/sheet", ds_temp_prtlist_sheet);	// 데이터셋 3	
								rptf_setNodeListToDOM(objDOM2, "root/temp/prtlist/glove", ds_temp_prtlist_glove);		// 데이터셋 4
								
								
								var objParam = new Object();
								objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출														
								objParam.xml_data_XML2 = objDOM2.documentElement.source;														// 최상의노드 XML 스트링 추출							
							}else if(sysf_getUserInfo("dutplceinstcd") == "031"){
								var objDOM = rptf_createDOM();			
								rptf_setNodeListToDOM(objDOM, "root/temp/prtlist", ds_temp_prtlist);	// 데이터셋 1	
								rptf_setNodeListToDOM(objDOM, "root/temp/prtlist/suture", ds_temp_prtlist_suture);	// 데이터셋 2																								
								rptf_setNodeListToDOM(objDOM, "root/temp/prtlist/supply", ds_temp_prtlist_supply);		// 데이터셋 3	
								rptf_setNodeListToDOM(objDOM, "root/temp/prtlist/sheet", ds_temp_prtlist_sheet);	// 데이터셋 4	
								rptf_setNodeListToDOM(objDOM, "root/temp/prtlist/glove", ds_temp_prtlist_glove);		// 데이터셋 5
								
								var objParam = new Object();
								objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출														
							}
										
							//var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
							var option = "open=1;save=1;directprint=1;print=1;zoom=0;printdialog=0;";
							rptf_exeReportPreview30(["RPMNP03001"],[objParam], option);
                        }
                    }
                    if (prntinstr == "I" || prntcst == "C" || prntpad == "P") { //기구, 소모품, 린넨/패드류 선택시
                        if(ds_init_querykey_patoprsinfo.rowcount == 0){
							ds_init_querykey_patoprsinfo.addRow();
						}
						if(ds_init_querykey_patoprsinfo_instrument.rowcount == 0){
							ds_init_querykey_patoprsinfo_instrument.addRow();
						}
						if(ds_init_querykey_patoprsinfo_supplies.rowcount == 0){
							ds_init_querykey_patoprsinfo_supplies.addRow();
						}
						if(ds_init_querykey_patoprsinfo_linen.rowcount == 0){
							ds_init_querykey_patoprsinfo_linen.addRow();
						}
                        
                        var objDOM = rptf_createDOM();			
							rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo", ds_init_querykey_patoprsinfo);	// 데이터셋 1	
							rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/instrument", ds_init_querykey_patoprsinfo_instrument);	// 데이터셋 2	
							rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/supplies", ds_init_querykey_patoprsinfo_supplies);	// 데이터셋 3
							rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/linen", ds_init_querykey_patoprsinfo_linen);	// 데이터셋 4
                        
                        var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출								
						//var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
						var option = "open=1;save=1;directprint=1;print=1;zoom=0;printdialog=0;";
						rptf_exeReportPreview30(["RPMNP03004"],[objParam], option);	
                    }                    
                }
            }
        }
    } else { //응급불출 
        if (iRows < 1) {
            sysf_messageBox("출력을 원하는 환자를 먼저", "C002");
            return;
        } else {
            for (var i = 0; i < iRows; i++) {
                if (sOPRSPath.getColumn(i, "chk") == "true" || sOPRSPath.getColumn(i, "chk") == "1") {
                    oprsrvno = sOPRSPath.getColumn(i, "oprsrvno");
                    oproomcd = sOPRSPath.getColumn(i, "oproomcd");
                    ophistno = sOPRSPath.getColumn(i, "ophistno");
                    cartgubn = ds_init_querykey.getColumn(0, "cartgubn");
                    cnt2 += 1;

                    if (sOPRSPath.getColumn(i, "instrstat") >= "3") {
                        if (prntinstr == "I" || prntcst == "C" || prntpad == "P") {
                            prntinstrstat = "I3";
                            if (prntinstr == "I") {
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'4'";
                                } else {
                                    varcureflag = varcureflag + ", '4'";
                                }
                            }
                            if (prntinstr == "C") {
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'6'";
                                } else {
                                    varcureflag = varcureflag + ", '6'";
                                }
                            }
                            if (prntinstr == "P") {
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'10'";
                                } else {
                                    varcureflag = varcureflag + ", '10'";
                                }
                            }
                        } else {
                            prntinstrstat = "I" + sOPRSPath.getColumn(i, "instrstat");
                        }
                    } else {
                        sysf_messageBox("불출이후에만 응급불출이 가능합니다.!", "E000");
                        return;
                        prntinstrstat = "I" + sOPRSPath.getColumn(i, "instrstat");
                    }

                    cnt += 1;
                    cartbaglist = cartbaglist + "e" + "▦" + cnt + "▦" + oprsrvno + "▦" + oproomcd + "▦" + cartgubn +
                        "▦" + prntgoodstat + prntinstrstat + "C1" + "▦" + prntgood + "▦" + prntinstr +
                        "▦" + prntcst + "▦" + varcureflag + "▦" + "E" + "▦" + sFlag + "▩";
                    
                    sPatOPRSInfoPath.clearData();
                    sPatOPRSInfoPath.addRow();
                    
                    dsf_makeValue(sPatOPRSInfoPath, "oproomcdnm", "string", 	sOPRSPath.getColumn(i, "oproomcdnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "roomcd", "string", 		sOPRSPath.getColumn(i, "roomcd"));
                    dsf_makeValue(sPatOPRSInfoPath, "orddeptcdnm", "string", 	sOPRSPath.getColumn(i, "depthngnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "opfromtmcdnm", "string", 	utlf_transNullToEmpty(sOPRSPath.getColumn(i, "fstrgstdt")).substr(11, 5));
                    dsf_makeValue(sPatOPRSInfoPath, "pid", "string", 			sOPRSPath.getColumn(i, "pid"));
                    dsf_makeValue(sPatOPRSInfoPath, "hngnm", "string", 			sOPRSPath.getColumn(i, "hngnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "sexage", "string", 		sOPRSPath.getColumn(i, "sa"));
                    dsf_makeValue(sPatOPRSInfoPath, "diagcdnm", "string", 		sOPRSPath.getColumn(i, "diagcdnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "opcdnm", "string", 		sOPRSPath.getColumn(i, "opcdknm"));
                    dsf_makeValue(sPatOPRSInfoPath, "perfdridnm", "string", 	sOPRSPath.getColumn(i, "perfdridnm1"));
                    dsf_makeValue(sPatOPRSInfoPath, "opcnfmdd", "string", 		sOPRSPath.getColumn(i, "opcnfmdd"));
                    dsf_makeValue(sPatOPRSInfoPath, "oprsrvno", "string", 		sOPRSPath.getColumn(i, "oprsrvno"));
                    dsf_makeValue(sPatOPRSInfoPath, "instcd", "string", 		sOPRSPath.getColumn(i, "instcd"));
                    dsf_makeValue(sPatOPRSInfoPath, "cartgubn", "string", 		deptflag);
                    dsf_makeValue(sPatOPRSInfoPath, "deptflagnm", "string", 	deptflagnm);
                    dsf_makeValue(sPatOPRSInfoPath, "prntinstr", "string", 		prntinstr);
                    dsf_makeValue(sPatOPRSInfoPath, "prntcst", "string", 		prntcst);
                    dsf_makeValue(sPatOPRSInfoPath, "prntpad", "string", 		prntpad);
                    dsf_makeValue(sPatOPRSInfoPath, "goodcrflag", "string", 	"E");
                    dsf_makeValue(sPatOPRSInfoPath, "usernm", "string", 		ds_init_userinfo.getColumn(0, "usernm"));

                    if (prntinstr == "I" || prntcst == "C" || prntpad == "P") { //기구, 소모품, 린넨/패드류 선택시
						if(ds_init_querykey_patoprsinfo.rowcount == 0){
							ds_init_querykey_patoprsinfo.addRow();
						}
						if(ds_init_querykey_patoprsinfo_instrument.rowcount == 0){
							ds_init_querykey_patoprsinfo_instrument.addRow();
						}
						if(ds_init_querykey_patoprsinfo_supplies.rowcount == 0){
							ds_init_querykey_patoprsinfo_supplies.addRow();
						}
						if(ds_init_querykey_patoprsinfo_linen.rowcount == 0){
							ds_init_querykey_patoprsinfo_linen.addRow();
						}
						
						var objDOM = rptf_createDOM();			
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo", ds_init_querykey_patoprsinfo);	// 데이터셋 1	
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/instrument", ds_init_querykey_patoprsinfo_instrument);	// 데이터셋 2	
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/supplies", ds_init_querykey_patoprsinfo_supplies);	// 데이터셋 3
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/linen", ds_init_querykey_patoprsinfo_linen);	// 데이터셋 4

						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출	

						//var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
						var option = "open=1;save=1;directprint=1;print=1;zoom=0;printdialog=0;";
						rptf_exeReportPreview30(["RPMNP03004"],[objParam], option);	
                    }                    
                }
            }
        }
    }

    if (cnt2 < 1) {
        sysf_messageBox("출력을 원하는 환자를 먼저", "C002");
        return;
    }
    if (pFlag == "S") {
        group5.visible = false;
    }

    //if( sFlag == "CCR" ) {//CCR 호출일 경우만 실행
    
    if (cnt > 0) { //카트 불출(공급)       
        dsf_setCSVToDs("ds_main_cartsend", cartbaglist);
        ds_main_cartsend.updateColID("m", "status");
        var oParam = {};
			oParam.id          = "TXMNP03401";
			oParam.service     = "opanstapp.OpAnstStocMngt";
			oParam.method      = "reqSetCaseCartStat";
			oParam.inds        = "cartsend=ds_main_cartsend";
			oParam.outds       = "";
			oParam.async       = false;
			oParam.callback    = "cf_TXMNP03401";

		tranf_submit(oParam);
        
        if (arErrorCode.pop("TXMNP03401") < 0) {            
            sysf_messageBox("조회된 결과가", "I004");
            return;
        }
    }
    fOpDataQuery();
}

function cf_TXMNP03401(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

/**
 * @group  :
 * @ver    : 2011.01.19
 * @by     : JJE
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : KNUH, 상세출력(카트청구리스트) 재출력 기능 요청에 의한 재출력 처리
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fRePrntCartDetailCnts(){
    var pFlag = "S";   //정규출력
    var sFlag = "CCR"; //중앙공급실
    var rtnflag, oprsrvno, oproomcd, ophistno, cartgubn, prntgoodstat, prntinstrstat, prntcststat, varcureflag="";
    var cnt = 0, cnt2 = 0;
    var prntgood  = ds_init_querykey.getColumn(0, "prntgood");  //G
    var prntinstr = ds_init_querykey.getColumn(0, "prntinstr"); //I
    var prntcst   = ds_init_querykey.getColumn(0, "prntcst");
    var prntpad   = ds_init_querykey.getColumn(0, "prntpad");
    var iRows = ds_main_opPatlist_opPatInfo.rowcount;
    var i = ds_main_opPatlist_opPatInfo.rowposition;
    var sPatOPRSInfoPath:Dataset;
    sPatOPRSInfoPath = ds_init_querykey_patoprsinfo;
    var sOPRSPath:Dataset;
    sOPRSPath = ds_main_opPatlist_opPatInfo;
    var cartbaglist = "m▦rownum▦oprsrvno▦oproomcd▦cartgubn▦deliveflag▦prntgood▦prntinstr▦prntcst▦varcureflag▦goodcrflag▦callflag▩";
    var sSaveFlag   = false;
    var sSaveData   = "cartstat▦oprsrvno▦ophistno▦cartgubn▩";
    var deptflagnm  = "";
    var deptflag    = ds_init_querykey.getColumn(0, "cartgubn");
    if( deptflag == "O" ) {
        if( pFlag == "S" ) {
            deptflagnm = "수술 Cart 청구리스트 [정규]";
        }else if( pFlag == "E" ){
            deptflagnm = "수술 Cart 청구리스트 [응급]";
        }else {
            deptflagnm = "수술 Cart 청구리스트 [추가]";
        }
    }else if( deptflag == "A" ) {
        if( pFlag == "S" ) {
            deptflagnm = "마취 Cart 청구리스트 [정규]";
        }else if( pFlag == "E" ){
            deptflagnm = "마취 Cart 청구리스트 [응급]";
        }else {
            deptflagnm = "마취 Cart 청구리스트 [추가]";
        }
    }

    //정규, 응급 불출로 변경2009.07.01 K.J.M
    //물품, 기구, 소모품 ==> 물품, 기구/소모품으로 두가지로 출력물 통합
    if( pFlag == "S" ) { //정규(물품불출)
        if ( i < 0 ){
            sysf_messageBox("출력을 원하는 환자를 먼저","C002");
            return;
        }else if( sOPRSPath.getColumn(i, "goodstat") < 3 ) {
            //if( messageBox("불출 이전 상태입니다.\n그래도","Q003") == 7 ) return;
            sysf_messageBox("불출 이전 상태입니다.\n재출력할 수","I004");
            return; 
        }//else {
            //for( var i = 1; i <= iRows; i++ ) {
            	//if( model.getValue(sOPRSPath+"["+i+"]/chk") == "true" ) {
        		    oprsrvno    = sOPRSPath.getColumn(i, "oprsrvno");
        		    oproomcd    = sOPRSPath.getColumn(i, "oproomcd");
        		    ophistno    = sOPRSPath.getColumn(i, "ophistno");
        		    cartgubn    = ds_init_querykey.getColumn(0, "cartgubn");
        		    cnt2 += 1;
        		    
        		    //1:suture, 2:supplies, 3:Drug, 4:Instrument, 5:처치,행위, 6:소모품, 7:Sheet, 8:Glove, 9:일반물품, 10:린넨, 11:공용
        		    //if( model.getValue(sOPRSPath+"["+i+"]/goodstat") < "3" ) {
        		    	if( prntgood == "G" ) {
        		    		prntgoodstat = "G3";
        		    		varcureflag = "'1', '2', '3', '5', '7', '8', '9'";
        		    	}else {
        		    		prntgoodstat = "G1";
        		    	}
        		    //}else {
        		    //	prntgoodstat = "G" + model.getValue(sOPRSPath+"["+i+"]/goodstat");
        		    //}
        		    
        		    if( sFlag == "CCR" ) {//CCR일때 기구출력
        		    	//if( model.getValue(sOPRSPath+"["+i+"]/instrstat") < "3" ) {
        		    		if( prntinstr == "I" ) {
        		    			prntinstrstat = "I3";
        		    			if( utlf_isNull(varcureflag)) {
        		    				varcureflag = "'4', '6', '10'";
        		    			}else {
        		    				varcureflag = varcureflag + ", '4', '6', '10'";
        		    			}
        		    		}else {
        		    			prntinstrstat = "I1";
        		    		}
        		    	//}else {
        		    	//	prntinstrstat = "I" + model.getValue(sOPRSPath+"["+i+"]/instrstat");
        		    	//}
        		    }else if( sFlag == "CSR" ) {
        		    	//if( model.getValue(sOPRSPath+"["+i+"]/instrstat") < "3" ) {
        		    		if( prntinstr == "I"||prntcst == "C"||prntpad == "P" ) {
        		    			prntinstrstat = "I3";
        		    			if( prntinstr == "I" ) {
        		    				if( utlf_isNull(varcureflag) ) {
        		    					varcureflag = "'4'";
        		    				}else {
        		    					varcureflag = varcureflag + ", '4'";
        		    				}
        		    			}
        		    			if( prntcst == "C" ) {
        		    				if( utlf_isNull(varcureflag) ) {
        		    					varcureflag = "'6'";
        		    				}else {
        		    					varcureflag = varcureflag + ", '6'";
        		    				}
        		    			}
        		    			if( prntpad == "P" ) {
        		    				if( utlf_isNull(varcureflag) ) {
        		    					varcureflag = "'10'";
        		    				}else {
        		    					varcureflag = varcureflag + ", '10'";
        		    				}
        		    			}
        		    		}else {
        		    			prntinstrstat = "I" + sOPRSPath.getColumn(i, "instrstat");
        		    		}
        		    	//}
        		    }
        		    
        		    prntcststat = "C1";
        		    
        		    if( sFlag == "CCR" ) {//CCR에서 기구 불출시 전체 출력
        		    	if( prntinstr == "I" ) {
        		    		ds_init_querykey.setColumn(0, "prntcst", "C");
        		    		ds_init_querykey.setColumn(0, "prntpad", "P");
        		    		prntcst = "C";
        		    		prntpad = "P";
        		    	}
        		    }
        		    if( utlf_isNull(prntgood) && utlf_isNull(prntinstr) && utlf_isNull(prntcst) && utlf_isNull(prntpad) ) {
        		    	sysf_messageBox("하나라도 체크를 하셔야 합니다.", "E000");
        		    	return;
        		    }
        		    
        		    //if( model.getValue(sOPRSPath+"["+i+"]/goodstat") > "2" && model.getValue(sOPRSPath+"["+i+"]/instrstat") > "2" ) {//물품, 기구 불출이면 상태값처리 안함.
        		    //}else {
        		    	if( ( sOPRSPath.getColumn(i, "goodstat") < "3") || (sOPRSPath.getColumn(i, "instrstat") < "3") ){ //물품, 기구 불출이전이면
        		    		cnt += 1;
        		    		cartbaglist += "u"     + "▦" +  cnt        + "▦" + oprsrvno + "▦" + oproomcd  + "▦" + cartgubn
            				               + "▦" + prntgoodstat + prntinstrstat + prntcststat     + "▦" + prntgood  + "▦" + prntinstr
            				               + "▦" + prntcst + "▦" + varcureflag + "▦" + "S"      + "▦" + sFlag + "▩";
        		    	}else {//추가 및 재출력
        		    		cnt += 1;
            				cartbaglist += "su"    + "▦" +  cnt        + "▦" + oprsrvno + "▦" + oproomcd  + "▦" + cartgubn
            				               + "▦" + prntgoodstat + prntinstrstat + prntcststat     + "▦" + prntgood  + "▦" + prntinstr
            				               + "▦" + prntcst + "▦" + varcureflag + "▦" + "S"      + "▦" + sFlag + "▩";
        		    	}
        		    //}
            		
            		sPatOPRSInfoPath.clearData();
            		
            		dsf_makeValue(sPatOPRSInfoPath, "oproomcdnm"  ,  "string", sOPRSPath.getColumn(i, "oproomcdnm"));
            		dsf_makeValue(sPatOPRSInfoPath, "roomcd"      ,  "string", sOPRSPath.getColumn(i, "roomcd"));
            		dsf_makeValue(sPatOPRSInfoPath, "orddeptcdnm" ,  "string", sOPRSPath.getColumn(i, "depthngnm"));
            		dsf_makeValue(sPatOPRSInfoPath, "opfromtmcdnm",  "string", sOPRSPath.getColumn(i, "fstrgstdt").substr(11, 5));
            		dsf_makeValue(sPatOPRSInfoPath, "pid"         ,  "string", sOPRSPath.getColumn(i, "pid"));
            		dsf_makeValue(sPatOPRSInfoPath, "hngnm"       ,  "string", sOPRSPath.getColumn(i, "hngnm"));
            		dsf_makeValue(sPatOPRSInfoPath, "sexage"      ,  "string", sOPRSPath.getColumn(i, "sa"));
            		dsf_makeValue(sPatOPRSInfoPath, "diagcdnm"    ,  "string", sOPRSPath.getColumn(i, "diagcdnm"));
            		if( ds_init_querykey.getColumn(0, "opnmen") == "Y" ) {//영문
            			dsf_makeValue(sPatOPRSInfoPath, "opcdnm"      ,  "string", sOPRSPath.getColumn(i, "opcdenm"));
            		}else {
            			dsf_makeValue(sPatOPRSInfoPath, "opcdnm"      ,  "string", sOPRSPath.getColumn(i, "opcdknm"));
            		}
            		dsf_makeValue(sPatOPRSInfoPath, "perfdridnm"  ,  "string", sOPRSPath.getColumn(i, "perfdridnm1"));
            		dsf_makeValue(sPatOPRSInfoPath, "opcnfmdd"    ,  "string", sOPRSPath.getColumn(i, "opcnfmdd"));
            		dsf_makeValue(sPatOPRSInfoPath, "oprsrvno"    ,  "string", sOPRSPath.getColumn(i, "oprsrvno"));
            		dsf_makeValue(sPatOPRSInfoPath, "instcd"      ,  "string", sOPRSPath.getColumn(i, "instcd"));
            		dsf_makeValue(sPatOPRSInfoPath, "cartgubn"    ,  "string", deptflag);
            		dsf_makeValue(sPatOPRSInfoPath, "deptflagnm"  ,  "string", deptflagnm);
            		dsf_makeValue(sPatOPRSInfoPath, "prntinstr"   ,  "string", prntinstr);
            		dsf_makeValue(sPatOPRSInfoPath, "prntcst"     ,  "string", prntcst);
            		dsf_makeValue(sPatOPRSInfoPath, "prntpad"     ,  "string", prntpad);
            		dsf_makeValue(sPatOPRSInfoPath, "goodcrflag"  ,  "string", "S");
            		dsf_makeValue(sPatOPRSInfoPath, "usernm"      ,  "string", ds_init_userinfo.getColumn(0, "usernm"));
            		
            		//20110103_KNUH_Start                        
                dsf_makeValue(ds_send_reqdata, "oprsrvno",  "string", sOPRSPath.getColumn(i, "oprsrvno"));
                dsf_makeValue(ds_send_reqdata, "cartgubn",  "string", ds_init_querykey.getColumn(0, "cartgubn"));
                
                var goodstat = sOPRSPath.getColumn(i, "goodstat");

                if( (goodstat < "3" ) && ( prntinstr == "I"||prntcst == "C"||prntpad == "P" ) )
                	dsf_makeValue(ds_send_reqdata, "openflag", "string", "ALL");
                else if( goodstat < "3" )
                	dsf_makeValue(ds_send_reqdata, "openflag", "string", "CCR");
                else if( prntinstr == "I"||prntcst == "C"||prntpad == "P" )
                	dsf_makeValue(ds_send_reqdata, "openflag", "string", "CSR");
                                
                var oParam = {};
					oParam.id          = "TRMNP03008";
					oParam.service     = "opanstapp.OpAnstStocMngt";
					oParam.method      = "reqGetCcrtList";
					oParam.inds        = "reqdata=ds_send_reqdata";
					oParam.outds       = "ds_init_cartinfo_cartlist=cartlist";
					oParam.async       = false;					

				tranf_submit(oParam);
                
				ds_temp_prtlist.clearData();
                                        
				ds_temp_prtlist_suture.clearData();
				ds_temp_prtlist_supply.clearData();
				ds_temp_prtlist_sheet.clearData();
				ds_temp_prtlist_glove.clearData();
				
				ds_init_querykey_patoprsinfo_instrument.clearData();
				ds_init_querykey_patoprsinfo_supplies.clearData();
				ds_init_querykey_patoprsinfo_linen.clearData();

                
                //20110103_KNUH_Start
                var cureflag;
                var len;
                var inst = 0;
                var suture = 0;
                var sheet = 0;
                var glove = 0;
                var instrument = 0;
                var supplies = 0;
                var linen = 0;
            
                dsf_makeValue(ds_temp_prtlist, "oproomcdnm", "string", 		sOPRSPath.getColumn(i, "oproomcdnm"));
				dsf_makeValue(ds_temp_prtlist, "roomcd", "string", 			sOPRSPath.getColumn(i, "roomcd"));
				dsf_makeValue(ds_temp_prtlist, "orddeptcdnm", "string", 	sOPRSPath.getColumn(i, "depthngnm"));
				dsf_makeValue(ds_temp_prtlist, "opfromtmcdnm", "string", 	utlf_transNullToEmpty(sOPRSPath.getColumn(i, "fstrgstdt")).substr(11, 5));
				dsf_makeValue(ds_temp_prtlist, "pid", "string", 			sOPRSPath.getColumn(i, "pid"));
				dsf_makeValue(ds_temp_prtlist, "hngnm", "string", 			sOPRSPath.getColumn(i, "hngnm"));
				dsf_makeValue(ds_temp_prtlist, "sexage", "string", 			sOPRSPath.getColumn(i, "sa"));

				dsf_makeValue(ds_temp_prtlist, "diagcdnm", "string",		sOPRSPath.getColumn(i, "diagcdnm"));
                
                //KNUH, 수술번호 함께 출력 요청 (2011.01.24 JJE)
				var newOpcdNm = "";
				if (ds_init_querykey.getColumn(0, "opnmen") == "Y") { //영문
					newOpcdNm = sOPRSPath.getColumn(i, "opcdenm");
				} else {
					newOpcdNm = sOPRSPath.getColumn(i, "opcdknm");
				}
				newOpcdNm = newOpcdNm + " (수술번호: " + sOPRSPath.getColumn(i, "oprsrvno") + ")";
				dsf_makeValue(ds_temp_prtlist, "opcdnm", "string", 		newOpcdNm);
				dsf_makeValue(ds_temp_prtlist, "perfdridnm", "string", 	sOPRSPath.getColumn(i, "perfdridnm1"));
				dsf_makeValue(ds_temp_prtlist, "opcnfmdd", "string", 	sOPRSPath.getColumn(i, "opcnfmdd"));
				dsf_makeValue(ds_temp_prtlist, "oprsrvno", "string", 	sOPRSPath.getColumn(i, "oprsrvno"));
				dsf_makeValue(ds_temp_prtlist, "instcd", "string", 		sOPRSPath.getColumn(i, "instcd"));
				dsf_makeValue(ds_temp_prtlist, "deptflagnm", "string", 	deptflagnm);
				dsf_makeValue(ds_temp_prtlist, "curdd", "string", 		utlf_getCurrentDate());
				dsf_makeValue(ds_temp_prtlist, "curtm", "string", 		utlf_getCurrentTime());
				dsf_makeValue(ds_temp_prtlist, "usernm", "string", 		ds_init_userinfo.getColumn(0, "usernm"));
                
                len = ds_init_cartinfo_cartlist.rowcount;

				ds_temp_prtlist_suture.copyData(ds_init_cartinfo_cartlist);
				ds_temp_prtlist_suture.clearData();
				ds_temp_prtlist_supply.copyData(ds_init_cartinfo_cartlist);
				ds_temp_prtlist_supply.clearData();
				ds_temp_prtlist_sheet.copyData(ds_init_cartinfo_cartlist);
				ds_temp_prtlist_sheet.clearData();
				ds_temp_prtlist_glove.copyData(ds_init_cartinfo_cartlist);
				ds_temp_prtlist_glove.clearData();
				ds_init_querykey_patoprsinfo_instrument.copyData(ds_init_cartinfo_cartlist);
				ds_init_querykey_patoprsinfo_instrument.clearData();
				ds_init_querykey_patoprsinfo_supplies.copyData(ds_init_cartinfo_cartlist);
				ds_init_querykey_patoprsinfo_supplies.clearData();
				ds_init_querykey_patoprsinfo_linen.copyData(ds_init_cartinfo_cartlist);
				ds_init_querykey_patoprsinfo_linen.clearData();

				for (var j = 0; j < len; j++) {

					cureflag = ds_init_cartinfo_cartlist.getColumn(j, "cureflag");

					if (cureflag == "1") {                            							
						var addrow = ds_temp_prtlist_suture.addRow();
						ds_temp_prtlist_suture.copyRow(addrow, ds_init_cartinfo_cartlist, j);
					} else if (cureflag == "2") {                                                        
						var addrow = ds_temp_prtlist_supply.addRow();
						ds_temp_prtlist_supply.copyRow(addrow, ds_init_cartinfo_cartlist, j);                            
					} else if (cureflag == "7") {                                                        
						var addrow = ds_temp_prtlist_sheet.addRow();
						ds_temp_prtlist_sheet.copyRow(addrow, ds_init_cartinfo_cartlist, j);                            
					} else if (cureflag == "8") {                            
						var addrow = ds_temp_prtlist_glove.addRow();
						ds_temp_prtlist_glove.copyRow(addrow, ds_init_cartinfo_cartlist, j);
					} else if (cureflag == "4") {                                                        
						var addrow = ds_init_querykey_patoprsinfo_instrument.addRow();
						ds_init_querykey_patoprsinfo_instrument.copyRow(addrow, ds_init_cartinfo_cartlist, j);
					} else if (cureflag == "6") {                            
						var addrow = ds_init_querykey_patoprsinfo_supplies.addRow();
						ds_init_querykey_patoprsinfo_supplies.copyRow(addrow, ds_init_cartinfo_cartlist, j);
					} else if (cureflag == "10") {                            
						var addrow = ds_init_querykey_patoprsinfo_linen.addRow();
						ds_init_querykey_patoprsinfo_linen.copyRow(addrow, ds_init_cartinfo_cartlist, j);
					}
				} 
				//if (sOPRSPath.getColumn(i, "goodstat") < "3") { //임시, 저장일 경우만 출력
					if (prntgood == "G") {                                                       
						if(ds_temp_prtlist_suture.rowcount == 0){
							ds_temp_prtlist_suture.addRow();
						}
						if(ds_temp_prtlist_supply.rowcount == 0){
							ds_temp_prtlist_supply.addRow();
						}
						if(ds_temp_prtlist_sheet.rowcount == 0){
							ds_temp_prtlist_sheet.addRow();
						}
						if(ds_temp_prtlist_glove.rowcount == 0){
							ds_temp_prtlist_glove.addRow();
						}
						
						if(sysf_getUserInfo("dutplceinstcd") == "032"){
							var objDOM = rptf_createDOM();			
							rptf_setNodeListToDOM(objDOM, "root/temp/prtlist", ds_temp_prtlist);	// 데이터셋 1	
							rptf_setNodeListToDOM(objDOM, "root/temp/prtlist/suture", ds_temp_prtlist_suture);	// 데이터셋 1	
														
							var objDOM2 = rptf_createDOM();
							rptf_setNodeListToDOM(objDOM2, "root/temp/prtlist/supply", ds_temp_prtlist_supply);		// 데이터셋 2	
							rptf_setNodeListToDOM(objDOM2, "root/temp/prtlist/sheet", ds_temp_prtlist_sheet);	// 데이터셋 3	
							rptf_setNodeListToDOM(objDOM2, "root/temp/prtlist/glove", ds_temp_prtlist_glove);		// 데이터셋 4
							
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출														
							objParam.xml_data_XML2 = objDOM2.documentElement.source;														// 최상의노드 XML 스트링 추출							
						}else if(sysf_getUserInfo("dutplceinstcd") == "031"){
							var objDOM = rptf_createDOM();			
							rptf_setNodeListToDOM(objDOM, "root/temp/prtlist", ds_temp_prtlist);	// 데이터셋 1	
							rptf_setNodeListToDOM(objDOM, "root/temp/prtlist/suture", ds_temp_prtlist_suture);	// 데이터셋 2																								
							rptf_setNodeListToDOM(objDOM, "root/temp/prtlist/supply", ds_temp_prtlist_supply);		// 데이터셋 3	
							rptf_setNodeListToDOM(objDOM, "root/temp/prtlist/sheet", ds_temp_prtlist_sheet);	// 데이터셋 4	
							rptf_setNodeListToDOM(objDOM, "root/temp/prtlist/glove", ds_temp_prtlist_glove);		// 데이터셋 5
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출														
						}
									
						//var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
						var option = "open=1;save=1;directprint=1;print=1;zoom=0;printdialog=0;";
						rptf_exeReportPreview30(["RPMNP03001"],[objParam], option);
					}
				//}
               
          	    if (prntinstr == "I" || prntcst == "C" || prntpad == "P") { //기구, 소모품, 린넨/패드류 선택시
					if(ds_init_querykey_patoprsinfo.rowcount == 0){
						ds_init_querykey_patoprsinfo.addRow();
					}
					if(ds_init_querykey_patoprsinfo_instrument.rowcount == 0){
						ds_init_querykey_patoprsinfo_instrument.addRow();
					}
					if(ds_init_querykey_patoprsinfo_supplies.rowcount == 0){
						ds_init_querykey_patoprsinfo_supplies.addRow();
					}
					if(ds_init_querykey_patoprsinfo_linen.rowcount == 0){
						ds_init_querykey_patoprsinfo_linen.addRow();
					}
					
					var objDOM = rptf_createDOM();			
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo", ds_init_querykey_patoprsinfo);	// 데이터셋 1	
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/instrument", ds_init_querykey_patoprsinfo_instrument);	// 데이터셋 2	
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/supplies", ds_init_querykey_patoprsinfo_supplies);	// 데이터셋 3
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/linen", ds_init_querykey_patoprsinfo_linen);	// 데이터셋 4
					
					var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출								
					//var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
					var option = "open=1;save=1;directprint=1;print=1;zoom=0;printdialog=0;";
					rptf_exeReportPreview30(["RPMNP03004"],[objParam], option);	
				}
			
        
    }
    else { //응급불출
    	 if (iRows < 1) {
            sysf_messageBox("출력을 원하는 환자를 먼저", "C002");
            return;
    	}
    	else {
    		//for( var i = 1; i <= iRows; i++ ) {
    			//if( model.getValue(sOPRSPath+"["+i+"]/chk") == "true" ) {
    				oprsrvno = sOPRSPath.getColumn(i, "oprsrvno");
                    oproomcd = sOPRSPath.getColumn(i, "oproomcd");
                    ophistno = sOPRSPath.getColumn(i, "ophistno");
                    cartgubn = ds_init_querykey.getColumn(0, "cartgubn");
                    cnt2 += 1;
    				
    				//if( model.getValue(sOPRSPath+"["+i+"]/instrstat") >= "3" ) {
    					if (prntinstr == "I" || prntcst == "C" || prntpad == "P") {
                            prntinstrstat = "I3";
                            if (prntinstr == "I") {
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'4'";
                                } else {
                                    varcureflag = varcureflag + ", '4'";
                                }
                            }
                            if (prntinstr == "C") {
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'6'";
                                } else {
                                    varcureflag = varcureflag + ", '6'";
                                }
                            }
                            if (prntinstr == "P") {
                                if (utlf_isNull(varcureflag)) {
                                    varcureflag = "'10'";
                                } else {
                                    varcureflag = varcureflag + ", '10'";
                                }
                            }
                        } else {
                            prntinstrstat = "I" + sOPRSPath.getColumn(i, "instrstat");
                        }
    				//}else {
    				//	messageBox("불출이후에만 응급불출이 가능합니다.!", "E000");
    				//	return;
    				//	prntinstrstat = "I" + model.getValue(sOPRSPath+"["+i+"]/instrstat");
    				//}
					cnt += 1;
                    cartbaglist = cartbaglist + "e" + "▦" + cnt + "▦" + oprsrvno + "▦" + oproomcd + "▦" + cartgubn +
                        "▦" + prntgoodstat + prntinstrstat + "C1" + "▦" + prntgood + "▦" + prntinstr +
                        "▦" + prntcst + "▦" + varcureflag + "▦" + "E" + "▦" + sFlag + "▩";
                    
                    sPatOPRSInfoPath.clearData();
                    sPatOPRSInfoPath.addRow();
    				
    				dsf_makeValue(sPatOPRSInfoPath, "oproomcdnm", "string", 	sOPRSPath.getColumn(i, "oproomcdnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "roomcd", "string", 		sOPRSPath.getColumn(i, "roomcd"));
                    dsf_makeValue(sPatOPRSInfoPath, "orddeptcdnm", "string", 	sOPRSPath.getColumn(i, "depthngnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "opfromtmcdnm", "string", 	utlf_transNullToEmpty(sOPRSPath.getColumn(i, "fstrgstdt")).substr(11, 5));
                    dsf_makeValue(sPatOPRSInfoPath, "pid", "string", 			sOPRSPath.getColumn(i, "pid"));
                    dsf_makeValue(sPatOPRSInfoPath, "hngnm", "string", 			sOPRSPath.getColumn(i, "hngnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "sexage", "string", 		sOPRSPath.getColumn(i, "sa"));
                    dsf_makeValue(sPatOPRSInfoPath, "diagcdnm", "string", 		sOPRSPath.getColumn(i, "diagcdnm"));
                    dsf_makeValue(sPatOPRSInfoPath, "opcdnm", "string", 		sOPRSPath.getColumn(i, "opcdknm"));
                    dsf_makeValue(sPatOPRSInfoPath, "perfdridnm", "string", 	sOPRSPath.getColumn(i, "perfdridnm1"));
                    dsf_makeValue(sPatOPRSInfoPath, "opcnfmdd", "string", 		sOPRSPath.getColumn(i, "opcnfmdd"));
                    dsf_makeValue(sPatOPRSInfoPath, "oprsrvno", "string", 		sOPRSPath.getColumn(i, "oprsrvno"));
                    dsf_makeValue(sPatOPRSInfoPath, "instcd", "string", 		sOPRSPath.getColumn(i, "instcd"));
                    dsf_makeValue(sPatOPRSInfoPath, "cartgubn", "string", 		deptflag);
                    dsf_makeValue(sPatOPRSInfoPath, "deptflagnm", "string", 	deptflagnm);
                    dsf_makeValue(sPatOPRSInfoPath, "prntinstr", "string", 		prntinstr);
                    dsf_makeValue(sPatOPRSInfoPath, "prntcst", "string", 		prntcst);
                    dsf_makeValue(sPatOPRSInfoPath, "prntpad", "string", 		prntpad);
                    dsf_makeValue(sPatOPRSInfoPath, "goodcrflag", "string", 	"E");
                    dsf_makeValue(sPatOPRSInfoPath, "usernm", "string", 		ds_init_userinfo.getColumn(0, "usernm"));
    				
    				if (prntinstr == "I" || prntcst == "C" || prntpad == "P") { //기구, 소모품, 린넨/패드류 선택시
						if(ds_init_querykey_patoprsinfo.rowcount == 0){
							ds_init_querykey_patoprsinfo.addRow();
						}
						if(ds_init_querykey_patoprsinfo_instrument.rowcount == 0){
							ds_init_querykey_patoprsinfo_instrument.addRow();
						}
						if(ds_init_querykey_patoprsinfo_supplies.rowcount == 0){
							ds_init_querykey_patoprsinfo_supplies.addRow();
						}
						if(ds_init_querykey_patoprsinfo_linen.rowcount == 0){
							ds_init_querykey_patoprsinfo_linen.addRow();
						}
						
						var objDOM = rptf_createDOM();			
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo", ds_init_querykey_patoprsinfo);	// 데이터셋 1	
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/instrument", ds_init_querykey_patoprsinfo_instrument);	// 데이터셋 2	
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/supplies", ds_init_querykey_patoprsinfo_supplies);	// 데이터셋 3
						rptf_setNodeListToDOM(objDOM, "root/init/querykey/patoprsinfo/linen", ds_init_querykey_patoprsinfo_linen);	// 데이터셋 4

						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출	

						//var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
						var option = "open=1;save=1;directprint=1;print=1;zoom=0;printdialog=0;";
						rptf_exeReportPreview30(["RPMNP03004"],[objParam], option);	
                    }     
    				//exeReportPreview("RPMNP03004", "XML", sPatOPRSInfoPath, "", "true", "", "", "", "", "true", "", "", "", "emr");
    			//}
    		//} //end for
    	}
    }
    
	if (cnt2 < 1) {
		sysf_messageBox("출력을 원하는 환자를 먼저", "C002");
        return;
    }
    if (pFlag == "S") {
        group5.visible = false;
    }
}]]></Script>