YNU_JEUS/app_home/himed/webapps/emr/prcpmngtweb/js/SMMMO00100.js

/*function list
fBaseCdInit: 처방화면 공통코드 초기화
fInitializeScreen: 처방화면 세팅 초기화
fInitializeConDone: 처방화면 초기화 ( xforms-model-construct-done )
fInitializeReady: 처방화면 초기화( xforms-ready )
fDetlVw: 처방상세보기
fPrcpSrch: 처방검색(처방 그리드에서 처방명 쓰고 엔터치면 실행)
fPrcpDetl: 처방상세팝업
fPrcpDetlApp: 처방상세 입력내용을 메인에 적용
fMouseRghtBtnPopup: 오른쪽 마우스 팝업
fDrugInfo: 오른쪽 마우스 팝업 약정보
fDeleteRow: 오른쪽 마우스 클릭 삭제
fCnclDel: 오른쪽 마우스 클릭 삭제,D/C 취소
fPrcpBuffer:  함수 호출시 선택된 데이터를 특정 노드에 담아둔다.
fDelUndo: 마지막 삭제시 버퍼에 담겨둔 것을 되살린다.
fGridDrag: drag 시 이동할 grid 인스턴스 저장    
fGridDrop: drop위치에 인스턴스 mapping, 본체 remove, 이동한 row select
fSaveExistCheck: 처방 데이터 저장시 저장할 데이터가 있는 지 check
fPrcpSave: 처방 데이터 저장
fPrcpSavePatList: 진료대상자 리스트에서 환자 호출시 저장할 데이터가 있을 시 저장한다.
fPrcpSort: 처방정렬 
bfDrugCalc: 용량, 수량, 횟수의 수정전 값을 instance에 넣어둔다.
DrugCalc: 용량, 수량, 횟수를 수정했을 때 값계산
fPreWorkUp: PreWorkUp 오른쪽 마우스 클릭 ( BMT )
fPrcpDdCheck: 정규, 추가처방 처리
fTempPrcp: 임시처방
fDiagSrch: 진단검색
fDaigMouseRghtBtnPopup: 진단 오른쪽 마우스 클릭
fDiagDeleteRow: 환자진단삭제
fDiagUpdate: 환자진단수정
fPatDiagSrch: 환자진단검색
fMediDayNo: 투약일수조회
fDiagDetlVw: 진단상세보기
fDentifmla: 치식
fPrcpdelivefact: 전달사항 일괄입력
fReqfrm: 병리의뢰지 호출하기
fGetSpc: 진단검사 검체 호출 
fPrmsPrcp: 약속처방등록
fBaseMthd: 경구약 기본용법 조회
fScrnInitialize: 처방화면 초기화
fPrcpCopy: 처방화면 오른쪽 마우스 클릭 처방복사
fInitPaminfo: 전처방에서 급비변경후 환자정보 다시 SETTING
fPrcpWndClose : 처방화면 close
fSubjPrcpChk : 임상연구탭 view가능 여부 체크
fInitPrcpWnd : 처방화면 초기화
fXformsReady : 처방화면 초기화 (처음 열린 경우 )
fXReReady : 처방화면 초기화 (다시 열린 경우)
*/

//변수선언
var prcpclscd = 2; 
var prcpKindCdCol = 3;      //처방종류 index
var prcpnmCol = 5;          //처방명 컬럼 index
var prcpVolCol = 6;         //용량 컬럼 index
var prcpQtyCol = 8;         //수량 컬럼 index
var prcpTimsCol = 10;       //횟수 컬럼 index
var prcpDayNoCol = 11;      //일수 컬럼 index
var prcpDeliveFactCol = 15; //전달사항 컬럼 index
var prcpHopeHdCol = 18;     //희망일자 컬럼 index
var ContPrcpDdRow = 6;      //지정일 instance row

var prcpNode = "/root/main/prcp/prcplist";
var diagNode = "/root/main/diaginfo/diagcdlist";

var prcpgenrflag = "";      //외래입원구분
var bfPrcpdd = "";          //처방일자를 바꾸기 전의 값을 담아둠
var diagnmCol = 4;

var SubmitTF_SMMMO00110 = false;        //MM)00101.js 에서 fPrcpSave()를 호출 시, 서브밋 성공여부 담음.(2008.01.29)

/**@desc   : 처방화면 공통코드 초기화
 * @id     : model1
 * @event  : xforms-model-construct-done
 * @return : void
 * @authur : 마정민 2007. 3. 14
 */
function fBaseCdInit() {
    mmbfGetDeptCodeComboList("/root/temp/reqdata", "/root/issdept", "I");
    fPrcpExecDeptSrch("all");
    zbcfGetCodeList(new Array("M0003",
                              "M0005",
                              "M0011",
                              "P0034",
                              "M0029",
                              "M0040",
                              "M0046",
                              "M0007",
                              "M0545"), 
                    new Array("/root/init/prcpkindcd",
                              "/root/init/prcpclscd",
                              "/root/init/prcpstatcd",
                              "/root/init/hosinprcpresncd",
                              "/root/init/payflagcd",
                              "/root/init/M0040",
                              "/root/init/rehbprcpcurepartcd",
                              "/root/init/opansflagcd",
                              "/root/init/conttestintvlflag"));

    fGetHardCDList("N", 274, 0 , "/root/hidden/c6specdrlist");
    fGetHardCDList("N", 275, 0 , "/root/init/autosetprcplist");
    fGetHardCDList("N", 282, 0 , "/root/hidden/securelimitdeptlist");
    fGetHardCDList("N", 285, 0 , "/root/hidden/specprcpdrinfo");  // 영상의학과 선택진료 교수 자동 배정
    fGetHardCDList("N", 287, 0 , "/root/hidden/d2specdrlist");  // 병리과 의사 자동배정
    fGetHardCDList("N", 289, 0 , "/root/hidden/b2specdrlist");  // 진검 선택진료 의사 자동배정
    fGetHardCDList("N", 270, 0 , "/root/init/operationroominfo");   // 일일수술실 수술방을 조회한다. 
    
    //20110211 mjm 추가 선택진료의 로그인 했을 때 가져오는 것으로 수정
    var srcNodes = instance1.selectNodes("/root/initsrch/usercombo");   
    if ( srcNodes.length > 0 ) {              
        var specdrinfoNodes = instance1.selectNodes("/root/init/specdrinfo/usercombo");
        if ( specdrinfoNodes.length < 2 ) {
            var targetNodes = instance1.selectSingleNode("/root/init/specdrinfo");
                for(i=0; i<srcNodes.length; i++) {
                    var newNode = srcNodes.item(i).cloneNode(true);
                    targetNodes.appendChild(newNode);
                }
        }   
    } else  {
        // 2018.01.02 엄영만 선택진료 종료로 인해 아래의 로직 주석 처리
        //messageBox("현재 프로그램 배포로 인해 진료에 필요한 데이터를 재조회 해야합니다. 죄송하지만 반드시 다시 로그인 해주시기 바랍니다.", "");         
        mmbfGetUserComboList("/root/send/reqdata", "/root/init/specdrinfo" , getUserInfo("dutplcecd"), "0330", "", "M", "", "", "", "Y"); // 선택진료의사 리스트를 조회한다. 
    }
}

/**@desc   : 처방화면 세팅 초기화
 * @id     : model1
 * @event  : xforms-model-construct-done
 * @return : void
 * @authur : 마정민 2007. 3. 14
 */
function fInitializeScreen() {
    
  //처방화면 위치 선정 2008. 06. 02 오지훈, 두번째 모니터에서 띄어진 경우 중간에 띄지 않는 문제 해결
  //var xpt     = window.screenleft + eval(0);
  //var ypt     = window.screenTop  + eval(0);
  //var coord   = getRelativeCoordinate ( xpt, ypt );
  //alert(xpt + "," + ypt);
  //window.left = xpt;
  //window.top  = ypt;
  
  //처방화면 초기화시 일일 용량으로 할지 1회 용량으로 할지에 따라서 보여지는 컬럼값 변경
  // DB에 저장된 병원기준값을 가지고 와서 보여주는 컬럼을 셋팅한다. 
  var colHidnValue = grdBaseColHidn("D");
  grdBaseColHidn(colHidnValue);  
  //처방화면 초기화
  grd_prcplist.col = prcpnmCol;
  grd_prcplist.row = grd_prcplist.rows - 1;
  
  //진단화면 초기화
  grd_diaglist.col = diagnmCol;
  grd_diaglist.row = grd_diaglist.rows - 1;
  
  // 처방 메인 refresh 단일화를 위한 셋팅 - 20081212 by Moonsh
  var refreshInfo = getGlobalVariable("OrderMainRefresh");
  if ( refreshInfo != "Y" ) {
    model.setfocus( "grd_prcplist" );    
    //btn_editcell.dispatch("DOMActivate"); //처방 인증저장 후 다른 화면 클릭 시 화면 죽는 현상을 막고자 강제 editmode 설정 막음 (서소영선생님고 협의, 2010.02.01 JJE)
    model.recalculate();        
  }  

}


/**@desc   : 처방화면 초기화
 * @id     : model1
 * @event  : xforms-model-construct-done
 * @return : void
 * @authur : 마정민 2007. 3. 14             
 */
function fInitializeConDone(saveFlag) {
    
    //처방 속도개선을 위한 시간 체크 set 20101027  LYJ
    try {
         var SMMMO00100_S = new Date();
         var ordPatObj = getOpenWindow("SMMMO04100");    
         var SMMMO04100_chk = ordPatObj.javascript.getParameter("SMMMO04100_chk");
         if(ordPatObj != null && SMMMO04100_chk  == "Y"){
              ordPatObj.javascript.setParameter("SMMMO00100_S3",SMMMO00100_S.getTime());
          }
     } catch(e) {
     }
    //xforms-ready 에 썼더니 변하는게 보인다.
    
    // 2007.12.07 추가 (Cp창이 열려있다면 close)
    grd_prcplist.backcoloralternate = "transparent";
    grd_diaglist.backcoloralternate = "transparent";
    model.removeNodeSet ( prcpNode );                                      //처방화면 그리도 초기화
    appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" ); //검색라인추가
  
    var prcpgenrflag = "";
    var patFlagCvs = getGlobalVariable("patflag");
    if(patFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
        model.removeNodeSet ( "/root/patflag/list" ); //상단화면 정보 초기화
        setCSVToNode ( "/root/patflag", patFlagCvs );
        prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    }
    
    var pamInfoCvs = getGlobalVariable("paminfo");
    var insukindcd = getPatientInfoDetail("insukind");
    var vopt_insuinfo = "";
    if(pamInfoCvs != null){ //cvs가 null이 아닌 경우에만 처리함.
        model.removeNodeSet ( "/root/paminfo/list" ); //상단화면 정보 초기화
        setCSVToNode ( "/root/paminfo", pamInfoCvs );
        model.setValue ( "/root/init/pid", model.getValue ( "/root/paminfo/list/pid" ));
        
        var vopt_patinfo  = model.getValue ( "/root/paminfo/list/dispnm2" ) + " " + model.getValue ( "/root/paminfo/list/sex" ) + "/" + model.getValue ( "/root/paminfo/list/age" );
        if ( model.getValue ( "/root/paminfo/list/roomcd" ) != "" ){
            vopt_patinfo = vopt_patinfo + " " + model.getValue ( "/root/paminfo/list/roomcd" ) + "호";
        }
      
        if(prcpgenrflag == "O" && model.getValue ( "/root/paminfo/list/dnoracptyn" ) == "Y") {
            vopt_patinfo = vopt_patinfo + " [donor w/u]";
        }
        
        if(prcpgenrflag == "I" || prcpgenrflag == "E" || prcpgenrflag == "D") { 
            if(getPatientInfoDetail("drgyn") == "Y") { //DRG 환자 표시 2013.05.06 엄영만
                vopt_patinfo = vopt_patinfo + " [DRG]";
            }
            
            var nHospitalDay = model.getValue ( "/root/paminfo/list/hospitalday"); 
            try {
                nHospitalDay = parseInt(nHospitalDay);
            } catch(err) {
                nHospitalDay = 1;
            }
            if(nHospitalDay > 30) { // 30일 이상 장기재원환자 재원일수 표시 2017.01.19 엄영만
                vopt_patinfo = vopt_patinfo + " HD[" + nHospitalDay + "]";
            }
        }
        
        model.setValue ( "/root/init/patinfo", vopt_patinfo );
        
        if (insukindcd == "21"){
            vopt_insuinfo = "의료급여1";
        }else if (insukindcd == "22"){
            vopt_insuinfo = "의료급여2";
        }else if (insukindcd == "81"){
            vopt_insuinfo = "장기요양";
        }else{
            vopt_insuinfo = getPatientInfo("insukind");
        }
        
        vopt_insuinfo =  vopt_insuinfo + " " + getPatientInfo("suppkind");
        
        model.setValue ( "/root/init/insuinfo", vopt_insuinfo );
        
        var sReMark = "";
        if( prcpgenrflag == "O" && model.getValue( "/root/paminfo/list/durdiagyn") == "Y") { // 당일 배치로 실행된 DUR 특정질병 점검에서 내용이 존재하면 2015.06.23 엄영만
            sReMark = sReMark + "[DUR 질병점검] 버튼을 클릭하여 관련 내용을 확인하세요.\n\n"; // DUR 특정질환 점검 내용이 있을경우
        }
        var sWarnMsg = model.getValue("/root/paminfo/list/warnmsg");
        if(!isNull(sWarnMsg)) {// 주의요망 환자 메세지
            sReMark = sReMark + sWarnMsg + "\n\n"; 
        }
        if ( insukindcd == "31" || insukindcd =="41"){
            if (getPatientInfoDetail("ioflag") == "O"){
                sReMark = sReMark + "자보/산재 환자입니다. \n관련 처방을 모두 [급여]로 처방하여 주시기 바랍니다.\n기왕증은 건강보험으로 재접수하여 처방해 주시기 바랍니다.";
            }else {
                sReMark = sReMark + "자보/산재 환자입니다. \n관련 처방은 모두 [급여]로 처방하여 주시기 바랍니다. \n그 외 처방은 처방 상세팝업에서 기왕증 체크 후 처방해 주시기 바랍니다.";
            }
        }
        
        if(!isNull(sReMark)) {
            model.makeValue ( "/root/paminfo/list/remark",  sReMark);
            group_rmk.visible = true;
        }
    }
    
    //종속처방번호, 믹스번호, hsctlnkno 초기화
    model.setValue ( "/root/init/inclprcpno", 0 );
    model.setValue ( "/root/init/hsctlnkno", 0 );
    model.setValue ( "/root/init/prcpmixno", 0 );
    
    //PRN 적용여부를 실시간으로 가져와서 체크한다. 2010-01-02 by LYJ 
    reqHardCodeInfo("/root/hidden/prnprcpyninfo", "/root/hidden/prnprcpyninfo", "173");
    model.makeValue( "/root/save/saveflaginfo/prnprcpyninfo", model.getValue("/root/hidden/prnprcpyninfo/hardcd/hardcd") );
    if ( prcpgenrflag == "O" || prcpgenrflag == "S" ){ //외래일때
        cmb_prcpkind.visible      = false; 
        cmb_prcpdd.visible        = false;
        cmb_issdept.visible       = true;
        cmb_hosinprcpresn.visible = true;
        btn_issdept.visible       = true;
        caption1.visible = true;
        // 2016.10.27 엄영만 되의뢰버튼 사용하지 않음 처리
        //button21.visible = true;       //kimsj 되의뢰버튼 
        cmb_issdept.attribute ( "left" ) = "454";
        btn_issdept.attribute ( "left" ) = "558";
        cmb_hosinprcpresn.attribute( "left" ) = "695";
        cmb_hosinprcpresn.attribute( "width" )= "240";  //298-58=240
        
        btn_prcpsave2.disabled = false;  // 진료예약 + 인증저장
        //btn_prcpsave3.disabled = false;  // 가셔야할 곳 출력 및 인증저장
        bool_patgolistprtyn.disabled = false;
        btn_prtpattogo.visible = true;
        
        grd_prcplist.colHidden(prcpKindCdCol) = true;
        
        model.setValue ( "/root/init/prcpkindcd", "20" ); //처방종류(추가)
        model.setValue ( "/root/init/prcpdd", model.getValue ( "/root/paminfo/list/orddd" ));
        
        //20110104. mjm수정. 경부의 원무 프로세스상 원무의 환자원내 사유를 가져오지 않게 주석처리
        //2013.08.08 엄영만 수정 정신과 해바라기센터 의뢰 환자의 원내 사유 설정.
        if( "2030000000" == model.getValue("/root/paminfo/list/orddeptcd") && "29" == model.getValue("/root/paminfo/list/hosoutexptresncd") ) {
            model.setValue ( "/root/init/hosinprcpresncd", "29"); // 협진(한양방, 양한방, 양양방)환자  정신과 해바라기센터 의뢰 환자 체크
        } else {
        	//2013/09/30 인증 저장됐을시 인증저장 된 값으로 원내처방사유를 세팅(이정택)
        	if(saveFlag=="save"){
        		model.setValue ( "/root/init/hosinprcpresncd", model.getValue("/root/paminfo/list/hosoutexptresncd"));	
        	}else{
        		model.setValue ( "/root/init/hosinprcpresncd", "00");
        	}
        }
        
        //20080927 마정민 수정. 외래환자가 암센터인경우는 발행처를 암센터로 한다.
        // 20101227 김영학 수정 외래환자가 센터로 접수한 경우는 발행처를 센터로 한다. 
        // 2010. 12. 31 특정 센터만 발행처를 센터로 한다. 칠곡병원 김진경 선생님 요청
        var patcentcd    = model.getValue ( "/root/paminfo/list/centcd" );
        var patorddeptcd = model.getValue ( "/root/paminfo/list/orddeptcd" );
        if(fContainsHardCD("264", patorddeptcd)) {              // 진료과가 포함 되면 진료과로 설정 (센터내 특정진료과만 집계를 틀리게 하기 위해) 2013.12.11 엄영만
            model.setValue ( "/root/issdept", patorddeptcd);
        } else if(fContainsHardCD("264", patcentcd)) {
            model.setValue ("/root/issdept", patcentcd);
        } else {
            model.setValue ( "/root/issdept", patorddeptcd);
        }
    } else { //입원, 응급일때           
        if (prcpgenrflag == "I") {
            model.setValue ( "/root/init/hosinprcpresncd", "00"); 
            // 2016.10.27 엄영만 되의뢰버튼 사용하지 않음 처리
            //button21.visible = false;       //kimsj 되의뢰버튼 - 입원일 경우 보이지 않도록 설정
        } else {             
            model.setValue ( "/root/init/hosinprcpresncd", model.getValue ( "/root/paminfo/list/hosoutexptresncd" ));     
            // 2016.10.27 엄영만 되의뢰버튼 사용하지 않음 처리
            //button21.visible = true;    //kimsj 되의뢰버튼
        }
        
        // 응급실 발행부서 관련 셋팅. 응급실 환자의 경우 센서스에 등록되어 있는 부서코드로 발행부서를 셋팅해준다.2012.04.24 엄영만       
        var erissdeptcd = model.getValue("/root/paminfo/list/erissdeptcd");
        if (prcpgenrflag == "E" && !isNull(erissdeptcd) && erissdeptcd != "-") {
            model.setValue (  "/root/issdept", erissdeptcd);
        } else {
            model.setValue ( "/root/issdept", model.getValue ( "/root/paminfo/list/wardcd" ));
        }
        
        if ( saveFlag != "save" || isNull(model.getValue ( "/root/init/prcpdd" ))) {
            model.setValue ( "/root/init/prcpdd", getCurrentDate());
        }
        
        cmb_hosinprcpresn.visible = false;
        cmb_prcpkind.visible      = true; 
        cmb_prcpdd.visible        = true;
        cmb_issdept.visible       = true;    
        caption1.visible          = false;
        btn_issdept.visible       = true;
        grd_prcplist.colHidden(prcpKindCdCol) = false;
        
        cmb_issdept.attribute ( "left" ) = "662";
        btn_issdept.attribute ( "left" ) = "764"; 
        
        btn_prcpsave2.disabled = true;  // 진료예약 + 인증저장
        bool_patgolistprtyn.disabled = true;
        btn_prtpattogo.visible = false;
        
        //by sonjy 20081020 입원 일때만 정규 처방 시간 check  
        // by 김영학 2010. 12. 29 정규처방 입력시간을 하드코드 테이블 활용 수정 ( 261번)
        fGetHardCDList("N", 261, 0 , "/root/hidden/nomalordertm");             
        var nomalordrendtm = model.getValue("/root/hidden/nomalordertm/hardcd[cdseqno = '1']/hardcd");
        var nomalordrstrttm = model.getValue("/root/hidden/nomalordertm/hardcd[cdseqno = '2']/hardcd");
        if ( eval (getCurrentTime().substr (0,2)) <= parseInt(nomalordrendtm)  && prcpgenrflag == "I") { //처방종류: 4시전이면 정규
            model.setValue ( "/root/init/prcpkindcd", "10" );
        } else if ( eval (getCurrentTime().substr (0,2)) >= parseInt(nomalordrstrttm)  && prcpgenrflag == "I" ) { //9시 이후면 정규, 날짜는 다음날짜
            model.setValue ( "/root/init/prcpkindcd", "10" );
            var nextDay = getCurrentDate().toDate().getAddDate(1,"D").getDateFormat(); //다음날을 찾는다.  
            model.setValue ( "/root/init/prcpdd", nextDay  );
        }  else { //추가처방
            model.setValue ( "/root/init/prcpkindcd", "20" );
        } 
        
        if ( prcpgenrflag == "E" || prcpgenrflag == "D" ) {
            cmb_hosinprcpresn.visible = true;
            model.setValue ( "/root/init/prcpkindcd", "20" );
            cmb_hosinprcpresn.attribute ( "left" )  = "786";
            cmb_hosinprcpresn.attribute ( "width" ) = "147";  //204-57=147
        }
    }

    //@@@ 조영제 부작용 관리팝업 한번만 띄우기 위해 관련 paramter를 저장 후에 초기화 하도록 수정 (2010.07.16 JJE)
    clearParameter("SPAER01900_popupYN");
    clearParameter("SPAER01900_prcpcd");
    clearParameter("SPAER01900_lnkno");

    //협진명을 처방화면에 표시, 2008.04.26 오지훈  
    var cnsttypenm = getPatientInfoDetail("coopteamnm");
    if(cnsttypenm == ""){
        opt_cnsttypenm.visible = false;
        //2016.10.27 엄영만 협진회의목록버튼 숨김 처리, 협진명 클릭 이벤트로 대체
        //btn_cnstconf.visible   = false;
    }else{
        model.setValue("/root/init/cnsttypenm", cnsttypenm);
        opt_cnsttypenm.visible = true;
        //2016.10.27 엄영만 협진회의목록버튼 숨김 처리,  협진명 클릭 이벤트로 대체
        //btn_cnstconf.visible   = true;
    }
    // 선택진료 위임여부를 처방화면에 표시 , 2008. 05. 29 김영학
    var specordtypenm = getPatientInfoDetail("specordtypenm");
    if (specordtypenm == "-" || isNull(specordtypenm)) {
        model.setValue("/root/init/specordtypenm", "");
        opt_specordtypenm.visible = false;
    } else {
        model.setValue("/root/init/specordtypenm", specordtypenm);
        opt_specordtypenm.visible = true;    
    }
  
    //의뢰서회신 관련 정보 처리  kimsj 20100208 수정 (회신정보 없을 경우 보이지 않도록 수정) 
    if(model.getValue("/root/paminfo/list/replyn")=="N"){      
        model.setValue("/root/init/repltypenm", model.getValue("/root/paminfo/list/repltypenm"));
    } else {
        model.setValue("/root/init/repltypenm", "");
    }
  
    //중증등록 유효기간 만료 표시 [중증등록 종료일자 기준 -1개월 ~ +18개월]  kimsj 100818
    var sdoaendchk = getPatientInfoDetail("sdoaendchk");
    if (sdoaendchk == "Y") {
        model.setValue("/root/init/sdoaendnm", "[중증등록 유효기간 만료]");
        opt_sdoaendnm.visible = true;
    } else {
        model.setValue("/root/init/sdoaendnm", "");
        opt_sdoaendnm.visible = false;    
    }
  
    //20080731 마정민 수정 수술탭에서 선택한 것은 수술후에서 수술중으로 처리
    var operationFlagCvs = getGlobalVariable("operation");  
    if(operationFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
        model.removeNodeSet ( "/root/operation/list" ); //상단화면 정보 초기화
        setCSVToNode ( "/root/operation", operationFlagCvs );
        model.setValue ( "/root/init/prcpkindcd", "35" );
    } else {
        model.removeNodeSet ( "/root/operation/list" );
    }
    
    bfPrcpdd = model.getValue ( "/root/init/prcpdd" );
    if(isNull(pamInfoCvs)){
        return;
    }   
      
    //20080818 마정민 수정. 처방 저장후 불러오는 건은 app에서 호출하는 걸로 수정.
    if ( saveFlag == "save" ){
        model.copyNode ( "/root/initsrchprcp", "/root/savertninfo" );
        //temp에 딸려온 데이터는 삭제한다.
        model.removeNodeset ( "/root/initsrchprcp/prcplist" );
        model.removeNodeset ( "/root/initsrchprcp/saveestmspclcs" );
        model.removeNodeset ( "/root/initsrchprcp/saveserdiagappfrm" );
        model.removeNodeset ( "/root/initsrchprcp/savelglydis" );
        model.removeNodeset ( "/root/initsrchprcp/saverareobst" );
    } else {
        fInitSrch();
    }

    if ( prcpgenrflag == "O" ){ //외래일때
        //20090316 마정민 수정. login 정보에서 당인선검사 사용여부 가져옴
        if ( model.getValue ( "/root/initsrch/pretest/trgtcd" ) == "Y" ) {
            b_aftrcpt.visible = true;
            txt_aftrcpt.visible = true;
        }
    } else {
        b_aftrcpt.visible = false;
        txt_aftrcpt.visible = false;
    }

    //20090428 마정민 추가. 외래수술로 추가
    if (!isNull(model.getValue ( "/root/operation/list/oprsrvno"))){
        txt_aftrcpt.visible = false;
        b_aftrcpt.visible = false;
        cmb_prcpkind.visible = true;
    } 

    if ( model.getValue ( "/root/init/setprcpyn" ) == "Y" && saveFlag != "save" ){     
        if ( model.getValue ( "/root/cp" ) != "Y" ) {
            //전처방의 로딩여부 초기화, bfprcpload를 N으로 설정해야 진료기록을 띄울 수 있음 2008.02.12 오지훈
            model.setValue("/root/init/bfprcpload", "N");           
            btn_ivbfprcp.selected = true;
            ivw_prcp3.src = "SMMMO02100_전회처방.xrw";
        }
    }
  
    //ivw_prcp3추가 관련 로직 이동 및 변경.. by sonjy  2008-08-20 start 
    if ( model.getValue("/root/init/detlivw") == "m" ) {
        if ( model.getValue ( "/root/cp" ) != "Y" ) {
            if(ivw_prcp.visible == true )ivw_prcp.window.javascript.fIvwDetlVwCom(); 
        }else{
            if(ivw_prcp2.visible == true ) ivw_prcp2.window.javascript.fIvwDetlVwCom();
        }
    } else if ( model.getValue( "/root/init/detlvw" ) == "m"  ) {
        if ( model.getValue ( "/root/cp" ) != "Y" ) {
            if(ivw_prcp.visible == true ) fDetlVw("y"); ; 
        }else{
            if(ivw_prcp2.visible == true ) fDetlVw("y"); ;
        } 
    } 
  
    if( btn_ivbfprcp.selected == true ) {
        if ( model.getValue("/root/init/detlivw") == "m" ) {
            ivw_prcp3.window.javascript.fIvwDetlVwCom("bf"); 
        } else if ( model.getValue( "/root/init/detlvw" ) == "m"  ) {
            fDetlVw("y");             
        }
        ivw_prcp3.visible = true;
        if ( model.getValue ( "/root/cp" ) != "Y" ) {
          
            ivw_prcp.visible = false;
        }else{
            ivw_prcp2.visible = false;
        } 
    }
    //ivw_prcp3추가 관련 로직 이동 및 변경.. by sonjy  2008-08-20 end
  
    if ( model.getValue ( "/root/anst/paramyn") != "Y" ) {
        if ( !isNull(model.getValue ( "/root/operation/list/oprsrvno")) && prcpgenrflag == "O") {
            cmb_prcpkind.disabled = true;
        } else {
            cmb_prcpkind.disabled = false;
        }
    } 
  
    // 외래에서 로그인 한 의사의 부서와 환자의 부서가 같지 않을 경우 인증저장 버튼 비활성 - 20081015 by Moonsh
    var orddeptcd    = model.getValue("/root/paminfo/list/orddeptcd");       // 환자의 진료과 
    var instcd       = getUserInfo("dutplceinstcd");                         // 로그인 사용자의 기관기호
    var userdeptcd   = getUserInfo("dutplcecd");                             // 로그인 사용자의 부서코드 
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" ); // 입원, 외래 정보   
    var oprsrvinfo   = model.getValue ( "/root/operation/list/oprsrvno");   
    var chkDisbBtnYN = "N";  //20091015 by JJE 추가
    if ( prcpgenrflag == "O" ){
        if ( orddeptcd != userdeptcd ) {
            if ( isNull(oprsrvinfo) ) {
                if(instcd == "032" && orddeptcd == "2110000000" && fContainsHardCD("445", userdeptcd)) {
                    // 2014.04.01 엄영만 칠곡 소아청소년과 분과 관련 이전 처방을 DC 할수 있도록 하기 위해 조건 추가
                }
                else if(instcd == "031" && fContainsHardCD("528", orddeptcd) && fContainsHardCD("529", userdeptcd)) {
                    // 2016.04.26 이윤주 본원 치과 분과 관련 이전 처방을 특정과가 DC 할수 있도록 하기 위해 조건 추가
                } else {
                    btn_prcpsave.disabled = true;
                    btn_prcpsave2.disabled = true;
                    btn_prcpsave.hint = "선생님의 부서와 환자의 부서가 같지 않아서 인증 저장을 할 수 없습니다.";               
                    btn_prcpsave2.hint = "선생님의 부서와 환자의 부서가 같지 않아서 인증 저장을 할 수 없습니다.";               
                    chkDisbBtnYN = "Y";  //20091015 by JJE 추가
                }
            }
        }
    }
    
    //20140407 엄영만 직종코드가 의사가 아니면 인증저장 버튼 비활성화 처리
    var jobkindcd = getUserInfo("jobkindcd");
    if ( !fContainsHardCD("69", jobkindcd) && !fContainsHardCD("531", jobkindcd)) { // 531 은 테스트 사용자(의사직종 이외에 처방가능 직종)
        btn_prcpsave.disabled = true;
        btn_prcpsave2.disabled = true;
        btn_prcpsave.hint  = "의사직종의 사용자가  아니므로 인증저장 할 수 없습니다.";
        btn_prcpsave2.hint = "의사직종의 사용자가  아니므로 인증저장 할 수 없습니다.";
        chkDisbBtnYN = "Y";  //20091015 by JJE 추가
    }
  
    if ( prcpgenrflag == "E" ){
        var mainObj = getMainViewer();     
        var ordPatObj = mainObj.javascript.getOpenWindow("SMMMO04100");    
        if(ordPatObj != null){ //두 객체값이 다른 경우 새로운 진료대상자 화면을 open함
           var callvisityn = ordPatObj.javascript.getParameter("SMMMO04100_callvisityn");
           model.makeValue("/root/tmp/callvisityn",callvisityn)
           if (callvisityn == "N")  {
              btn_prcpsave.disabled = true;
              btn_prcpsave2.disabled = true;
              btn_prcpsave.hint = "응급실 Visit Time을 등록 하지 않으면 기록과 처방은 임시저장만 가능 합니다.";     
              btn_prcpsave2.hint = "응급실 Visit Time을 등록 하지 않으면 기록과 처방은 임시저장만 가능 합니다.";     
              chkDisbBtnYN = "Y";       
           }
        } 
    }// 응급실 call visit 하지 않으면 처방 인증저장만 가능 20100527 by LYJ

    //20091015 by JJE 처방 창 사용 도중 저장버튼 비활성화 처리 될 수 있으므로(fChkInCnclYN() 추가에 따라) 화면 환자 전환 시 활성화 처리 필요
    if(chkDisbBtnYN == "N"){
        btn_tempsave.hint = "";
        btn_prcpsave.hint = "";
        btn_prcpsave2.hint = "";
        btn_tempsave.disabled = false;
        btn_prcpsave.disabled = false;
        btn_prcpsave2.disabled = false;
    }

    // 처방 메인 refresh 단일화를 위한 셋팅 - 20081212 by Moonsh
    var refreshInfo = getGlobalVariable("OrderMainRefresh");
    if ( refreshInfo != "Y" ) {
        model.refresh();
    }

    //DUR-S by sonjy 20091207 환자 선택이 바뀔때 이전 difguid초기화  durappyn : "A:DUR전체사용", "Y:DUR중 저함량제외", "나머지:DUR 사용안함" , "K:경북대용 DUR"
    if ( model.getValue( "/root/initsrch/durappyn/trgtcd" ) == "A" || model.getValue( "/root/initsrch/durappyn/trgtcd" ) == "Y") {
        if( saveFlag != "save" ) model.makeValue("/root/init/bf_difguid", "");
    }//DUR-E
    
    if(typeof(ivw_prcpdetail) == "object" && ivw_prcpdetail.visible) { // 처방 상세화면이 표시 되어 있으면 초기화
        ivw_prcpdetail.window.javascript.fPrcpClick();	
    }
}

/**@desc   : 처방화면 초기화
 * @id     : model1
 * @event  : xforms-ready
 * @return : void
 * @authur : 마정민 2007. 3. 14
 */
function fInitializeReady(diag) {
  var patFlagCvs = getGlobalVariable("patflag");    

  if(patFlagCvs.length == 0 ) { 
      messageBox ( "환자정보가", "I004" );
      window.close();
      return;
  }

  //진단검색 호출
  if (isNull(diag)){
    fPatDiagSrch();
  }
  model.refresh();
  //처방 Lock 정보 호출
  //fgetPrcpLock();
  fInitializeScreen();

  //CP화면에서는 마지막에 처리
  if ( model.getValue ( "/root/cp" ) != "Y" )   {
      fDrugPrcpDc();      // 간호 반납요청 처방
      fConfirmTellPrcp(); // 미확인 간호 구두 처방
      fTempPrcp(); 
      //외래검사처방 입원전환 ( 주사연속처방, 물리치료 연속처방은 제외 )
      fSaveRsrvPrcpCvrt();
      fPainCnt();  
  } 
  
  // 처방 메인 refresh 단일화를 위한 셋팅 - 20081212 by Moonsh
  var refreshInfo = getGlobalVariable("OrderMainRefresh"); 
  if ( refreshInfo == "Y" ) { 
    setGlobalVariable("OrderMainRefresh", "N"); 
  } 
  grd_diaglist.refresh(); 

  model.refresh(); 

}

/**@desc   : 처방 상세보기
 * @param  : 전처방, 연속처방, 처방검색 탭버튼 눌렀을 경우 원복 orgflag => Y
 * @id     : btn_detlvw
 * @event  : DOMActivate
 * @return : void
 * @authur : 마정민 2007. 3. 12
 */
function fDetlVw ( orgflag ) {
 
   var grdLeft = 383;
   var grdWidht = 811;
   var extnGrdLeft = 5;
   var extnGrdWidht = 1187;

//   var ivwLeft = 8;
//   var ivwWidth = 416;
//   var minIvwLeft = ivwLeft;
//   var minIvwWidth = 7;

   var lineX1 = grdLeft; 
   var lineX2 = grdLeft + grdWidht;
   var extnLineX1 = extnGrdLeft;
   var extnLineX2 = lineX2;

   var prcpColsize = 100;
   var deliveColsize = 150;
   var drugmthdspccdnm = 72;
   
   if ( model.getValue( "/root/init/detlvw" ) == "p" && orgflag != "y" ) {
       grd_prcplist.attribute ( "left" ) = extnGrdLeft;
       grd_prcplist.attribute ( "width" ) = extnGrdWidht;      
//     ivw_prcp.attribute ( "left" ) = minIvwLeft;
//     ivw_prcp.attribute ( "width" ) = minIvwWidth;
       ivw_prcp.visible = false;
       ivw_prcp3.visible = false; //by sonjy 처방 그리드 확대시 전처방에 가려지는 현상 수정 2008-08-20
       if ( model.getValue ( "/root/cp" ) == "Y" ) {
        ivw_prcp2.visible = false;
        ivw_prcp3.visible = false;
       }
       line5.attribute ( "x1" ) = extnLineX1;
       line5.attribute ( "x2" ) = extnLineX2;    
//     line2.attribute ( "x1" ) = extnLineX1;
//     line2.attribute ( "x2" ) = extnLineX2;          
       if ( model.getValue ( "/root/cp" ) == "Y" ) {
        ivw_prcp2.visible = false;
        ivw_prcp3.visible = false;
        line5.attribute ( "x1" ) = extnLineX1;
        line5.attribute ( "x2" ) = extnLineX2+10;   
        grd_prcplist.attribute ( "width" ) = parseInt(grd_prcplist.attribute ( "width" )) + 10;
       }
       model.setValue( "/root/init/detlvw", "m" );
       grd_prcplist.colWidth(grd_prcplist.colref("drugmthdspccdnm")) = grd_prcplist.colWidth(grd_prcplist.colref("drugmthdspccdnm")) - drugmthdspccdnm;
       //grd_prcplist.colWidth(prcpDeliveFactCol) = grd_prcplist.colWidth(prcpDeliveFactCol) + deliveColsize;
   } else {
       grd_prcplist.attribute ( "left" ) = grdLeft;
       grd_prcplist.attribute ( "width" ) = grdWidht;
//     ivw_prcp.attribute ( "left" ) = ivwLeft;
//     ivw_prcp.attribute ( "width" ) = ivwWidth;
         
       if( btn_ivbfprcp.selected == true )  ivw_prcp3.visible = true; // by sonjy 처방 ivw_prcp3가 숨어버리는 현상 수정  2008-08-20
       else { //son0820 
           if ( model.getValue ( "/root/cp" ) != "Y" ) {
                
                ivw_prcp.visible = true;
                        line5.attribute ( "x1" ) = lineX1;
                  line5.attribute ( "x2" ) = lineX2;      
                  //line2.attribute ( "x1" ) = lineX1;
                  //line2.attribute ( "x2" ) = lineX2;           
           }else{
                ivw_prcp2.visible = true;
                line5.attribute ( "x1" ) = lineX1;
                line5.attribute ( "x2" ) = lineX2+10;      
                grd_prcplist.attribute ( "width" ) = parseInt(grd_prcplist.attribute ( "width" )) + 10;
           }
       }
       model.setValue( "/root/init/detlvw", "p" );
       grd_prcplist.colWidth(grd_prcplist.colref("drugmthdspccdnm")) = grd_prcplist.colWidth(grd_prcplist.colref("drugmthdspccdnm")) + drugmthdspccdnm;
       //grd_prcplist.colWidth(prcpnmCol) = grd_prcplist.colWidth(prcpnmCol) - prcpColsize;                                                     
       //grd_prcplist.colWidth(prcpDeliveFactCol) = grd_prcplist.colWidth(prcpDeliveFactCol) - deliveColsize;
   }
}

/**@desc   : 처방검색(처방 그리드에서 처방명 쓰고 엔터)
 * @id     : grd_prcplist
 * @event  : onendedit
 * @return : void
 * @authur : 마정민 2007. 3. 14
 */
function fPrcpSrch(srchflag) {
    if( event.keyCode == 13 && event.button < 1 ) { //처방화면 down 현상으로 event.button 조건 추가 (2010.07.12 JJE)
        if ((model.getValue(prcpNode+"["+grd_prcplist.row+"]/prcpflag") == "2" && 
             model.getValue(prcpNode+"["+grd_prcplist.row+"]/drugmastspec") =="Y") ||
             model.getValue(prcpNode+"["+grd_prcplist.row+"]/status") !="S" ){
            return;
        }
        
        if ( gridprcpsrchflag == "Y" ) {
            gridprcpsrchflag = "N";
            return;
        }

        var prcpnm = model.getValue ( prcpNode + "[" + grd_prcplist.row+ "]/prcpnm" );
        prcpnm = prcpnm.getTrim();
        if ( srchflag ==  "prcpcd") {
            prcpnm = model.getValue ( prcpNode + "[" + grd_prcplist.row+ "]/prcpcd" );
        } 

        // 신규처방 수정모드일때 검색 글자수에 대한 flag 셋팅 - 20090630 by Moonsh
        var modiflag = model.getValue("/root/init/rowmodify/modiflag"); 
        
        //by sonjy 20100405  처방검색시 제한 글자수 setting 
        var srchprcpnmlimit = 3;
        var srchprcpcdlimit = 2;
        var srchhnglimit    = 2;
        var nodesrchprcplimitlist = instance1.selectNodes("/root/initsrch/srchprcplimit"); 
        if( nodesrchprcplimitlist != null && nodesrchprcplimitlist.length > 0 ){
            for( var n = 1 ; n <= nodesrchprcplimitlist.length; n++ ){ 
                if(  model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcd") == "prcpnm" && !isNull(model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm")) ){
                    srchprcpnmlimit =  model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm") ;
                } else if(  model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcd") == "prcpcd" && !isNull(model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm")) ){
                    srchprcpcdlimit =  model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm") ;
                } else if(  model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcd") == "hangul" && !isNull(model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm")) ){
                    srchhnglimit =  model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm") ;
                } 
            }
        }
        
        var isHangul = fIsHangul (prcpnm);
        //한글일때는 1글자만 넣어도 검색가능        
        if ( isNull(prcpnm)) {
            if ( modiflag == "Y" ) {
                model.setValue("/root/init/rowmodify/srchnoflag", "Y");             // 검색없는 flag 셋팅 - 20090630 by Moonsh
            }           
            messageBox ( "처방 검색어를", "C001" );
            return;
        } else if ( isHangul == "E" ){
        //영문,숫자일때는 4글자 넣어야 검색가능
        if ( srchflag ==  "prcpcd") {
            if ( prcpnm.length < parseInt(srchprcpcdlimit) ){
                if ( modiflag == "Y" ) { 
                    model.setValue("/root/init/rowmodify/srchnoflag", "Y");         // 검색없는 flag 셋팅 - 20090630 by Moonsh
                }                           
                messageBox ( srchprcpcdlimit + "글자 이상", "C001" );
                return;
            }   
        } else {
            if ( prcpnm.length < parseInt(srchprcpnmlimit) ){
                messageBox ( srchprcpnmlimit + "글자 이상", "C001" );
                return;
            }   
        }
        } else if ( isHangul == "H" ) {
            if ( prcpnm.length < parseInt(srchhnglimit) ){
                messageBox ( "한글은 " + srchhnglimit + "글자 이상",  "C001" );
                return;
            }   
        }

        if (prcpnm.charAt ( 0 ) == "/"){
            if ( prcpnm.length == 1 ){
                messageBox ( "검색할 수술명이", "I004" );
                return;
            }
            
            var curRow =  grd_prcplist.row;
            var srchRow = grd_prcplist.rows -1;
            fPrcpModal ( "SPMMO05100", 180, 80 );            
        
        } else {
            var containflag = false;
            if( srchflag !=  "prcpcd"){ 
                containflag = true;
            }

            prcpnm = prcpnm.getTrim();
            if ( srchflag ==  "prcpcd") {
                fPrcpSrchCom ( prcpnm, model.getValue ( "/root/init/prcpdd" ), model.getValue ( "/root/paminfo/list/insukind"), "TRMMO00100", "", false, "getPrcpCdOldSrchInfo", isHangul , containflag);
            } else if ( srchflag ==  "prcpnm") {
                fPrcpSrchCom ( prcpnm, model.getValue ( "/root/init/prcpdd" ), model.getValue ( "/root/paminfo/list/insukind"), "TRMMO00100", "", false, "getPrcpNmSrchInfo", isHangul , containflag);
            } else {
                fPrcpSrchCom ( prcpnm, model.getValue ( "/root/init/prcpdd" ), model.getValue ( "/root/paminfo/list/insukind"), "TRMMO00100", "", false, "getPrcpSrchInfo", isHangul , containflag);
            }
            
            var srchLength = model.instances(0).selectNodes( "/root/prcpsrch/prcplist" ).length;
            var curRow = grd_prcplist.row;
            var nextRow = grd_prcplist.row + 1;

            if( srchLength > 1) {
                // 처방 코드 수정 모드 관련 import 화면 관련 셋팅 - 20090630 by Moonsh
                // setValue => 타부서 프로그램(마취기록)에서 오류발생 => makeValue로 수정 by sonjy 20091009 
                model.makeValue("/root/init/rowmodify/importflag", "Y");                
                var modiflag = model.getValue("/root/init/rowmodify/modiflag"); 
                var modirow = model.getValue("/root/init/rowmodify/modirow"); 

                if ( srchLength * 23 < 323 ) {
                    grd_prcpsrchlist.attribute ( "height" ) = ( srchLength + 1 ) * 23 + 2;
                    btn_copy.attribute ( "top" ) = ( srchLength + 1 ) * 23 + 6;
                    btn_cancel.attribute ( "top" ) = ( srchLength + 1 ) * 23 + 6;
                    import1.attribute ( "height" ) = ( srchLength + 1 ) * 23 + 30
                } else {
                    grd_prcpsrchlist.attribute ( "height" ) = 323;
                    btn_copy.attribute ( "top" ) = 326;
                    btn_cancel.attribute ( "top" ) = 326;
                    import1.attribute ( "height" ) = 351;
                }

                // 처방 코드 수정 모드일때 import 화면 위치 재설정 - 20090630 by Moonsh 
                if ( modiflag == "Y" ){
                    grd_prcplist.row = modirow; 
                }

                if ( grd_prcplist.row <= 10) {
                    import1.attribute ( "top" ) =  215 + ( grd_prcplist.row - 1) * 23;
                } else if (  grd_prcplist.row <= 25) {
                    import1.attribute ( "top" ) =  (grd_prcplist.row - 1) * 23 + 170 - import1.attribute ( "height" );
                } else if ( grd_prcplist.row > 25 ){
                    import1.attribute ( "top" ) =  24 * 23 + 190 - import1.attribute ( "height" );
                }
                model.refresh();

                for ( var i=1; i <=srchLength ; i++ ) {
                    if (model.getValue ("/root/prcpsrch/prcplist[" + i + "]/prcpclscd")=="-") {
                        grd_prcpsrchlist.rowstyle(i, "data", "color") = "#ff0000";
                    } else {
                        grd_prcpsrchlist.rowstyle(i, "data", "color") = "#000000";
                    }
                }
                
                //처방영문명 붉은색 글씨
                grd_prcpsrchlist.colstyle(grd_prcpsrchlist.colRef("prcpnm"),  "all", "color") = "#ff0000";
                grd_prcpsrchlist.colstyle(grd_prcpsrchlist.colRef("prcpnm2"), "all", "color") = "#ff0000";
                grd_prcpsrchlist.rowstyle(0, "data", "color") = "#000000";
                
                
                import1.visible = true;
                model.refresh();
                model.setfocus( "grd_prcpsrchlist" );               
                grd_prcpsrchlist.select( 1, 1, 1, 1) = true;

            } else if( srchLength == 1) {
                model.refresh();
                model.setfocus( "grd_prcpsrchlist" );               
                grd_prcpsrchlist.select( 1, 1, 1, 1) = true;
                addPrcp ( "import", "/root/prcpsrch/prcplist", "/root/main/prcp",  "N", "prcpcd", model.getValue ( "/root/prcpsrch/prcplist/prcpcd"), grd_prcpsrchlist, "Y", "00");
            } else {
                messageBox ( "검색된 내용이", "I004" );
                
                // 처방 코드 수정 모드 관련 검색 내용이 없을 경우 변경 Row 초기화 후 리턴 - 20090630 by Moonsh
                var modiflag = model.getValue("/root/init/rowmodify/modiflag"); 
                if ( modiflag == "Y" ) { 
                    var grdcnt = grd_prcplist.rows; 
                    grdcnt = grdcnt - 1; 
                    model.setValue("/root/main/prcp/prcplist[" + grdcnt + "]/prcpcd", ""); 
                    
                    var modirow = model.getValue("/root/init/rowmodify/modirow"); 
                    var modiprcpcd = model.getValue("/root/init/rowmodify/modiprcpcd"); 
                    
                    model.setValue( "/root/main/prcp/prcplist[" + modirow + "]/prcpcd", modiprcpcd);                                        
                    grd_prcplist.row =  modirow;                    
                    model.resetInstanceNode ("/root/init/rowmodify"); 
                    grd_prcplist.focusColor = "#ece1ec";                // 그리드에 선택 되는 row의 색 지정 
                } else { 
                    grd_prcplist.dispatch("onentercell"); 
                }                
            }                   
        }
    }       
}

/**@desc   : 처방상세팝업
 * @param  : row: 팝업을 띄울 row
           : vxpt: x좌표
           : vypt: y좌표
           : flag: 처방복사시 자동 팝업인지 체크. 자동 팝업일 경우에는 화면을 refresh 해줘 어느로우에서 팝업을 띄우는지 확인가능하게 한다.
 * @return : void
 * @authur : 마정민 2007. 3. 14
 */
function fPrcpDetl( row, vxpt, vypt, flag ) {
    var curRow = 0;
    if ( isNull(row)) {
        curRow = grd_prcplist.row; 
    } else {
        curRow = row;
    }

    var sStatus      = model.getValue( prcpNode + "[" + curRow + "]/status");
    var prcpClsCd    = model.getValue( prcpNode + "[" + curRow + "]/prcpclscd");
    var prcpinptflag = model.getValue( prcpNode + "[" + curRow + "]/prcpinptflag");

    if ( sStatus == "I" || sStatus == "U" || sStatus == "-" ) {
        if(typeof(ivw_prcpdetail) == "object" && ivw_prcpdetail.visible) { // 처방화면 처방상세 기능 사용시 2014.07.16 엄영만
            if(flag == "auto") {
                if(prcpClsCd == "B4" || prcpClsCd == "C2" || prcpClsCd == "C6" || prcpClsCd == "Z0") { 
                    // 수혈, 영상 상세창 팝업 되도록 
                } else if(prcpClsCd == "K2") { //KNUH, 약속처방 복사 시 치식 팝업이 한번만 뜨고 다른 치과처방에 동일하게 적용되도록 함.(2011.03.28 JJE)
                    if(flag == "auto" && prcpinptflag == "02" && model.instances(0).selectSingleNode("/root/main/toot_prcp/prcplist") != null){ 
                    } else {
                        event.defaultAction = "cancel";
                        return true;
                    }
                } else {
                    event.defaultAction = "cancel";
                    return true;
                }
            } else {
                event.defaultAction = "cancel";
                return true;
            }
        }
        
        if ( isNull ( vxpt )) vxpt = 395;
        var xpt = window.screenleft + vxpt;
        var ypt = 0;

        if ( isNull(vypt)) {
            if (event.screenY < 750 ) {
                ypt = event.screenY + 10;
            } else {
                ypt = event.screenY - 240;
            }
        } else {
            ypt = vypt;
        }
        
        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];
        
        //
        //modal ( "SPMMO02800", mon,  xpt, ypt);
        //return;
        
         if ( ( prcpClsCd == "A2" || prcpClsCd == "A4" ) && prcpinptflag != "35") { //약   20100507 자가보유처방은 팝업 뜨지 않는다. by LYJ

            var prnscrID = getScreenID(); 
            // PRN 처방 프로세스의 적용범위( 처방까지 or  마스터만)에 따라 상세 팝업의 기능을 결정하기위한 파라메터 set
            // 2010-01-02 by LYJ  
            setParameter ( "SPMMO01100_prcp", prnscrID);
            setParameter ( "SPMMO01100_prndetl", model.getValue (prcpNode + "[" + curRow + "]/drprcpetc6"));
            modal ( "SPMMO01100", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
            //20090218 마정민 추가 산제불가 및 주의 약은 대체처방 팝업을 띄운다.
            clearParameter ( "SPMMB10100_chkyn" );
            if ( getParameter ( "SPMMO01100_powdaltdrug" ) == "2" ){                
                fAltDrug ( curRow, "4" );
            } else if ( getParameter ( "SPMMO01100_powdaltdrug" ) == "1" ){             
                fAltDrug ( curRow, "5" );
            }            
            //확인을 눌렀을 경우. 단 선택된 대체약이 있을 때만 SPMMB10100_chkyn = Y 처리해 준다.
            if ( getParameter ( "SPMMB10100_chkyn" ) == "Y" ) {
                var addRow = grd_prcplist.rows-2;
                fPrcpBuffer( 1, addRow, "/root/prcpdrag", prcpNode ); // 대체약 버퍼에 복사
                model.removenode ( prcpNode + "[" + addRow + "]" );   // 대체약 삭제
                model.removenode ( prcpNode + "[" + curRow + "]" );   // 기존약 삭제
                model.duplicate( "/root/main/prcp", "/root/prcpdrag/prcplist", "*[" + curRow + "]"); // 기존약을 대체약으로 변경
                model.setValue ( prcpNode + "[" +  curRow + "]/powdflag", "Y" )
                model.removeNodeset ( "/root/prcpdrag/prcplist" );
                makePrcpNm ( prcpNode, curRow );
                model.recalculate();   
                model.refresh();
                grd_prcplist.row = curRow;
            } else {
                if ( getParameter ( "SPMMO01100_powdaltdrug" ) == "1" ) {
                    model.setValue ( prcpNode + "[" +  curRow + "]/powdflag", "Y" )
                    makePrcpNm ( prcpNode, curRow );
                }
            }
            clearParameter ( "SPMMO01100_powdaltdrug" );
            clearParameter ( "SPMMB10100_chkyn" );
        } else if ( prcpClsCd == "A6" && prcpinptflag !="35" ) { //주사  20100507 자가보유처방은 팝업 뜨지 않는다. by LYJ
            var prnscrID = getScreenID();  
            // PRN 처방 프로세스의 적용범위( 처방까지 or  마스터만)에 따라 상세 팝업의 기능을 결정하기위한 파라메터 set
            // 2010-01-02 by LYJ 
            setParameter ( "SPMMO01200_prcp", prnscrID);
            setParameter ( "SPMMO01200_prndetl", model.getValue (prcpNode + "[" + curRow + "]/drprcpetc6"));
            modal ( "SPMMO01200", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
            clearParameter ( "SPMMO01200_prcp");
        } else if ( prcpClsCd == "F2" ) { //재활
            modal ( "SPMMO01800", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
        } else if ( prcpClsCd == "C2" || prcpClsCd == "C6" || prcpClsCd == "E2" ) { 
            //방사선 검사(기능검사, 내시경,천자,생검, 방사선, 핵의학영상)
            modal ( "SPMMO01300", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
            //start: 영상 검사의 자동 팝업 시 취소 할 경우 처방창에 처방이 떨어지지 않도록 (2010.02.02 JJE)
            var prcptempNode = instance1.selectSingleNode("/root/prcptemp/prcplist");
            if( prcptempNode == null && flag == "auto") setParameter("cnclCopyPrcpYN_Param", "Y");          // 자동팝업 자동팝업일 경우에만 삭제하도록 "auto" 조건추가
            //end
        } else if ( prcpClsCd == "G2" ) { //RT
            modal ( "SPMMO13300", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
        } else if ( prcpClsCd == "B2" || prcpClsCd == "B6" ) { //진단검사 (검체검사), 핵의학 체내
            modal ( "SPMMO01400", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );                                
        } else if ( prcpClsCd == "B4" ) { //수혈 (혈액수혈)
            modal ( "SPMMO01500", mon,  xpt, ypt - 80, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
        } else if ( prcpClsCd == "H2" ) {  //수술
            modal ( "SPMMO01600", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
            //치과 수술 처방(대분류:치과, 중분류:치과수술)인 경우 치식 팝업 호출 (요청번호:8731 2009.10.26 by JJE)
            if( getParameter("SPMMO01600_returnParam") == "Y" ){  //수술팝업에서 '확인'한 경우에만 치식팝업 호출(from 서소영선생님요청)
                var tempcol2 = model.getValue(prcpNode + "[ " + curRow + "]/tempcol2" );
                var tootfact = model.getValue(prcpNode + "[ " + curRow + "]/tootfact" );
                //by sonjy  20100304  수술/치식 필수입력일경우로 제한 조건 추가 및 치실필수입력 추가. (여의도 상황실 오류 ): 
                //기존은 치과 수술 처방(대분류:치과, 중분류:치과수술)경우 팝업으로 되어 있었음.
                var prcpessninptflag =  model.getValue(prcpNode + "[ " + curRow + "]/prcpessninptflag" );   
                //if(tempcol2.substr(0, 5) == "17|02" && tootfact == "-" ){
                if((  prcpessninptflag == "2" || ( prcpessninptflag == "5" && tempcol2.substr(0, 5) == "17|02" ) ) && tootfact == "-" ){
                            grd_prcplist.select(curRow,1,curRow,1)=true;
                    fDentifmla("OP");
                }
              }
              clearParameter("SPMMO01600_returnParam");
              
        } else if ( prcpClsCd == "H4" ) { //처치
            modal ( "SPMMO13100", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
        } else if ( prcpClsCd == "K2" ) { //치과
            //KNUH, 약속처방 복사 시 치식 팝업이 한번만 뜨고 다른 치과처방에 동일하게 적용되도록 함.(2011.03.28 JJE)
            if( flag == "auto" && prcpinptflag == "02" && model.instances(0).selectSingleNode("/root/main/toot_prcp/prcplist") != null ){
                model.removeNode("/root/prcptemp");
                model.makeNode("/root/prcptemp");
                model.duplicate( "/root/prcptemp", "/root/main/toot_prcp/prcplist");
                model.setValue("/root/prcptemp/prcplist/prcpcd"         , model.getValue ( prcpNode + "[ " + curRow + "]/prcpcd" ));
                model.setValue("/root/prcptemp/prcplist/prcpnm"         , model.getValue ( prcpNode + "[ " + curRow + "]/prcpnm" ));
                model.setValue("/root/prcptemp/prcplist/orgprcpnm"      , model.getValue ( prcpNode + "[ " + curRow + "]/orgprcpnm" ));
                model.setValue("/root/prcptemp/prcplist/tempcol2"       , model.getValue ( prcpNode + "[ " + curRow + "]/tempcol2" ));
                model.setValue("/root/prcptemp/prcplist/erprcpflag"     , model.getValue ( prcpNode + "[ " + curRow + "]/erprcpflag" ));
                model.setValue("/root/prcptemp/prcplist/nigtprcpflag"   , model.getValue ( prcpNode + "[ " + curRow + "]/nigtprcpflag" ));
                model.setValue("/root/prcptemp/prcplist/payflagcd"      , model.getValue ( prcpNode + "[ " + curRow + "]/payflagcd" ));
                model.setValue("/root/prcptemp/prcplist/prcpdelivefact" , model.getValue ( prcpNode + "[ " + curRow + "]/prcpdelivefact" ));
                model.setValue("/root/prcptemp/prcplist/precureprcpflag", model.getValue ( prcpNode + "[ " + curRow + "]/precureprcpflag" ));
                model.setValue("/root/prcptemp/prcplist/prcpqty"        , model.getValue ( prcpNode + "[ " + curRow + "]/prcpqty" ));
                model.setValue("/root/prcptemp/prcplist/prcpvol"        , model.getValue ( prcpNode + "[ " + curRow + "]/prcpvol" ));
                model.setValue("/root/prcptemp/prcplist/prcptims"       , model.getValue ( prcpNode + "[ " + curRow + "]/prcptims" ));
                model.setValue("/root/prcptemp/prcplist/drprcpetc7"     , model.getValue ( prcpNode + "[ " + curRow + "]/drprcpetc7" ));
                model.setValue("/root/prcptemp/prcplist/drprcpetc8"     , model.getValue ( prcpNode + "[ " + curRow + "]/drprcpetc8" ));
                model.setValue("/root/prcptemp/prcplist/choiordflag"    , model.getValue ( prcpNode + "[ " + curRow + "]/choiordflag" ));
                model.setValue("/root/prcptemp/prcplist/specdrid"       , model.getValue ( prcpNode + "[ " + curRow + "]/specdrid" ));
                model.setValue("/root/prcptemp/prcplist/prcpexecdeptcd" , model.getValue ( prcpNode + "[ " + curRow + "]/prcpexecdeptcd" ));
                model.setValue("/root/prcptemp/prcplist/powdflag"       , model.getValue ( prcpNode + "[ " + curRow + "]/powdflag" ));
            }else{
                modal ( "SPMMO13200", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
                if( flag == "auto" && prcpinptflag == "02" ){
                    model.makeNode("/root/main/toot_prcp");
                    model.duplicate( "/root/main/toot_prcp", "/root/prcptemp/prcplist");
                }
            }
        } else if ( prcpClsCd == "03" ) { //식이                
            modal ( "SPMMO01700", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
        } else if ( prcpClsCd == "I2" || prcpClsCd == "I4" ) {  //마취
            modal ( "SPMMO02000", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
        } else if ( prcpClsCd == "C4" ) {  //angio
            modal ( "SPMMO02100", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
            //start: 영상 검사의 자동 팝업 시 취소 할 경우 처방창에 처방이 떨어지지 않도록 (2010.02.02 JJE)
            var prcptempNode = instance1.selectSingleNode("/root/prcptemp/prcplist");
            if( prcptempNode == null && flag == "auto") setParameter("cnclCopyPrcpYN_Param", "Y");          // 자동팝업 자동팝업일 경우에만 삭제하도록 "auto" 조건추가
            //end
        } else if ( prcpClsCd == "D2" ) {  //병리
            modal ( "SPMMO02200", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
        } else if ( prcpClsCd == "M2" ) {  //재료
            modal ( "SPMMO13400", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
        } else if ( prcpClsCd == "Z0" ) { // 기타일 경우 처치와 같은 화면으로 오픈한다. 2010. 12. 29)
            modal ( "SPMMO13100", mon,  xpt, ypt, "prcpdetl", prcpNode + "[" +  curRow + "]", prcpNode, "", false );
        }

        if ( model.instances(0).selectNodes ("/root/prcptemp/prcplist").length == 0 ) return false;
        fPrcpDetlApp ( prcpClsCd, "/root/prcptemp/prcplist", "/root/main/prcp", curRow );
        
        //M-SET 모처방인 경우, prcphopedd를 자처방에 동일하게 적용
        //2008. 07. 22 오지훈
        var prcpSetCd  = model.getValue ("/root/main/prcp/prcplist[" + curRow + "]/prcpsetcd" );
        var inclPrcpNo = model.getValue ("/root/main/prcp/prcplist[" + curRow + "]/inclprcpno" );
        var prcpHopeDD = model.getValue ("/root/main/prcp/prcplist[" + curRow + "]/prcphopedd" );
        if(prcpSetCd == "-" && inclPrcpNo > 0){ //모처방인 경우, prcphopedd
            //alert(prcpSetCd + "," + inclPrcpNo + "," + prcpHopeDD);
            for(var i = 1;  i <= grd_prcplist.rows; i++){
                if(inclPrcpNo == model.getValue ("/root/main/prcp/prcplist[" + i + "]/inclprcpno")){                    
                    model.setValue("/root/main/prcp/prcplist[" + i + "]/prcphopedd", prcpHopeDD);
                }
            }
        }
        
        /* 수혈적응증 미 입력시 수혈 처방 삭제 처리 */
        if ( getParameter ( "SPMMO01500_bprcpadapt" ) == "D" ){
            fDeleteRow();
            //화면 닫은후 focus를 다시 grid로 이동시킨다.
            model.setfocus( "grd_prcplist" );           
            //더블 클릭 후 edit 모드로 가는 것을 막는다.
            event.defaultAction = "cancel";
            model.recalculate();   
            return false;
        }

        //화면 닫은후 focus를 다시 grid로 이동시킨다.
        model.setfocus( "grd_prcplist" );           
        //더블 클릭 후 edit 모드로 가는 것을 막는다.
        event.defaultAction = "cancel";
        grd_prcplist.row = curRow; 
        grd_prcplist.col = prcpnmCol;
        model.recalculate();   

        return true;

   } else if ( sStatus == "S" ) { //검색안된 것은 더블클릭해도 뜰 것이 없다.         
        grd_prcplist.editCell();
        return false;
   }
}

/**@desc   : 처방상세 입력내용을 메인에 적용
 * @param  : prcpClsCd - 처방분류
 *         : strSrc - 소스노드       
 *         : strDest - 목적지노드 
 *         : row - 수정할 row
 * @authur : 마정민 2007. 3. 14
 */
function fPrcpDetlApp ( prcpClsCd, strSrc, strDest, row ) {

    var srcNodeList = model.instances(0).selectNodes( strSrc );
    var destNode = model.instances(0).selectSingleNode( strDest );
    
    var srchRow = model.instances(0).selectNodes( prcpNode ).length;
    var curRow =  row;
    
    gGridUpdateChk("det_per"); // 임시저장 수정 모드 
        
    if ( srcNodeList != null && srcNodeList.length > 0) {
        
        /*if ( prcpClsCd == "B2" || prcpClsCd == "B6"  ) { //진단검사 (검체검사), 핵의학 체내

            for(var i = 1; i <= srcNodeList.length; i++) {
                makePrcpNm ( strSrc, i );
                if ( i == 1 ){ //연속검사이건 아니건 팝업 띄운 row는 replace
                    var srcSingleNode = instance1.selectSingleNode(prcpNode + "[" + curRow + "]" );
                    destNode.replaceChild( srcNodeList.item(i-1).cloneNode(true), srcSingleNode);   
                } else {//추가된 내용은 검색뒤에 붙음
                    model.duplicate ( strDest, strSrc + "[" + i + "]", "*[" + srchRow  + "]" );
                    srchRow++;
                }   
            }

        } else*/
        if ( prcpClsCd == "03" ) {  //식이                
            
            var chkcnt = getParameter( "SPMMO01700_chkcnt" );
            var dietcnt = 0;
            //팝업에서 체크한 값이 1이고 처방화면의 식이처방도 1개이면 값을 없는다.
            var srcNodeListChk = model.instances(0).selectNodes ( prcpNode + "[prcpclscd='03']" );
            if ( chkcnt == "1" && srcNodeListChk.length == 1 ) {
                makePrcpNm ( strSrc, 1 );
                var srcSingleNode = instance1.selectSingleNode(prcpNode + "[" + curRow + "]" );
                destNode.replaceChild( srcNodeList.item(0).cloneNode(true), srcSingleNode);
            } else {
                for(var i = 1; i <= srcNodeList.length; i++) {
                    makePrcpNm ( strSrc, i );
                    var dietprcpgenrflag = model.getValue ( strSrc + "[" + i + "]/dietprcpgenrflag" );
                    var srcSingleNode = instance1.selectSingleNode( prcpNode + "[prcpclscd='03' and dietprcpgenrflag='" + dietprcpgenrflag + "']" );                                                     
                    var checkFlag = model.getValue ( prcpNode + "[" + curRow + "]/dietprcpgenrflag" );
                    if ( checkFlag == "-" ) {
                        var srcNodeCur = instance1.selectSingleNode(prcpNode + "[" + curRow + "]" );
                        destNode.replaceChild( srcNodeList.item(i-1).cloneNode(true), srcNodeCur);  
                    } else if (srcSingleNode != null) {
                        destNode.replaceChild( srcNodeList.item(i-1).cloneNode(true), srcSingleNode);
                    } else { //추가된 내용은 duplicate                      
                        model.duplicate ( strDest, strSrc + "[" + i + "]", "*[" + srchRow  + "]" );
                        dietcnt++; //식이 자동팝업 때문에 추가했다.
                        srchRow++;
                    }   
                }
            }
        } else {
           makePrcpNm ( strSrc, 1 );           
           var srcSingleNode = instance1.selectSingleNode(prcpNode + "[" + curRow + "]" );           
           destNode.replaceChild( srcNodeList.item(0).cloneNode(true), srcSingleNode);  
        }
        
        model.removeNodeset(strSrc);
        model.setValue ( prcpNode + "[" + curRow + "]/tempcol9", "" );
        fPrcpColor();
        
        fSetCpVal( row, "U");
        
        model.refresh();
    }       
}

 /**@desc   : 처방 오른쪽 마우스 팝업 처리
 *  @id     : grd_prcplist
 *  @event  : onmousedown
 *  @return : void
 *  @authur : 마정민 2007. 3. 25 
 */
function fMouseRghtBtnPopup() {

    if (event.button == 3) {
       if (grd_prcplist.mouseRow == 0) {                
           /*
           if (grd_prcplist.mouseCol == prcpVolCol || grd_prcplist.mouseCol == prcpQtyCol || grd_prcplist.mouseCol == prcpDayNoCol ) {
               app.showPopupMenu(false);
               var xpt = window.screenleft +  323 + event.x;
               var ypt = window.screenTop + 160 + event.y;
               modal ("SPMMO10400", 2,  xpt, ypt);
               //일단 일괄입력은 막았다.
           } */
        }

        if(grd_prcplist.isCell(event.target) && grd_prcplist.mouseRow >= grd_prcplist.fixedRows){
            app.showPopupMenu(true);
            var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
            if ( prcpgenrflag == "O" ) {
                setPopupMenu("grd_prcplist", false, "/root/init/omsrght/mouserght", "label", "func");   //메뉴호출방식변경 JJE
            } else if ( prcpgenrflag == "E" ) {
                setPopupMenu("grd_prcplist", false, "/root/init/emsrght/mouserght", "label", "func");   //메뉴호출방식변경 JJE
            } else {
                 setPopupMenu("grd_prcplist", false, "/root/init/imsrght/mouserght", "label", "func");  //메뉴호출방식변경 JJE
            }
        } else {
            window.setPopupMenu(false);
        }
    }
}

function fDrugInfo() {
    model.setValue ( "/root/hidden/receivedata/srchdrugcd", model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpcd" ));
    //open("SMADB01900",0,0,0,"SMADB01900","약코드","/root/hidden/receivedata/srchdrugcd");
    //2008. 07. 08 오지훈
    //약품편람 조회 화면 open시 약코드 parameter기본 설정    
    open("SMADB01900", 0, 0, 0, "SMADB01900", "/root/hidden/receivedata","/root/hidden/receivedata");
}

function fPrnDrugInfo() {
    model.setValue ( "/root/hidden/receivedata/srchdrugcd", model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpcd" ));
    //2011. 05. 23 엄영만
    //PRN 조회창 open시 약코드 parameter기본 설정    

    setParameter("SPMMO33800_search_code", model.getValue("/root/hidden/receivedata/srchdrugcd"));
    open("SPMMO33800", 0, 0, 0, "SPMMO33800", "","");
}

function fWarnDrugInfo() { // 고주의 의약품 조회
    model.setValue ( "/root/hidden/receivedata/srchdrugcd", model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpcd" ));
    setParameter("SMADB04200_search_code", model.getValue("/root/hidden/receivedata/srchdrugcd"));
    open("SMADB04200", 0, 0, 0, "SMADB04200", "","");
}

function fCdssDrugInfo(kindflag) {
    model.makeValue ( "/root/hidden/receivedata/pYakpumCd", model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpcd" ));
    model.makeValue ( "/root/hidden/receivedata/pageNav", kindflag);
    modal("SMZCN00301", 0, 0, 0, "SMZCN00301", "/root/hidden/receivedata","/root/resultParam");
}

//  DUR 약품편람-부작용
function fCdssDrugInfo3() {
    fCdssDrugInfo("3");
}

//  DUR 약품편람-상호작용
function fCdssDrugInfo4() {
    fCdssDrugInfo("4");
}

//  DUR 약품편람-주의사항
function fCdssDrugInfo5() {
    fCdssDrugInfo("5");
}

/**@desc   : 선택제외 삭제
 * @return : void
 * @authur : 마정민 2007. 10. 16 
 */
function fDeleteElseRow() {

    var selectedRows = grd_prcplist.selectedRows;
    
    for (var i=0; i< selectedRows; i++) {       
         model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/tempcol6", "select" );
    }
    grd_prcplist.select(1, 1, grd_prcplist.rows-2, 1) = true;
    for ( var i=1; i < grd_prcplist.rows; i++ ) {
        if ( model.getValue ( prcpNode + "[" + i + "]/tempcol6" ) == "select" ) {
            grd_prcplist.select ( i, 1 ) = false;
        } 
         model.setValue ( prcpNode + "[" + i + "]/tempcol6", "" );
    }

    fDeleteRow();
}

/**@desc   : 오른쪽 마우스 클릭 삭제
 * @       : 신규일 때는 removeNode
 * @       : 수정중일 때 원복시킨 후 삭제, D/C 표시
 * @       : 삭제, D/C 원복시킬려면 ? 오른쪽 마우스에 삭제 및 D/C 원복
 * @       : D/C 후 삭제는 불가
 * @id     : grd_prcplist
 * @event  : 오른쪽 마우스 클릭 삭제
 * @return : void
 * @authur : 마정민 2007. 3. 26 
 */
function fDeleteRow(flag) {
    
    var node = instance1.selectSingleNode("/root/main/prcp");
    var selectedRows = grd_prcplist.selectedRows;
    if( model.getValue ( "/root/cp" ) == "Y" && model.getValue(node + "/prcplist[1]/status") == "S" ){
        selectedRows = grd_errprcplist.selectedRows;
    }
    
    var cnt=0;

    if ( flag != "noselect" ){
        if (grd_prcplist.row < 0 ){
            return;
        }
    }
    
    //SON0919 원내/원외사유 처리 관련 추가 by sonjy start 
    var hosinprcpresncd = "";
    var prcpkindcd = ""; 
    //SON0919 end 
    if ( flag != "noselect" ){
        for (i= selectedRows-1; i >= 0; i--){
            var status = model.getValue ( prcpNode + "[" + i + "]/status" );
            if ( status != "D" ) {
                //처방에서 실수로 복사할 경우 지우지 못하면 문제가 됨으로 일단 주석으로 막았다.
                //응급의료관리료 삭제시
                /*if ( model.getValue ( "/root/patflag/list/prcpgenrflag" ) =="E" ) {
                    var prcpcd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpcd" );
                    if ( "AC103" == prcpcd || "ACD0005" == prcpcd ){
                        messageBox ( "응급의료관리료는 삭제가 불가합니다. 오른쪽마우스 > 응급의료관리료를 이용하여 수정하여 주십시오", "E" );
                        continue;
                    } 
                }*/
                var deleteflag = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/tempcol6" );
                if ( deleteflag != "D" ) { //이미 삭제 표시된것은 제외하고
                    //종속처방 체크
                    var inclprcpno = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/inclprcpno" ); 
                    if ( !isNull(inclprcpno) && inclprcpno != "-" ) {
                        if ( eval(inclprcpno) > 0  ) { //종속처방이면
                            for ( var j = 1; j < grd_prcplist.rows; j++ ) {
                                if ( inclprcpno == model.getValue ( prcpNode + "[" + j + "]/inclprcpno" )) { // 같은 종속처방은 모두 삭제이다.
                                    model.setValue ( prcpNode + "[" + j + "]/tempcol6", "D" );
                                }
                            }
                        }
                    }
                    model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/tempcol6", "D" ); 
                }
            } else {
                // 같은 종속처방은 모두 살아난다.
                var inclprcpno = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/inclprcpno" ); 
                if ( !isNull(inclprcpno) && inclprcpno != "-" ) {
                    if ( eval(inclprcpno) > 0  ) { //종속처방이면
                        for ( var j = 1; j < grd_prcplist.rows; j++ ) {
                            if ( inclprcpno == model.getValue ( prcpNode + "[" + j + "]/inclprcpno" )) { 
                                model.setValue ( prcpNode + "[" + j + "]/status", "-" );
                            }
                        }
                    }
                }
            }
        }
    }

    var grdrows = grd_prcplist.rows;
    for (var i = grdrows -1 ; i >= 1; i-- ) {   

        if ( model.getValue ( prcpNode + "[" + i + "]/tempcol6" ) == "D" ) {
            model.setValue ( prcpNode + "[" + i + "]/tempcol6", "" ); //삭제 표시 clear
            model.setValue ( prcpNode + "[" + i + "]/prcpmixno", "-" ); //mix clear
            var status = model.getValue ( prcpNode + "[" + i + "]/status" );
            if (status == "S" ) {
                model.setValue ( prcpNode + "[" + i + "]/prcpnm", "" );
            } else if ( status =="I" || status == "" ) { 
                    //SON0919 원내/원외사유 처리 관련 추가 by sonjy start 
                    //SON1107 DSC 퇴원약도 외래에 준하여 처리. 변경개발요청서 20081013-93에 의거 => 간호준비될때까지 원복 ...
                    prcpkindcd  = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpkindcd" );
                    if( model.getValue ("/root/patflag/list/prcpgenrflag")  == "O"  ||  
                       (model.getValue ("/root/patflag/list/prcpgenrflag")  == "E" &&  model.getValue ( "/root/init/erresn" ) != "G3"  &&  prcpkindcd  == "60" ) ||   
                       (model.getValue ("/root/patflag/list/prcpgenrflag")  == "D" &&  prcpkindcd  == "60" )  ){
                        if( hosinprcpresncd == "" && ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/hosinprcpresncd " ) == "45"  ||  model.getValue ( "/root/main/prcp/prcplist[" + i + "]/hosinprcpresncd " ) == "47") ) {
                            hosinprcpresncd = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/hosinprcpresncd " ) ;
                        } 
                     }
                     //SON0919 end
                 
                    fPrcpBuffer( ++cnt, i, "/root/prcpdel", prcpNode );
                    model.removeNode ( prcpNode + "[" +  i + "]" );
            } else if ( status =="-" || status =="U" ) {
                    model.setValue ( prcpNode + "[" + i + "]/status", "D" );
            } else if ( status =="D" ) {
                    model.setValue ( prcpNode + "[" + i + "]/status", "-" );
            }
        }
    }
    
    for (var i=grd_prcplist.rows -1 ; i >= 1; i-- ) {       
        var chkPrcpmixno = model.getValue ( prcpNode + "[" + i + "]/prcpmixno" );
        if ( chkPrcpmixno != "-" && !isNull(chkPrcpmixno)) {
            //믹스번호가 있고 삭제가 아닌 것중에 혼자 남아 있는 믹스번호라면 풀어준다.
            var srcNodeList = model.instances(0).selectNodes ( prcpNode + "[prcpmixno='" + chkPrcpmixno + "']" );
            if ( srcNodeList.length <= 1) {
                model.setValue ( prcpNode + "[" + i + "]/prcpmixno", "-" );
            }
        }
    } 

    // 처방 신규코드에서 수정 모드가 아닐때만 rebuild - 20090630 by Moonsh
    var modiflag = model.getValue("/root/init/rowmodify/modiflag"); 
    if ( modiflag != "Y" ){ 
        grd_prcplist.rebuild(); 
        fPrcpColor(); 
    } 
    
    //SON0919 원내원외관련 추가  by sonjy 
    if( hosinprcpresncd != "" ){ 
        fChngHosinPrcpResn () ;
    }
    //SON0919 end
    
    model.recalculate();  // e
    
    if(typeof(ivw_prcpdetail) == "object" && ivw_prcpdetail.visible) { // 처방상세화면 재설정
	    ivw_prcpdetail.window.javascript.fPrcpClick();	
    }
}

/**@desc   : 진단수정.
 * @       : 신규일때는 수정표시 안함.
 * @       : 삭제,D/C 상태일때는 취소후 수정.
 * @id     : grd_prcplist
 * @event  : xforms-value-changed
 * @return : void
 * @authur : 마정민 2007. 3. 27
 */
function fCnclDel() {

    var selectedRows = grd_diaglist.selectedRows;
    
    for (var i=0; i< selectedRows; i++) {       
        var status = model.getValue (diagNode + "[" + grd_diaglist.selectedrow(i) + "]/status");
        if (status == "C" || status == "D"){
            model.setValue (diagNode + "[" + grd_diaglist.selectedrow(i)+ "]/status", "-");
        }
    }
}

/**@desc   : 함수 호출시 선택된 데이터를 특정 노드에 담아둔다.
 * @param1 : bufCnt: 첫번째 cnt일때 기존 노드를 삭제하기 위한 count
 * @param2 : bufRow: 노드에 담아놓을 그리드 row
 * @param4 : strDest: 목적지 주소값
 * @param3 : strSrc: 출발지 주소값
 * @return : void
 * @authur : 마정민 2007. 4. 3
*/
function fPrcpBuffer( bufCnt, bufRow, strDest, strSrc ) {

    if (bufCnt == 1) { //첫번째 데이터이면 기존 노드를 삭제한다.
      model.removeNodeset(strDest);
      //노드를 모두 삭제 했기 때문에 대상 노드를 하나 만든다.
      model.makeNode(strDest);
    }

    // 복사할 소스노드를 선택한다.
    var srcNodeList = model.instances(0).selectNodes( strSrc );

    //복사하기 위해 대상노드를 선택한다.
    var destNode = model.instances(0).selectSingleNode(strDest);
        
    //대상노드로 복사한다.
    destNode.appendChild(srcNodeList.item(bufRow-1).cloneNode(true));

}

/**@desc   : 마지막 삭제시 버퍼에 담겨둔 것을 되살린다.
 * @id     : btn_undo
 * @event  : DOMActivate
 * @return : void
 * @authur : 마정민 2007. 4. 3
 */
function fDelUndo () {

    //fGetRsrvPrcp();

    // 복사할 소스노드를 선택한다.
    var srcNodeList = model.instances(0).selectNodes("/root/prcpdel/prcplist");
    //복사하기 위해 대상노드를 선택한다.    

    if ( srcNodeList.length == 0 ) {
        messageBox ( "되살릴 삭제 데이터가", "I004" );
        return;
    }
    var prcpdd = model.getValue ( "/root/init/prcpdd" );

    //삭제시 루프가 뒤에서 부터돌며 buffer instance에 저장하기 때문에 불러 올때도 뒤어서부터 불러와 삭제시 순서를 맞춘다.
    var insRow = grd_prcplist.rows - 1;
    for (i= srcNodeList.length; i >= 1; i--) {
       //대상노드로 복사한다.
        model.setValue ( "/root/prcpdel/prcplist[" + i + "]/prcppkspec", prcpdd + "|0|0|" + getUserInfo("dutplceinstcd"));
        prcphopedd = model.getValue ( "/root/prcpdel/prcplist[" + i + "]/prcphopedd" );
        if ( isNull(prcphopedd) || prcphopedd == "-" ) {
            prcphopedd = prcpdd;
        }
        if ( prcphopedd < prcpdd ) {
            model.setValue ( "/root/prcpdel/prcplist[" + i + "]/prcphopedd", prcpdd );
        }
       model.duplicate ( "/root/main/prcp", "/root/prcpdel/prcplist[" + i + "]", "*[" + insRow  + "]" );
       insRow++;
    }
    model.recalculate();
    grd_prcplist.refresh();
    fPrcpColor();
    //되살리기 한번만 해달라는 장효은 선생님 요청
    model.removeNodeset ( "/root/prcpdel/prcplist" );
}

/**@desc   : drag 시 이동할 grid 인스턴스 저장
 * @id     : grd_prcplist
 * @event  : ondragstart
 * @return : void
 * @authur : 마정민 2007. 4. 04
 */
function fGridDrag() {

    var selectedRows = grd_prcplist.selectedRows;
    var cnt=0;

    for (var i=0; i< selectedRows; i++)
    {
        if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status") != "S" ){ //검색은 드래그 안한다.
            //drop후 drop내용을 색칠하기 위해 버퍼로 보낼 노드에 S를 표시한다.
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcprefseq",  "S");
            fPrcpBuffer( ++cnt, grd_prcplist.selectedrow(i), "/root/prcpdrag", prcpNode )
            //버퍼에 저장은 됐다. drop후 본체를 삭제하기 위해 본체에 표시해 둔다.
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcprefseq",  "D");
        }
    }
    grd_prcplist.rebuild();
}

/**@desc   : drop위치에 인스턴스 mapping, 본체 remove, 이동한 row select
 * @id     : grd_prcplist
 * @event  : ondrop
 * @return : void
 * @authur : 마정민 2007. 4. 04
 */
function fGridDrop( dropRow ) {
    if( dropRow != -1 ) { //drop할 그리드 row가 있을 때만 동작한다.
        
        //맨끝줄로 이동했을 경우는 그 위줄로 drop 되게 해놓았다. 왜냐하면 검색을 제일 아래 줄로 만들기 위해서다. 
        //아래 로직을 풀면 맨 아래로도 이동 가능하다.
        if ( dropRow == ( grd_prcplist.rows - 1)){
            dropRow = dropRow -1;

        }
        var srcNodeList = model.instances(0).selectNodes("/root/prcpdrag/prcplist");
        var destNode = model.instances(0).selectSingleNode("/root/main/prcp");
        var row;
        var selStart;
        var selEnd;
        var cnt=0;

        //===========  drop 시작
        //중간에 끼워 넣는 것이라면 duplicate
        if (dropRow !=  (grd_prcplist.rows-1) ){
            for (var i=1; i<=srcNodeList.length; i++) {
                row = dropRow + i;
                model.duplicate("/root/main/prcp", "/root/prcpdrag/prcplist[" + i + "]", "*[" + row + "]");
            }
        } else { //마지막 줄에 붙혀 넣는것은 appendChild
            for (i= 0; i<srcNodeList.length ; i++){
                destNode.appendChild(srcNodeList.item(i).cloneNode(true));
            }
        }
        
        //복사된 본체는 삭제한다. 단 복사한 수 만큰 row가 추가되기 때문에 srcNodeList.length 만큼 추가해서 루프를 돌려 표시된 데이터를 찾는다.
        for (var i = grd_prcplist.rows + srcNodeList.length; i>=1; i--) {
            if (model.getValue ( prcpNode + "[" + i + "]/prcprefseq") == "D" ){
                model.removeNode ( prcpNode + "[" +  i + "]" );
              }
        }
        //=========== drop 끝

        grd_prcplist.rebuild(); //rebuild를 마지막에 하면 select가 풀린다.
        model.recalculate();
            
        //=========== select 시작
        for (var i = 1; i < grd_prcplist.rows; i++ ) {
          if (model.getValue ( prcpNode + "[" + i + "]/prcprefseq") == "S" ){
               if (cnt==0){ //시작점을 잡는다.
                   selStart = i;
               }
              cnt++;
              model.setValue ( prcpNode + "[" + i + "]/prcprefseq",""); //추가 drag and drop을 위해 초기화 한다.
          }
        }
        selEnd = selStart + srcNodeList.length-1;
        grd_prcplist.select(selStart, prcpnmCol, selEnd, prcpnmCol) = true;
        //=========== select 끝
    } else {
        //엉뚱한 곳에 drop 할 때 가지고 있던 값을 초기화 한다.
        for (var i = 1; i < grd_prcplist.rows; i++ ) {  
              model.setValue ( prcpNode + "[" + i + "]/prcprefseq","" );
          }
        }
}

/**@desc   : 처방 데이터 저장시 저장할 데이터가 있는 지 check
 * @param  : prcpflag: 저장 위치 구분. 0은 메인
 * @return : 0:인증저장(진단+상병), 1:인증저장(진단), 2:인증저장(처방), 4:임시저장(처방), 5:임시저장DC(처방), 6:임시저장(진단+처방), 7:임시저장(진단) 
 * @authur : 마정민 2007. 4. 04
 */
function fSaveExistCheck(savekindflag, patyn) {
    var srcNodeList = 0;
    var prcpCnt = 0; 
    var tempPrcpCnt = 0;
    var tempDcPrcpCnt = 0;
    var tempDiagPrcpCnt = 0;
    var diagCnt = 0;
    var status = "";

    if (isNull(savekindflag)) savekindflag = "0";

    if ( savekindflag == "0" ) {
        srcNodeList = model.instances(0).selectNodes("/root/main/prcp/prcplist");
        for ( i=1; i <= srcNodeList.length; i++  ) {
            if (patyn == "Y") {
                if ( model.getValue( "/root/main/prcp/prcplist[" + i + "]/status" ) != "S"  && model.getValue( "/root/main/prcp/prcplist[" + i + "]/status" ) != "-" ){
                    prcpCnt++;
                }
            } else {
                if ( model.getValue( "/root/main/prcp/prcplist[" + i + "]/status" ) != "S" ){
                    prcpCnt++;
                }                
            }
        }
        dcNodeList = model.instances(0).selectNodes("/root/prcpdc/prcplist");
        for ( i=1; i <= dcNodeList.length; i++  ) {
            prcpCnt++;
        }
        diagNodeList = model.instances(0).selectNodes( "/root/main/diaginfo/diagcdlist" );

        for ( i=1; i <= diagNodeList.length; i++  ) {
            status = model.getValue( "/root/main/diaginfo/diagcdlist[" + i + "]/status" );
            if (patyn == "Y") {
                if ( status != "S" && status != '-' && status != 'T' ){              
                    diagCnt++;
                }
            } else {
                if ( status != "S" && status != '-' ){              
                    diagCnt++;
                }                
            }
        }
    } else if ( savekindflag == "1" ) {
        srcNodeList = model.instances(0).selectNodes("/root/main/prcp/prcplist");
        for ( i=1; i <= srcNodeList.length; i++  ) {
            if ( model.getValue( "/root/main/prcp/prcplist[" + i + "]/status" ) != "S" && model.getValue( "/root/main/prcp/prcplist[" + i + "]/status" ) != "-" ){
                tempPrcpCnt++;
            }
        }
        dcNodeList = model.instances(0).selectNodes("/root/prcpdc/prcplist");
        for ( i=1; i <= dcNodeList.length; i++  ) {
            tempDcPrcpCnt++;
        }

        if ( tempDcPrcpCnt > 0 ) {
            return 5;
        }

        diagNodeList = model.instances(0).selectNodes( "/root/main/diaginfo/diagcdlist" );

        for ( i=1; i <= diagNodeList.length; i++  ) {
            status = model.getValue( "/root/main/diaginfo/diagcdlist[" + i + "]/status" );

            if ( status != "S" && status != '-' ){              
                diagCnt++;
            }
        }
        if ( diagCnt > 0 && tempPrcpCnt > 0 && savekindflag == "1"  ) {
            return 6;
        }
        if ( diagCnt > 0 && tempPrcpCnt == 0 && savekindflag == "1"  ) {
            return 7;
        }
    } 

    if ( prcpCnt > 0 && diagCnt > 0) { // 처방도 존재, 진단도 존재
        return 0;
    } else if ( diagCnt > 0 ) { // 진단만 존재
        return 1;
    } else  if ( prcpCnt > 0 ) { // 처방만 존채
        return 2;
    } else if ( tempPrcpCnt > 0 ) { // 임시처방만 존재
        return 4;
    }   
    
    return -1;
}

/**@desc   : 처방 데이터 저장
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             prcpchkflag: 저장하시겠습니까 등 메시지를 띄울것인지 check
 * @return : true, false
 * @authur : 마정민 2007. 4. 04
 */
function fPrcpSave( prcpflag, savekindflag, saveNode, prcpchkflag ) {
    var startStepDate = new Date(); // 각 업부 시작 시간
    var stepElapsed   = null;
    var endStepDate   = null;       // 각 업부 종료후 시간
    
    var sRTC = "/root/prcpsave/rtc";  // 처방저장 실시간 체크(RealTimeCheck)변수 노드 경로
    
    model.setValue ( "/root/send/cond1", model.getValue ( "/root/paminfo/list/instcd" ));
    model.setValue ( "/root/send/cond2", model.getValue ( "/root/paminfo/list/ioflag" ));
    model.setValue ( "/root/send/cond3", model.getValue ( "/root/paminfo/list/pid" )); 
    if(model.getValue ( "/root/paminfo/list/ioflag" ) == "O" || model.getValue ( "/root/paminfo/list/ioflag" ) == "S") {
        model.setValue ( "/root/send/cond4", model.getValue ( "/root/paminfo/list/orddd" ));
    } else {
        model.setValue ( "/root/send/cond4", model.getValue ( "/root/paminfo/list/indd" ));
    }
    model.setValue ( "/root/send/cond5", model.getValue ( "/root/paminfo/list/cretno" ));
    model.setValue ( "/root/send/cond6", getUserInfo("userid") );
    model.setValue ( "/root/send/cond7", getUserInfo("dutplcecd") );
    
    submit ( "TRMMO00148", false ); // 처방저장 실시간 체크(RealTimeCheck)변수 설정
    
    try {
        fPrcpSave_new( prcpflag, savekindflag, saveNode, prcpchkflag );
    } catch(err) {
        messageBox ( "fPrcpSave() 실행 중 오류가 발생 하였습니다. 전산실(6598)로 연락 부탁드립니다.", "E" );
    } finally {
        model.removeNodeset(sRTC);
    }
    
    //endStepDate  = new Date(); // 각 업부 종료후 시간
    //stepElapsed  = endStepDate.getTime() - startStepDate.getTime(); // 화면 오류 체크전 처리 소요시간
    
    // 속도체크를 위한 모니터링 로그 데이터 생성.
    //reqSetMonitoringLog( "PrcpSave" + sNewLogic, stepElapsed);
}

function fPrcpSave_new( sPrcpFlag, sSaveKindFlag, saveNode, sPrcpChkFlag ) {
    //model.addlog("SPEED CHECK START OF fPrcpSave()");
    //model.addlog("  SPEED CHECK START OF 처방가능체크(화면)");
    
    var sRTC = "/root/prcpsave/rtc";  // 처방저장 실시간 체크(RealTimeCheck)변수 노드 경로
    
    //처방 시간을 계산하기 위해 변수 추가 2012.11.19 엄영만
    var startStepDate = new Date(); // 각 업부 시작 시간
    var endStepDate   = null;       // 각 업부 종료후 시간
    var step1Elapsed  = null; // 화면 오류 체크전 처리 소요시간
    var step2Elapsed  = null; // 서버 오류 체크 소요시간
    var step3Elapsed  = null; // 화면 서버 오류 처리 소요시간
    var step4Elapsed  = null; // 서버 실제 저장 소요시간 
    var step5Elapsed  = null; // 화면 저장후 처리 소요 시간
    var nPrcpCnt = 0;        // 처방 갯수
    var nDiagCnt = 0;        // 진단 갯수
    
    var xpt = window.screenleft + 200;
    var ypt = window.screenTop + 100;                   
    var coord = getRelativeCoordinate ( xpt, ypt );
    var mon = coord[0];
    xpt = coord[1];
    ypt = coord[2];

    var sCpFlag       = model.getValue("/root/cp");  // CP 여부
    var sAddPrcp      = model.getValue("/root/addprcp"); // 시행부서 처방여부
    var sPrcpAuthFlag = model.getValue("/root/init/prcpauthflag"); // 처방권한구분
    var sPrcpGenrFlag = model.getValue("/root/patflag/list/prcpgenrflag" ); // ioflag O:외래, S:검진, I:입원, E:응급, D:DSC
    var sAftDcYn      = "N"; //청구후 d/c처방 여부 by sonjy 20081027
    var sUserId       = getUserInfo ("userid");
    
    var sInstCd    = model.getValue("/root/paminfo/list/instcd" );
    var sPid       = model.getValue("/root/paminfo/list/pid" );
    var sCretNo    = model.getValue("/root/paminfo/list/cretno" );
    var sOrdDeptCd = model.getValue("/root/paminfo/list/orddeptcd");
    var sPrcpDd    = model.getValue("/root/init/prcpdd" );
    var sOrdDd     = "";
    var sOrdDrId   = "";
    
    if ( sPrcpGenrFlag == "O" || sPrcpGenrFlag == "S" ) {
        sOrdDd   = model.getValue("/root/paminfo/list/orddd");
        sOrdDrId = model.getValue("/root/paminfo/list/orddrid");
    } else {
        sOrdDd   = model.getValue("/root/paminfo/list/indd");
        sOrdDrId = model.getValue("/root/paminfo/list/medispclid");
    }
    
    var sMsgDd        = "";  // 메세지키 메세지일자
    var sMsgNo        = "";  // 메세지키 메세지번호
    var sHistNo       = "";  // 메세지키 메세지이력번호
    var sCheckErrCnt  = "";  // 에러 항목
    var sCheckResnCnt = "";  // 사유 입력 항목
    var sCheckInfoCnt = "";  // 정보 확인 항목
    var sCheckEtcCnt  = "";  // 기타 처리 항목
    var sCheckBfOpCnt = "";  // 오류체크 처방저장전 오픈 카운트
    var sCheckAfOpCnt = "";  // 오류체크 처방저장후 오픈 카운트
    
    var pop_DrgAbleYn       = "N"; // DRG적용 찹 팝업 여부
    var pop_MedicineConsult = "N"; // 복약상담의뢰 창 팝업 여부 2011.10.24 엄영만 (칠곡 약제부 이석미 요청)
    var pop_EnConsult       = "N"; // TPN 영양 상담 여부
    var pop_ExamRsrvYn      = "N"; // 통합검사예약 처방 항목 여부 2015.10.01 엄영만
    var pop_PregnantYn      = "N"; // 임신부 등록 팝업 여부 2017.01.09 엄영만
    
    //by sonjy 20091120 전처방 개인별 조회 option 추가  
    var bfprcpviewnode =  instance1.selectSingleNode("/root/initsrch/envinfo[qestcd='018']/answcnt");
    var sBfPrcpViewFlag = ""; 
    if( bfprcpviewnode != null ) {
        sBfPrcpViewFlag = bfprcpviewnode.text ;
    }
    
    /*********************************************************************************************************** 
     *  1. 화면 오류 체크 및 저장 데이터 구성
     ***********************************************************************************************************/
    var curErrObj  = getOpenWindow("SPMMO00600"); //활성화된 오류 화면 object loading
    if(curErrObj != null)  curErrObj.javascript.fClose();
    var curOpenObj = getOpenWindow("SPMMO90600"); //활성화된 오픈 화면 object loading
    if(curOpenObj != null) curOpenObj.javascript.fClose();
    
    if ( isNull(sPrcpFlag))     sPrcpFlag = "0";          
    if ( isNull(sSaveKindFlag)) sSaveKindFlag = "0";          
    if ( isNull(saveNode))      saveNode = "/root/main/prcp/prcplist";

    //20091208 HJS DUR적용여부를 임시적으로 실시간으로 가져와서 체크한다.
    reqHardCodeInfo("/root/hidden/durappinfo", "/root/hidden/durappinfo", "119");
    model.makeValue( "/root/initsrch/durappyn/trgtcd", model.getValue("/root/hidden/durappinfo/hardcd/hardcd") )
    
    //PRN 적용여부를 실시간으로 가져와서 체크한다. 2010-01-02 by LYJ 
    reqHardCodeInfo("/root/hidden/prnprcpyninfo", "/root/hidden/prnprcpyninfo", "173");
    model.makeValue( "/root/save/saveflaginfo/prnprcpyninfo", model.getValue("/root/hidden/prnprcpyninfo/hardcd/hardcd") );
    
    //전처방 탭이 아닌 탭에 포커싱 될 때 인증저장 시 DC처방 저장되지 않음. "btn_ivbfprcp.selected &&" 조건 삭제 (JJE)
    if ( sCpFlag != "Y" ) {
        if ( model.getValue ( "/root/init/setprcpyn") == "Y" ) {
            ivw_prcp3.window.javascript.fAppendDC();
        }
    } else {
        if ( prtlprcpstatus_SMMMO00110 != "U" ) {   //OCS활성화된 경우만 체크 && btn_ivbfprcp.selected && btn_init.visible == false && btn_reinit.visible == false //CP에서 DC+추가처방발행 안돼서 해당 조건 삭제(2010.07.06 JJE)
            var dcNode = ivw_prcp3.instance1.selectSingleNode("/root/prcpsrch/prcplist[chkcol=D]");                     // DC처방           
            if( dcNode != null && model.getValue ( "/root/init/setprcpyn") == "Y" ){
                ivw_prcp3.window.javascript.fAppendDC();
            }
            model.makeValue ( "/root/save/saveflaginfo/prtlflag", prtlFlag_SMMMO00110 ); //MMPHPTCP의 prtlflag(프로토콜구분)이 '-'이거나 '01'이면 CP (DC저장을 위함)
        }
    }

    var sSaveDataFlag = fSaveExistCheck( sSaveKindFlag );
    if ( sSaveDataFlag == -1 ) {
        if ( sPrcpGenrFlag == "O" ) { 
            sSaveDataFlag = 3;
        } else {
            messageBox ( "저장할", "E013" );
            return false;
        }
    } else if ( sSaveDataFlag == 5 ) {
        messageBox ( "처방DC는 임시저장", "E001" );
        return false;
    } 
    
    // 처방 저장시 화면에서 처장 가능 한지 체크 한다.
    var sIprcAddYn = model.getValue("root/paminfo/list/iprcaddyn");  // 추가처방 발행여부(심사실 가퇴원 환자)는 처방저장 가능 체크 제외 2012.04.16
    if(sIprcAddYn != "Y" && !fCheckBeforePrcpSave( sPrcpFlag, sSaveKindFlag, saveNode, sPrcpChkFlag )) return false;

    var sSaveOk = "N";
    if ( sPrcpChkFlag != "N" ) { // sPrcpChkFlag가 N 이면 메시지를 안물어보고 넘어간다.       
        if ( sPrcpChkFlag == "clickpatlist" ){ sSaveOk = "Y"; }   // 진료대상자리스트에서 선택되었을때는 메세지 띄우지 않는다.   20100317 LYJ  
        if ( sPrcpChkFlag != "drugdc" ) sPrcpChkFlag = "Y"; //반환요청이 아니라면 Y로 해준다.
        if (model.getValue ( "/root/initsrchprcp/prcpetccnts/admiprcpyn" ) == "Y" ) { //admission 처방이 없는데
            if ( !isNull(model.getValue ( "/root/main/prcp/prcplist[prcpkindcd='10']/prcpcd"))) { //정규처방이 존재하면
                if ( "7" == messageBox ( "입원당일 Admission 처방이 존재하지 않습니다. 그래도 정규처방을", "Q002" )) return false;
                else sSaveOk = "Y"; //질문을 한번만 하려고 수정
            }
        }
        
        if ( sSaveOk == "N" ) {
            if ( sSaveDataFlag == 6 ) {
                if( messageBox ( "", "Q002" ) == "6"  ) {
                    sSaveOk = "Y";
                } else {
                    sSaveOk = "N";
                }
            } else {
                if( messageBox ( "", "Q002" ) == "6"  ) sSaveOk = "Y";
            }
        }
    } else {
        sSaveOk = "Y"
    }
    
    if( sSaveOk != "Y"  ) { return false; }

    if (sSaveKindFlag != 1) { // 처방 저장전 체크 해야 할 것들           
        if (!fPrcpSaveChkBf(sPrcpChkFlag)) return false; 
    }
    
    model.removeNodeSet ( "/root/send/cond2" );
    model.makeNode ( "/root/send/cond2" );
    
    //저장등록정보(saveRgstInfo)
    if ("I" == sPrcpGenrFlag || "E" == sPrcpGenrFlag || "D" == sPrcpGenrFlag) {
        model.setValue ( "/root/paminfo/list/dethdt", model.getValue(sRTC + "/patinfo/dethdt")); // 인증저장데이터 생성위치 변경에 따라 사망일자를 실시간 조회 하여 설정 2013.06.05 엄영만
    }
    var saveRgstInfo = model.instances(0).selectNodes( "/root/paminfo/list" );
    model.setValue ( "/root/send/cond2", getNodeListCSV(saveRgstInfo)); 
    
    //저장처방정보(savePrcpInfo)
    var savePrcpInfo = model.instances(0).selectNodes( saveNode );
      
    // 미완성 처방 저장 시, '-' 까지 함께 저장하려 하기때문에 I 만 저장하도록 분기 (2008.10.15 JJE) (s)
    if( sCpFlag != "Y" ){
        model.copyNode ( "/root/send/cond3", "/root/main/prcp" ); 
    }else{
        fClearSaveInstance();
        fAppendSaveNode( "/root/send/cond3", saveNode );
    }
    
    fAppendSaveNode( "/root/send/cond3", "/root/prcper/prcplist" );
    fAppendSaveNode( "/root/send/cond3", "/root/prcpdc/prcplist" );
    
    nPrcpCnt = model.instances(0).selectNodes("/root/send/cond3/prcplist" ).length - 1;
    //청구후 d/c처방 여부 setting by sonjy 20081027 => 청구후 d/c일 경우 산정특례 및 법정전염병등의 처방저장 후 로직을 탈필요가 없음.
    var aftdclist = model.instances(0).selectNodes( "/root/prcpdc/prcplist[tempcol21='C']" ); 
    if( aftdclist != null ){
        if( aftdclist.length > 0 ) sAftDcYn = "Y";
    }   
    
    if ( sPrcpChkFlag == "drugdc" ) { //약/주사 D/C 요청 중에 반납요청된 것은 D/C 처리한다.( 저장로직에서 사용 )
        model.setValue ( "/root/send/cond14", getNodeListCSV (model.instances(0).selectNodes( "/root/prcpdc/prcplist" ))); 
    }

    //setValue 후에 prcpdc 에 옮겨 놓은 prcplist를 클리어 한다.
    model.removeNodeset ( "/root/prcpdc/prcplist" ); 

    //저장진단정보(saveDiagInfo)
    var saveDiagInfo = model.instances(0).selectNodes( "/root/main/diaginfo/diagcdlist" );
    nDiagCnt = saveDiagInfo.length - 1;
    model.setValue ( "/root/send/cond4", getNodeListCSV(saveDiagInfo));         

    // 처방 진단 암호화 정보 생성(인증서창 팝업)
    if ( sSaveKindFlag != 1 && signyn == "Y" ) {
        var sSignBfPrcpConts = getSignBfConts("1", "/root/paminfo/list", "/root/send/cond3/prcplist");      // 암호화전 인증저장 처방 데이터
        var sSignBfDiagConts = getSignBfConts("2", "/root/paminfo/list", "/root/main/diaginfo/diagcdlist"); // 암호화전 인증저장 진단 데이터
        var sSignAfPrcpConts = "";  // 암호화후 인증저장 처방 데이터
        var sSignAfDiagConts = "";  // 암호화후 인증저장 진단 데이터
        var bSignOpt = false;
        
        // 응급실환자중 하드코드에 등록되어 있는 과 의사가 로그인 후 처방을 낼 경우에는 인증저장을 한번만 하게 함.(외래와 동일하게 처리)
        var sPD = model.getValue("/root/hidden/securelimitdeptlist/hardcd[hardcd = '" + getUserInfo("dutplcecd") + "']/hardcd");
        if ( sPrcpGenrFlag != "O" && !(sPrcpGenrFlag == "E" && sPD != "") ) {
            bSignOpt = true;
        }
        
        // 입원 또는 응급일 경우                    // 20111201 knuh 최원돈
        // 기록/처방 직전 인증저장이 정해진 시간(분 단위, 하드코드 401) 이내이면 인증서를 띄우지 않음(1/2)
        // SMMMO00100.js, MMR01300.js, MMR00100.js, SPMRF05200.js
        // 띄우지 않는 로직
        var ls_emrinptsavetime = fGetHardCDList("Y", 401, 3);
        var ll_emrinptsavetime = ls_emrinptsavetime == "" ? 0 : parseInt(ls_emrinptsavetime) * -1; 
        if (   (   sPrcpGenrFlag == "I"
                || sPrcpGenrFlag == "E")
            && ll_emrinptsavetime < 0
            && getGlobalVariable("emrinptsavetime") >= getCurrentDateTime().toDate("YYYYMMDD hhmmss").getAddDate(ll_emrinptsavetime, "m").getDateFormat("YYYYMMDD hhmmss"))
        {
            bSignOpt = false;
        }
        
        if(!isNull(sSignBfPrcpConts)) {
            sSignAfPrcpConts = fSaveSign ( sSignBfPrcpConts, sUserId, bSignOpt); //처방인증
            if ( sSignAfPrcpConts != "N" ) {
                if (isNull( sSignAfPrcpConts )) { return false; }
                bSignOpt = false; //진단에서 또 안띄우기 위해서 false로 수정
            }
        }

        if(!isNull(sSignBfDiagConts)) {
            sSignAfDiagConts = fSaveSign ( sSignBfDiagConts, sUserId, bSignOpt); //진단인증
            if ( sSignAfDiagConts != "N") {
                if (isNull(sSignAfDiagConts)) { return false; }
            }
        }
    }

    // 저장구분정보(saveFlagInfo)
    model.setValue  ( "/root/save/saveflaginfo/savedataflag",       sSaveDataFlag );                                       // 저장자료구분 0:진단 및 처방, 1:진단, 2:처방, 4:처방임시저장, 6:진단 및 처방 임시저장, 7:진단임시저장
    model.setValue  ( "/root/save/saveflaginfo/saveflag",           sPrcpGenrFlag);                                        // 저장구분 O:외래, I:입원, E:응급, S:건진
    model.setValue  ( "/root/save/saveflaginfo/prcpflag",           sPrcpFlag );                                           // 처방구분 0:의사처방, 2:간호, 3:지원부서, 5:Admission, 6:CP, 7:항암프로토콜, 8:임시처방
    model.setValue  ( "/root/save/saveflaginfo/inptflag",           "0" );                                                // 입력구분 0:의사, 1:간호사(간호에서 사용), 3:지원부서
    model.setValue  ( "/root/save/saveflaginfo/deptcd",             getUserInfo("dutplcecd"));                            // 부서코드
    model.setValue  ( "/root/save/saveflaginfo/deptnm",             getUserInfo("dutplcenm"));                            // 부서명
    model.setValue  ( "/root/save/saveflaginfo/userid",             getUserInfo("userid"));                               // 사용자ID
    model.setValue  ( "/root/save/saveflaginfo/usernm",             getUserInfo("usernm"));                               // 사용자명
    model.setValue  ( "/root/save/saveflaginfo/prcpdd",             sPrcpDd);    
    model.setValue  ( "/root/save/saveflaginfo/divyn",              sPrcpChkFlag );                                        // 용량분할 할건지
    model.makeValue ( "/root/save/saveflaginfo/durappyn",           model.getValue( "/root/initsrch/durappyn/trgtcd" ) ); // 2010.11.24 이선경 수정 : 경북대용 DUR flag값을 던져줘야 함
    model.makeValue ( "/root/save/saveflaginfo/nonprgflag",         fCompareNonPrgDiag());
    model.makeValue ( "/root/save/saveflaginfo/ipaddress",          getUserInfo("ipaddr"));                               // 사용자 ipaddress정보
    model.makeValue ( "/root/save/saveflaginfo/screenid",           getScreenID());                                       // 사용자 화면 정보
    model.makeValue ( "/root/save/saveflaginfo/savekindflag",       sSaveKindFlag );                                       // 처방저장구분 0: 인증저장, 1:임시저장
    model.makeValue ( "/root/save/saveflaginfo/cpflag",             sCpFlag );                                            // CP처방 Flag
    //2014/02/10 주석처리
    //model.makeValue ( "/root/save/saveflaginfo/preworkup",          "N");                                                 // preworkup 여부 디폴트값
    //2014/02/10
    model.makeValue ( "/root/save/saveflaginfo/signbfprcpconts",    sSignBfPrcpConts); // 인증저장 암호화 전 처방 데이터
    model.makeValue ( "/root/save/saveflaginfo/signbfdiagconts",    sSignBfDiagConts); // 인증저장 암호화 전 진단 데이터
    model.makeValue ( "/root/save/saveflaginfo/signafprcpconts",    sSignAfPrcpConts); // 인증저장 암호화 전 처방 데이터
    model.makeValue ( "/root/save/saveflaginfo/signafdiagconts",    sSignAfDiagConts); // 인증저장 암호화 전 진단 데이터
    model.makeValue ( "/root/save/saveflaginfo/aftdcyn",            sAftDcYn);                                             // 청구후 DC 여부
    model.makeValue ( "/root/save/saveflaginfo/addprcp",            sAddPrcp);                                             // 시행부서 처방여부
    model.makeValue ( "/root/save/saveflaginfo/bfprcpviewflag",     sBfPrcpViewFlag);                                      // 전처방 개인별 조회 option
    model.makeValue ( "/root/save/saveflaginfo/prcpauthflag",       sPrcpAuthFlag);                                       // 처방권한구분
    model.makeValue ( "/root/save/saveflaginfo/dschprcpyn",         model.getValue ("/root/hidden/dschprcpyn"));          // 퇴원처방 발행 여부
    
    // 현재 사용하지 않음 추후 삭제 검토 엄영만 2013.11.07
    model.makeValue( "/root/save/saveflaginfo/judgtrgtchkyn",       "N" ); //정밀 심사대상 약제(뇌대사개선제, 뇌혈류개선제, 뇌증상개선제) 체크 (2010.01.28 JJE)
    model.makeValue( "/root/save/saveflaginfo/idementiachk",        "" );  //by sonjy 20100420 / 치매약제(dementia drug) 복용 시 FF621601 검사 처방 ALERT 팝업 메시지 요청(외래, 신경과인 경우만 체크)
    model.makeValue( "/root/save/saveflaginfo/idementiachkcode",    "" );  //by sonjy 20100420 / 치매약제(dementia drug) 복용 시 FF621601 검사 처방 ALERT 팝업 메시지 요청(외래, 신경과인 경우만 체크)
    // 현재 사용하지 않음 추후 삭제 검토 엄영만 2013.11.07
    
    if ( sSaveKindFlag == 1 ) { 
        model.setValue( "/root/save/saveflaginfo/signyn", "N" );  // 임시저장
    } else {
        model.setValue( "/root/save/saveflaginfo/signyn", signyn); // 인증저장       
    }
    
    if ( sAddPrcp == "Y" ) {
        model.setValue ( "/root/save/saveflaginfo/pseuacptflag", model.getValue ( "/root/formerkey/pseuacptflag" ));
        model.setValue ( "/root/save/saveflaginfo/admininfo",    model.getValue ( "/root/admininfo" ));
    } else {
        model.setValue ( "/root/save/saveflaginfo/pseuacptflag", "N");
        model.setValue ( "/root/save/saveflaginfo/admininfo",    "NNNNNNNNNNNNNNNNNNNN");
    }
    
    var saveFlagInfoNodeList = model.instances(0).selectNodes( "/root/save/saveflaginfo" );
    model.setValue ( "/root/send/cond1", getNodeListCSV(saveFlagInfoNodeList));
    
    // DUR 점검결과 전문(DUR 처방전간 체크시 필요함.)
    model.setValue ( "/root/send/cond5", ""); // 처음 체크시에는 값이 없음. 
    
    //20080909 시행부서처방 (진단 복사할 원무정보)
    if ( model.getValue ( "/root/formerkey/pseuacptflag" ) == "Y" ) {
        var saveFormerkey = model.instances(0).selectNodes( "/root/formerkey" );
        model.setValue ( "/root/send/cond15", getNodeListCSV(saveFormerkey));
    } else {
        model.setValue ( "/root/send/cond15", "");
    }
    
    endStepDate   = new Date(); // 각 업부 종료후 시간
    step1Elapsed  = endStepDate.getTime() - startStepDate.getTime(); // 화면 오류 체크전 처리 소요시간
    startStepDate = new Date(); // 각 업부 시작 시간
    //model.addlog("  SPEED CHECK END OF 처방가능체크(화면)");
    //model.addlog("  SPEED CHECK START OF 저장 데이터 생성(오류/사유)");
    
    /*********************************************************************************************************** 
     *  2. APP 오류 체크 및 저장  처리
     ***********************************************************************************************************/
    var sReSaveYn = "Y"; // 처음 한번은 Call 하도록 설정(오류가 있을경우 화면에서 처리 하고, 다시 Call 하도록 
    while (sReSaveYn == "Y") {
        //createLoadingWindow("처방 데이터 저장 중입니다.", 400, 250);
        if ( sPrcpGenrFlag == "O"  ||  sPrcpGenrFlag == "S"  ) { //건진일 경우 외래와 동일 처리 BY SONJY 2008-09-03
            if ( !submit ( "TXMMO00121", false )) {
                if (sCpFlag != "Y" || sSaveKindFlag == 1 ) {    //조건추가(2008.09.01 JJE)
                    model.resetInstanceNode ( "/root/send" );
                    model.removeNodeSet ( "/root/result");
                }
                fClearSaveInstance();
                model.refresh();
                //removeLoadingWindow();
                return false;
            }
        } else {
            if ( !submit ( "TXMMO00122", false )){
                if (sCpFlag != "Y" || sSaveKindFlag == 1 ) {    //조건추가(2008.09.01 JJE)
                    model.resetInstanceNode ( "/root/send" );
                    model.removeNodeSet ( "/root/result");
                }
                fClearSaveInstance();
                model.refresh();
                //removeLoadingWindow();
                return false;
            }
        }
        //removeLoadingWindow();
        
        sMsgDd        = model.getValue("/root/result/saveflaginfo/msgdd");         // 메세지키 메세지일자
        sMsgNo        = model.getValue("/root/result/saveflaginfo/msgno");         // 메세지키 메세지번호
        sHistNo       = model.getValue("/root/result/saveflaginfo/histno");        // 메세지키 메세지이력번호
        sCheckBfOpCnt = model.getValue("/root/result/saveflaginfo/checkbfopcnt");  // 오류체크 처방저장전 오픈 카운트
        sCheckAfOpCnt = model.getValue("/root/result/saveflaginfo/checkafopcnt");  // 오류체크 처방저장후 오픈 카운트
        sReSaveYn     = model.getValue("/root/result/saveflaginfo/resaveyn"); // 다시 오류 체크 할지 여부
        
       	if(sCheckBfOpCnt > 0) { // 오류체크 처방저장후 오픈 카운트
    	    setParameter("SPMMO90600_msgdd",  sMsgDd);
    	    setParameter("SPMMO90600_msgno",  sMsgNo);
    	    setParameter("SPMMO90600_histno", sHistNo);
    	    setParameter("SPMMO90600_msgcls", "B");    // 처방저장 전 오픈 메세지 타입
    	    open("SPMMO90600");
    	    
    	    return false;  // 인증저장 중지
    	}
        
        if (sReSaveYn == "Y") { // 오류, 사유, 정보, 기타처리, DUR 처방전간 체크 중 하나라도 있으면 'Y'
            
            sCheckErrCnt  = model.getValue("/root/result/saveflaginfo/checkerrcnt");   // 에러 항목
            sCheckResnCnt = model.getValue("/root/result/saveflaginfo/checkresncnt");  // 사유 입력 항목
            sCheckInfoCnt = model.getValue("/root/result/saveflaginfo/checkinfocnt");  // 정보 확인 항목
            sCheckEtcCnt  = model.getValue("/root/result/saveflaginfo/checketccnt");   // 기타 처리 항목
            
            if(sCheckErrCnt > 0) { // 에러 항목이 존재 하면
                var prcpErrList = model.instances(0).selectNodes( "/root/result/prcperrlist" );     
                if ( prcpErrList != null && prcpErrList.length > 0) {
                    var sFlag      = "";
                    var nErrorCnt  = 0;     // 에러 오류 처리   
                    var nBfJudgCnt = 0;     // 사전심사 관련 내용은 따로 처리하기 위해서 로직 추가
                    
                    for ( var i=1; i <= prcpErrList.length; i++ ) {
                        sFlag = model.getValue ( "/root/result/prcperrlist[" + i + "]/flag" );
                        if ( sFlag == "1" ) {
                            nErrorCnt++;
                            nBfJudgCnt = 0;
                            break;
                        } else if (sFlag == "9") { // 사전심사에 관련한 에러내용은 따로 처리한다.  2010. 10. 08  김영학
                            nBfJudgCnt++;
                        }
                    }
        
                    if ( nErrorCnt > 0 ) {        // 처방 오류 처리
                        open ( "SPMMO00600", mon,  xpt, ypt, "prcpdetl", "/root/result", "/root/result", "", false ); //오류팝업
                        
                        var nErrRow = 1;                
                        var nDcRow  = 0;
                        var sDcPrcpPkSpec = "";
                        var DcErrArray = new Array();
                        for ( var i=1; i<=prcpErrList.length; i++ ) {
                            if (model.getValue ("/root/result/prcperrlist[" + i + "]/flag") == "1") {
                                nErrRow       = model.getValue ("/root/result/prcperrlist[" + i + "]/errrow");
                                sDcPrcpPkSpec = model.getValue ("/root/result/prcperrlist[" + i + "]/dcprcppkspec");
                                if ( !isNull(nErrRow) && nErrRow > 0 && nErrRow < grd_prcplist.rows -1 ) {
                                    model.setValue ("/root/main/prcp/prcplist[" + nErrRow + "]/tempcol9", "#ff6600");
        
                                    //응급처방 할 수 없는 처방코드 수정
                                    //if(model.getValue("/root/main/prcp/prcplist[" + nErrRow + "]/erprcpflag") == "Y"){
                                    //    model.setValue("/root/main/prcp/prcplist[" + nErrRow + "]/erprcpflag", 'N');
                                    //    model.setValue("/root/main/prcp/prcplist[" + nErrRow + "]/prcpnm", model.getValue("/root/main/prcp/prcplist[" + nErrRow + "]/orgprcpnm") );
                                    //    model.setValue("/root/main/prcp/prcplist[" + nErrRow + "]/prcprefseq","0" );
                                    //}
                                } else if ( !isNull(sDcPrcpPkSpec)   ){ //dc처방 색변경을 위한 수정 시작 by 손주연 2008-06-30
                                    DcErrArray[nDcRow] = sDcPrcpPkSpec ;
                                    nDcRow ++; 
                                } //dc처방 색변경을 위한 수정 종료 by 손주연 2008-06-30
                            }
                        }
                        fPrcpColor();
        
                        if( nDcRow > 0 ){  //dc처방 색변경을 위한 수정 시작 by 손주연 2008-06-30
                            if( btn_ivbfprcp.selected == true && model.getValue("/root/bfinityn") ==  "Y" ){ 
                                if ( sCpFlag != "Y" ) { 
                                    ivw_prcp3.window.javascript.fSetErrDCRow(DcErrArray);
                                }else{
                                    ivw_prcp3.window.javascript.fSetErrDCRow(DcErrArray);
                                }
                            }
                        } //dc처방 색변경을 위한 수정 종료 by 손주연 2008-06-30
        
                        fClearSaveInstance();
                        model.removeNodeset("/root/result/prcperrlist");
                        return false;
                    } else if ( nBfJudgCnt > 0) { // 사전심사 요구 처리
                        clearParameter("SPMMO21500_rntValue"); //parameter 초기화(2011.01.31 JJE)
                        modal ( "SPMMO21500", mon,  xpt, ypt, "prcpdetl", "/root/result", "/root/result", "", false ); //오류팝업
                        
                        var bfRtnValue = getParameter("SPMMO21500_rntValue");
                        if (bfRtnValue == "REQ") {
                            model.removeNodeset("/root/result/prcperrlist");
                            if ( isNull ( model.getValue ( "/root/main/prcp/prcplist[status='I' or status='D' or status='U']/prcpcd" ))) {
                                if (isNull(model.getValue ( "/root/main/diaginfo/diagcdlist[status='I' or status='D' or status='U']/diagcd" ))) {
                                    messageBox ( "사전심사할 처방 및 진단이 없습니다.", "E" );
                                    fClearSaveInstance();
                                    model.removeNodeset("/root/result/prcperrlist");
                                    return false;
                                }
                            }
                            if ( !fPrcpSave_new("0", "1", "", "N")) {  // 2018.06.04 엄영만 저장하시겠습니까? 묻지 않도록 수정
                                model.removeNodeset ( "/root/prcpdc/prcplist" );
                            }
                            fClearSaveInstance();
                            return false;
        
                        } else if (bfRtnValue == "chgPayFlag") {
                            model.removeNodeset("/root/result/prcperrlist");
                            var savePrcpListLen = model.instances(0).selectNodes ( prcpNode + "[status!='S']" ).length;
                            var saveDiagListLen = model.instances(0).selectNodes ( diagNode + "[status!='S' and status!='-']" ).length;
                            if ( savePrcpListLen > 0 || saveDiagListLen >0 ) {
                                fPrcpSave_new( sPrcpFlag, sSaveKindFlag, "", "N"  );
                            }
                            return false;
                        } else {
                            fClearSaveInstance();
                            model.removeNodeset("/root/result/prcperrlist");
                            return false;
                        }
                    } // End of 사전심사처리
                } else {
                    messageBox ("처방 저장시 오류가 발생하였습니다. 전산실(6598)로 문의 바랍니다." , "E" );
                    return false;
                }         
            } // End of 에러 항목이 존재 하면
            
            if(sCheckResnCnt > 0) { // 사유 입력 항목이 존재 하면
                clearParameter("SPMMO90200_rtn");
                modal("SPMMO90200", mon,  xpt, ypt, "prcpdetl", "/root/result", "/root/result", "", false); 
                if(getParameter("SPMMO90200_rtn") != "Y") { 
                    fClearSaveInstance();
                    return false; 
                } 
            } // End of 사유 입력 항목이 존재 하면
            
            if(sCheckInfoCnt > 0) { // 정보 확인 항목이 존재 하면
                clearParameter("SPMMO90100_rtn");
                modal("SPMMO90100", mon,  xpt, ypt, "prcpdetl", "/root/result", "/root/result", "", false); 
                if(getParameter("SPMMO90100_rtn") != "Y") { 
                    fClearSaveInstance();
                    return false; 
                } 
            } // End of 정보 확인 항목이 존재 하면
            
            if(sCheckEtcCnt > 0) { // 기타 처리 항목이 존재 하면
                // 01. T10001, T10002 용량 분할 처리 T10001:일반 약품 용량 분할, T10002:항암 약품 용량 분할
                var sDivChkFlag  = model.getValue("/root/result/saveflaginfo/divchkflag"); // 용량 분할 처리
                if (model.getValue("/root/initsrch/durappyn/trgtcd") != "A" ) { // 경북대용 DUR 적용시에는 저함량 용량분할 체크 후 DUR 로직체크 함 durappyn : "A-전체 DUR", "Y-저함량제외 DUR", "나머지-DUR 사용안함"  , "K:경북대용 DUR"
                    if ( sDivChkFlag == "N" ) {
                        var divPrcpInfo = model.instances(0).selectNodes( "/root/result/prcplist" );
                        if ( divPrcpInfo.length > 0 ) { // 용량분할, 저함량
                            if ( !isNull(model.getValue ( "/root/result/prcplist/prcpcd"))){
                                //by sonjy 20090714 변경요청서 처리 :  저함량 용량분할창 닫기버튼 삭제처리 
                                modal ( "SPADB62400", mon,  xpt, ypt, "SPADB62400", "/root/result", "/root/main/prcp", "sysmenu:hidden;", false );  
                                model.refresh();
                                model.recalculate();        
                                fClearSaveInstance();
                            } 
                            model.refresh();
                            fPrcpSave_new( sPrcpFlag, sSaveKindFlag, "", "N"  ); // by sonjy 20100303 수정 임시처방저장시 인증저장으로 가는 오류 수정.
                            return false;
                        }
                    } else if (sDivChkFlag == "A") {
                        //20090420 마정민 수정 항암용량분할은 기존에는 서버에서 불할되어 바로 저장체크로직으로 갔지만 보험제한규정에 걸려서
                        //다시저장할때 분할된 내용이 화면이 표시가 되지 않아 용량분할이 되지 않음.
                        //항암용량분할도 화면에 표시하게 수정
                        model.removeNodeSet ( "/root/main/prcp/prcplist" );
                        var srcNodeList = model.instances(0).selectNodes("/root/result/prcplist"); 
                        var destNode = model.instances(0).selectSingleNode("/root/main/prcp");
                    
                        //용량분할시 서버체크로직에서 default="0" 으로 세팅하여 넘겨서 화면에 0 으로 조회되여 다시 ''로 초기화, 서버로직 수정은 추후검토, 2009-07-05. CHC   
                        for (i = 1; i <= getNodesetCount("/root/result/prcplist"); i++) {
                            if(model.getValue("/root/result/prcplist["+i+"]/status") == "S") {
                                model.setValue("/root/result/prcplist["+i+"]/prcpvol", "");
                                model.setValue("/root/result/prcplist["+i+"]/prcpqty", "");
                                model.setValue("/root/result/prcplist["+i+"]/prcptims", "");
                                model.setValue("/root/result/prcplist["+i+ "]/prcpdayno", "");
                                break;
                            }
                        }
                    
                        for ( i=0; i < srcNodeList.length; i++ ){
                            destNode.appendChild(srcNodeList.item(i).cloneNode(true));
                        }
                        model.refresh();
                        fPrcpSave_new( sPrcpFlag, sSaveKindFlag, "", "N"  ); // by sonjy 20100303 수정 임시처방저장시 인증저장으로 가는 오류 수정.
                        return false;
                    } 
                } // End of 용량 분할 처리
                
                // 02. T10003 퇴원예고에러발생여부
                var sDschYn  = model.getValue("/root/result/saveflaginfo/dschyn");
                if(sDschYn == "Y"){ //퇴원예고 되지 않은 사항에서 퇴원처방을 했을경우 퇴원예고 창을 띄움
                    messageBox ("퇴원예고를 해야만 퇴원 및 퇴원후외래,입원전검사(전일/당일) 처방을 저장할 수 있습니다." , "E" );
                    preDsch();
                    return false;
                }

                // 03. T10004 DRG적용 처방체크
                pop_DrgAbleYn  = model.getValue("/root/result/saveflaginfo/drgcheck"); // DRG적용 처방체크
                
                // 04. T10005 항암제 상세정보 입력 2013.08.13 엄영만
                var chemoprcplist = model.instances(0).selectNodes( "/root/result/chemoprcplist" ); // 항암제 상세정보 입력 2013.08.13 엄영만
                if ( chemoprcplist !=null && chemoprcplist.length > 0 ) {
                    for ( var i=1; i <= chemoprcplist.length; i++ ) {
                        clearParameter ( "SPMMO23000_rtn1" )
                        modal ( "SPMMO23000", mon,  xpt, ypt, "chemodetl", "/root/result/chemoprcplist["+ i +"]", "/root/main/chemoinfo", "", false );
                        if ( getParameter ( "SPMMO23000_rtn1" ) != "Y" ){
                            return false;
                        }
                    }
                }

                // 05. T10006 병기분류/항암차수 정보 입력
                if (!isNull(model.getValue ( "/root/result/savetnmlist/pid" )) || !isNull(model.getValue ( "/root/result/savecncrlist/pid" ))) { 
                    clearParameter("SPMMO08400_rtn1");
                    modal("SPMMO08400", mon,  xpt, ypt, "prcpdetl", "/root/result", "/root/tempresult", "", false );
                    if(getParameter ( "SPMMO08400_rtn1" ) != "Y") { return false; }
                }
                
                // 06. T10007 유전자검사 동의서 처리
                if (!isNull(model.getValue ( "/root/result/geneconsent/row/prcpcd"))) {
                //if (!isNull(model.getValue ( "/root/result/geneconsent/row/prcpcd")) && sCpFlag != "Y") {
                    model.removeNodeset("/root/hidden/gene2/savedata"); // 유전자 검사 동의서 저장 노드 초기화
                    model.removeNodeSet("/root/hidden/geneunitlist2");  // 유전자 검사 동의서 출력물 노드 초기화
                    modal("SPMMO21001", "", "", "", "", "/root/result/geneconsent", "/root/main/prcplist");   // 유전자 동의서
                    
                    var geneInfoNodes =  instance1.selectNodes("/root/hidden/geneunitlist2"); // 유전자 동의서 서식 데이터
                    if( geneInfoNodes.length <= 0) {
                        return false; 
                    } else {
                        if(getNodesetCount("/root/hidden/gene2/savedata") > 0){  // 유전자 동의서 저장 데이터 노드 주소
                            if(getNodesetCount("/root/hidden/gene") <= 0){ // TXMMO21001 input 노드 주소
                                model.makeNode("/root/hidden/gene");
                            } else {
                                model.removeNodeset("/root/hidden/gene/savedata");
                            }
                            copyNodeType("/root/hidden/gene", "/root/hidden/gene2", "after");
                        }
        
                        if(submit("TXMMO21001")){ // 유전자 동의서 저장
                            exeReportPreview("RPMMO21002", "XMLSTR", "/root/hidden/geneunitlist2", "", "true", "", "", "", "", "", "", "grp_report");
                            fOcrAutoPrint(model.getValue("/root/result/geneconsent/row/prcpcd")+ "▦");
                            if(!fSaveOCRIF(model.getValue("/root/result/geneconsent/row[1]/ocrtag")
                                         , model.getValue("/root/result/geneconsent/row[1]/pid")
                                         , model.getValue("/root/result/geneconsent/row[1]/orddd")
                                         , model.getValue("/root/result/geneconsent/row[1]/cretno")
                                         , model.getValue("/root/result/geneconsent/row[1]/prcpgenrflag")
                                         , model.getValue("/root/result/geneconsent/row[1]/orddeptcd")
                                         , model.getValue("/root/result/geneconsent/row[1]/orddrid")
                                         , model.getValue("/root/result/geneconsent/row[1]/formcd")
                                         , model.getValue("/root/result/geneconsent/row[1]/formfromdt")
                                         , "", "", 1) ) {
                                messageBox("유전자검사동의서 IF 저장시 오류발생", "I");
                            }
                        }
                    }
                }
                
                // 07. T10008 인체 유래물 동의서 처리
                if (!isNull(model.getValue ( "/root/result/atadconsent/row/prcpcd"))) {
                //if (!isNull(model.getValue ( "/root/result/comnconsent/row/prcpcd")) && sCpFlag != "Y") {
                    model.removeNodeset("/root/hidden/gene/savedata"); // 유전자 검사 동의서 저장 노드 초기화
                    model.removeNodeSet("/root/hidden/geneunitlist");  // 인체 유래물 동의서 서식 데이터 출력물 노드 초기화
                    modal("SPMMO21000", "", "", "", "", "/root/result/atadconsent", "/root/main/prcplist");   // 인체 유래물 동의서
                    
                    var atadInfoNodes =  instance1.selectNodes("/root/hidden/geneunitlist"); // 인체 유래물 동의서 서식 데이터
                    if( atadInfoNodes.length <= 0) { 
                        return false; 
                    } else {
                        if(submit("TXMMO21001")){ // 인체 유래물 동의서 저장
                            exeReportPreview("RPMMO21001", "XMLSTR", "/root/hidden/geneunitlist", "", "true", "", "", "", "", "", "", "grp_report");
                            fOcrAutoPrint(model.getValue("/root/result/atadconsent/row/prcpcd")+ "▦");
                            if(!fSaveOCRIF(model.getValue("/root/result/atadconsent/row[1]/ocrtag")
                                         , model.getValue("/root/result/atadconsent/row[1]/pid")
                                         , model.getValue("/root/result/atadconsent/row[1]/orddd")
                                         , model.getValue("/root/result/atadconsent/row[1]/cretno")
                                         , model.getValue("/root/result/atadconsent/row[1]/prcpgenrflag")
                                         , model.getValue("/root/result/atadconsent/row[1]/orddeptcd")
                                         , model.getValue("/root/result/atadconsent/row[1]/orddrid")
                                         , model.getValue("/root/result/atadconsent/row[1]/formcd")
                                         , model.getValue("/root/result/atadconsent/row[1]/formfromdt")
                                         , "", "", 1) ) {
                                messageBox("인체 유래물 기증 동의서 IF 저장시 오류발생", "I");
                            }
                        }
                    }
                }
                
                // 08. T10009 처방 일반 동의서 처리
                if (!isNull(model.getValue ( "/root/result/comnconsent/row/prcpcd"))) {
                    ocrcalcscorcd = "";
                    for (i = 1; i <= getNodesetCount("/root/result/comnconsent/row"); i++) {
                        ocrcalcscorcd = ocrcalcscorcd + model.getValue("/root/result/comnconsent/row["+i+"]/prcpcd") + "▦";
                    }
                    fOcrAutoPrint(ocrcalcscorcd); //OCR 자동출력 ocrcalcscorcd 값은 MMO001에 global로 선언.
                    var sOcrTagVal = model.getValue("/root/properties/parameters/SPMRF04500_OCRTAG/SPMRF04500_OCRTAGvalue"); 
                    if(!isNull(sOcrTagVal)){
                        sOcrTagVal = sOcrTagVal.replaceAll("▦", "|");
                        model.setValue("/root/properties/parameters/SPMRF04500_OCRTAG/SPMRF04500_OCRTAGvalue", ""); 
                        model.setValue("/root/result/saveflaginfo/ocrtagval", sOcrTagVal);  // 동의서 출력후 다시 체크시 처방 정보에 OCR Tag번호(drprcpetc3) 설정 하기위해
                    }
                    ocrcalcscorcd = "";
                }
            } // End of 기타 처리 항목이 존재 하면

            // 저장 3단계로 구성 - 저장 구분 정보를 재설정 한다. 2013.10.14 엄영만
            saveFlagInfoNodeList = model.instances(0).selectNodes( "/root/result/saveflaginfo" );
            model.setValue ("/root/send/cond1", getNodeListCSV(saveFlagInfoNodeList));
            // DUR 점검결과 전문 - 심평원 체크(처방전간) 로직으로 인해 화면에서 다시 값을 서버로 보낸다. 2013.10.31 엄영만
            var kDurChkRsltNodeList = model.instances(0).selectNodes( "/root/result/kdurchkrslt" );     
            model.setValue ("/root/send/cond5", getNodeListCSV(kDurChkRsltNodeList));             
        } else {
            prcpsaveyn = "Y";
            if(sCpFlag == "Y") {
                prcpsaveyn_SMMMO00110 = "Y";
                if(sSaveKindFlag != 1){
                    SubmitTF_SMMMO00110 = true;
                    model.makeNode("/root/main/invalprcplist/prcplist");
                    copyNodeListType("/root/main/invalprcplist/prcplist", "/root/result/invalprcplist", "replace", model, model);
                }
            }
            
            // 저장 성공시 saveflag 정보 관련 변수값  설정.
            pop_MedicineConsult = model.getValue("/root/result/saveflaginfo/medicosultnyn"); // 복약상담의뢰 창 팝업 여부 2011.10.24 엄영만 (칠곡 약제부 이석미 요청)
            pop_DrgAbleYn       = model.getValue("/root/result/saveflaginfo/drgcheck");      // DRG적용 처방체크
            pop_EnConsult       = model.getValue("/root/result/saveflaginfo/enconsultyn");   // TPN 영양 상담 여부
            pop_ExamRsrvYn      = model.getValue("/root/result/saveflaginfo/examrsrvyn");    // 통합검사예약 처방 항목 여부 2015.10.01 엄영만
            pop_PregnantYn      = model.getValue("/root/result/saveflaginfo/pregnantyn");    // 임신부 등록 팝업 여부 2017.01.09 엄영만
            
            // 처방저장후 화면 처리 관련 노드 설정
        	model.removeNodeSet("/root/savertninfo");
        	model.makeNode("/root/savertninfo/prcpetccnts");          // 처방 기본 설정 정보
        	model.makeNode("/root/savertninfo/rsrvcvrtprcp");         // 외래 예약처방을 입원으로 전환대상
        	model.makeNode("/root/savertninfo/prcplist");             // 저장후 전처방 리스트
        	model.makeNode("/root/savertninfo/saveestmspclcs");       // 중증/특례 적용정보
        	model.makeNode("/root/savertninfo/saveserdiagappfrm");    // 중증/특례 신청서 정보
        	model.makeNode("/root/savertninfo/savelglydis");          // by sonjy 2008-07-28 희귀난치대상자 구분 
        	model.makeNode("/root/savertninfo/saverareobst");         // 법정전염병 처방시 첫번째 상병의 신고서만 호출 2010-01-21 pyj
        	model.makeNode("/root/savertninfo/saveresindenture");     // 레진상 완전 틀니 
        	model.makeNode("/root/savertninfo/dschestmspclcs");       // 퇴원후 외래 중증/특례 적용정보
        	model.makeNode("/root/savertninfo/dschserdiagappfrm");    // 퇴원후 외래 중증/특례 신청서 정보
        	model.makeNode("/root/savertninfo/dschlglydis");          // 퇴원후 외래 by sonjy 2008-07-28 희귀난치대상자 구분 
        	model.makeNode("/root/savertninfo/dschrareobst");         // 퇴원후 외래 법정전염병 처방시 첫번째 상병의 신고서만 호출 2010-01-21 pyj
        	model.makeNode("/root/savertninfo/dschresindenture");     // 퇴원후 외래레진상 완전 틀니 
        	
        	copyNodesetType("/root/savertninfo/prcpetccnts",		"/root/result/prcpetccnts",         "replace", model, model);
        	copyNodesetType("/root/savertninfo/rsrvcvrtprcp",		"/root/result/rsrvcvrtprcp",        "replace", model, model);
        	copyNodesetType("/root/savertninfo/prcplist",		    "/root/result/bfprcplist",          "replace", model, model);
        	// 산정특례정보
        	copyNodesetType("/root/savertninfo/saveestmspclcs",		"/root/result/saveestmspclcs",      "replace", model, model);
        	copyNodesetType("/root/savertninfo/saveserdiagappfrm",	"/root/result/saveserdiagappfrm",   "replace", model, model);
        	copyNodesetType("/root/savertninfo/savelglydis",		"/root/result/savelglydis",         "replace", model, model);
        	copyNodesetType("/root/savertninfo/saverareobst",		"/root/result/saverareobst",        "replace", model, model);
        	copyNodesetType("/root/savertninfo/saveresindenture",	"/root/result/saveresindenture",    "replace", model, model);
        	// 퇴원후 외래 산정특례정보
        	copyNodesetType("/root/savertninfo/dschestmspclcs",		"/root/result/dschestmspclcs",      "replace", model, model);
        	copyNodesetType("/root/savertninfo/dschserdiagappfrm",	"/root/result/dschserdiagappfrm",   "replace", model, model);
        	copyNodesetType("/root/savertninfo/dschlglydis",		"/root/result/dschlglydis",         "replace", model, model);
        	copyNodesetType("/root/savertninfo/dschrareobst",		"/root/result/dschrareobst",        "replace", model, model);
        	copyNodesetType("/root/savertninfo/dschresindenture",	"/root/result/dschresindenture",    "replace", model, model);
        }
    }
    
    if(pop_PregnantYn == "Y") { // 임신부 등록 팝업 여부 2017.01.09 엄영만 상단 연계 정보 표시를 위해 화면처리하기 전 위치로 이동
	    if ( messageBox ( "임신부 적용 가능한 진단이 저장 되었습니다.\n임신부로 등록 하시겠습니까?","Q") == "6" ) {
	        modal("SPMMO09700");
	    }
	}
    
    endStepDate   = new Date(); // 각 업부 종료후 시간
    step2Elapsed  = endStepDate.getTime() - startStepDate.getTime(); // 서버 오류 체크 소요시간
    startStepDate = new Date(); // 각 업부 시작 시간
    
    /*********************************************************************************************************** 
     *  3. 처방 저장후 화면 처리
     ***********************************************************************************************************/
    fClearSaveInstance();
    setPatientInfoDetailByKey("prcpsaveyn", sPid+ "|" + model.getValue("/root/init/prcpobjsaveyn"));     // 처방이 저장된것을 상단에 올려준다.   
    
    //선택진료 동의서를 출력한다.
    fPrltPartSpclDrList(); // 2010.12.30 김영학 경북대 버젼 수정
    
    //2011.01.09 외래 예약 창을 팝업 한다. 
    if (sSaveKindFlag == "0" && sPrcpGenrFlag == "O" && sAddPrcp != "Y" && model.getValue("/root/init/prcpsavebtnflag") == "2"){
        setParameter("SMPMO00300_PARM1", sOrdDeptCd); //진료과코드
        setParameter("SMPMO00300_PARM2", sOrdDrId);   //진료의사코드
        setParameter("SMPMO00300_PARM3", sPid);       //환자번호   
                    
        fPrcpModal ("SMPMO00300", 0, 80);
        clearParameter("SMPMO00300_PARM1");
        clearParameter("SMPMO00300_PARM2");
        clearParameter("SMPMO00300_PARM3");
    } 
    
    // 처방저장후 화면 처리 관련
    if( sCpFlag == "Y" && sAddPrcp != "Y"  ){ //20080910 마정민 수정. 시행부서처방은 산정특례 체크 안한다.
        //JJE 조건추가 2008.09.08 인증저장인 경우, M-GPS의 적용 버튼 이벤트에서 (당일+미래처방 저장 처리가 모두 끝난 후) fGetPrcpSaveAftInfo()를 직접 호출하므로, 임시저장 때에만 여기에서 수행함.
        if( sSaveKindFlag == 1 ){
        	fExeAfterPrcpSave(prcpsaveyn ,"Y");
        }
    }else{
        if( sSaveKindFlag == 1 ) { 
            sAftDcYn = "Y"; //임시저장일 경우 산정특례 및 법정전염병 타지 않도록....by sonjy 20081123
        }
        fExeAfterPrcpSave(prcpsaveyn ,sAftDcYn); //청구후 d/c가 아닐 경우만 타도록 parameter 추가 . by sonjy 20081027
    }
    
    copyNodesetType("/root/main/diaginfo/diagcdlist",		"/root/result/diagcdlist",          "replace", model, model); // 진단 정보 복사

    // 처방 저장후 환자 가셔야 할 곳을 출력한다. 2011. 01. 05. 김영학 외래 환자만 출력한다. 
    if (sSaveKindFlag == "0" && sCpFlag != "Y" && (sPrcpGenrFlag == "O" || sPrcpGenrFlag == "S")){
        var returnVal = fGetHardCDList("Y", 268, 3);
        var patgolistprtyn = model.getValue("/root/init/patgolistprtyn");
        if ((returnVal == "N" || patgolistprtyn == "Y") && model.getValue("/root/paminfo/list/ordtype") == "O" ) {
            fPrltPatTogoPlceList();
        }
    }

    if (sSaveKindFlag != 1) {
        var prcpsaveyn = "N";
        if ( sSaveDataFlag == "0" || sSaveDataFlag == "2" ) {
            prcpsaveyn = "Y";
        }
    }
    
    model.removeNodeSet ( "/root/main/prcp/prcplist");
    appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" );
    model.removeNodeSet ( "/root/result");
    model.removeNodeSet ( "/root/send/cond2" );
    model.makeNode ( "/root/send/cond2" );
    model.resetInstanceNode ( "/root/send" );

    //추가처방화면이면
    if ( sAddPrcp == "Y" ) {
        fAddPrcpInitConDone( "", "", "", "", "", "Y" , "" );
    } 

    var operation = getGlobalVariable("operation"); //수술예약정보 set
    var sIoFlag = model.getValue ( "/root/paminfo/list/ioflag" );
    if ( sIoFlag == "O" || sIoFlag == "S" )    {
        //ioflag▦pid▦orddd▦cretno▦instcd▦acptseqno▦orgorddd▦
        //외래/입원구분▦등록번호▦진료일자▦생성번호▦기관코드▦등록일련번호▦원진료일자▦
        var sAcptSeqNo = model.getValue ( "/root/paminfo/list/acptseqno" );
        var sOrgOrdDd  = model.getValue ( "/root/paminfo/list/orgorddd" );   
        setParameter("condparam", sIoFlag + "▦" + sPid + "▦" + sOrdDd + "▦" + sCretNo + "▦" + sInstCd + "▦" + sAcptSeqNo + "▦" + sOrgOrdDd );
        
    } else {
        //ioflag▦pid▦indd▦cretno▦seqno▦instcd▦prcpdd▦
        //입원/입원구분▦등록번호▦입원일자▦생성번호▦일련번호▦기관코드▦처방적용일
        var sInPrcpDd = sPrcpDd;
        if( sIoFlag == "D" ) { // DSC는 입원으로 처리
            sIoFlag = "I";
        }
        //청구 후 D/C관련 추가 처리...prcpdd를 퇴원환자일 경우 퇴원일을 넘겨 준다. 그렇지 않을 경우 상단 정보 오류남. by sonjy 20081027 
        if( model.getValue ("/root/paminfo/list/indschacptstat") == "D"  && model.getValue ( "/root/paminfo/list/dschdd" ) != "99991231" && !isNull(model.getValue ( "/root/paminfo/list/dschdd" ) ) ){
            sInPrcpDd = model.getValue ( "/root/paminfo/list/dschdd" );
        }
        setParameter("condparam", sIoFlag + "▦" + sPid + "▦" + sOrdDd + "▦" + sCretNo + "▦" + sInstCd + "▦" + sInPrcpDd);
    } 
    
    var xpt = window.screenleft + 0;
    var ypt = window.screenTop + 0;                 
    var coord = getRelativeCoordinate ( xpt, ypt );
    var mon = coord[0];
    xpt = coord[1];
    ypt = coord[2];

    if ( sAddPrcp != "Y"  ){//&& sPrcpChkFlag != "clickpatlist"  진료대상자리스트에서 선택되었을때는 메세지 띄우지 않는다. 20100317 LYJ
        modal("SPMMO08900", mon,  xpt, ypt, "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
    }
    
    //기존의 수술예약번호가 있는 경우에는 reset처리
    if( operation != "" ){
        setGlobalVariable("operation", operation);
    }
    
    var useyn = getParameter("SPMMO08900_rtn_useyn");
    if(useyn == "Y"){
        setParameter("SPMMO08900_rtn_useyn", "");
        
        fPatDiagSrch("save");
   		
        if ( sCpFlag == "Y" && sSaveKindFlag != 1 ){ //JJE CP일 경우, 당일+미래처방 모두 저장 후 맨 마지막에 진료대상자를 조회한다 (2008.09.11)
            setGlobalVariable("emrinptsavetime", getCurrentDateTime());  // 2017.11.06 CP 화면에서 매번 인증서 창 뜨지 않도록 수정 엄영만
            return true;
        }

        fInitializeConDone("save");   
        fTempPrcp("save");
        
        //20080818 마정민 수정: 전처방 조회 저장후 바로 가져오는 걸로 수정
        //ivw_prcp3.window.javascript.fInitialize("init");
        if ( sCpFlag != "Y" && !btn_ivbfprcp.selected) {
            btn_ivbfprcp.selected = true;
            ivw_prcp3.visible = true;
            ivw_prcp.visible = false;
            //ivw_prcp.src = "SMMMO02100_전회처방.xrw";
        }else if ( !btn_ivbfprcp.selected ) {
            btn_ivbfprcp.selected = true;
            ivw_prcp3.visible = true;
            ivw_prcp2.visible = false;
            //ivw_prcp2.src = "SMMMO02100_전회처방.xrw";
        }
        
        //20090327 마정민수정: 차상위 로직추가
        if ( model.getValue ( "/root/paminfo/list/scndyn" ) == "Y" && sPrcpGenrFlag == "O" && sSaveKindFlag != 1 ) {
            fScndChk();
        }

        fInitializeScreen();
        
        //종속처방번호, 믹스번호, hsctlnkno 초기화
        model.setValue ( "/root/init/inclprcpno", 0 );
        model.setValue ( "/root/init/hsctlnkno", 0 );
        model.setValue ( "/root/init/prcpmixno", 0 );

        var ordPatObj = getOpenWindow("SMMMO04100");
        if(ordPatObj != null){ //두 객체값이 다른 경우 새로운 진료대상자 화면을 open함
           ordPatObj.javascript.fPrcpCallPatList();
        }
        var ordMiniPatObj = getOpenWindow("SPMMO04200");
        if(ordMiniPatObj != null){ //두 객체값이 다른 경우 새로운 진료대상자 화면을 open함
           ordMiniPatObj.javascript.fChkGetData();
        }
    }        
    
    //model.addlog("      SPEED CHECK END OF 화면 재조회(상단/처방/대상자)");
    //model.addlog("  SPEED CHECK END OF 저장 후 처리");
    //model.addlog("SPEED CHECK END OF fPrcpSave()");           
        
    // 입원 또는 응급일 경우 기록/처방 직전 인증저장이 정해진 시간(분 단위, 하드코드 401) 이내이면 인증서를 띄우지 않음. 인증저장된 시간을 저장. 20111201 knuh 최원돈
    // SMMMO00100.js, MMR01300.js, MMR00100.js, SPMRF05200.js
    if ((sPrcpGenrFlag == "I" || sPrcpGenrFlag == "E") && sSaveKindFlag != 1 ) {
        setGlobalVariable("emrinptsavetime", getCurrentDateTime());
    }

    if(pop_MedicineConsult == "Y") { // 복약상담의뢰 창 팝업 여부 2011.10.24 엄영만 (칠곡 약제부 이석미 요청)
        modal("SPADC62100", "", 200, 200);
    }
    
    if(pop_EnConsult == "Y") { // TPN 영양 상담 여부 창 팝업 여부 2014.03.24 엄영만 (본원영양팀 이민지 요청), 1주 이상으로 변경 2014.10.27
        if( messageBox("정맥영양(PN) 1주이상 지속 처방되어 환자 모니터링되었습니다.\n\nNST Consult 하시겠습니까?  문의(본원:5206, 칠곡:2594)\n\n\n※ NST의뢰대상 - 아래 항목의 1개 이상에 해당하는 경우\n\n1.혈중 알부민 ≤ 3.0 g/dl 인 경우\n\n2.경장영양을 받고 있는 경우\n\n3.정맥영양을 받고 있는 경우\n\n4.중환자실에서 집중치료 중인 경우\n\n5.진료담당의사의 의학적 소견에 따라 집중영양치료가 필요하여 의뢰된 경우\n\n6.성장곡선 체중 기준 5percentile미만의 경우(소아만 해당)","Q999") == 6 ){  
            model.removeNodeset("/root/temp/cnstinfo");
            model.makeValue("/root/temp/cnstinfo", "0000000770");  // 정맥영양상담의뢰
            modal("SPADB62300", 1, 0, 0 ,"SPADB62300", "/root/temp/cnstinfo", "/root/temp/cnstinfo");
        }
    }
    
    if (pop_DrgAbleYn == "Y") {  // DRG 정보화면 팝업. 2013.06.25
    	if ( messageBox ( "DRG 적용 가능한 수술처방이 저장 되었습니다.\nDRG 임시대상자로 등록 하시겠습니까?","Q") == "6" ) {
        	setParameter("pid",    sPid);
    		setParameter("indd",   sOrdDd);
    		setParameter("cretno", sCretNo);
    		setParameter("prcpyn", "Y");  // 처방 화면에서 오픈
    		
    		modal("SPPIJ03201", "", 200, 200);
	    }
	}
	
	if(pop_ExamRsrvYn == "Y") { // 통합검사예약 처방 항목 여부 2015.10.01 엄영만
    	var ansExamRsrv = mmbfGetUserEnvQuestValue("067"); // 067: 처방 저장 시 통합검사예약 팝업 여부
	    if(   (ansExamRsrv == "002" && (sPrcpGenrFlag == "O" || sPrcpGenrFlag == "S")) 
	       || (ansExamRsrv == "003" && (sPrcpGenrFlag == "I" || sPrcpGenrFlag == "E" || sPrcpGenrFlag == "D"))
	       || ansExamRsrv == "004" ) {  // 001:팝업하지 않음, 002:외래환자팝업, 003:입원환자팝업, 004:모든환자팝업
    	    clearParameter("opener_parameter_id");
    	    setParameter("opener_parameter_id", sPid);
            modal("SMPEA00100");
        }
	}
	
	if(sCheckAfOpCnt > 0) { // 오류체크 처방저장후 오픈 카운트
	    setParameter("SPMMO90600_msgdd",  sMsgDd);
	    setParameter("SPMMO90600_msgno",  sMsgNo);
	    setParameter("SPMMO90600_histno", sHistNo);
	    setParameter("SPMMO90600_msgcls", "F");     // 처방저장후 오픈 메세지 타입
	    open("SPMMO90600");
	}
	
	endStepDate   = new Date(); // 각 업부 종료후 시간
    step5Elapsed  = endStepDate.getTime() - startStepDate.getTime(); // 화면 저장후 처리 소요 시간

    if(sPrcpFlag == "0" && sSaveKindFlag == "0" && sAddPrcp != "Y") {
        // 속도체크를 위한 모니터링 로그 데이터 생성.
        reqSetMonitoringLog( "PrcpSave"         // type
                           , sSaveDataFlag       // item01 : 저장 데이터 유형  0:인증저장(진단+상병), 1:인증저장(진단), 2:인증저장(처방), 4:임시저장(처방), 5:임시저장DC(처방), 6:임시저장(진단+처방), 7:임시저장(진단)
                           , sPrcpGenrFlag       // item02 : 진료유형 (O:외래, S:건강검진, I:입원, E:응급, D:일일수술,낮병동)
                           , "0"                // item03 : 입력구분 (코드정의서 M0034 참조) inptflag
                           , sPid                // item04 : 등록번호
                           , sOrdDd              // item05 : 진료(입원)일자
                           , sCretNo             // item06 : 생성번호
                           , sOrdDeptCd          // item07 : 진료부서
                           , nPrcpCnt           // item08 : 처방갯수
                           , nDiagCnt           // item09 : 진단갯수
                           , (step1Elapsed + step2Elapsed + step5Elapsed) // item10 : 전체소요시간
                           , step1Elapsed       // item11 : 화면 오류체크 소요시간
                           , step2Elapsed       // item12 : 서버 오류체크 소요시간
                           , step3Elapsed       // item13 : 화면 오류처리 소요시간
                           , step4Elapsed       // item14 : 서버 저장처리 소요시간
                           , step5Elapsed       // item15 : 화면 저장후처리 소요시간
                           , (step2Elapsed + step5Elapsed) // item16 : 서버 저장처리 소요시간 + 화면 저장후처리 소요시간
                           , "Y"                // 튜닝로직 적용여부
                           );
    }
    
    return true;
}

/**@desc   : 처방 저장후 화면 처리 함수
 * @return : true, false
 * @authur : 엄영만 2014. 02. 07
 */
function fExeAfterPrcpSave( sPrcpSaveYn ,sAftDcYn ) {
    var rtnVal = true;  
    var sPrcpGenrFlag = model.getValue ("/root/patflag/list/prcpgenrflag");
    
    fChkNPDschChk(); //정신과 의료급여 환자 입퇴원 유형 체크 

    if( fGetPrcpEtcInfo("save") == false ){ //처방에 대한 중증진료, 산정특례, 법정전염병 처리 ( 추가처방에서는 처리 안함 )
		rtnVal = false;
	}
	
	if(sPrcpGenrFlag != "O" && sPrcpGenrFlag != "S"){
    	copyNodesetType("/root/savertninfo/saveestmspclcs",     "/root/savertninfo/dschestmspclcs",		"replace", model, model);
    	copyNodesetType("/root/savertninfo/saveserdiagappfrm",  "/root/savertninfo/dschserdiagappfrm",	"replace", model, model);
    	copyNodesetType("/root/savertninfo/savelglydis",        "/root/savertninfo/dschlglydis",		"replace", model, model);
    	copyNodesetType("/root/savertninfo/saverareobst",       "/root/savertninfo/dschrareobst",		"replace", model, model);
    	copyNodesetType("/root/savertninfo/saveresindenture",   "/root/savertninfo/dschresindenture",	"replace", model, model);	    
	    
	    if( fGetPrcpEtcInfo("save") == false ){ //처방에 대한 중증진료, 산정특례, 법정전염병 처리 ( 추가처방에서는 처리 안함 )
		    rtnVal = false;
	    }
	}

	//by sonjy 간호반납의뢰 처방 저장 후 호출 시에는...아직 화면이 그려지지 않은 상태임. 
	if( model.getValue("/root/bfinityn") ==  "Y" ){ 
		if( model.getValue("/root/cp") == "Y" ){ //JJE 처방일이 미래일자로 변경되어 있을경우, 오늘날짜로 다시 설정 (2008.09.11) 
			model.setValue("/root/init/prcpdd", getCurrentDate());
			cmb_prcpdd.refresh();
		}
		ivw_prcp3.window.javascript.fInitialize("save");
	}

    //true 리턴 추가(2008.09.29 JJE)
    return rtnVal; //return true;
}

function fGetPrcpSaveAftInfo( prcpsaveyn ,aftdcyn ) {
    var rtnVal = true;  //return value(true/false) 선언 추가 (2010.02.20 JJE)
    if( aftdcyn == null || isNull(aftdcyn) ) aftdcyn = "";  //청구 후 d/c관련 추가 by sonjy 20081027  청구 후 d/c시 법정전염병 및 산정특례를 체크하지 않도록 한다.
    
    fChkNPDschChk(); //정신과 의료급여 환자 입퇴원 유형 체크 

    var orddd = ""; 
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    if ( prcpgenrflag == "O" || prcpgenrflag == "S" ){ //외래일때
        orddd = model.getValue ( "/root/paminfo/list/orddd" );
        orddrid = model.getValue ( "/root/paminfo/list/orddrid" );
    } else {
        orddd = model.getValue ( "/root/paminfo/list/indd" );
        orddrid = model.getValue ( "/root/paminfo/list/medispclid" );
    }
    //처방에 대한 중증진료, 산정특례, 법정전염병 처리
    model.setValue ( "/root/send/cond1", prcpgenrflag );                                    //외래,입원구분
    model.setValue ( "/root/send/cond17", model.getValue("/root/paminfo/list/pid"));        //환자번호
    model.setValue ( "/root/send/cond3", orddd );                                           //진료일
    model.setValue ( "/root/send/cond4", model.getValue("/root/paminfo/list/cretno"));      //cretno
    model.setValue ( "/root/send/cond5", model.getValue("/root/paminfo/list/instcd"));      //기관코드
    model.setValue ( "/root/send/cond6", model.getValue("/root/paminfo/list/orddeptcd"));   //진료과
    model.setValue ( "/root/send/cond7", orddrid );                                         //진료의id
    model.setValue ( "/root/send/cond8", model.getValue("/root/init/prcpdd"));              //처방일
    model.setValue ( "/root/send/cond9", model.getValue("/root/paminfo/list/age"));         //나이
    model.setValue ( "/root/send/cond10", model.getValue( "/root/hidden/dschprcpyn"));      //퇴원오더 여부
    model.setValue ( "/root/send/cond11", model.getValue( "/root/paminfo/list/suppkind"));  //보조유형
    model.setValue ( "/root/send/cond12", model.getValue( "/root/init/prcpauthflag"));      //권한구분
    model.setValue ( "/root/send/cond13", model.getValue("/root/paminfo/list/insukind"));   //보험유형
    model.setValue ( "/root/send/cond14", getUserInfo("dutplcecd"));                        //부서코드
    model.setValue ( "/root/send/cond15", getUserInfo ("userid"));                          //사용자ID
    model.setValue ( "/root/send/cond16", prcpsaveyn );                                     //처방저장여부  
    model.setValue ( "/root/send/cond18", model.getValue ("/root/formerkey/pseuacptflag")); //시행부서처방가접수여부
    model.makeValue ( "/root/send/cond19", aftdcyn);    //청구 후 d/c처방 여부 by sonjy 20081027 추가 
    
    //by sonjy 20091120 전처방 개인별 조회 option 추가  
    var bfprcpviewnode =  instance1.selectSingleNode("/root/initsrch/envinfo[qestcd='018']/answcnt");
    var bfprcpviewflag = ""; 
    if( bfprcpviewnode != null ) bfprcpviewflag = bfprcpviewnode.text ;
    model.makeValue ( "/root/send/bfprcpviewflag", bfprcpviewflag);   

    //submit("TRMMO00122") => if( submit("TRMMO00122") == true ) 로 변경 (2008.09.28 JJE)
    if( submit ( "TRMMO00122", false ) ){
        if( fGetPrcpEtcInfo("save") == false ){ //처방에 대한 중증진료, 산정특례, 법정전염병 처리 ( 추가처방에서는 처리 안함 )
            rtnVal = false; //return false;
        }
        
        if(prcpgenrflag != "O" && prcpgenrflag != "S"){
            var nDschOutCnt = model.instances(0).selectNodes ( prcpNode + "[status ='I' and prcpkindcd = '70']" ).length;
            if(nDschOutCnt > 0) {
                model.removeNodeSet ( "/root/send/cond2" );
                model.makeNode ( "/root/send/cond2" );
                
                model.setValue ( "/root/send/cond1", model.getValue("/root/paminfo/list/pid") );  //환자번호
                model.setValue ( "/root/send/cond2", model.getValue("/root/paminfo/list/indd") ); //진료일
                model.setValue ( "/root/send/cond3", model.getValue("/root/paminfo/list/instcd"));  //cretno
                model.setValue ( "/root/send/cond4", model.getValue("/root/paminfo/list/cretno"));  //cretno
                 
                if (  submit ( "TRMMO00119", false )) {
                    //처방에 대한 중증진료, 산정특례, 법정전염병 처리
                    model.setValue ( "/root/send/cond1", "O" );                                 //외래,입원구분
                    model.setValue ( "/root/send/cond17", model.getValue("/root/paminfo/list/pid"));        //환자번호
                    model.setValue ( "/root/send/cond3", model.getValue("/root/followup/followup/otpt_orddd") );                                            //진료일
                    model.setValue ( "/root/send/cond4", model.getValue("/root/followup/followup/otpt_cretno"));        //cretno
                    model.setValue ( "/root/send/cond5", model.getValue("/root/paminfo/list/instcd"));      //기관코드
                    model.setValue ( "/root/send/cond6", model.getValue("/root/paminfo/list/orddeptcd"));   //진료과
                    model.setValue ( "/root/send/cond7", orddrid );                                         //진료의id
                    model.setValue ( "/root/send/cond8", model.getValue("/root/init/prcpdd"));              //처방일
                    model.setValue ( "/root/send/cond9", model.getValue("/root/paminfo/list/age"));         //나이
                    model.setValue ( "/root/send/cond10", model.getValue( "/root/hidden/dschprcpyn"));      //퇴원오더 여부
                    model.setValue ( "/root/send/cond11", model.getValue( "/root/paminfo/list/suppkind"));  //보조유형
                    model.setValue ( "/root/send/cond12", model.getValue( "/root/init/prcpauthflag"));      //권한구분
                    model.setValue ( "/root/send/cond13", model.getValue("/root/paminfo/list/insukind"));   //보험유형
                    model.setValue ( "/root/send/cond14", getUserInfo("dutplcecd"));                        //부서코드
                    model.setValue ( "/root/send/cond15", getUserInfo ("userid"));                          //사용자ID
                    model.setValue ( "/root/send/cond16", prcpsaveyn );                                     //처방저장여부  
                    model.setValue ( "/root/send/cond18", model.getValue ("/root/formerkey/pseuacptflag")); //시행부서처방가접수여부
                    model.makeValue ( "/root/send/cond19", aftdcyn);    //청구 후 d/c처방 여부 by sonjy 20081027 추가 
                    
                    if( submit ( "TRMMO00122", false ) ){
                        if( fGetPrcpEtcInfo("save") == false ){ //처방에 대한 중증진료, 산정특례, 법정전염병 처리 ( 추가처방에서는 처리 안함 )
                            rtnVal = false; //return false;
                        }
                    }
                }
            }
            
        }
    
        //by sonjy 간호반납의뢰 처방 저장 후 호출 시에는...아직 화면이 그려지지 않은 상태임. 
        if( model.getValue("/root/bfinityn") ==  "Y" ){ 
            if( model.getValue("/root/cp") == "Y" ){ //JJE 처방일이 미래일자로 변경되어 있을경우, 오늘날짜로 다시 설정 (2008.09.11) 
                model.setValue("/root/init/prcpdd", getCurrentDate());
                cmb_prcpdd.refresh();
            }
            
            ivw_prcp3.window.javascript.fInitialize("save");
        }
    }
  
    //start: 외부 CD 재판독 의뢰 정보 update (2010.02.19 JJE)
    if( getParameter("spmmo21200_rtnyn") == "Y" ){
        var saveYN     = "N";
        var prcpPkSpec = "";
        var savePrcpDD = "";
        var savePrcpCd = "";
        var saveEqmtCd = "";
        var saveTrsmDD = "";
        var saveTrsmTM = "";
        //var saveOcdSeq = "";
        var prcpcdList = getParameter("spmmo21200_rtnprcpcd").split("^"); //prcpCd
        var eqmtcdList = getParameter("spmmo21200_rtneqmtcd").split("^"); //cdType
        var trsmddList = getParameter("spmmo21200_rtntrsmdd").split("^"); //trsmDD
        var trsmtmList = getParameter("spmmo21200_rtntrsmtm").split("^"); //trsmTM
        //var ocdseqList = getParameter("spmmo21200_rtnocdseq").split("^"); //oCdSeq
        var iRow = 0;
    
        model.makeNode ("/root/spmmo21200/send");
        for( var i=0; i<prcpcdList.length; i++ ){
            prcpPkSpec = instance1.selectSingleNode("root/savertninfo/prcplist[prcpcd='" + prcpcdList[i] + "']/prcppkspec");
            if( prcpPkSpec != null ){  //익일 처방 있고, 당일처방 추가로 낸 경우.. 값 있는지?
                savePrcpDD = prcpPkSpec.text.substr(0, 8);
                savePrcpCd = prcpcdList[i];
                saveEqmtCd = eqmtcdList[i];
                saveTrsmDD = trsmddList[i];
                saveTrsmTM = trsmtmList[i];
                //saveOcdSeq = ocdseqList[i];
                saveYN     = "Y";
                iRow++;
                //break;  //우선은 1건만 prcpcd mapping
                
                model.makeValue("/root/spmmo21200/send/info["+iRow+"]/pid"      , getParameter("spmmo21200_pid"));
                model.makeValue("/root/spmmo21200/send/info["+iRow+"]/orddeptcd", getParameter("spmmo21200_orddeptcd"));
                model.makeValue("/root/spmmo21200/send/info["+iRow+"]/prcpdd"   , savePrcpDD);
                model.makeValue("/root/spmmo21200/send/info["+iRow+"]/prcpcd"   , savePrcpCd);
                model.makeValue("/root/spmmo21200/send/info["+iRow+"]/eqmtcd"   , saveEqmtCd);
                model.makeValue("/root/spmmo21200/send/info["+iRow+"]/trsmdd"   , saveTrsmDD);
                model.makeValue("/root/spmmo21200/send/info["+iRow+"]/trsmtm"   , saveTrsmTM);
                //model.makeValue("/root/spmmo21200/send/info/ocdseq"   , saveOcdSeq);
            }
        }
        if( saveYN == "Y" ){
            if( !submit("TXMMO21201", false) ){
                rtnVal = false;
            }
        }
        model.removenode("/root/spmmo21200");
        clearParameter("spmmo21200_rtnyn"); 
        clearParameter("spmmo21200_pid");
        clearParameter("spmmo21200_orddeptcd");
        clearParameter("spmmo21200_rtnprcpcd"); 
        clearParameter("spmmo21200_rtneqmtcd"); 
        clearParameter("spmmo21200_rtntrsmdd"); 
        clearParameter("spmmo21200_rtntrsmtm"); 
    }
    //end
  
  //true 리턴 추가(2008.09.29 JJE)
  return rtnVal; //return true;
}

function fGetPrcpEtcInfo(flag) {
    var xpt = window.screenleft + 400;
    var ypt = window.screenTop + 100;
    var coord = getRelativeCoordinate ( xpt, ypt );
    var mon = coord[0];
    xpt = coord[1];
    ypt = coord[2];
        
    var sTubeSaveYn = "N";  // 결핵 산정특례 신정서 저장여부    
    var orddd = ""; 
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );

    //20090415 마정민추가 chronicdiseaseyn 초기화
    model.setValue ( "/root/init/chronicdiseaseyn", "N" );
    
    if ( flag == "save" ) {
        //20080818 마정민 수정. 처방 저장후 불러오는 건은 app에서 호출하는 걸로 수정.
        model.copyNode ( "/root/prcpetcinfo", "/root/savertninfo" );
        //temp에 딸려온 데이터는 삭제한다.
        model.removeNodeset ( "/root/prcpetcinfo/prcpetccnts" );
        model.removeNodeset ( "/root/prcpetcinfo/rsrvcvrtprcp" );
        model.removeNodeset ( "/root/prcpetcinfo/prcplist" );
    } else {
        if ( prcpgenrflag == "O" || prcpgenrflag == "S" ){ //외래일때
            orddd = model.getValue ( "/root/paminfo/list/orddd" );
        } else {
            orddd = model.getValue ( "/root/paminfo/list/indd" );
        }
        //처방에 대한 중증진료, 산정특례, 법정전염병 처리
        model.setValue ( "/root/send/cond1", prcpgenrflag ); //ioflag
        model.setValue ( "/root/send/cond2", "1" ); //dataflag 자료구분(1:처방화면, 2:진단화면)
        model.setValue ( "/root/send/cond3", model.getValue ( "/root/paminfo/list/pid" )); //pid
        model.setValue ( "/root/send/cond4", orddd ); //orddd
        model.setValue ( "/root/send/cond5", model.getValue ( "/root/paminfo/list/cretno" )); //cretno
        model.setValue ( "/root/send/cond6", model.getValue ( "/root/paminfo/list/instcd" )); //instcd
        model.setValue ( "/root/send/cond7", model.getValue ( "/root/init/prcpdd" )); //prcpdd
        model.setValue ( "/root/send/cond8", getUserInfo("dutplcecd")); //deptcd
        model.setValue ( "/root/send/cond9", getUserInfo ("userid")); //userid
        model.setValue ( "/root/send/cond10", model.getValue ( "/root/paminfo/list/age" )); //나이
        model.setValue ( "/root/send/cond11", model.getValue ( "/root/hidden/dschprcpyn" )); //퇴원오더여부 by sonjy 2008-07-30
        model.setValue ( "/root/send/cond12", model.getValue ( "/root/paminfo/list/orddeptcd"));    //진료과 (만성B형간염 - kimsj 100217)
        
        //submit("TRMMO00108") => if( !submit("TRMMO00108") ) 로 변경 (2008.09.29 JJE)
        if( !submit ( "TRMMO00108", false ) ){
            return false;
        }
    }
    
    var frmflag = "Y"; // 재등록 체크를 위한 변수
    var saveSerFrmNodes = model.instances(0).selectNodes( "/root/prcpetcinfo/saveserdiagappfrm" );

    //20090415 마정민수정: 유정란대리 요청
    model.setValue ( "/root/init/chronicdiseaseyn", model.getValue ( "/root/prcpetcinfo/saveestmspclcs/chronicdiseaseyn" ));
    
    if ( model.getValue ( "/root/addprcp" ) != "Y") { // 추가처방에서는 신청서만 뜨지 않도록 ...
        var sRgstKindCd = "";  // 산정특례 종류 00:중증, 01:희귀난치 일반, 02:중증화상, 03:경증, 06:희귀난치 결핵
        var sReRegYn    = "";  // 재등록 여부 (Y: 재등록, X: 희귀난치 자격조회 안됨, C: 희귀난치 재등록 기간에 진단명이 틀림, 그외 신규) 
        var sSrchFlag   = "";  // 특례검색구분 (A:상병, B:상병+처방, C:상병+중증번호, D:처방+중증번호, E:상병+처방+중증번호, F:처방) 
        var sIcd10Cd    = "";  // 중복암 처리를 위해 진단코드 추가 2017.07.10
        
        for (var i = 1; i <= saveSerFrmNodes.length; i++) {
            frmflag     = "Y";
            sRgstKindCd = model.getValue ("/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/rgstkindcd");
            sReRegYn    = model.getValue ("/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/reregyn");    // 2014.09.27 희귀난치 재등록 관련 추가. 엄영만
            sSrchFlag   = model.getValue ("/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/srchflag");   // 2015.06.24 특례검색구분 추가 A, B, F 인 경우 신청서를 쓰지 않더라도 특례 적용 되도록 처리. 엄영만
            sIcd10Cd    = model.getValue ("/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/icd10cd");    // 2017.07.10 중복암 처리를 위해 진단코드 추가
            
            if (sReRegYn == "Y" || sReRegYn == "C" || sReRegYn == "2" || sReRegYn == "4") {// (재등록 일경우 Y:재등록, C:희귀재등록시 진단이 틀린 경우, 2:중증신규암재등록, 4:중증중복암재등록) 그외  신규 등록으로 처리
                var msgData = "";
                if(sReRegYn == "Y" || sReRegYn == "2" || sReRegYn == "4") { // 재등록 메세지
                    msgData = messageBox(model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/reregmsg" ) + "\n\n아래 항목을 선택 하세요.\n\n 1. 재등록하시려면 예(Yes)\n 2. 재등록이 필요없는 환자분이라면 아니오(No)\n 3. 추후 재등록 하시려면 취소", "S");
                } else {    // 재등록 C:희귀재등록시 진단이 틀린 경우 신규 등록으로 처리
                    msgData = messageBox(model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/reregmsg" ) + "특례 등록상병(" +model.getValue ("/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/regdiagcd" )+ ")과 현재 주진단이 동일하지 않습니다.\n\n아래 항목을 선택 하세요.\n\n 1. 현재 진단으로 신규등록하시려면 예(Yes)\n 2. 기간연장이 필요없는 환자분이라면 아니오(No)\n 3. 현재진단을 수정하여 재등록 하시려면 취소", "S");

                    model.setValue("/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/reregyn",    "");
                    model.setValue("/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/regdiagcd",  "" )
                    model.setValue("/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/regdiagseq", "");
                }
                
                if (msgData == "6" ) {  // 재등록 한다.
                    if(sRgstKindCd == "00" || sRgstKindCd == "01" || sRgstKindCd == "06" ) { // 00:중증, 01:희귀난치 일반, 06:희귀난치 결핵
                        frmflag = "Y";
                    } else if (sRgstKindCd == "02") { // 중증화상
                        frmflag = "R";
                        setParameter("SMMMR02900_formcd", "1200012640");
                        modal("SMMMR02900");
                        clearParameter("SMMMR02900_formcd");
                    }
                } else if ( msgData == "7" ) { // 재등록 하지 않겠습니다.  
                    frmflag = "N";
                } else {                       // 나중에 한다.
                    frmflag = "-";
                }
                
                model.setValue ( "/root/send/cond1", model.getValue("/root/paminfo/list/pid") );
                model.setValue ( "/root/send/cond2", model.getValue("/root/paminfo/list/instcd") );
                model.setValue ( "/root/send/cond3", "" );
                model.setValue ( "/root/send/cond4", "" );
                model.setValue ( "/root/send/cond5", "" );
                model.setValue ( "/root/send/cond6", frmflag );
                model.setValue ( "/root/send/cond7", "" );
                model.setValue ( "/root/send/cond9", sIcd10Cd);
                
                if(sRgstKindCd == "06" && getCurrentDate() < "20150101") {
                    model.setValue ( "/root/send/cond8", "01" ); // 희귀난치(01) 에서 희귀난치 결핵(06)으로 재등록 하는경우
                } else {
                    model.setValue ( "/root/send/cond8", sRgstKindCd );
                }
        
                if( !submit ( "TXMMO00116", false ) ){
                    return false;
                }
            } else if (sReRegYn == "X" ) {// 희귀난치 자격조회 안된 경우
                messageBox(model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/reregmsg" ) + "특례 등록상병이 확인되지 않아 재등록 하실수 없습니다.\n원무창구에 자격조회 후 재등록 하시기 바랍니다." , "I999");
                frmflag = "-"; // 나중에 한다.
            }
            
            // 신규 등록 또는 중증 재등록 체크 "예" 선택시 에만 중증 신청서 팝업 되어야 함.
            if (frmflag == "Y"  && sRgstKindCd == "00" ) { // 중증 신청서는 
                setParameter("SPMMO11500_pid",             model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/pid" ));
                setParameter("SPMMO11500_pathngnm",        model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/hngnm" ));
                setParameter("SPMMO11500_insukind",        model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/insukind" ));
                setParameter("SPMMO11500_anohosprgstflag", model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/anohosprgstflag" ));
                setParameter("SPMMO11500_genrflagcd",      model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/genrflagcd" ));
                setParameter("SPMMO11500_cncrdiagcnfmdd",  model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/cncrdiagcnfmdd" ));
                setParameter("SPMMO11500_orddeptcd",       model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/orddeptcd" ));
                setParameter("SPMMO11500_orddrid",         model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/orddrid" ));
                setParameter("SPMMO11500_genrorddd",       model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/genrorddd" ));
                setParameter("SPMMO11500_genrcretno",      model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/genrcretno" ));
                setParameter("SPMMO11500_maindiagcd",      model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/maindiagcd" ));
                setParameter("SPMMO11500_insukindnm",      model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/insukindnm" ));
                setParameter("SPMMO11500_befsuppkind",     model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/befsuppkind" )); //2013/12/02
                setParameter("SPMMO11500_reregyn",         model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/reregyn" ));     //2014/09/27 재등록 여부 추가
                setParameter("SPMMO11500_mthdstr",         "-");
                setParameter("SPMMO11500_mthd5txt",        "-");
                setParameter("SPMMO11500_rgstbasic",       "-");
                
                clearParameter("SPMMO11500_save");
                fPrcpModal ( "SPMMO11500", 400, 100 );
                
                if(getParameter("SPMMO11500_save")== "Y") { // 2017.08.01 특례검색구분 추가 A, B, F 로직 삭제 잘못 수정 되었음. 김성자 팀장 확인, 2015.06.24 특례검색구분 추가 A, B, F 인 경우 신청서를 쓰지 않더라도 특례 적용 되도록 처리. 엄영만
                    if( instance1.selectSingleNode("/root/prcpetcinfo/saveestmspclcs/estmexistyn") != null ){ // 차상위 1종은 정보가 없어서 오류 발생하여 수정.
                        model.setValue("/root/prcpetcinfo/saveestmspclcs/estmexistyn", "Y"); // 기존 신청서가 없고 신규로 신청서 작성시 등록 정보 여부를 셋팅 함.(아래쪽에서 요율 팝업 창 뛰울때 체크함.) 2012.02.29 엄영만
                    }
                } else {
                    messageBox ( "중증 신청서가 작성되지 않았습니다.", "I" );
                    
                    model.setValue ( "/root/send/cond1", model.getValue("/root/paminfo/list/pid") );
                    model.setValue ( "/root/send/cond2", model.getValue("/root/paminfo/list/instcd") );
                    model.setValue ( "/root/send/cond3", "" );
                    model.setValue ( "/root/send/cond4", "" );
                    model.setValue ( "/root/send/cond5", "" );
                    model.setValue ( "/root/send/cond6", "-" ); // 나중에 하는것으로 수정.
                    model.setValue ( "/root/send/cond7", "" );
                    model.setValue ( "/root/send/cond8", sRgstKindCd );
                    model.setValue ( "/root/send/cond9", sIcd10Cd);
            
                    if( !submit ( "TXMMO00116", false ) ){
                        return false;
                    }
                }
            } else if ( frmflag == "Y" && ( sRgstKindCd == "01" || sRgstKindCd == "02" || sRgstKindCd == "06" || sRgstKindCd == "07" || sRgstKindCd == "08" || sRgstKindCd == "09" || sRgstKindCd == "10" || sRgstKindCd == "11"))  { // 희귀난치/중증화상
                setParameter("SPMMO20000_pid",             model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/pid" ));
                setParameter("SPMMO20000_pathngnm",        model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/hngnm" ));
                setParameter("SPMMO20000_insukind",        model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/insukind" ));
                setParameter("SPMMO20000_anohosprgstflag", model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/anohosprgstflag" ));
                setParameter("SPMMO20000_genrflagcd",      model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/genrflagcd" ));
                setParameter("SPMMO20000_cncrdiagcnfmdd",  model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/cncrdiagcnfmdd" ));
                setParameter("SPMMO20000_orddeptcd",       model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/orddeptcd" ));
                setParameter("SPMMO20000_orddrid",         model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/orddrid" ));
                setParameter("SPMMO20000_genrorddd",       model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/genrorddd" ));
                setParameter("SPMMO20000_genrcretno",      model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/genrcretno" ));
                setParameter("SPMMO20000_maindiagcd",      model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/maindiagcd" ));
                setParameter("SPMMO20000_insukindnm",      model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/insukindnm" ));
                setParameter("SPMMO20000_rgstkindcd",      model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/rgstkindcd") );      // 20100706 중증화상인지 산정특례인지 구분을 위해서.
                setParameter("SPMMO20000_burnicd10desc",   model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/burnicd10desc") );   // 20100706 중증화상의 Icd10cd를 가져오기 위해서.
                setParameter("SPMMO20000_icd10cd",         model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/icd10cd") );         // 20100706 중증화상의 Icd10cd를 가져오기 위해서.
                setParameter("SPMMO20000_befsuppkind",     model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/befsuppkind" ));     //2013/12/02
                setParameter("SPMMO20000_reregyn",         model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/reregyn" ));         //2014.09.27 희귀난치 재등록 관련 추가. 엄영만
                setParameter("SPMMO20000_regdiagcd",       model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/regdiagcd" ));       //2014.09.27 희귀난치 재등록 관련 추가. 엄영만
                setParameter("SPMMO20000_regdiagseq",      model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/regdiagseq" ));      //2014.09.27 희귀난치 재등록 관련 추가. 엄영만
                setParameter("SPMMO20000_mthdstr",         model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/mthdstr" ));
                setParameter("SPMMO20000_mthd5txt",        model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/mthd5txt" ));
                setParameter("SPMMO20000_rgstbasic",       model.getValue ( "/root/prcpetcinfo/saveserdiagappfrm[" + i + "]/rgstbasic" ));
                
                
                clearParameter("SPMMO20000_save");
                fPrcpModal ( "SPMMO20000", 400, 100 );
                
                if(getParameter("SPMMO20000_save")== "Y") { // 2017.08.01 특례검색구분 추가 A, B, F 로직 삭제 잘못 수정 되었음. 김성자 팀장 확인, 2015.06.24 특례검색구분 추가 A, B, F 인 경우 신청서를 쓰지 않더라도 특례 적용 되도록 처리. 엄영만
                    if( instance1.selectSingleNode("/root/prcpetcinfo/saveestmspclcs/estmexistyn") != null ){ // 차상위 1종은 정보가 없어서 오류 발생하여 수정.
                        model.setValue("/root/prcpetcinfo/saveestmspclcs/estmexistyn", "Y"); // 기존 신청서가 없고 신규로 신청서 작성시 등록 정보 여부를 셋팅 함.(아래쪽에서 요율 팝업 창 뛰울때 체크함.) 2012.02.29 엄영만
                    }
                    
                    if(sRgstKindCd == "06") {
                        sTubeSaveYn = "Y"; // 결핵환자 신청서 자동저장을 위해 추가 2015.01.20 엄영만
                    }
                } else {
                    messageBox ( "희귀난치/중증화상 신청서가 작성되지 않았습니다.", "I" );
                    
                    if(sRgstKindCd == "09") { // 본인부담제외 결핵이면 적용정보를 삭제 한다.
                        var pParentNode = null;
        				var node01 = instance1.selectSingleNode("/root/prcpetcinfo/saveestmspclcs[spclcd='V000']");
        				if(node01 != null){
        					pParentNode =  node01.parentNode;
        					pParentNode.removeChild(node01);
        			    }
        			}
        			
                    var nodeSaveEstm = model.instances(0).selectNodes( "/root/prcpetcinfo/saveestmspclcs" );
                    if(sRgstKindCd != "09" || nodeSaveEstm.length == 0) { // 본인부담제외 결핵이 아니거나 적용가능한 정보가 없으면
                        model.setValue ( "/root/send/cond1", model.getValue("/root/paminfo/list/pid") );
                        model.setValue ( "/root/send/cond2", model.getValue("/root/paminfo/list/instcd") );
                        model.setValue ( "/root/send/cond3", "" );
                        model.setValue ( "/root/send/cond4", "" );
                        model.setValue ( "/root/send/cond5", "" );
                        model.setValue ( "/root/send/cond6", "-" ); // 나중에 하는것으로 수정.
                        model.setValue ( "/root/send/cond7", "" );
                        
                        if(sRgstKindCd == "06" && getCurrentDate() < "20150101") {
                            model.setValue ( "/root/send/cond8", "01" ); // 희귀난치(01) 에서 희귀난치 결핵(06)으로 재등록 하는경우
                        } else {
                            model.setValue ( "/root/send/cond8", sRgstKindCd );
                        }
                
                        if( !submit ( "TXMMO00116", false ) ){
                            return false;
                        }
                    }
                }
            }
        }
    }
    
    fEstmSpclFrm(); // 요율팝업 
    
    //희귀질환대상자 by sonjy 2008-07-28 
    if ( model.getValue ( "/root/prcpetcinfo/saverareobst/estmflag" ) == "Y"  ) {
        messageBox("희귀난치 대상자이나 관련 상병이 누락되어 있습니다. 희귀난치 진료이면 관련 상병을 주상병으로 입력해 주십시오.", "I");
        model.setValue ( "/root/prcpetcinfo/saverareobst/estmyn", "H" );  //희귀난치 대상 상병으로 진료를 본 것이 아니라고 할 경우 
        var saverareobst = model.instances(0).selectNodes( "/root/prcpetcinfo/saverareobst" );
        model.setValue ( "/root/send/cond1", getNodeListCSV(saverareobst));
        
        if( !submit ( "TXMMO00105", false ) ){
            return false;
        }
    } else if ( model.getValue ( "/root/prcpetcinfo/saverareobst/estmflag" ) == "U"  ) { //희귀난치 대상이고 진단값이 있는데 otpt에 H값이 없으면 Update 처리 해준다.
        model.setValue ( "/root/prcpetcinfo/saverareobst/estmyn", "U" ); 
        var saverareobst = model.instances(0).selectNodes( "/root/prcpetcinfo/saverareobst" );
        model.setValue ( "/root/send/cond1", getNodeListCSV(saverareobst));
        
        if( !submit ( "TXMMO00105", false ) ){
            return false;
        }
    }

    // 레진상 완전틀린 관련 처리 2012.07.04 엄영만
    var sResinDuntureNodes = instance1.selectNodes("/root/prcpetcinfo/saveresindenture");
    if(sResinDuntureNodes.length > 0){
        fResinDentureFrm();
    }

    //법정전염병 신고서 기존 결핵신고자에게 결핵약 발행 시 결핵신고서 또 호출되는 문제 => 서버단에서 신고건까지 모두 return, client는 chkyn컬럼으로 체크 (20090710 JJE)
    var savelglydisNodes = instance1.selectNodes("/root/prcpetcinfo/savelglydis[chkyn!='Y']"); // (20090710 JJE)
    if( savelglydisNodes.length > 0 ) {  
        for ( var i=1; i<=savelglydisNodes.length ; i++){
            var sReptNm    = model.getValue("/root/prcpetcinfo/savelglydis[" + i + "]/reptnm");
            var sIcd10Cd   = model.getValue("/root/prcpetcinfo/savelglydis[" + i + "]/icd10cd");
            var sLglyDisCd = model.getValue("/root/prcpetcinfo/savelglydis[" + i + "]/lglydiscd");
            var sReptYn    = model.getValue("/root/prcpetcinfo/savelglydis[" + i + "]/reptyn");     // 법정전염병 신고서 작성여부
            
            if(!isNull(sReptNm)) {
                setParameter("PrcpLglyDis",     "PrcpLglyDis");  //20100113 pyj 처방에서 신고서 호출시 파라메터를 넘겨준다.
                setParameter("PrcpIcd10Cd",     sIcd10Cd);
                setParameter("PrcpLglyDisCd",   sLglyDisCd);
                setParameter("PrcpLglyPrcpCd",  "");
                setParameter("PrcpTubeSaveYn",  sTubeSaveYn); // 결핵 산정특례신청서 저장 여부
                
                if (!isNull(sReptYn) && sReptYn == "M") {
			        setParameter("PrcpModifyYn", "Y");   //2017.05.26 신고서 화면에서 수정여부 팝업 없이 수정창을 뛰우기 위해 엄영만 요청서 20170414016
			    } else {
			        setParameter("PrcpModifyYn", "N");
                }
                
                modal( sReptNm, mon,  xpt, ypt, "prcpdetl", "/root/main/diaginfo", "/root/diaginfo", "", false );      
                clearParameter("PrcpLglyDis");
                clearParameter("PrcpIcd10Cd");
                clearParameter("PrcpLglyDisCd");
                clearParameter("PrcpTubeSaveYn");
                clearParameter("PrcpModifyYn");
            }
        }
    } 

    model.resetInstanceNode ( "/root/prcpetcinfo" );
    
    return true;    //리턴 위치 바꿈, true 값 리턴 (2008.09.29 JJE)
}

/**@desc   : 진료대상자 리스트에서 환자 호출시 저장할 데이터가 있을 시 저장한다.
 * @return : true, false
 * @authur : 마정민 2007. 4. 04
 */
function fPrcpSavePatList() {
    //20081014 간호확인 후에만 처방인증저장 가능.   start  
    var usge = model.getValue ( "/root/usge" ); 
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    if( prcpgenrflag == "O" || prcpgenrflag == "S" ){ 
        if( model.getValue("/root/paminfo/list/elbulbodstat") == "0" &&  usge == "prcp" && model.getValue ( "/root/addprcp" ) != "Y" ){
            return false;
        }
    }
    
    //20081014 간호확인 후에만 처방인증저장 가능.   end 
    var sSaveDataFlag = fSaveExistCheck(null, "Y");
    if ( sSaveDataFlag != -1 && sSaveDataFlag != 1  ){ //20081215 마정민수정: 변경요청서 512에 따라 진료대상자 리스트에서 환자 바꿀때 진단정보만 있으면 저장메시지 띄우지 않음     
        if(messageBox ( "", "Q002" ) == "6"){
            fPrcpSave("","","","N");  // 진료대상자리스트에서 환자 선택할 때는 저장여부 메세지 한번만 띄우고 새로 선택한 환자가 상단으로 올라간다. 20100317 LYJ
            return true;
        } else {
            return false;
        }
    }
}

/**@desc   : 처방정렬
 * @authur : 마정민 2007. 4. 16
 */
function fPrcpSort() {
    grd_prcplist.sort(1, prcpclscd, grd_prcplist.rows-2, prcpclscd) = "asc";
    grd_prcplist.sort(1, prcpclscd, grd_prcplist.rows-2, prcpnmCol) = "asc";
}

/**@desc   : 용량, 수량, 횟수의 수정전 값을 instance에 넣어둔다.
 * @param  : flag : 용량, 수량, 횟수 변경 구분
           : curRow : 수정할 현재 row
 * @return : void
 * @authur : 마정민 2007. 4. 30
 */
function bfDrugCalc ( flag, curRow ) {
    
    if ( flag == "prcpvol" ) { 
        var PrcpVol = model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/prcpvol" );
        model.setValue ( "/root/drugcalc/prcpvol", PrcpVol );       

    } else if ( flag == "prcpqty" ) {
        var PrcpQty = model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/prcpqty" );
        model.setValue ( "/root/drugcalc/prcpqty", PrcpQty );       

    }  else if ( flag == "prcptims" ) {
        var PrcpTims = model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/prcptims" );
        model.setValue ( "/root/drugcalc/prcptims", PrcpTims );     
    }  else if ( flag == "drprcpetc7" ) {
        var drprcpetc7 = model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drprcpetc7" );
        model.setValue ( "/root/drugcalc/drprcpetc7", drprcpetc7 );     
    }  else if ( flag == "drprcpetc8" ) {
        var drprcpetc8 = model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drprcpetc8" );
        model.setValue ( "/root/drugcalc/drprcpetc8", drprcpetc8 );     
    }
    
}
 
/**@desc   : 용량, 수량, 횟수를 수정했을 때 값계산
 * @param  : flag : 용량, 수량, 횟수 변경 구분
           : curRow : 수정할 현재 row
 * @return : void
 * @authur : 마정민 2007. 4. 30
 */
function DrugCalc ( flag, curRow ) {
    var PrcpNm = "";
    var PrcpVol = model.getValue ( prcpNode + "[" + curRow + "]/prcpvol" );
    if ( isNull(PrcpVol) || PrcpVol == 0 ) {    
        PrcpVol = "1"; 
        if ( flag == "prcpvol") {
            PrcpNm = model.getValue ( prcpNode + "[" + curRow + "]/prcpnm" );
            messageBox ( PrcpNm + " 처방의 1일용량값이 없거나 0입니다.\n1일용량을 1로 초기화 합니다.", "I999" );
            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol", PrcpVol );   //1일
        }
    }

    var PrcpQty = model.getValue ( prcpNode + "[" + curRow + "]/prcpqty" );
    if ( isNull(PrcpQty) || PrcpQty == 0 ){ 
        PrcpQty = "1"; 
        if ( flag == "prcpqty") {
            PrcpNm = model.getValue ( prcpNode + "[" + curRow + "]/prcpnm" );
            messageBox ( PrcpNm + " 처방의 1일수량값이 없거나 0입니다.\n1일수량을 1로 초기화 합니다.", "I999" );
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty", PrcpQty );      
        }
    }

    var PrcpTims = model.getValue (prcpNode + "[" + curRow + "]/prcptims" );
    if ( isNull(PrcpTims) || PrcpTims == 0 ) {  
        PrcpTims = "1"; 
        if ( flag == "prcptims") {
            PrcpNm = model.getValue ( prcpNode + "[" + curRow + "]/prcpnm" );
            messageBox ( PrcpNm + " 처방의 횟수값이 없거나 0입니다.\n횟수을 1로 초기화 합니다.", "I999" );
            model.setValue ( prcpNode + "[" + curRow + "]/prcptims", PrcpTims);
        }
    }

    var drprcpetc7 = model.getValue (prcpNode + "[" + curRow + "]/drprcpetc7" );
    if ( isNull(drprcpetc7) || drprcpetc7 == 0 || drprcpetc7 == "-") {  
        drprcpetc7 = "1"; 
        if ( flag == "drprcpetc7") {
            PrcpNm = model.getValue ( prcpNode + "[" + curRow + "]/prcpnm" );
            messageBox ( PrcpNm + " 처방의 1회용량값이 없거나 0입니다.\n1회용량을 1로 초기화 합니다.", "I999" );
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", drprcpetc7 );      //1회
        }
    }

    var drprcpetc8 = model.getValue (prcpNode + "[" + curRow + "]/drprcpetc8" );
    if ( isNull(drprcpetc8) || drprcpetc8 == 0 || drprcpetc8 == "-") {  
        drprcpetc8 = "1"; 
        if ( flag == "drprcpetc8") {
            PrcpNm = model.getValue ( prcpNode + "[" + curRow + "]/prcpnm" );
            messageBox ( PrcpNm + " 처방의 1회수량값이 없거나 0입니다.\n1회수량을 1로 초기화 합니다.", "I999" );
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", drprcpetc8 ); //1회 
        }        
    }
        
    var bfPrcpVol = model.getValue ( "/root/drugcalc/prcpvol" );
    if ( isNull(bfPrcpVol) || bfPrcpVol == 0 ) {    
        bfPrcpVol = "1"; 
    }
    var bfPrcpQty = model.getValue ( "/root/drugcalc/prcpqty" ); 
    if ( isNull(bfPrcpQty) || bfPrcpQty == 0 ) {    
        bfPrcpQty = "1"; 
    }
    var bfprcpTims = model.getValue ( "/root/drugcalc/prcptims" ); 
    if ( isNull(bfprcpTims) || bfprcpTims == 0 ) {  
        bfprcpTims = "1"; 
    }
    var bfdrprcpetc7 = model.getValue ( "/root/drugcalc/drprcpetc7" ); 
    if ( isNull(bfdrprcpetc7) || bfdrprcpetc7 == 0 ) {  
        bfdrprcpetc7 = "1"; 
    }
    var bfdrprcpetc8 = model.getValue ( "/root/drugcalc/drprcpetc8" ); 
    if ( isNull(bfdrprcpetc8) || bfdrprcpetc8 == 0 ) {  
        bfdrprcpetc8 = "1"; 
    }
            
    var calcPrcpVol = 0;
    var calcPrcpQty = 0;
    var calcPrcpTimeVol = 0;
    var calcPrcpTimeQty = 0;
    
    //20090820 마정민 수정. 약인 경우는 최초의 용량 수량 비율로 계산하는 것으로 수정
    var baseQty = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 31 , "^", "|" );
    var baseVol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 32 , "^", "|" );

    var drugcntsvol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 1 , "^", "|" );
    var drugstndvol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 3 , "^", "|" );
    var drugpackvol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 5 , "^", "|" );
    var drugbasevol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 7 , "^", "|" );

    var baseTimeVol = drugcntsvol * drugbasevol / drugpackvol;
    var baseTimeQty = drugbasevol;
    
    //alert( "baseTimeQty=" + drugbasevol + ", baseVol=" + baseVol + ", baseQty="+ baseQty );
    var calcmthdcd = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) , 0, 26, "^", "|" ); 
    var colHidnValue = grdBaseColHidn("D");
    
    if (model.getValue ( prcpNode + "[" + curRow + "]/prcpclscd" ).substring ( 0, 1 ) == "A" && !isNull(baseQty) && !isNull(baseVol)) {
        if ( flag == "prcpvol" && bfPrcpVol != PrcpVol ) { // 용량을 수정했을 때: 수량 자동계산
            calcPrcpQty = parseFloat(PrcpVol) / parseFloat(baseVol) * parseFloat(baseQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000; 
            
            calcPrcpTimeQty = parseFloat(PrcpVol) / parseFloat(baseVol) * parseFloat(baseTimeQty)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000;     

            calcPrcpTimeVol = parseFloat(PrcpVol) / parseFloat(baseVol) * parseFloat(baseTimeVol)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 
            
            /*alert( "calcmthdcd=" + calcmthdcd );
            if(calcmthdcd == "1"){
                calcPrcpTimeQty = calcPrcpTimeQty * PrcpTims;
                calcPrcpTimeVol = calcPrcpTimeVol * PrcpTims;
            }*/
                                
            //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
            var cnclInptTxt  = model.getValue(prcpNode + "[" + curRow + "]/prcpcd");
            var prcpcdEndTxt = cnclInptTxt.substring(cnclInptTxt.length-1, cnclInptTxt.length);
            if(model.getValue(prcpNode + "[" + curRow + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && calcPrcpQty < 1){
                messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
                //model.setValue ( prcpNode + "[" + curRow + "]/prcpvol", bfPrcpVol );
                //return;
            } //end
            
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );      
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty );
                            
        } else if ( flag == "prcpqty" && bfPrcpQty != PrcpQty ) { // 수량을 수정했을 때: 용량 자동계산      
            var prcpclscd = model.getValue ( prcpNode + "[" + curRow + "]/prcpclscd" );
            calcPrcpVol = parseFloat(PrcpQty) / parseFloat(baseQty) * parseFloat(baseVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000; 
            
            calcPrcpTimeQty = parseFloat(PrcpQty) / parseFloat(baseQty) * parseFloat(baseTimeQty)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000;     

            calcPrcpTimeVol = parseFloat(PrcpQty) / parseFloat(baseQty) * parseFloat(baseTimeVol)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 

            /*alert( "calcmthdcd=" + calcmthdcd );
            if(calcmthdcd == "1"){
                calcPrcpTimeQty = calcPrcpTimeQty * PrcpTims;
                calcPrcpTimeVol = calcPrcpTimeVol * PrcpTims;
            }*/

            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );   //1일
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol ); //1회
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty ); //1회
            
            if ( prcpclscd == "M2" ) {
                //20090330 마정민수정. 귀가유치용 물품처방은 의사처방 수량을 수정하면 귀가유치용물품수량컬럼에 같이 반영한다.
                if (!isNull(model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")) && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")!= "-" && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4" )>0){
                    model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc4", PrcpQty );      
                }
            }
            
        } else if ( flag == "drprcpetc7" && bfdrprcpetc7 != drprcpetc7 ) { // 용량을 수정했을 때: 수량 자동계산  
             
            //calcPrcpQty = parseFloat(drprcpetc7) / parseFloat(baseTimeVol) * parseFloat(baseQty)*1000; 
            //calcPrcpQty = Math.round(calcPrcpQty)/1000;               

            calcPrcpTimeQty = parseFloat(drprcpetc7) / parseFloat(baseTimeVol) * parseFloat(baseTimeQty)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000;                                 
            
            //calcPrcpVol = parseFloat(drprcpetc7) / parseFloat(baseTimeVol) * parseFloat(baseVol)*1000; 
            //calcPrcpVol = Math.round(calcPrcpVol)/1000;                               

            //계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
            if(calcmthdcd == "1" && (colHidnValue == "C" || colHidnValue == "G" || colHidnValue == "H") ){
                calcPrcpQty = calcPrcpTimeQty * PrcpTims;
                calcPrcpVol = drprcpetc7 * PrcpTims;
            } else {
                calcPrcpQty = calcPrcpTimeQty;
              calcPrcpVol = drprcpetc7;
            }

            //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
            var cnclInptTxt  = model.getValue(prcpNode + "[" + curRow + "]/prcpcd");
            var prcpcdEndTxt = cnclInptTxt.substring(cnclInptTxt.length-1, cnclInptTxt.length);
            if(model.getValue(prcpNode + "[" + curRow + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && calcPrcpQty < 1){
                messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
                //model.setValue ( prcpNode + "[" + curRow + "]/prcpvol", bfPrcpVol );
                //return;
            } //end 
            
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );     //1일
            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );     //1일
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty ); //1회 
            
        } else if ( flag == "drprcpetc8" && bfdrprcpetc8 != drprcpetc8 ) { // 수량을 수정했을 때: 용량 자동계산      

            calcPrcpVol = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000;                 
                                            
            calcPrcpTimeVol = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseTimeVol)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 
                            
            calcPrcpQty = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000;     

            //계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
            if(calcmthdcd == "1" && (colHidnValue == "C" || colHidnValue == "G" || colHidnValue == "H") ){
                calcPrcpQty = drprcpetc8 * PrcpTims;
                calcPrcpVol = calcPrcpTimeVol * PrcpTims;
            } else {
                calcPrcpQty = drprcpetc8;
              calcPrcpVol = calcPrcpTimeVol;
            }

            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );  
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );                                  
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );  
            
            var prcpclscd = model.getValue ( prcpNode + "[" + curRow + "]/prcpclscd" );
            if ( prcpclscd == "M2" ) {
                //20090330 마정민수정. 귀가유치용 물품처방은 의사처방 수량을 수정하면 귀가유치용물품수량컬럼에 같이 반영한다.
                if (!isNull(model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")) && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")!= "-" && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4" )>0){
                    model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc4", PrcpQty );      
                }
            }
        } else if (flag =="prcptims"){     // 횟수가 변경될 경우 일회용량에 횟수를 곱해서 일일 총용량과 수량을 계산해서 넣어준다.
            //계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
            if(calcmthdcd == "1" && (colHidnValue == "C" || colHidnValue == "G" || colHidnValue == "H") ){
                model.setValue ( prcpNode + "[" + curRow + "]/prcpvol" , drprcpetc7 * PrcpTims);
                model.setValue ( prcpNode + "[" + curRow + "]/prcpqty" , drprcpetc8 * PrcpTims);
            }
        }

    } else {
        if ( flag == "prcpvol" ) { // 용량을 수정했을 때: 수량 자동계산
            calcPrcpQty = eval(PrcpVol) / eval(bfPrcpVol) * eval(PrcpQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000; 

            calcPrcpTimeVol = eval(PrcpVol) / eval(bfPrcpVol) * eval(drprcpetc7)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 

            calcPrcpTimeQty = eval(PrcpVol) / eval(bfPrcpVol) * eval(drprcpetc8)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000; 

            /*alert( "calcmthdcd=" + calcmthdcd );
            if(calcmthdcd == "1"){
                calcPrcpTimeQty = calcPrcpTimeQty * PrcpTims;
                calcPrcpTimeVol = calcPrcpTimeVol * PrcpTims;
            }*/
            
            //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
            var cnclInptTxt  = model.getValue(prcpNode + "[" + curRow + "]/prcpcd");
            var prcpcdEndTxt = cnclInptTxt.substring(cnclInptTxt.length-1, cnclInptTxt.length);
            if(model.getValue(prcpNode + "[" + curRow + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && calcPrcpQty < 1){
                messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
                //model.setValue ( prcpNode + "[" + curRow + "]/prcpvol", bfPrcpVol );
                //return;
            } //end
            
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );      
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );      
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty );      
            
        } else if ( flag == "prcpqty" ) { // 수량을 수정했을 때: 용량 자동계산      
            var prcpclscd = model.getValue ( prcpNode + "[" + curRow + "]/prcpclscd" );
            calcPrcpVol = eval(PrcpQty) / eval(bfPrcpQty) * eval(PrcpVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000; 
            
            calcPrcpTimeVol = eval(PrcpQty) / eval(bfPrcpQty) * eval(drprcpetc7)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 

            calcPrcpTimeQty = eval(PrcpQty) / eval(bfPrcpQty) * eval(drprcpetc8)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000; 
                            
            /*alert( "calcmthdcd=" + calcmthdcd );
            if(calcmthdcd == "1"){
                calcPrcpTimeQty = calcPrcpTimeQty * PrcpTims;
                calcPrcpTimeVol = calcPrcpTimeVol * PrcpTims;
            }*/
                            
            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );  
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );      
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty );  
                            
            if ( prcpclscd == "M2" ) {
                //20090330 마정민수정. 귀가유치용 물품처방은 의사처방 수량을 수정하면 귀가유치용물품수량컬럼에 같이 반영한다.
                if (!isNull(model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")) && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")!= "-" && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4" )>0){
                    model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc4", PrcpQty );      
                }
            }
        } else if ( flag == "drprcpetc7" && bfdrprcpetc7 != drprcpetc7 ) { // 용량을 수정했을 때: 수량 자동계산  
             
            calcPrcpTimeQty = eval(drprcpetc7) / eval(bfdrprcpetc7) * eval(drprcpetc8)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000; 

            calcPrcpVol = eval(drprcpetc7) / eval(bfdrprcpetc7) * eval(PrcpVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000; 

            calcPrcpQty = eval(drprcpetc7) / eval(bfdrprcpetc7) * eval(PrcpQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000; 

            //계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
            if(calcmthdcd == "1" && (colHidnValue == "C" || colHidnValue == "G" || colHidnValue == "H") ){
                calcPrcpQty = calcPrcpTimeQty * PrcpTims;
                calcPrcpVol = drprcpetc7 * PrcpTims;
            } else {
                calcPrcpQty = calcPrcpTimeQty;
              calcPrcpVol = drprcpetc7;
            }

            //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
            var cnclInptTxt  = model.getValue(prcpNode + "[" + curRow + "]/prcpcd");
            var prcpcdEndTxt = cnclInptTxt.substring(cnclInptTxt.length-1, cnclInptTxt.length);
            if(model.getValue(prcpNode + "[" + curRow + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && calcPrcpQty < 1){
                messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
                //model.setValue ( prcpNode + "[" + curRow + "]/prcpvol", bfPrcpVol );
                //return;
            } //end
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );      
            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );      
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty );
            
        } else if ( flag == "drprcpetc8" && bfdrprcpetc8 != drprcpetc8 ) { // 수량을 수정했을 때: 용량 자동계산      

            calcPrcpTimeVol = eval(drprcpetc8) / eval(bfdrprcpetc8) * eval(drprcpetc7)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 

            calcPrcpVol = eval(drprcpetc8) / eval(bfdrprcpetc8) * eval(PrcpVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000; 

            calcPrcpQty = eval(drprcpetc8) / eval(bfdrprcpetc8) * eval(PrcpQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000;     

            //계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
            if(calcmthdcd == "1" && (colHidnValue == "C" || colHidnValue == "G" || colHidnValue == "H") ){
                calcPrcpQty = drprcpetc8 * PrcpTims;
                calcPrcpVol = calcPrcpTimeVol * PrcpTims;
            } else {
                calcPrcpQty = drprcpetc8;
              calcPrcpVol = calcPrcpTimeVol;
            }

            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );  
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );                                  
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );  
            
            var prcpclscd = model.getValue ( prcpNode + "[" + curRow + "]/prcpclscd" );
            if ( prcpclscd == "M2" ) {
                //20090330 마정민수정. 귀가유치용 물품처방은 의사처방 수량을 수정하면 귀가유치용물품수량컬럼에 같이 반영한다.
                if (!isNull(model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")) && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")!= "-" && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4" )>0){
                    model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc4", PrcpQty );      
                }
            }
        } else if ( flag =="prcptims"){   
            //계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
            if(calcmthdcd == "1"){
            var colHidnValue = grdBaseColHidn("D");
                if (colHidnValue == "C" || colHidnValue == "G" || colHidnValue == "H" ) {  // 일회용량과 관련된내용일 경우
                    model.setValue ( prcpNode + "[" + curRow + "]/prcpvol" , drprcpetc7 * PrcpTims);
                    model.setValue ( prcpNode + "[" + curRow + "]/prcpqty" , drprcpetc8 * PrcpTims);                    
                }
            }
        }   
    }    
}

/**@desc   : 용량, 수량, 횟수를 수정했을 때 값계산
 * @param  : flag : 용량, 수량, 횟수 변경 구분
           : curRow : 수정할 현재 row
 * @return : void
 * @authur : 마정민 2007. 4. 30
 */
function DrugCalc2 ( flag, curRow ) {
    var PrcpNm = "";

    var PrcpVol = model.getValue ( prcpNode + "[" + curRow + "]/prcpvol" );
    if ( isNull(PrcpVol) || PrcpVol == 0 ) {    
        PrcpVol = "1"; 
        if ( flag == "prcpvol") {
            PrcpNm = model.getValue ( prcpNode + "[" + curRow + "]/prcpnm" );
            messageBox ( PrcpNm + " 처방의 1일용량값이 없거나 0입니다.\n1일용량을 1로 초기화 합니다.", "I999" );
            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    PrcpVol );      
        }
    }

    var PrcpQty = model.getValue ( prcpNode + "[" + curRow + "]/prcpqty" );
    if ( isNull(PrcpQty) || PrcpQty == 0 ){ 
        PrcpQty = "1"; 
        if ( flag == "prcpqty") {
            PrcpNm = model.getValue ( prcpNode + "[" + curRow + "]/prcpnm" );
            messageBox ( PrcpNm + " 처방의 1일수량값이 없거나 0입니다.\n1일수량을 1로 초기화 합니다.", "I999" );
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    PrcpQty );      
        }
    }

    var PrcpTims = model.getValue (prcpNode + "[" + curRow + "]/prcptims" );
    if ( isNull(PrcpTims) || PrcpTims == 0 ) {  
        PrcpTims = "1"; 
        if ( flag == "prcptims") {
            PrcpNm = model.getValue ( prcpNode + "[" + curRow + "]/prcpnm" );
            messageBox ( PrcpNm + " 처방의 횟수값이 없거나 0입니다.\n횟수을 1로 초기화 합니다.", "I999" );
            model.setValue ( prcpNode + "[" + curRow + "]/prcptims", PrcpTims);
        }
    }

    var drprcpetc7 = model.getValue (prcpNode + "[" + curRow + "]/drprcpetc7" );
    if ( isNull(drprcpetc7) || drprcpetc7 == 0 || drprcpetc7 == "-") {  
        drprcpetc7 = "1"; 
        if ( flag == "drprcpetc7") {
            PrcpNm = model.getValue ( prcpNode + "[" + curRow + "]/prcpnm" );
            messageBox ( PrcpNm + " 처방의 1회용량값이 없거나 0입니다.\n1회용량을 1로 초기화 합니다.", "I999" );
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", drprcpetc7 );               
        }
    }

    var drprcpetc8 = model.getValue (prcpNode + "[" + curRow + "]/drprcpetc8" );
    if ( isNull(drprcpetc8) || drprcpetc8 == 0 || drprcpetc8 == "-") {  
        drprcpetc8 = "1"; 
        if ( flag == "drprcpetc8") {
            PrcpNm = model.getValue ( prcpNode + "[" + curRow + "]/prcpnm" );
            messageBox ( PrcpNm + " 처방의 1회수량값이 없거나 0입니다.\n1회수량을 1로 초기화 합니다.", "I999" );
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", drprcpetc8 ); 
        }
    }
        
    var bfPrcpVol = model.getValue ( "/root/drugcalc/prcpvol" );
    if ( isNull(bfPrcpVol) || bfPrcpVol == 0 ) {    
        bfPrcpVol = "1"; 
    }
    var bfPrcpQty = model.getValue ( "/root/drugcalc/prcpqty" ); 
    if ( isNull(bfPrcpQty) || bfPrcpQty == 0 ) {    
        bfPrcpQty = "1"; 
    }
    var bfprcpTims = model.getValue ( "/root/drugcalc/prcptims" ); 
    if ( isNull(bfprcpTims) || bfprcpTims == 0 ) {  
        bfprcpTims = "1"; 
    }
    var bfdrprcpetc7 = model.getValue ( "/root/drugcalc/drprcpetc7" ); 
    if ( isNull(bfdrprcpetc7) || bfdrprcpetc7 == 0 ) {  
        bfdrprcpetc7 = "1"; 
    }
    var bfdrprcpetc8 = model.getValue ( "/root/drugcalc/drprcpetc8" ); 
    if ( isNull(bfdrprcpetc8) || bfdrprcpetc8 == 0 ) {  
        bfdrprcpetc8 = "1"; 
    }
            
    var calcPrcpVol = 0;
    var calcPrcpQty = 0;
    var calcPrcpTimeVol = 0;
    var calcPrcpTimeQty = 0;
    
    //20090820 마정민 수정. 약인 경우는 최초의 용량 수량 비율로 계산하는 것으로 수정
    var baseQty = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 31 , "^", "|" );
    var baseVol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 32 , "^", "|" );

    var drugcntsvol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 1 , "^", "|" );
    var drugstndvol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 3 , "^", "|" );
    var drugpackvol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 5 , "^", "|" );
    var drugbasevol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) + "^", 0, 7 , "^", "|" );

    var baseTimeVol = drugcntsvol * drugbasevol / drugpackvol;
    var baseTimeQty = drugbasevol;
    
    var calcmthdcd = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + curRow + "]/drugmastspec" ) , 0, 26, "^", "|" ); 
    var colHidnValue = grdBaseColHidn("D");
    
    if (model.getValue ( prcpNode + "[" + curRow + "]/prcpclscd" ).substring ( 0, 1 ) == "A" && !isNull(baseQty) && !isNull(baseVol)) {
        if ( flag == "prcpvol") { // 용량을 수정했을 때: 수량 자동계산
            calcPrcpQty = parseFloat(PrcpVol) / parseFloat(baseVol) * parseFloat(baseQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000; 
            
            calcPrcpTimeQty = parseFloat(PrcpVol) / parseFloat(baseVol) * parseFloat(baseTimeQty)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000;     

            calcPrcpTimeVol = parseFloat(PrcpVol) / parseFloat(baseVol) * parseFloat(baseTimeVol)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 

            /*alert( "calcmthdcd=" + calcmthdcd );
            if(calcmthdcd == "1"){
                calcPrcpTimeQty = calcPrcpTimeQty * PrcpTims;
                calcPrcpTimeVol = calcPrcpTimeVol * PrcpTims;
            }*/

            //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
            var cnclInptTxt  = model.getValue(prcpNode + "[" + curRow + "]/prcpcd");
            var prcpcdEndTxt = cnclInptTxt.substring(cnclInptTxt.length-1, cnclInptTxt.length);
            if(model.getValue(prcpNode + "[" + curRow + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && calcPrcpQty < 1){
                messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
                //model.setValue ( prcpNode + "[" + curRow + "]/prcpvol", bfPrcpVol );
                //return;
            } //end
            
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );      
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );               
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty );
                            
        } else if ( flag == "prcpqty") { // 수량을 수정했을 때: 용량 자동계산      
            var prcpclscd = model.getValue ( prcpNode + "[" + curRow + "]/prcpclscd" );
            calcPrcpVol = parseFloat(PrcpQty) / parseFloat(baseQty) * parseFloat(baseVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000; 
            
            calcPrcpTimeQty = parseFloat(PrcpQty) / parseFloat(baseQty) * parseFloat(baseTimeQty)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000;     

            calcPrcpTimeVol = parseFloat(PrcpQty) / parseFloat(baseQty) * parseFloat(baseTimeVol)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 

            /*alert( "calcmthdcd=" + calcmthdcd );
            if(calcmthdcd == "1"){
                calcPrcpTimeQty = calcPrcpTimeQty * PrcpTims;
                calcPrcpTimeVol = calcPrcpTimeVol * PrcpTims;
            }*/

            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );  
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );               
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty );
            
            if ( prcpclscd == "M2" ) {
                //20090330 마정민수정. 귀가유치용 물품처방은 의사처방 수량을 수정하면 귀가유치용물품수량컬럼에 같이 반영한다.
                if (!isNull(model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")) && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")!= "-" && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4" )>0){
                    model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc4", PrcpQty );      
                }
            }
            
        } else if ( flag == "drprcpetc7") { // 용량을 수정했을 때: 수량 자동계산  
             
            calcPrcpQty = parseFloat(drprcpetc7) / parseFloat(baseTimeVol) * parseFloat(baseQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000;                 

            calcPrcpTimeQty = parseFloat(drprcpetc7) / parseFloat(baseTimeVol) * parseFloat(baseTimeQty)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000;                                 
            
            calcPrcpVol = parseFloat(drprcpetc7) / parseFloat(baseTimeVol) * parseFloat(baseVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000;                                 
            
            //계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
            if(calcmthdcd == "1"){
                calcPrcpQty = calcPrcpQty * PrcpTims;
                calcPrcpVol = calcPrcpVol * PrcpTims;
            }
            
            //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
            var cnclInptTxt  = model.getValue(prcpNode + "[" + curRow + "]/prcpcd");
            var prcpcdEndTxt = cnclInptTxt.substring(cnclInptTxt.length-1, cnclInptTxt.length);
            if(model.getValue(prcpNode + "[" + curRow + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && calcPrcpQty < 1){
                messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
                //model.setValue ( prcpNode + "[" + curRow + "]/prcpvol", bfPrcpVol );
                //return;
            } //end             
            
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty ); 
            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol ); 
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty ); 
            
        } else if ( flag == "drprcpetc8" ) { // 수량을 수정했을 때: 용량 자동계산      

            calcPrcpVol = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000;                 
                                            
            calcPrcpTimeVol = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseTimeVol)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 
                            
            calcPrcpQty = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000;     

            //계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
            if(calcmthdcd == "1"){
                calcPrcpQty = calcPrcpQty * PrcpTims;
                calcPrcpVol = calcPrcpVol * PrcpTims;
            }

            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );  
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );                                  
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );  
            
            var prcpclscd = model.getValue ( prcpNode + "[" + curRow + "]/prcpclscd" );
            if ( prcpclscd == "M2" ) {
                //20090330 마정민수정. 귀가유치용 물품처방은 의사처방 수량을 수정하면 귀가유치용물품수량컬럼에 같이 반영한다.
                if (!isNull(model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")) && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")!= "-" && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4" )>0){
                    model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc4", PrcpQty );      
                }
            }
        } else if (flag =="prcptims"){   
            var colHidnValue = grdBaseColHidn("D");
            if (colHidnValue == "C" || colHidnValue == "G" || colHidnValue == "H" ) {  // 일회용량과 관련된내용일 경우
                model.setValue ( prcpNode + "[" + curRow + "]/prcpvol" , drprcpetc7 * PrcpTims);
                model.setValue ( prcpNode + "[" + curRow + "]/prcpqty" , drprcpetc8 * PrcpTims);                    
            }               
        }   

    } else {
        
        if ( flag == "prcpvol" ) { // 용량을 수정했을 때: 수량 자동계산
            calcPrcpQty = eval(PrcpVol) / eval(bfPrcpVol) * eval(PrcpQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000; 

            calcPrcpTimeVol = eval(PrcpVol) / eval(bfPrcpVol) * eval(drprcpetc7)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 

            calcPrcpTimeQty = eval(PrcpVol) / eval(bfPrcpVol) * eval(drprcpetc8)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000; 

            /*alert( "calcmthdcd=" + calcmthdcd );
            if(calcmthdcd == "1"){
                calcPrcpTimeQty = calcPrcpTimeQty * PrcpTims;
                calcPrcpTimeVol = calcPrcpTimeVol * PrcpTims;
            }*/
            
            //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
            var cnclInptTxt  = model.getValue(prcpNode + "[" + curRow + "]/prcpcd");
            var prcpcdEndTxt = cnclInptTxt.substring(cnclInptTxt.length-1, cnclInptTxt.length);
            if(model.getValue(prcpNode + "[" + curRow + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && calcPrcpQty < 1){
                messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
                //model.setValue ( prcpNode + "[" + curRow + "]/prcpvol", bfPrcpVol );
                //return;
            } //end
            
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );      
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );      
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty );      
            
        } else if ( flag == "prcpqty" ) { // 수량을 수정했을 때: 용량 자동계산      
            var prcpclscd = model.getValue ( prcpNode + "[" + curRow + "]/prcpclscd" );
            calcPrcpVol = eval(PrcpQty) / eval(bfPrcpQty) * eval(PrcpVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000; 
            
            calcPrcpTimeVol = eval(PrcpQty) / eval(bfPrcpQty) * eval(drprcpetc7)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 

            calcPrcpTimeQty = eval(PrcpQty) / eval(bfPrcpQty) * eval(drprcpetc8)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000; 
                        
            /*alert( "calcmthdcd=" + calcmthdcd );
            if(calcmthdcd == "1"){
                calcPrcpTimeQty = calcPrcpTimeQty * PrcpTims;
                calcPrcpTimeVol = calcPrcpTimeVol * PrcpTims;
            }*/
                            
            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );  
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );      
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty );  
                            
            if ( prcpclscd == "M2" ) {
                //20090330 마정민수정. 귀가유치용 물품처방은 의사처방 수량을 수정하면 귀가유치용물품수량컬럼에 같이 반영한다.
                if (!isNull(model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")) && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")!= "-" && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4" )>0){
                    model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc4", PrcpQty );      
                }
            }
        } else if ( flag == "drprcpetc7" ) { // 용량을 수정했을 때: 수량 자동계산  
             
            calcPrcpTimeQty = eval(drprcpetc7) / eval(bfdrprcpetc7) * eval(drprcpetc8)*1000; 
            calcPrcpTimeQty = Math.round(calcPrcpTimeQty)/1000; 

            calcPrcpVol = eval(drprcpetc7) / eval(bfdrprcpetc7) * eval(PrcpVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000; 

            calcPrcpQty = eval(drprcpetc7) / eval(bfdrprcpetc7) * eval(PrcpQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000; 

            //계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
            if(calcmthdcd == "1"){
                calcPrcpQty = calcPrcpQty * PrcpTims;
                calcPrcpVol = calcPrcpVol * PrcpTims;
            }
            
            //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
            var cnclInptTxt  = model.getValue(prcpNode + "[" + curRow + "]/prcpcd");
            var prcpcdEndTxt = cnclInptTxt.substring(cnclInptTxt.length-1, cnclInptTxt.length);
            if(model.getValue(prcpNode + "[" + curRow + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && calcPrcpQty < 1){
                messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
                //model.setValue ( prcpNode + "[" + curRow + "]/prcpvol", bfPrcpVol );
                //return;
            } //end
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );      
            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );      
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", calcPrcpTimeQty );
            
        } else if ( flag == "drprcpetc8" ) { // 수량을 수정했을 때: 용량 자동계산      

            calcPrcpTimeVol = eval(drprcpetc8) / eval(bfdrprcpetc8) * eval(drprcpetc7)*1000; 
            calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 

            calcPrcpVol = eval(drprcpetc8) / eval(bfdrprcpetc8) * eval(PrcpVol)*1000; 
            calcPrcpVol = Math.round(calcPrcpVol)/1000; 

            calcPrcpQty = eval(drprcpetc8) / eval(bfdrprcpetc8) * eval(PrcpQty)*1000; 
            calcPrcpQty = Math.round(calcPrcpQty)/1000;     

            //계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
            if(calcmthdcd == "1"){
                calcPrcpQty = calcPrcpQty * PrcpTims;
                calcPrcpVol = calcPrcpVol * PrcpTims;
            }

            model.setValue ( prcpNode + "[" + curRow + "]/prcpvol",    calcPrcpVol );  
            model.setValue ( prcpNode + "[" + curRow + "]/prcpqty",    calcPrcpQty );                                  
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc7", calcPrcpTimeVol );  
            model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc8", drprcpetc8 );
            
            var prcpclscd = model.getValue ( prcpNode + "[" + curRow + "]/prcpclscd" );
            if ( prcpclscd == "M2" ) {
                //20090330 마정민수정. 귀가유치용 물품처방은 의사처방 수량을 수정하면 귀가유치용물품수량컬럼에 같이 반영한다.
                if (!isNull(model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")) && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4")!= "-" && model.getValue ( prcpNode + "[" + curRow + "]/drprcpetc4" )>0){
                    model.setValue ( prcpNode + "[" + curRow + "]/drprcpetc4", PrcpQty );      
                }
            }
        } else if (flag =="prcptims"){   
            var colHidnValue = grdBaseColHidn("D");
            if (colHidnValue == "C" || colHidnValue == "G" || colHidnValue == "H" ) {  // 일회용량과 관련된내용일 경우
                model.setValue ( prcpNode + "[" + curRow + "]/prcpvol" , drprcpetc7 * PrcpTims);
                model.setValue ( prcpNode + "[" + curRow + "]/prcpqty" , drprcpetc8 * PrcpTims);                    
            }               
        }   
    }    
}
 
/**@desc   : PreWorkUp 처리 오른쪽 마우스 클릭
 * @return : void
 * @authur : 마정민 2007. 4. 30
 */
function fPreWorkUp () {

    var selectedRows = grd_prcplist.selectedRows;   

    for (var i=0; i< selectedRows; i++) {

        if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/trnptbftestflag" ) == "Y" ) {
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/trnptbftestflag", "N" )
        } else {
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/trnptbftestflag", "Y" )
        }

        makePrcpNm( prcpNode, grd_prcplist.selectedrow(i) );
        
        fSetCpVal(grd_prcplist.selectedrow(i), "U");
    }
}

/**@desc   : 입원전 검사처방(당일)처리 오른쪽 마우스 클릭
 * @return : void
 * @authur : 마정민 2007. 4. 30
 */
function fPreHosInPrcp () {

    var selectedRows = grd_prcplist.selectedRows;   

    for (var i=0; i< selectedRows; i++) {
        
        if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status" )=="S") continue;
        if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpkindcd" ) == "90" ) {
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpkindcd", "20" )
        } else {
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpkindcd", "90" )
        }

        makePrcpNm( prcpNode, grd_prcplist.selectedrow(i) );
        
        fSetCpVal(grd_prcplist.selectedrow(i), "U");
    }
}

/**@desc   : 입원전 검사처방(전일)처리 오른쪽 마우스 클릭
 * @return : void
 * @authur : 마정민 2007. 7. 21
 */
function fPreHosInPrcpBf () {

    var selectedRows = grd_prcplist.selectedRows;   

    for (var i=0; i< selectedRows; i++) {

        if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status" )=="S") continue;
        if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpkindcd" ) == "95" ) {
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpkindcd", "20" )
        } else {
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpkindcd", "95" )
        }

        makePrcpNm( prcpNode, grd_prcplist.selectedrow(i) );
        
        fSetCpVal(grd_prcplist.selectedrow(i), "U");
    }
}

/**@desc   : 특수주사실(항암주사실) 처방을 구분 체크
 * @return : void
 * @authur : 문세희 2008. 10. 27
 */
function fSpecShot() {   
    
    var selectedRows = grd_prcplist.selectedRows;   

    for (var i=0; i< selectedRows; i++) {

        if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status" )=="S") continue;
        if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/drprcpetc2" ) == "Y" ){
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/drprcpetc2", "" )
        } else {
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/drprcpetc2", "Y" )
        }   

        makePrcpNm( prcpNode, grd_prcplist.selectedrow(i) );
        
        fSetCpVal(grd_prcplist.selectedrow(i), "U");
    }
}

/**@desc   : BMT주사실 처방을 구분 체크
 * @return : void
 * @authur : 마정민 2009. 02. 17
 */
function fBMTShot() {   
    
    var selectedRows = grd_prcplist.selectedRows;   

    for (var i=0; i< selectedRows; i++) {

        if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status" )=="S") continue;
        if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/drprcpetc2" ) == "B" ){
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/drprcpetc2", "" )
        } else {
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/drprcpetc2", "B" )
        }   

        makePrcpNm( prcpNode, grd_prcplist.selectedrow(i) );
        
        fSetCpVal(grd_prcplist.selectedrow(i), "U");
    }
}

/**@desc   : 정규, 추가처방 처리
 * @return : void
 * @authur : 마정민 2007. 4. 30
 */
function fPrcpDdCheck() {

    //DUR-S
    //by sonjy 20091207 처방일자가 바뀔때 이전 difguid초기화 
    // durappyn : "A:DUR전체사용", "Y:DUR중 저함량제외", "나머지:DUR 사용안함", "K:경북대용 DUR"
    if ( model.getValue( "/root/initsrch/durappyn/trgtcd" ) == "A" || model.getValue( "/root/initsrch/durappyn/trgtcd" ) == "Y") {
        model.makeValue("/root/init/bf_difguid", "");
    }
    //DUR-E
    
    var cnt = 0;
    
    if ( grd_prcplist.rows > 2 )    {
        var rtnmsg = messageBox( "날짜를 수정하시면 " + fDateFormat ( model.getValue ( "/root/init/prcpdd" )) + "일 처방으로 변경됩니다.\n희망일자도 같이 변경", "S001")
        if ( rtnmsg == "6" || rtnmsg == "7" ) {
            bfPrcpdd = model.getValue ( "/root/init/prcpdd" );

            var srcNodeList = model.instances(0).selectNodes( "/root/main/prcp/prcplist" );
            for (var i = srcNodeList.length; i >= 1; i--) {
                if ( model.getValue ( prcpNode + "[" + i + "]/status" ) == "I" ){
                    fPrcpBuffer( ++cnt, i, "/root/prcpdrag", prcpNode );
                }
            }
            model.removeNodeset ( "/root/main/prcp/prcplist" );
            appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" ); //검색라인추가 
        } else {
            model.setValue ( "/root/init/prcpdd", bfPrcpdd );
            model.refresh();
            return;
        }
    } else {
        bfPrcpdd = model.getValue ( "/root/init/prcpdd" );
        model.removeNodeset ( "/root/main/prcp/prcplist" );
        appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" ); //검색라인추가       
    }

    if ( model.getValue ( "/root/init/prcpkindcd") == "80" ) return;

    fPrcpColor();

    /*var prcpdd = model.getValue ( "/root/init/prcpdd" );      

    if ( eval (getCurrentTime().substr (0,2)) <= 4 && prcpdd == getCurrentDate()) {
       //처방종류: 당일이고 4시전이면 정규
       model.setValue ( "/root/init/prcpkindcd", "10" );
    } else if ( eval(prcpdd) > eval(getCurrentDate())) {
       //처방종류: 오늘이후 처방일이면 정규
       model.setValue ( "/root/init/prcpkindcd", "10" );
    } else {
        //아니면 추가
       model.setValue ( "/root/init/prcpkindcd", "20" );
    }*/

    model.refresh();
    fInitSrch();
    fTempPrcp(); //임시처방 호출
    if ( cnt > 0 ) {
        fPrcpPaste( rtnmsg );
    }
    model.setfocus( "grd_prcplist" );
    grd_prcplist.row = grd_prcplist.rows-1;
}

/**@desc   : 임시처방처리
 * @return : void
 * @param  : flag : 저장하고 호출하는 건지 check
 * @authur : 마정민 2007. 5. 10
*/
function fTempPrcp (flag) {

    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    if ( model.getValue ( "/root/initsrchprcp/prcpetccnts/temprsrvprcpyn" ) != "N") {
        var orddd = "";
        if ( prcpgenrflag == "O" || prcpgenrflag == "S" ) {
            orddd = model.getValue ( "/root/paminfo/list/orddd" );
        } else {
            orddd = model.getValue ( "/root/paminfo/list/indd" );
        }
        var cnt = 0;        
        var prcpdd = model.getValue ( "/root/init/prcpdd" );
        if ( isNull(prcpdd)) prcpdd = getCurrentDate(); 

        model.setValue ( "/root/send/cond1", model.getValue ( "/root/paminfo/list/pid" ));     //환자ID
        model.setValue ( "/root/send/cond2", orddd );                                          //외래:진료일, 입원:입원일
        model.setValue ( "/root/send/cond4", prcpdd);                                          //임시처방구분
        model.setValue ( "/root/send/cond5", "rsrv" );                                         //전처방구분:예약처방 
        model.setValue ( "/root/send/cond6", "" );                                         //전처방구분:예약처방 

        model.setValue ( "/root/send/cond9", prcpgenrflag );                                            
        model.setValue ( "/root/send/cond11", model.getValue ( "/root/paminfo/list/cretno" ));  //생성번호
        model.setValue ( "/root/send/cond14", model.getValue ( "/root/init/prcpdd" ));  //생성번호
        model.setValue ( "/root/send/cond99", "getBfPrcpSrchInfo"); //검색구분
        
        submit("TRMMO00100", false);
        var sPrcpHistCd = model.getValue("/root/prcpsrch/prcplist/prcphistcd");
        
        if ( sPrcpHistCd == "T" ) {
            model.copyNode ( "/root/main/prcp", "/root/prcpsrch" );
            appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" ); //검색라인추가 
            
            model.recalculate();     
            model.refresh();
        } else if ( sPrcpHistCd == "X" && flag != "save") { //저장하고 나서는 임시저장된 데이터가 있으면 화면에 보여준다.
            var xpt = window.screenleft + 100;
            var ypt = window.screenTop + 100;

            var coord = getRelativeCoordinate ( xpt, ypt );
            var mon = coord[0];
            xpt = coord[1];
            ypt = coord[2];
            modal ( "SPMMO00700", mon,  xpt, ypt, "prcpdetl", "/root/prcpsrch", "/root/main/prcp", "", false );
        }
    }
    
    //응급의학 관리료 증상관리 창 팝업.
    if (model.getValue ( "/root/initsrchprcp/prcpetccnts/erprcpyn" ) == "Y" ){
        setParameter ( "SMMMO00100_cond1", "Y" );
        fPrcpModal ( "SMMMO06100", 0, 0 );
        grd_prcplist.rebuild();
        model.recalculate();
        model.setfocus( "grd_prcplist" );
    }
    
    model.removeNodeSet ( "/root/prcpsrch/prcplist" );
}

/**@desc   : 진단검색
 * @param  : flag : 진단명검색, 코드검색
 * @return : void
 * @authur : 마정민 2007. 5. 10
*/
function fDiagSrch ( flag ) {

    //if(event.keyCode == "13" && flag != "addprcp" ) {
    if(flag != "addprcp" ) {
        var diagnm = "";
        if ( flag == "diagnm" ) {
            model.setValue ( diagNode + "[" + grd_diaglist.row+ "]/icd10cd", "" );
            diagnm = model.getValue ( diagNode + "[" + grd_diaglist.row+ "]/diagengnm" );
            srchflag = "2";
            model.setValue ( "/root/init/diagsrchcond1", "2" ); //단어검색으로 수정
        } else if ( flag == "icd10cd" ) {
            model.setValue ( diagNode + "[" + grd_diaglist.row+ "]/diagengnm", "" );
            diagnm = model.getValue ( diagNode + "[" + grd_diaglist.row+ "]/icd10cd" );
            srchflag = "1";
            model.setValue ( "/root/init/diagsrchcond1", "1" );
        }
        
        var isHangul = fIsHangul (diagnm);
        if ( isNull(diagnm)) { //한글일때는 1글자만 넣어도 검색가능        
            messageBox ( "진단 검색어를", "C001" );
            return;
        } else if ( isHangul == "E" ){
            if ( diagnm.length < 2 ){ //영문,숫자일때는 3글자 넣어야 검색가능
                messageBox ( "2글자 이상", "C001" );
                return;
            }   
        }

        setParameter ( "SPMMO00800_cond1", srchflag );
        setParameter ( "SPMMO00800_cond2", model.getValue ( "/root/init/diagsrchcond1" ));
        setParameter ( "SPMMO00800_cond3", isHangul );
        setParameter ( "SPMMO00800_cond4", model.getValue ( "/root/init/prcpdd" ));
        setParameter ( "SPMMO00800_cond5", diagnm );
        setParameter ( "SPMMO00800_srchmode", "P" );

        var xpt = window.screenleft + 200;
        var ypt = window.screenTop + 110;
        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];

        modal ( "SPMMO00800", mon, xpt, ypt, "diagsrch", "", "", "", false );   
        if ( getParameter( "SPMMO00800_rtn_useyn" ) == "Y" ) {
            addDiagSetValue (getParameter( "SPMMO00800_rtn" ));
            setParameter( "SPMMO00800_rtn_useyn", "" );
        }
        model.recalculate();    
      
        // 처방 메인화면에서 진단코드나 진단명 입력 후 다음 셀에 edit 상태 생성 - 20081124 by MoonSH 
        grd_diaglist.refresh(); 
        if ( flag == "diagnm" ) { 
          grd_diaglist.col = grd_diaglist.colref("diagnm"); 
          grd_diaglist.editCell(); 
        } else if ( flag == "icd10cd" ) { 
          grd_diaglist.col = grd_diaglist.colref("icd10cd"); 
          grd_diaglist.editCell(); 
        } 
    } else if ( flag == "addprcp" ){
        appendChildPrcp ( "/root/reset/diagcdlist", "/root/main/diaginfo", "main" );
        model.refresh();
        setParameter ( "SPMMO00800_cond1", "1" );
        setParameter ( "SPMMO00800_cond2", "1");
        setParameter ( "SPMMO00800_cond3", "E" );
        setParameter ( "SPMMO00800_cond4", model.getValue ( "/root/init/prcpdd" ));
        setParameter ( "SPMMO00800_cond5", model.getValue ( "/root/initsrch/prcpetccnts/pamdiagcd" ));

        var xpt = window.screenleft + 200;
        var ypt = window.screenTop + 110;
        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];

        modal ( "SPMMO00800", mon, xpt, ypt, "diagsrch", "", "", "", false );
        
        if ( getParameter( "SPMMO00800_rtn_useyn" ) == "Y" ) {
            addDiagSetValue (getParameter( "SPMMO00800_rtn" ));
            setParameter( "SPMMO00800_rtn_useyn", "" );
            model.refresh();
            var srcNodeList = model.instances(0).selectNodes("/root/main/diaginfo/diagcdlist");
            for ( var i= 1; i<=srcNodeList.length ; i++){       
                if ( model.getValue ( "/root/main/diaginfo/diagcdlist["+i+"]/status" ) == "S" ) {
                    model.removeNode ( "/root/main/diaginfo/diagcdlist["+i+"]" );
                }
            }
        }   
        model.recalculate();  
    }
}

/**@desc   : 진단 오른쪽 마우스 팝업 처리
 * @id     : grd_prcplist
 * @event  : onmousedown
 * @return : void
 * @authur : 마정민 2007. 5. 15 
 */
function fDaigMouseRghtBtnPopup() {

    if (event.button == 3) {
        if(grd_diaglist.isCell(event.target) && grd_diaglist.mouseRow >= grd_diaglist.fixedRows) {
            setPopupMenu("grd_diaglist", false, "/root/init/diagmsrght/mouserght", "label", "func");    //메뉴호출방식변경 JJE
        }
    }
}

/**@desc   : 진단삭제
 * @id     : grd_prcplist
 * @event  : onmousedown
 * @return : void
 * @authur : 마정민 2007. 5. 15 
 */
function fDiagDeleteRow() {
    
    //시행부서 화면에서는 진단 수정, 삭제 불가
    if ( model.getValue ( "/root/addprcp" ) == "Y" ){
        return;
    }

    var selectedRows = grd_diaglist.selectedRows;
    var chkcnt = 0;

    for (i= selectedRows-1; i >= 0; i--){
        var icd10cd = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/icd10cd" );
        var diagkindcdflag = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diagkindcdflag" );

        if ( model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "O" && chkcnt == 0) {
            if ( !isNull(model.getValue ( "/root/initsrch/diagautocnts/trgtcd" ))) {

                if (model.getValue ( "/root/init/hosinprcpresncd" ) != "00" ) { //원내처방 사유가 있을 경우
                    var srcNodeList = model.instances(0).selectNodes( "/root/initsrch/diagautocnts" );
                    for ( var j=1; j <=srcNodeList.length; j++ ) {
                        var trgtcdnmArray = model.getValue ( "/root/initsrch/diagautocnts[" + j + "]/trgtcdnm" );
                        var fromTrgtcdnm =  getArrayData ( trgtcdnmArray + "^", 0, 0, "^", "|" );
                        var toTrgtcdnm =  getArrayData ( trgtcdnmArray + "^", 0, 1, "^", "|" );
                        var cdlength = fromTrgtcdnm.length;
                        var icd10Chck = icd10cd.substring( 0, cdlength );
                        if ( icd10Chck >= fromTrgtcdnm && icd10Chck <= toTrgtcdnm  ) { //해당 진단검색안에 값이 있다면
                            var hosinprcpresncd = model.getValue ( "/root/initsrch/diagautocnts[" + j + "]/trgtcd" );
                            //삭제 진단의 원내처방 사유가 init 의 원내처방 사유와 같다면 clear 를 물어본다.
                            if ( hosinprcpresncd == model.getValue ( "/root/init/hosinprcpresncd" )) {
                                //주상병이든 원내처방사유 23일 때만 적용
                                if ( diagkindcdflag == "M" || hosinprcpresncd == "23" ) {
                                    chkcnt++; //한번물어보면 더이상 물어보지 않기 위해 체크한다.
                                    if (messageBox ( "원내처방 [" +cmb_hosinprcpresn.label + "]" + "\n관련된 진단을 삭제하셨습니다. 원내처방사유를 적용을", "Q007" ) == "6" ) {
                                        model.setValue ( "/root/init/hosinprcpresncd", "00" );          
                                        var srcNodeList = model.instances(0).selectNodes( "/root/main/prcp/prcplist" );
                                        for ( var k=1; k<=srcNodeList.length; k++ ) {
                                            var prcpclscd = model.getValue ( "/root/main/prcp/prcplist[" + k + "]/prcpclscd" );
                                            if ( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" ) { //약,주사
                                                var prcphosinprcpresncd = model.getValue ( "/root/main/prcp/prcplist[" + k + "]/hosinprcpresncd" );                             
                                                //원내처방사유가 약에 관련된 것이 있다면 적용하지 않는다.
                                                //저장할 때 일괄적용
                                                if ( !fPamHosinPrcpResnCdChk(hosinprcpresncd)) {
                                                    model.setValue ( "/root/main/prcp/prcplist[" + k + "]/hosinhosoutflag", "O" );
                                                    model.setValue ( "/root/main/prcp/prcplist[" + k + "]/hosinprcpresncd", "00" );
                                                }
                                            } //약,주사 end
                                        } //처방검색 end
                                        model.setValue ( "/root/paminfo/list/hosoutexptresncd" , "00" );
                                        break; //값을 setting 하면 빠져나온다.
                                    } //icd10cd == trgtcdnm end
                                } //진단검색 end
                            }
                        }
                    }
                } //원내처방 사유 여부
            }//진단초기값 여부 end
        } //외래end

        var status = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/status" );

        if ( status=="-" || status=="U" || status=="T" ) {
            //수정한 데이터를 원복시킨다.
            var diagdd = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diagdd" );
            var diagno = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diagno" );
            var diaghistno = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diaghistno" );

            var destNode = instance1.selectSingleNode("/root/main/diaginfo");
            var destNodeList = instance1.selectNodes("/root/main/diaginfo/diagcdlist");

            var srcSingleNode = instance1.selectSingleNode("/root/diagorg/diagcdlist[diagdd='" + diagdd + "' and diagno='" + diagno + "' and diaghistno='" + diaghistno + "']")                                                        
            destNode.replaceChild( srcSingleNode.cloneNode(true), destNodeList.item(grd_diaglist.selectedrow(i)-1)); 
            model.setValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/status", "-" );

            model.setValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/status", "D" );
        } else if ( status =="I" ){
            model.removeNode ( diagNode + "[" +  grd_diaglist.selectedrow(i) + "]" );
        } else if ( status=="S" ) {
            model.setValue ( diagNode + "[" + grd_diaglist.selectedrow(i)+ "]/diagengnm", "" );
        }   
    }
    model.recalculate();
    model.refresh();
}

function fDiagCnclRow() {

    var selectedRows = grd_diaglist.selectedRows;

    for (i= selectedRows-1; i >= 0; i--){
        var status = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/status" );
        if ( status =="D" ) {
            //수정한 데이터를 원복시킨다.
            var diagdd = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diagdd" );
            var diagno = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diagno" );
            var diaghistno = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diaghistno" );

            var destNode = instance1.selectSingleNode("/root/main/diaginfo");
            var destNodeList = instance1.selectNodes("/root/main/diaginfo/diagcdlist");

            var srcSingleNode = instance1.selectSingleNode("/root/diagorg/diagcdlist[diagdd='" + diagdd + "' and diagno='" + diagno + "' and diaghistno='" + diaghistno + "']")                                                        
            destNode.replaceChild( srcSingleNode.cloneNode(true), destNodeList.item(grd_diaglist.selectedrow(i)-1)); 
            //model.setValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/status", "-" );
        } else if ( status=="U" ) {
            //수정한 데이터를 원복시킨다.
            var diagdd = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diagdd" );
            var diagno = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diagno" );
            var diaghistno = model.getValue ( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diaghistno" );

            var destNode = instance1.selectSingleNode("/root/main/diaginfo");
            var destNodeList = instance1.selectNodes("/root/main/diaginfo/diagcdlist");

            var srcSingleNode = instance1.selectSingleNode("/root/diagorg/diagcdlist[diagdd='" + diagdd + "' and diagno='" + diagno + "' and diaghistno='" + diaghistno + "']")                                                        
            destNode.replaceChild( srcSingleNode.cloneNode(true), destNodeList.item(grd_diaglist.selectedrow(i)-1));    
        }
    }
    model.recalculate();
    model.refresh();
}

/**@desc   : 진단 수정
 * @       : 신규일때는 수정표시 안함.
 * @event  : xforms-value-changed
 * @return : void
 * @authur : 마정민 2007. 5. 16
 */
function fDiagUpdate() {

    var status = model.getValue ( diagNode + "[" + grd_diaglist.row+ "]/status" );
    if ( status=="-" || status=="T" ) {
        model.setValue ( diagNode + "[" + grd_diaglist.row+ "]/status", "U" );
    }

}

/**@desc   : 진단 조회
 * @return : void
 * @authur : 마정민 2007. 5. 16
 */
function fPatDiagSrch(sPrcpFlag) {
    if ( isNull(sPrcpFlag)){
        sPrcpFlag = "prcp"
    }
    
    var bTRMMO00105 = false; // 진단조회 서브밋 성공 여부
    var sPrcpGenrFlag = model.getValue ( "/root/patflag/list/prcpgenrflag" );  
        
    if(sPrcpFlag == "save") { // 처방 저장후 호출시에는 데이터 조회 하도록 수정.
        bTRMMO00105 = true;
    } else {
        var sOrdDd        = "";
        var sCretNo       = ""; 
        var sOrdDrId      = "";
        var sPseuAcptFlag = model.getValue ( "/root/formerkey/pseuacptflag" );  //시행부서처방가접수
        
        if ( sPrcpGenrFlag == "O" || sPrcpGenrFlag == "S" ) {
            sOrdDd   = model.getValue ( "/root/paminfo/list/orddd" );
            sOrdDrId = model.getValue ( "/root/paminfo/list/orddrid" );
            sCretNo  = model.getValue ( "/root/paminfo/list/cretno" );
        } else {
            sOrdDd   = model.getValue ( "/root/paminfo/list/indd" );
            sOrdDrId = model.getValue ( "/root/paminfo/list/medispclid" );
            sCretNo  = model.getValue ( "/root/paminfo/list/cretno" );
        }
        if ( sPseuAcptFlag == "Y" ) {
            sOrdDd  = model.getValue ( "/root/formerkey/orddd_old" );
            sCretNo = model.getValue ( "/root/formerkey/cretno_old" );
        }  
        
        model.setValue ( "/root/send/cond1", model.getValue ( "/root/paminfo/list/pid" ));
        model.setValue ( "/root/send/cond2", sOrdDd);
        model.setValue ( "/root/send/cond3", sCretNo);
        model.setValue ( "/root/send/cond4", model.getValue ( "/root/paminfo/list/orddeptcd" )); 
        model.setValue ( "/root/send/cond5", sPrcpGenrFlag);
        model.setValue ( "/root/send/cond6", sOrdDrId );
        model.setValue ( "/root/send/cond7", sPrcpFlag ); //처방구분
        model.setValue ( "/root/send/cond8", model.getValue ("/root/initsrch/envinfo[qestcd='050']/answcnt" ) ); //직전 진단 Copy 개인설정(001:진료의 진단만 Copy, 002:진료의 진단이 없으면 진료과 진단 Copy) 2014.01.06 엄영만
        
        bTRMMO00105 = submit( "TRMMO00105", false );
    } 
    
    if (bTRMMO00105) {
        var srcNodeListLen = model.instances(0).selectNodes ( diagNode ).length;
        /********** 외래일 경우 원내처방 사유가 있는 진단인지 체크한다. **********/
        for ( var i=1; i <= srcNodeListLen; i++ ) { 
            var sIcd10Cd        = model.getValue(diagNode + "[" + i + "]/icd10cd"); 
            var sDiagKindCdFlag = model.getValue(diagNode + "[" + i + "]/diagkindcdflag"); 
            fCheckDiagHosinpPcp(sIcd10Cd, sPrcpGenrFlag, sDiagKindCdFlag); 
        } 
        
        if ( sPrcpFlag == "prcp" || sPrcpFlag == "save") { 
            appendChildPrcp("/root/reset/diagcdlist", "/root/main/diaginfo", "main"); //검색라인추가 
            
            // 처방 메인 refresh 단일화를 위한 셋팅 - 20081212 by Moonsh
            var refreshInfo = getGlobalVariable("OrderMainRefresh"); 
            if ( refreshInfo != "Y" ) { 
                model.refresh(); 
            } 
            if ( grd_diaglist.rows > 1) {
                model.copyNode ( "/root/diagorg", "/root/main/diaginfo");
            }
        }
    }
    
    fDispPatMainDiag();
    model.recalculate();
}

/**@desc   : 투약일수 조회
 * @return : void
 * @authur : 마정민 2007. 5. 16
 */
function fMediDayNo() {
    var xpt = window.screenleft + 395;
    var ypt = window.screenTop + grd_prcplist.row * 23 + 177;           
    modal ( "SPMMO02300", 1,  xpt, ypt, "medidayno");
}

/**@desc   : 진단상세보기
 * @return : void
 * @authur : 마정민 2007. 5. 16
 */
function fDiagDetlVw() {

   if( grd_diaglist.isCell(event.target) && grd_diaglist.row == 0 ){

       if ( model.getValue( "/root/init/diagdetlvw" ) == "p" ) {        
           if ( grd_diaglist.rows > 4 ) {
               grd_diaglist.attribute ( "height" ) = 94 +  ( grd_diaglist.rows -4 ) * 23;
           }

           model.setValue( "/root/init/diagdetlvw", "m" );
       } else {
           grd_diaglist.attribute ( "height" ) = "94";
           model.setValue( "/root/init/diagdetlvw", "p" );
       }
   } else if( grd_diaglist.isCell(event.target) && grd_diaglist.row >= grd_diaglist.fixedRows ){
        if (grd_diaglist.col == grd_diaglist.colref("diagremfact")){
            var xpt = 530;
            var ypt = 115;
            
            if ( model.getValue ( diagNode + "[" + grd_diaglist.row + "]/status" ) != "S"  ) {
                setParameter ( "prcpdelivefac", model.getValue ( diagNode + "[" + grd_diaglist.row + "]/diagremfact"));
                fPrcpModal ( "SPMMO10800", xpt, ypt );
                model.setValue ( diagNode + "[" + grd_diaglist.row + "]/diagremfact", getParameter ( "rtn_prcpdelivefac" ));
            }
        }
   }
}

/**@desc   : 치식
 * @return : void
 * @authur : 마정민 2007. 5. 30
 */
function fDentifmla (flag) {

    //처방 치식 setting 시작
    var selectedRows = grd_prcplist.selectedRows;   
    var prcpNm = "";
    var tootFact = "";

    var sPrcpStr = "prcpcd▦tootfact▦rtntootfact▦rowcnt▩"; 
    var cnt = 0;

    for ( var i=selectedRows-1; i >= 0; i-- ) {
            var iRow = grd_prcplist.selectedrow(i);
            
        var prcpessninptflag = model.getValue (prcpNode + "["+ iRow + "]/prcpessninptflag")
        var chkprcpstatus = model.getValue (prcpNode + "["+ iRow + "]/status")
        var tempcol2    =  model.getValue(prcpNode + "["+ iRow + "]/tempcol2" ); //처방 대분류, 중분류 조건 추가 (2009.10.26 by JJE)
        
        //기존에는 처방필수입력이 치식필수인 경우에만 치식팝업 떴으나, 처방 대분류+중분류 조건 추가 (2009.10.26 by JJE)
        if ( (prcpessninptflag == "2" || (prcpessninptflag == "5" && tempcol2.substr(0, 5) == "17|02") ) && chkprcpstatus != "S" ) {
            prcpNm = model.getValue( prcpNode + "["+iRow + "]/prcpcd") + "▦▦";
            tootFact = model.getValue( prcpNode + "[" + iRow + "]/tootfact") + "▦" + iRow +"▩";
            sPrcpStr = sPrcpStr + prcpNm + tootFact;
            setParameter("param_prcplist", sPrcpStr);
            cnt++;
        } else {
            grd_prcplist.select( iRow, 1, iRow, 1) = false;
        }
    } //처방 치식 setting 끝

    //진단 치식 setting 시작
    var selectedDiagRows = grd_diaglist.selectedRows;
    var sDiagStr = "diagcd▦tootfact▦rtntootfact▦rowcnt▩"; 

    for ( var i=selectedDiagRows-1; i >= 0; i-- ) {
        var chkdiagstatus = model.getValue (diagNode + "["+ grd_diaglist.selectedrow(i) + "]/status")
        if ( chkdiagstatus != "S" ) {
            diagNm = model.getValue( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/diagcd") + "▦▦";
            tootFact = model.getValue( diagNode + "[" + grd_diaglist.selectedrow(i) + "]/tootfact") + "▦" + grd_diaglist.selectedrow(i) +"▩";
            sDiagStr = sDiagStr + diagNm + tootFact;
            setParameter("param_diaglist", sDiagStr);
            cnt++;
        } else {
            grd_diaglist.select( grd_diaglist.selectedrow(i), 1, grd_diaglist.selectedrow(i), 1) = false;
        }
    }

    if ( cnt == 0 ) {
        messageBox ( "선택된 치식입력 정보가", "E014" );
        return;
    }

    modal ("SPMMO10500"); 

    if ( getParameter("rtn_useyn") == "Y" ) {
        
        var prow = 0;
        var ptootfact = "";
        var drow = 0;
        var dtootfact = "";
        
        var desPrcpNode = prcpNode;
        if(flag == "OP"){ //처방화면에서 직접 호출한 경우, desPath가 다르므로 치환한다 (2009.10.27 JJE)
            desPrcpNode = "/root/prcptemp/prcplist";
        }
        
        var prcplen = getParameter("rtn_prcptootfact").split("▩").length;
        for ( var i=1; i < prcplen-1; i++ ) {
            prow = getArrayData ( getParameter("rtn_prcptootfact"), i, 3, "▩", "▦" ); //치식이 입력될 row
            ptootfact = getArrayData (getParameter("rtn_prcptootfact"), i, 2, "▩", "▦" )//치식
            
            //처방 치과 수술팝업 입력 시 치식팝업 호출의 경우 prcptemp를 이용하므로 prow 사용하면 안됨. 오류 수정 (JJE 2009.11.03)
            /*
            model.setValue ( desPrcpNode + "[" + prow + "]/tootfact", ptootfact);  
            var prcpstatus = model.getValue ( desPrcpNode + "[" + prow + "]/status" );
            */
            if(flag == "OP"){
                model.setValue ( desPrcpNode + "/tootfact", ptootfact);  
                var prcpstatus = model.getValue ( desPrcpNode + "/status" );
            }else{
                model.setValue ( desPrcpNode + "[" + prow + "]/tootfact", ptootfact);  
                var prcpstatus = model.getValue ( desPrcpNode + "[" + prow + "]/status" );
            }
            
            //if (prcpstatus=="-") {
            //  model.setValue ( desPrcpNode + "[" + prow + "]/status", "U" );
            //}
        }
        
        var diaglen = getParameter("rtn_diagtootfact").split("▩").length;
        for ( var i=1; i < diaglen-1; i++ ) {
            drow = getArrayData (getParameter("rtn_diagtootfact"), i, 3, "▩", "▦" );
            dtootfact = getArrayData (getParameter("rtn_diagtootfact"), i, 2, "▩", "▦" );
            model.setValue ( diagNode + "[" + drow + "]/tootfact", dtootfact);  
            var diagstatus = model.getValue ( diagNode + "[" + drow + "]/status" );
            if (diagstatus=="-") {
              model.setValue ( diagNode + "[" + drow + "]/status", "U" );
            }
        }
    }

    clearParameter ("param_prcplist");
    clearParameter ("param_diaglist");
    clearParameter ("rtn_prcptootfact");
    clearParameter ("rtn_diagtootfact");
}

/**@desc   : 전달사항 일괄입력
 * @param  : flag: M double click 인지 일괄입력인지 구분자
 * @return : void
 * @authur : 마정민 2007. 5. 30
 */
function fPrcpdelivefact( flag ) {

    var xpt = 395;
    var ypt = grd_prcplist.row * 23 + 177;

    if ( flag == "M" ) {
        if ( model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/status" ) != "S"  ) {
            setParameter ( "prcpdelivefac", model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpdelivefact"));
            fPrcpModal ( "SPMMO10800", xpt, ypt );
            model.setValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpdelivefact", getParameter ( "rtn_prcpdelivefac" )); 
        }
    } else {
        var selectedRows = grd_prcplist.selectedRows;   
        if ( selectedRows > 0 ) {
            fPrcpModal ( "SPMMO10800", xpt, ypt );
        }
        for ( var i=0; i < selectedRows; i++ ){
            if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status" ) != "S"  ) {
                model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpdelivefact", getParameter ( "rtn_prcpdelivefac" ));  
            }
        }
    }
}

/**@desc   : 처방상세 일괄입력
 * @param  : 
 * @return : void
 * @authur : 마정민 2007. 6. 30
 */
function fPrcpDetlCom() {

    var xpt = 510;
    var ypt = 180;  
    
    var header = "";
    var useyn = "";
    var value = "";
    var cnt = 0;

    var selectedRows = grd_prcplist.selectedRows;   
    var prcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(0) + "]/prcpclscd" );
    var prnscrID = getScreenID(); 
    
    //fPrcpModal ( "SPMMO   10400", xpt, ypt ); //일괄입력 공통
    if ( prcpclscd == "A2" || prcpclscd == "A4" ) { //약
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != "A2" && selprcpclscd != "A4"  ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            setParameter ( "SPMMO12100_prnchk", prnscrID); 
            fPrcpModal ( "SPMMO12100", xpt, ypt );
        }

    } else if ( prcpclscd == "A6" ) { //주사
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != prcpclscd ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            setParameter ( "SPMMO12200_prnchk", prnscrID); 
            fPrcpModal ( "SPMMO12200", xpt, ypt );
        }
    } else if ( prcpclscd == "F2" ) {  //재활
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != prcpclscd ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO11200", xpt, ypt );
        }
    } else if ( prcpclscd == "C2" || prcpclscd == "C6" || prcpclscd == "E2" ) { 
        //방사선 검사(기능검사, 내시경,천자,생검, 방사선, 핵의학영상, 방사선치료)
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != "C2" && selprcpclscd != "C6" && selprcpclscd != "E2"  ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            setParameter ( "SPMMO12300_prcpclscd", prcpclscd );
            fPrcpModal ( "SPMMO12300", xpt, ypt );
            setParameter ( "SPMMO12300_prcpclscd", "" );
        }
    } else if ( prcpclscd == "B2" || prcpclscd == "B6" ) { //진단검사 (검체검사), 핵의학 체내
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != "B2" && selprcpclscd != "B6" ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            setParameter ( "SPMMO12400_prcpclscd", prcpclscd );
            fPrcpModal ( "SPMMO12400", xpt, ypt );
            setParameter ( "SPMMO12400_prcpclscd", "" );
        }
    } else if ( prcpclscd == "H2" ) {  //수술, 처치, 치과
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != "H2" && selprcpclscd != "H4" ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO12600", xpt, ypt );
        }
    } else if ( prcpclscd == "K2" ) { 
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != "K2" ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO13500", xpt, ypt );
        }
    } else if ( prcpclscd == "03" ) {  //식이                
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != prcpclscd ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO12700", xpt, ypt );
        }
    } else if ( prcpclscd == "I2" || prcpclscd == "I4" ) {  //마취
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != "I2" && selprcpclscd != "I4") {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO12800", xpt, ypt );
        }
    } else if ( prcpclscd == "C4" ) {  //angio
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != prcpclscd ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO12900", xpt, ypt );
        }
    } else if ( prcpclscd == "D2" ) {  //병리
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != prcpclscd ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO13000", xpt, ypt );
        }
    } else if ( prcpclscd == "M2" ) {  //재료
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != prcpclscd ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO13600", xpt, ypt );
        }
    } else if ( prcpclscd == "G2" ) { //RT

        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != prcpclscd ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO13700", xpt, ypt );  
        }
    } else if ( prcpclscd == "H4" ) { //처치
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != prcpclscd ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO13800", xpt, ypt );
        }
    } else if ( prcpclscd == "B4" ) { //수혈 (혈액수혈)
        for ( var i=selectedRows-1; i >= 0; i-- ){
            //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
            var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
            if ( selprcpclscd != prcpclscd ) {
                //grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
                cnt++;
            }
        }
        if ( cnt > 0) {
            fPrcpModal ( "SPMMO10400", xpt, ypt );
        } else {
            fPrcpModal ( "SPMMO12500", xpt, ypt );
        }
    } else if ( fSubcretnoSet("3", null) == 0 ) {   //kimsj 091230 임상시험환자이면서 문진처방의 경우 일괄입력 팝업      
        for ( var i=selectedRows-1; i >= 0; i-- ){
            if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpcd" ) == "ACD0002" ) {
                fPrcpModal ( "SPMMO10400", xpt, ypt );
                break;
            }
        }
    }

    fBatIpt ( "batipt_rtn1_useyn", "batipt_rtn1" );
}

/**@desc   : 처방상세 일괄입력 공통
 * @param  : 
 * @return : void
 * @authur : 마정민 2007. 6. 30
 */
function fBatIpt ( useyn, rtn ) {
    var rtn_useyn = getParameter ( useyn );
    var rtn_value = "";
    var header = "";
    var useyn = "";
    var value = "";

    //M-SET모처방 일괄입력 적용여부, 희망일자 변경시 자처방의 희망일자를 동일하게 적용
    //2008. 07. 22 오지훈
    var mSetFlag = ""; 
    var cmpInclPrcpNo = "";
    
    if ( rtn_useyn == "Y" ) {
        var rtn_value = getParameter ( rtn );

        var rtn_Array = rtn_value.split("^");
        var prcplen = rtn_Array[0].split("|").length;
        var selectedRows = grd_prcplist.selectedRows;   
        var cnclInptCnt = 0;  // 입력 취소 rows 수 (2010.01.28 JJE)
        var cnclInptTxt = ""; // 입력 취소 처방코드 (2010.01.28 JJE)
        var skipSubCretno = "N" // 임상연구, 기왕증 동시체크 불가 처리 관련 체크 변수(2012.05.08 엄영만)

        for ( var j=0; j < selectedRows; j++ ){
            skipSubCretno = "N"; // 변수초기화
            
            var sPrcpHistCd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcphistcd"); // 처방저장 상태
			var sDrPrcpEtc9 = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drprcpetc9"); // 사전심사 진행상태
			if( sPrcpHistCd == "T" && sDrPrcpEtc9 != "-" && sDrPrcpEtc9 != "X") {
			    var sPrcpNm = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpnm"); // 처방명칭
				messageBox ( "사전심사 진행(대기/승인) 처방은 수정 할 수 없습니다.\n 처방명:"+sPrcpNm, "I999" );
				continue;
			}
            
            for ( var i=0; i < prcplen; i++ ) {
                header = getArrayData ( rtn_value, 0, i, "^", "|" );
                useyn = getArrayData ( rtn_value, 1, i, "^", "|" );
                value = getArrayData ( rtn_value, 2, i, "^", "|" );

                var prcpcd       = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpcd" );
                var prcpclscd    = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpclscd" );
                var prcpinptflag = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpinptflag" );
                var calcmthdcd   = getArrayData ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drugmastspec" ) , 0, 26, "^", "|" ); 
                
                if ( useyn == "Y" ) {
                    if ( header == "prcpqty" ) { //수량이 바뀌면 용량도 바뀐다.
                        prcpvol = eval( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpvol" )); 
                        bfprcpqty = eval( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpqty" ));
                        bfprcptims = eval( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcptims" ));                
                        drprcpetc7 = eval( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drprcpetc7" ));
                        bfdrprcpetc8 = eval( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drprcpetc8" ));                       

                        //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
                        var prcpcdTxt    = model.getValue(prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpcd");
                        var prcpcdEndTxt = prcpcdTxt.substring(prcpcdTxt.length-1, prcpcdTxt.length);
                        if(model.getValue(prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && parseFloat(value) < 1){
                            cnclInptCnt++;
                            cnclInptTxt = cnclInptTxt + model.getValue(prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpcd") + ", ";
                            //continue;
                        } //end
                        // 경북대 1회 용량 관련 내용 수정 2010. 12. 20 - 김영학 @@@@@
                        var colHidnValue = grdBaseColHidn("D");
                        
                        if (colHidnValue =="C") {  // 1회용량 기준일 경우
                            var calcprcpvol = value / bfprcpqty * prcpvol * bfprcptims   ;
                            var calcdrprcpetc7 = value / bfprcpqty * prcpvol;
                            var calcdrprcpetc8 = value;
                            
                            if ( calcprcpvol.toString().indexOf(".") >= 0 ) {
                                calcprcpvol = calcprcpvol * 1000;
                                calcprcpvol = Math.round(calcprcpvol);
                                calcprcpvol = calcprcpvol / 1000;
                            }  
                            value = value * bfprcptims;
                        } else {   // 1일 용량 관련 기준일 경우
                            var calcprcpvol = value / bfprcpqty * prcpvol   ;
                            var calcdrprcpetc7 = value / bfprcpqty * prcpvol / bfprcptims ;
                            var calcdrprcpetc8 = value / bfprcptims ;
                            if ( calcprcpvol.toString().indexOf(".") >= 0 ) {
                                calcprcpvol = calcprcpvol * 1000;
                                calcprcpvol = Math.round(calcprcpvol);
                                calcprcpvol = calcprcpvol / 1000;
                            }  
                        } 
                        model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpvol", calcprcpvol );
                        model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drprcpetc7", calcdrprcpetc7 );                            
                        model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drprcpetc8", calcdrprcpetc8 );                                                                      
                        // 경북대 1회 용량 관련 내용 수정 END 2010. 12. 20 - 김영학
                    } else if ( header == "selfdrugflag" ) { // 자가보유처방은 일괄팝업에 의해 일부 기능은 설정되지 않는다.
                       if (prcpinptflag == "35"){
                         continue;
                       }
                    } else if ( header == "payflagcd" ) {
                       if (prcpinptflag == "35"){
                         continue;
                         }
                    } else if ( header == "prepprcpflag" ) {
                       if (prcpinptflag == "35"){
                         continue;
                       }
                    } else if ( header == "drugrateqty" ) {
                        value = getParameter ( "SPMMO12100_drugrateqty" );
                    } else if ( header == "contprcpspec" ) {
                        value = getParameter ( "SPMMO12200_contprcpspec" );
                    } else if ( header == "prcptims" ) {
                        //응급일때는 횟수와 용법을 자동으로 바꿔주는데 응급이 제일먼저 setting 함으로 continue 한다.
                        if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/erprcpflag" ) == "Y" ) continue;
                        if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prnprcpflag" ) == "Y" ) continue;
                        if ( getParameter ( "SPMMO12100_chgmthd" ) == "Y" ) { 
                            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcptims", value); // 기본용법을 가져 오기 위해 예외적으로 미리 값을 셋팅 한다.
                            fBaseMthd(grd_prcplist.selectedrow(j));
                        }
                        
                        if(calcmthdcd == "1"){
                            // 경북대 1회 용량 관련 내용 수정 2010. 12. 20 - 김영학
                            bfprcpvol = eval( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpvol" )); 
                            bfprcpqty = eval( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpqty" ));
                            prcptims = eval( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcptims" ));                
                            bfdrprcpetc7 = eval( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drprcpetc7" ));
                            bfdrprcpetc8 = eval( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drprcpetc8" ));                       
                            var colHidnValue = grdBaseColHidn("D");
                            
                            if (colHidnValue =="C") {  // 1회용량 기준일 경우
                                var calcprcpvol = bfdrprcpetc7 * value;
                                var calcprcpqty = bfdrprcpetc8 * value;
                                var calcdrprcpetc7 = bfdrprcpetc7;
                                var calcdrprcpetc8 = bfdrprcpetc8;   
                            } else {   // 1일 용량 관련 기준일 경우
                                var calcprcpvol = bfprcpvol;
                                var calcprcpqty = bfprcpqty;
                                var calcdrprcpetc7 = bfdrprcpetc7 / value;
                                var calcdrprcpetc8 = bfdrprcpetc8 / value;
                            }
                            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpvol", calcprcpvol );
                            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpqty", calcprcpqty );
                            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drprcpetc7", calcdrprcpetc7 );                            
                            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drprcpetc8", calcdrprcpetc8 );                         
                        }
                        // 경북대 1회 용량 관련 내용 수정 ENd 2010. 12. 20 - 김영학
                    } else if ( header == "erprcpflag" ) {
                         if (prcpinptflag == "35"){
                         continue;
                       } else {
                            if ( value == "Y") {
                                if( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" ) { // 약품처방 응급
                                    var prcptims = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcptims" );
    
                                    if ( prcptims != "1" ) {
                                        //1이 아닌 경우는 1로 바꿔주고 경구약인 경우는 용법도 바꿔준다.
                                        var prcpqty = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpqty" );
                                        var prcpvol = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpvol" );
                                                            
                                        if ( prcptims != "0" &&  ( prcpclscd == "A2" || prcpclscd == "A6" )) {
                                            prcpqty = (eval(prcpqty)*1000/eval(prcptims));
                                            prcpvol = (eval(prcpvol)*1000/eval(prcptims));
                                            model.setValue (  prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpqty", Math.round ( prcpqty ) / 1000);
                                            model.setValue (  prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpvol", Math.round ( prcpvol ) / 1000);
                                        }
    
                                        model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcptims", "1" );    
                                    } 
    
                                    if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpclscd" ) == "A2"  ) {                           
                                        model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/erprcpflag", "Y"); // 응급용법을 가져 오기 위해 예외적으로 미리 값을 셋팅 한다.
                                        fBaseMthd(grd_prcplist.selectedrow(j));                         
                                    }
                                } else if( prcpclscd == "M2" && getUserInfo("dutplceinstcd") == "031") { // 재료 처방 응급
                                    continue;
                                }
                            } else if (value == "N" && ( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" )) {
                                model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/erprcpflag", "N"); // 응급용법을 가져 오기 위해 예외적으로 미리 값을 셋팅 한다.
                            }

                            if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpclscd" ) == "A2"  ) {
                                fBaseMthd(grd_prcplist.selectedrow(j));                         
                            }
                        }
                    } else if ( header == "prnprcpflag" ) {
                        if ( value == "Y" && ( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" )) {
                            var prcptims = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcptims" );

                            if ( prcptims != "1" ) {
                                //1이 아닌 경우는 1로 바꿔주고 경구약인 경우는 용법도 바꿔준다.
                                var prcpqty = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpqty" );
                                var prcpvol = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpvol" );
                                                        
                                if ( prcptims != "0" &&  ( prcpclscd == "A2" || prcpclscd == "A6" )) {
                                    prcpqty = (eval(prcpqty)*1000/eval(prcptims));
                                    prcpvol = (eval(prcpvol)*1000/eval(prcptims));
                                    model.setValue (  prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpqty", Math.round ( prcpqty ) / 1000);
                                    model.setValue (  prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpvol", Math.round ( prcpvol ) / 1000);
                                }

                                model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcptims", "1" );    
                                if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpclscd" ) == "A2"  ) {                           
                                    fBaseMthd(grd_prcplist.selectedrow(j));                         
                                }
                            } 
                        }
                        
                        if (value == "Y") {
                             model.setValue (  prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/tempprcpflag", "Y");   
                        }else if (value == "N"){
                            model.setValue (  prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/tempprcpflag", "N");    
                        }
                    } else if ( header == "drugmthdspccd" ) {
                        if (prcpclscd == "A2" ){ //응급 용법자동바뀜은 A2만 함
                            //응급을 제일먼저 setting 함으로 체크 조건에 넣어도 상관없다.
                            if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/erprcpflag" ) == "Y" ) continue;
                        }
                    } else if ( header == "prcphopedd" ) {                        
                        //M-SET 자처방의 경우 처방희망일자는 일괄변경 변경처리 하지 않음
                        //2008. 07. 22 오지훈
                        var prcpsetcd  = model.getValue( prcpNode + "[" + grd_prcplist.selectedRow(j) + "]/prcpsetcd");
                        var inclprcpno = model.getValue( prcpNode + "[" + grd_prcplist.selectedRow(j) + "]/inclprcpno");                        
                        if(prcpsetcd != "-" && inclprcpno > 0){ //M-SET의 자처방인 경우, skip
                            continue;

                        }else if(prcpsetcd == "-" && inclprcpno > 0){ //M-SET의 모처방인 경우, 일괄적용 이후 희망일자를 자처방에 모두 적용
                            mSetFlag = "Y";
                            cmpInclPrcpNo = inclprcpno;
                            cmpPrcpHopeDD = value;
                        }
                    } else if ( header == "selfprcpflag" ) {
                        //지정일을 지정을 할 수 없다.
                        for ( var k=0; k < selectedRows; k++ ){
                            if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(k) + "]/prcpclscd" ) == "A6"){
                                model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(k) + "]/contprcpspec", "-" ); 
                            } 
                        } 
                    } else if ( header == "hosinhosoutflag"  ){     //by sonjy 20080912 추가 원내 변경시 원내사유 우선순위를 따르도록 수정. start  
                        fHosinPrcpResncdSed ( "",  "/root/main/prcp/prcplist", grd_prcplist.selectedrow(j)  );
                        continue ; 
                    } else if ( header == "hosinprcpresncd" ){      //by sonjy 20081003 원외전용 처방시 환자사유가 들어오는 경우가 있음. 
                        fHosinPrcpResncdSed ( "",  "/root/main/prcp/prcplist", grd_prcplist.selectedrow(j), value);
                        continue ;                                  //by sonjy 20080912 추가 원내 변경시 원내사유 우선순위를 따르도록 수정. end 
                    } else if ( header == "rsrvflag" ) { 
                        header = "prcphopedd" ; 
                    } else if ( header == "prcpdayno" ) {
                        //by sonjy 20091019 수가계산법 4일 경우 처방일수는 1로 고정 
                        var drugmastspec = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drugmastspec"); 
                        var calcmthdcd = getArrayData ( drugmastspec , 0, 26, "^", "|" ); 
                        if( (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" ) && calcmthdcd == "4" ){
                             model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpdayno", "1" );
                             continue ;
                        }
                    } else if ( header == "anamneflag" ) {  // 기왕증 변경시 기존 처방이 임상연구가 체크 되어 있으면 skip, 원무부유형(subcretno)도 skip (2012.05.08 엄영만)
                        if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/clincstdyflag" ) == "Y" ) {
                            messageBox ( "처방코드["+prcpcd+"]는 임상연구 처방이므로 기왕증을 적용 할 수", "I004" );
                            skipSubCretno = "Y";
                            continue;
                        }
                    } else if ( header == "clincstdyflag" ) {  // 임상연구 변경시 기존 처방이 기완증이 체크 되어 있으면 skip, 원무부유형(subcretno)도 skip (2012.05.08 엄영만)
                        if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/anamneflag" ) == "Y" ) {
                            messageBox ( "처방코드["+prcpcd+"]는 기왕증 처방이므로 임상연구을 적용 할 수", "I004" );
                            skipSubCretno = "Y";
                            continue;
                        }
                    } else if ( header == "subcretno" ) {  // 원무부유형(subcretno) (2012.05.08 엄영만)
                        if (skipSubCretno == "Y" ) {
                            continue;
                        }
                    } 

                    gGridUpdateChk("det_pack", j);  // 임시저장 수정 모드 
                    
                    model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/" + header, value );                     
                    makePrcpNm( "/root/main/prcp/prcplist", grd_prcplist.selectedrow(j));
                }
            }
            
            fSetCpVal(grd_prcplist.selectedrow(j), "U");
        }
        
        //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
        if( cnclInptCnt > 0 ){
            cnclInptTxt = cnclInptTxt.substr(0, cnclInptTxt.length-2);
            messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
        } //end

        model.refresh();
    }    
    
    //M-SET 모처방의 희망일자 변경인 경우, 선택되지 않은 자처방 포함하여 희망일자를 모두 변경
    if(mSetFlag == "Y"){
        for(var i = 1;  i <= grd_prcplist.rows; i++){
            if(cmpInclPrcpNo == model.getValue ("/root/main/prcp/prcplist[" + i + "]/inclprcpno")){
                model.setValue("/root/main/prcp/prcplist[" + i + "]/prcphopedd", cmpPrcpHopeDD);
            }
        }
    }
    
    setParameter( "batipt_rtn1_useyn", "");
}

/**@desc   : 그리드에서 멀티 select후 일괄입력
 * @param  : 
 * @return : void
 * @authur : 마정민 2007. 7. 24
 */
function fGridfBatIpt( flag ) {
    var nCurrow = grd_prcplist.row;
    var selectedRows = grd_prcplist.selectedRows;   
    var cnt = 0;
    for ( var j=0; j < selectedRows; j++ ){
        if ( grd_prcplist.row == grd_prcplist.selectedrow(j) ) {
            cnt++;
            break;
        }
    }
    if ( cnt < 1) {
        return;
    }
    

    if( event.keyCode == "13" && grd_prcplist.selectedrow(0) != -1 ) {
        if ( flag == "prcpdayno" ) {
            var prcpdayno = model.getValue (prcpNode + "[" + grd_prcplist.row + "]/prcpdayno");
            var selectedRows = grd_prcplist.selectedRows; 
            var drugmastspec = "";
            var calcmthdcd = "";
              
            for ( var j=0; j < selectedRows; j++ ){
                var statuschk = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/status" );
                if ( statuschk != "S" || statuschk != "D" ) {
                    model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpdayno", prcpdayno );
                    
                    //by sonjy 20091019 요청번호:3667 
                    //외래처방, 입원처방 모두에서, 수가 계산법 4번인 약품(경구, 주사, 외용 상관없이 계산법으로)을 처방할 때 
                    //처방일수가 1일이 되면서 수정할 수 없도록 
                    drugmastspec = model.getValue("/root/main/prcp/prcplist[" +  grd_prcplist.selectedrow(j) + "]/drugmastspec"); 
                    calcmthdcd = getArrayData ( drugmastspec , 0, 26, "^", "|" );
                    if(  (prcpclscd = "A2" || prcpclscd == "A4" || prcpclscd == "A6" ) && calcmthdcd == "4" ) {
                        model.setValue("/root/main/prcp/prcplist[" +  grd_prcplist.selectedrow(j) + "]/prcpdayno" , "1" );
                    }
                    
                    gGridUpdateChk("pack", j);  // 임시저장 수정 모드 
                    fSetCpVal(grd_prcplist.selectedrow(j), "U");
                }
            }
        } else if ( flag == "prcptims" ){
            var prcptims = model.getValue (prcpNode + "[" + grd_prcplist.row + "]/prcptims");
            var selectedRows = grd_prcplist.selectedRows;   
            
            //for ( var j=0; j < selectedRows; j++ ){
            for ( var j = selectedRows-1; j >= 0; j-- ){
                bfDrugCalc ( "prcptims", grd_prcplist.selectedrow(j)); //횟수 수정 시 용량,수량 보정을 위해 호출 추가(2010.01.02 전지은)
                model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcptims", prcptims );
                DrugCalc ( "prcptims" , grd_prcplist.selectedrow(j) );
                fBaseMthd(grd_prcplist.selectedrow(j));
                    
                gGridUpdateChk("pack", j);  // 임시저장 수정 모드 
                fSetCpVal(grd_prcplist.selectedrow(j), "U");
            }
        } else if ( flag == "prcpqty" ){
            var prcpqty = model.getValue (prcpNode + "[" + grd_prcplist.row + "]/prcpqty");
            var selectedRows = grd_prcplist.selectedRows;
            var cnclInptCnt = 0;  // 입력 취소 rows 수 (2010.01.28 JJE)
            var cnclInptTxt = ""; // 입력 취소 처방코드 (2010.01.28 JJE)
            for ( var j = selectedRows-1; j >= 0; j-- ){
                //마지막 selectedRows-1은 자체적으로 계산됨으로 뺐다.
                var statuschk = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/status" );
                if (  statuschk != "S" || statuschk != "D"  ) {
                    //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
                    var prcpcdTxt    = model.getValue(prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpcd");
                    var prcpcdEndTxt = prcpcdTxt.substring(prcpcdTxt.length-1, prcpcdTxt.length);
                    if(model.getValue(prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && parseFloat(prcpqty) < 1){
                        cnclInptCnt++;
                        cnclInptTxt = cnclInptTxt + model.getValue(prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpcd") + ", ";
                        //continue;
                    } //end
                    bfDrugCalc ( "prcpqty", grd_prcplist.selectedrow(j));
                    model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpqty", prcpqty );
                    DrugCalc ( "prcpqty" , grd_prcplist.selectedrow(j) );
                    
                    gGridUpdateChk("pack", j);  // 임시저장 수정 모드 
                    fSetCpVal(grd_prcplist.selectedrow(j), "U");
                }
            }
            //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
            if( cnclInptCnt > 0 ){
                cnclInptTxt = cnclInptTxt.substr(0, cnclInptTxt.length-2);
                messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
            } //end
            
        // 경북대 1회 용량관련 내용추가 : 2010. 12. 20 - 김영학
        } else if (flag == "drprcpetc8") {
            var drprcpetc8 = model.getValue (prcpNode + "[" + grd_prcplist.row + "]/drprcpetc8");
            var selectedRows = grd_prcplist.selectedRows;
            var cnclInptCnt = 0;  // 입력 취소 rows 수 (2010.01.28 JJE)
            var cnclInptTxt = ""; // 입력 취소 처방코드 (2010.01.28 JJE)
            for ( var j = selectedRows-1; j >= 0; j-- ){
                //마지막 selectedRows-1은 자체적으로 계산됨으로 뺐다.
                var statuschk = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/status" );
                if (  statuschk != "S" || statuschk != "D"  ) {
                    //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
                    var prcpcdTxt    = model.getValue(prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpcd");
                    var prcpcdEndTxt = prcpcdTxt.substring(prcpcdTxt.length-1, prcpcdTxt.length);
                    if(model.getValue(prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/tempcol2") == "05|04|09" && (prcpcdEndTxt == "J" || prcpcdEndTxt == "P") && parseFloat(prcpqty) < 1){
                        cnclInptCnt++;
                        cnclInptTxt = cnclInptTxt + model.getValue(prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpcd") + ", ";
                        //continue;
                    } //end
                    bfDrugCalc ( "drprcpetc8", grd_prcplist.selectedrow(j));
                    model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drprcpetc8", drprcpetc8 );
                    DrugCalc ( "drprcpetc8" , grd_prcplist.selectedrow(j) );
                    
                    gGridUpdateChk("pack", j);  // 임시저장 수정 모드 
                    fSetCpVal(grd_prcplist.selectedrow(j), "U");
                }
            }
            //start: 요청번호 9851, 인슐린주사제 변경 alert (2010.01.28 JJE)
            if( cnclInptCnt > 0 ){
                cnclInptTxt = cnclInptTxt.substr(0, cnclInptTxt.length-2);
                messageBox(cnclInptTxt + "\n\n소량 처방을 원하시는 경우에는\nUNIT 단위 코드(원 처방의 끝자리 J나 P를 뺀 코드)로 변경 처방하여 주시기 바랍니다.", "I");
            } //end            
        }
        // 경북대 1회 용량관련 내용추가 END : 2010. 12. 20 - 김영학
    }

    if ( flag == "payflagcd" ) {
        var payflagcd = model.getValue (prcpNode + "[" + grd_prcplist.row + "]/payflagcd");
        var selectedRows = grd_prcplist.selectedRows;
        for ( var j=0; j < selectedRows; j++ ){
            var statuschk = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/status" );
            if (  statuschk != "S" || statuschk != "D"  ) {                    
                model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/payflagcd", payflagcd );
                model.setValue ( "/root/init/bfpayflagcd", payflagcd );
            }
            gGridUpdateChk("pack", j);  // 임시저장 수정 모드 
            fSetCpVal(grd_prcplist.selectedrow(j), "U");
            makePrcpNm( prcpNode, grd_prcplist.selectedrow(j));
        }   
    } else if ( flag == "prcpkindcd" ) {
        var prcpkindcd = model.getValue (prcpNode + "[" + grd_prcplist.row + "]/prcpkindcd");
        var selectedRows = grd_prcplist.selectedRows;
        var prcpclscd = "";
        for ( var j=0; j < selectedRows; j++ ){
            var statuschk = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/status" );
            if (  statuschk != "S" || statuschk != "D"  ) {
                model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpkindcd", prcpkindcd );
                //응급이고, 퇴원처방이면
                if ( model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "E" && prcpkindcd == "60" ){
                    prcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpclscd" );
                    //응급환자가 아니면 원내처리
                    if ( model.getValue ( "/root/init/erresn" ) != "G3"
                        && (prcpclscd == "A2" || prcpclscd=="A4" || prcpclscd == "A6") ) { //by sonjy 20081012 추가 . 약/주사에만 원내외 적용하도록. 
                        model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/hosinhosoutflag", "O" );
                        model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/hosinprcpresncd", "00" );
                    }
                }                   

                var prcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcpclscd" );
                var drugmastspec = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drugmastspec" );
                var selfls = getArrayData ( drugmastspec, 0, 34, "^", "|" );
                //외래, 외출외박, 퇴원은 HOME 자동체크
                if ( prcpkindcd == "50" || prcpkindcd == "60" ) {
                    if ( prcpclscd == "A6" && getArrayData (drugmastspec, 0, 20, "^", "|" ) == "Y" ) {
                          model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/selfprcpflag", "Y" );
                     
                        if (selfls == "Y" ){ // 20101018 LYJ 주사제 상세용법 자동 팝업 . 상세용법입력이 필수인 home 처방은 상세팝업을 자동 호출하며 용법이 입력되지 않을 시 삭제처리한다. 
                            var prcpClsCd = model.getValue ( prcpNode + "[ " + grd_prcplist.selectedrow(j) + "]/prcpclscd" );
                            //var monitorResolutions = app.monitorResolution;
                            //var monitorResolutionsArr = monitorResolutions.split('|');
                            //var resolution = monitorResolutionsArr[monitorNumber-1];
                            //var resolution_width = resolution.split(',')[0];
                            //var resolution_height = resolution.split(',')[1];
                            //var xpt = (resolution_width - 380) / 2; 
                            //var ypt = (resolution_height - 119) / 2;

                            var xpt = getScreenCenterPoint(0, 380);
                            var ypt = getScreenCenterPoint(1, 119);

                            modal ( "SPMMO01200", null,  xpt, ypt, "prcpdetl", prcpNode + "[" +  grd_prcplist.selectedrow(j) + "]", prcpNode, "sysmenu:hidden", false );
                            
                            if ( getParameter("SPMMO01200_selfprcpflag") == "N"){
                                model.removeNode ( prcpNode + "[" +  grd_prcplist.selectedrow(j) + "]" );
                                model.recalculate();
                                grd_prcplist.refresh();
                                clearParameter ( "SPMMO01200_selfprcpflag" );
                                return false;
                            } else {
                                fPrcpDetlApp ( prcpClsCd, "/root/prcptemp/prcplist", "/root/main/prcp", grd_prcplist.selectedrow(j)); 
                            }
                                    
                        }
                    }
                } else {
                    if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/selfprcpflag" ) == "Y" ) {
                        model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/selfprcpflag", "N" );
                        model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/diagtestconttestcdspec", "-" );
                    }
                }
                //20080729 마정민 수정. 수혈이고 외래가 아니면 퇴원후외래, 입원전검사를 외래처리해준다.
                if ( prcpclscd == "B4" && model.getValue ( "/root/patflag/list/prcpgenrflag" ) != "O" ) { 

                    if ( prcpkindcd == "70"  || prcpkindcd == "90"  || prcpkindcd == "95" ) { //20080729 마정민 수정. 수혈이고 외래가 아니면 퇴원후외래, 입원전검사를 외래처리해준다.
                        model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(j) + "]/prepprcpflag", "N"  );              
                    } else {
                        model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(j) + "]/prepprcpflag", "Y" );               
                    }
                }
            }
            
            gGridUpdateChk("pack", j);  // 임시저장 수정 모드 
            fSetCpVal(grd_prcplist.selectedrow(j), "U"); 
            makePrcpNm( prcpNode, grd_prcplist.selectedrow(j)); 
        } 
    } else if ( flag == "prcphopedd" ){ // 희망일자 멀티 변경 요청 - 20081023 by MoonSH 
        var prcphopedd = model.getValue (prcpNode + "[" + grd_prcplist.row + "]/prcphopedd"); 
        var selectedRows = grd_prcplist.selectedRows; 

        for ( var j=0; j < selectedRows; j++ ){ 
            var statuschk = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/status" );
            if (  statuschk != "S" || statuschk != "D"  ) { 
                model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/prcphopedd", prcphopedd ); 
            }
            
            gGridUpdateChk("pack", j);  // 임시저장 수정 모드 
            fSetCpVal(grd_prcplist.selectedrow(j), "U");
        }
    }
        
    grd_prcplist.rebuild(); 
    grd_prcplist.row = nCurrow;
}

/**@desc   : 병리의뢰지 호출하기
 * @param  : curRow: 호출 row
           : flag: 처방복사시 호출하면 refresh 시켜주면서 어느 row의 팝업인지 알게함
 * @return : void
 * @authur : 마정민 2007. 5. 9
 */
function fReqfrm ( curRow, flag, srcNode ) {  
    var newFlag = "Y";
    var xpt = window.screenleft + 100;
    var ypt = window.screenTop + 100;
    var coord = getRelativeCoordinate ( xpt, ypt );
    var mon = coord[0];
    var scrID = getScreenID(); 
    var pid = 0
    
    xpt = coord[1];
    ypt = coord[2];
    
    if( isNull(srcNode) ){
        if ( scrID == "SMMMO02100") {                    // 전회처방 화면
            srcNode = "/root/prcpsrch/prcplist";  
            curRow = grd_bfprcplist.row;
            pid = opener.model.getValue ( "/root/paminfo/list/pid" );
        } else {                                                    // 기타 화면
            srcNode = "/root/main/prcp/prcplist";          //파라메터 추가함(2008.03.11)
            if( isNull(curRow) ){                                                       //조건추가(2008.08.05 JJE)
                curRow = grd_prcplist.row;
            }
            pid = model.getValue ( "/root/paminfo/list/pid" );
        }        
        newFlag = "N";                                          //오른쪽 마우스 클릭은 새로나오는 처방은 아님.
    }
    
    var prcpclscd = model.getValue ( srcNode + "[" + curRow + "]/prcpclscd" );
    var prcpflag = model.getValue ( srcNode + "[" + curRow + "]/prcpflag" );
    var drugmastspec = model.getValue ( srcNode + "[" + curRow + "]/drugmastspec" ) + "^";
    var drugmthdspccd = model.getValue ( srcNode + "[" + curRow + "]/drugmthdspccd" );

    if ( prcpclscd == "D2" ) {
        /* ==================
        전달값
        ==================
        pid : 등록번호(필수)
        prcpcd : 처방코드(필수)
        prcpnm : 처방명(필수)
        opnm   : 수술명(옵션)
        spccd  : 검체코드(필수)
        spcnm  : 검체명(옵션)
        reqno  : 의뢰지번호(신규 작성시에는 '0', 작성된 의뢰지를 조회/수정할 경우는 해당 의뢰지번호) - 필수
        reqhistno : 의뢰지 이력번호(옵션)
        scrnno    : 화면번호(10:처방화면, 20:채혈화면, 30:병리과 추가처방화면, 40:병리과 접수화면) */
        model.resetInstanceNode ( "/root/hidden/reqfrminfo" );

        model.setValue ( "/root/hidden/reqfrminfo/pid", pid );
        model.setValue ( "/root/hidden/reqfrminfo/prcpcd", model.getValue ( srcNode + "[" + curRow + "]/prcpcd" ));
        model.setValue ( "/root/hidden/reqfrminfo/prcpnm", model.getValue ( srcNode + "[" + curRow + "]/orgprcpnm" ));
        model.setValue ( "/root/hidden/reqfrminfo/prcpstatcd", model.getValue ( srcNode + "[" + curRow + "]/prcpstatcd"));

        if ( model.getValue ( srcNode + "[" + curRow + "]/optermcd" ) != "-" ) {
            model.setValue ( "/root/hidden/reqfrminfo/opnm", model.getValue ( srcNode + "[" + curRow + "]/prcpnm" ));                                   
        }
        model.setValue ( "/root/hidden/reqfrminfo/spccd", model.getValue ( srcNode + "[" + curRow + "]/drugmthdspccd"));
        model.setValue ( "/root/hidden/reqfrminfo/spcnm", model.getValue ( srcNode + "[" + curRow + "]/drugmthdspccdnm"));
        if ( newFlag == "N" ) {
            if ( scrID == "SMMMO02100") { //전처방 화면에서만 의뢰시 번호 셋팅.
                model.setValue ( "/root/hidden/reqfrminfo/reqno", model.getValue ( srcNode + "[" + curRow + "]/testreqlnkno"));
            } else {
                model.setValue ( "/root/hidden/reqfrminfo/reqno", "0");
            }
        }
        model.setValue ( "/root/hidden/reqfrminfo/scrnno", "10");
        model.setValue ( "/root/hidden/reqfrminfo/patnm", model.getValue ( "/root/paminfo/list/hngnm" ));
        
        if( srcNode == "/root/main/prcp/prcplist" ){            //2008.03.11 수정(CP 추가)
            model.copyNode ( "/root/hidden/reqfrminfo/prcp", "/root/main/prcp" );
        }else{
            model.makeNode("/root/hidden/reqfrminfo/prcp/prcplist");
            model.copyNode ( "/root/hidden/reqfrminfo/prcp/prcplist", srcNode );
            var iNode = instance1.selectSingleNode("/root/hidden/reqfrminfo/prcp/saveinvaliprcplist");
            if( iNode != null ){        //cp 미완성처방일 경우 prcplist 노드 대신 saveinvaliprcplist가 copy 되므로
                iNode.nodeName = "prcplist";
            }
        }

        var popwndflagcd = getArrayData (drugmastspec, 0, 4, "^", "|" );
        if ( popwndflagcd == "1" )  { // 당일저장된 것이 있으면 자동으로 끌고온다.
             fCpInPrcpVisible();
             if ( flag == "copy" ) model.refresh();
             model.makeValue("/root/hidden/reqfrminfo/instcd", getUserInfo("dutplceinstcd"));
             model.makeValue("/root/hidden/reqfrminfo/tday", model.getValue ( "/root/init/prcpdd"));
             var xpt = window.screenleft + 0;
             var ypt = window.screenTop + 0;                    
             var coord = getRelativeCoordinate ( xpt, ypt );
             var mon = coord[0];
             xpt = coord[1];
             ypt = coord[2];
             modal("SPLPJ01900", mon,  xpt, ypt, "SPLPJ01900", "/root/hidden/reqfrminfo", "/root/hidden/reqfrminfo", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;", false);
        } else {
            reqfrmflagcd = getArrayData (drugmastspec, 0, 3, "^", "|" );
            if ( reqfrmflagcd == "01" || reqfrmflagcd == "02" || reqfrmflagcd == "03" || reqfrmflagcd == "05" || reqfrmflagcd == "08") {
                 fCpInPrcpVisible();
                if ( flag == "copy" ) model.refresh();
            }
            var xpt = window.screenleft + 10;
            var ypt = window.screenTop + 10;
            var coord = getRelativeCoordinate ( xpt, ypt );
            var mon = coord[0];
            xpt = coord[1];
            ypt = coord[2];
            switch ( reqfrmflagcd ) {       // 의뢰지 구분코드에 따라 호출화면을 선택
                case "01" : // 조직의뢰지
                    modal("SPLPJ01500",mon, xpt, ypt,"SPLPJ01500","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                    break;
                
                case "02" : // 부인과의뢰지
                    modal("SPLPJ01400",mon, xpt, ypt,"SPLPJ01400","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                    break;
                
                case "03" : // 비부인과의뢰지
                    modal("SPLPJ01300",mon, xpt, ypt,"SPLPJ01300","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                    break;
                
                //case "04" : // 세침흡인 의뢰지(개발중)
                //  modal("SPLPJ01400",mon, xpt, ypt,"SPLPJ01400","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo");
                //  break;
                
                case "05" : // 분자병리의뢰지
                    modal("SPLPJ01200",mon, xpt, ypt,"SPLPJ01200","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                    break;
                
                //case "06" : // 세포유전의뢰지
                //  modal("SPLPJ01200",mon, xpt, ypt,"SPLPJ01200","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo");
                //  break;
                
                //case "07" : // 부검의뢰지
                //  modal("SPLPJ01200",mon, xpt, ypt,"SPLPJ01200","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo");
                //  break;
                
                case "08" : // 원본대출의뢰지
                    modal("SPLPJ02000",mon, xpt, ypt,"SPLPJ02000","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                    break;
            }
        }
        
        if ( !isNull(model.getValue ( "/root/hidden/reqfrminfo/reqno" ))){
            model.setValue ( srcNode + "[" + curRow + "]/testreqlnkno", model.getValue ( "/root/hidden/reqfrminfo/reqno" ));
            model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccd", model.getValue ( "/root/hidden/reqfrminfo/spccd" ));
            model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccdnm", model.getValue ( "/root/hidden/reqfrminfo/spcnm" ));

            if ( scrID != "SMMMO02100") { // 처방발행 화면일경우(전회처방이 아닐경우)
                var prcpInptFlag = model.getValue ( srcNode + "[" + curRow + "]/prcpinptflag" );
                fSetPrcpSpecValue( srcNode, curRow, prcpInptFlag ); // 병리처방은 검체 코드가 정해 지면 선택진료의사를 셋팅 한다. 검체코드별 선택진료 의사 셋팅 때문 2011.11.25 엄영만
            }
        }
    } else if ( prcpclscd == "B2" || prcpclscd == "B4" || prcpclscd == "B6" ) {
        /* ==================
           전달값
           ==================
        pid : 등록번호(필수)
        prcpcd : 처방코드(필수)
        prcpnm : 처방명(필수)
        opnm   : 수술명(옵션)
        spccd  : 검체코드(필수)
        spcnm  : 검체명(옵션)
        reqno  : 의뢰지번호(신규 작성시에는 '0', 작성된 의뢰지를 조회/수정할 경우는 해당 의뢰지번호) - 필수
        reqhistno : 의뢰지 이력번호(옵션)
        scrnno    : 화면번호(10:처방화면, 20:채혈화면, 30:병리과 추가처방화면, 40:병리과 접수화면) 
        */
        model.resetInstanceNode ( "/root/hidden/reqfrminfo" );
        if( isNull(srcNode) ){
            srcNode = "/root/main/prcp/prcplist";       //파라메터 추가함(2008.03.06)
          }
        model.setValue ( "/root/hidden/reqfrminfo/pid", pid );
        model.setValue ( "/root/hidden/reqfrminfo/prcpcd", model.getValue ( srcNode + "[" + curRow + "]/prcpcd" ));
        model.setValue ( "/root/hidden/reqfrminfo/prcpnm", model.getValue ( srcNode + "[" + curRow + "]/orgprcpnm" ));
        model.setValue ( "/root/hidden/reqfrminfo/prcpstatcd", model.getValue ( srcNode + "[" + curRow + "]/prcpstatcd"));

        if ( model.getValue ( srcNode + "[" + curRow + "]/optermcd" ) != "-" ) {
            model.setValue ( "/root/hidden/reqfrminfo/opnm", model.getValue ( srcNode + "[" + curRow + "]/prcpnm" ));   
        }
        model.setValue ( "/root/hidden/reqfrminfo/spccd", model.getValue ( srcNode + "[" + curRow + "]/drugmthdspccd"));
        model.setValue ( "/root/hidden/reqfrminfo/spcnm", model.getValue ( srcNode + "[" + curRow + "]/drugmthdspccdnm"));
        if ( newFlag == "N" ) {
            model.setValue ( "/root/hidden/reqfrminfo/reqno", model.getValue ( srcNode + "[" + curRow + "]/testreqlnkno"));
        }
        model.setValue ( "/root/hidden/reqfrminfo/scrnno", "10");           
        model.setValue ( "/root/hidden/reqfrminfo/patnm", model.getValue ( "/root/paminfo/list/hngnm" ));

        reqfrmflagcd = getArrayData (drugmastspec, 0, 10, "^", "|" );

        if ( reqfrmflagcd == "01" || reqfrmflagcd == "02" || reqfrmflagcd == "03" || reqfrmflagcd == "04" || reqfrmflagcd == "05" || reqfrmflagcd == "06" || reqfrmflagcd == "07") {
            fCpInPrcpVisible();
            if ( flag == "copy" ) model.refresh();
        }

        switch ( reqfrmflagcd ) {       // 의뢰지 구분코드에 따라 호출화면을 선택
            case "01" : // 골수검사의뢰서등록
                modal("SPLRR90100",mon, xpt, ypt,"SPLRR90100","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;
            
            case "02" : // 분자생물학부의뢰서등록
                modal("SPLRR90200",mon, xpt, ypt, "SPLRR90200","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;
            
            case "03" : // 산전검사의뢰서등록
                modal("SPLRR90300",mon, xpt, ypt, "SPLRR90300","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;
            
            case "04" : // 세포유전학검사의뢰서등록
                modal("SPLRR90400",mon, xpt, ypt, "SPLRR90400","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;

            case "05" : // 장기이식의뢰서등록
                modal("SPLRR90500",mon, xpt, ypt, "SPLRR90500" ,"/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;

            case "06" : // TDM의뢰서등록
                modal("SPLRR90600",mon, xpt, ypt,"SPLRR90600","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;

            case "07" : // 산전검사의뢰서등록(핵의학)
                modal("SPLRR91000",mon, xpt, ypt,"SPLRR91000","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;

            case "09" : // 염색체검사의뢰서등록
                modal("SPLRR91300",mon, xpt, ypt,"SPLRR91000","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;

            case "10" : // 말초혈액 의뢰서 및 결과지
                modal("SPLRR91400",mon, xpt, ypt,"SPLRR91000","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;

            case "08" : // ICG의뢰서 
                modal("SPLRR91100",mon, xpt, ypt,"SPLRR91100","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;

            case "11" : // AMH검사의뢰서
                modal("SPLRR91900",mon, xpt, ypt,"SPLRR91900","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;
                          
            case "12" : // 서울대학유전자검사의뢰서
                modal("SPLRR92200",mon, xpt, ypt,"SPLRR92200","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;
                          
            case "13" : // 아산병원유전자검사의뢰서
                modal("SPLRR92100",mon, xpt, ypt,"SPLRR92100","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;
                          
            case "14" : // 삼성서울병원유전자검사의뢰서
                modal("SPLRR92000",mon, xpt, ypt,"SPLRR92000","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;
            
            case "15" : // 기생충항체검사의뢰지
                modal("SPLRR91800",mon, xpt, ypt,"SPLRR91800","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;
            
            case "16" : // 약물검사의뢰서
                modal("SPLRR92300",mon, xpt, ypt,"SPLRR92300","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;
            
            case "17" : // 말라리아 검사의뢰서
                modal("SPLRR92400",mon, xpt, ypt,"SPLRR92400","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
                break;                          
        }
        if ( !isNull(model.getValue ( "/root/hidden/reqfrminfo/reqno" ))) {
            model.setValue ( srcNode + "[" + curRow + "]/testreqlnkno", model.getValue ( "/root/hidden/reqfrminfo/reqno" ));
            model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccd", model.getValue ( "/root/hidden/reqfrminfo/spccd" ));
            model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccdnm", model.getValue ( "/root/hidden/reqfrminfo/spcnm" ));
        }
    
    } else if ( prcpflag == "2" ) { //지서처방 의뢰서 팝업
        if ( !isNull(drugmthdspccd) && drugmthdspccd != "-" ) {

            model.resetInstanceNode ( "/root/hidden/reqfrminfo" );
            if( isNull(srcNode) ){
            srcNode = "/root/main/prcp/prcplist";       //파라메터 추가함(2008.03.06)
          }

            model.setValue ( "/root/hidden/reqfrminfo/pid", pid );
            model.setValue ( "/root/hidden/reqfrminfo/prcpcd", model.getValue ( srcNode + "[" + curRow + "]/prcpcd" ));
            model.setValue ( "/root/hidden/reqfrminfo/prcpnm", model.getValue ( srcNode + "[" + curRow + "]/orgprcpnm" ));

            if ( newFlag == "N" ) {
                model.setValue ( "/root/hidden/reqfrminfo/reqno", model.getValue ( srcNode + "[" + curRow + "]/testreqlnkno"));
            }

            model.setValue ( "/root/hidden/reqfrminfo/patnm", model.getValue ( "/root/paminfo/list/hngnm" ));
            fCpInPrcpVisible();
            if ( flag == "copy" ) model.refresh();
            
            //방사선종양 지시 처방 의뢰서 팝업
            //drugmthdspccd: SPAOB00700, SPAOB00800
            model.makeNode("/root/hidden/reqfrminfo/diaginfo");
            model.copyNode("/root/hidden/reqfrminfo/diaginfo", "/root/main/diaginfo");
            modal(drugmthdspccd, mon, xpt, ypt, drugmthdspccd,"/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);

            if ( !isNull(model.getValue ( "/root/hidden/reqfrminfo/reqno" ))) {
                model.setValue ( srcNode + "[" + curRow + "]/testreqlnkno", model.getValue ( "/root/hidden/reqfrminfo/reqno" ));
            }
        }
    } 
}

/**@desc   : 진단검사 검체 호출
 * @param  : curRow: 호출 row
           : flag: 그룹검체일때는 node를 구분하기 위한 구분자
           : objFlag: child구분. 구룹검체에서는 같은 계열처방적용을 안한다면 쓸필요없다.    
           : clickFlag: 처방화면에서 더블클릭해서 넘어왔는지 구분자.
 * @return : void
 * @authur : 마정민 2007. 5. 9
 */
function fGetSpc( curRow, flag, objFlag, clickFlag ) {

    fCpInPrcpVisible(); 

    var srcNode = "/root/main/prcp/prcplist";
    if ( flag == "group" ) {
        srcNode = "/root/prcpsrch/prcplist";
    } else if ( flag == "oldprcp" ) {
        srcNode = "/root/oldprcpchngsrch/prcplist";
    }
    //20080723 마정민 수정. 같은 계열의 처방은 검체를 한번만 넣도록 한다. 
    //단 그룹검체는 검체가 틀렸을 경우 조회가 안될수 있음으로 쓰지 않는다.
    if (isNull(flag) && clickFlag != "Y" ){
        var tempcol2 = model.getValue ( srcNode + "[" + curRow + "]/tempcol2" );    
        if (objFlag == "child") {
            var srcNodeListSpc = opener.model.instances(0).selectNodes ( "/root/initsrch/trgtcdlist[prcpclscd='" + tempcol2 + "']" );
            for (var i = 1; i <= srcNodeListSpc.length; i++) {
                if (srcNodeListSpc.item(i-1)==null) continue;
                var srchprcpcd = srcNodeListSpc.item(i-1).selectSingleNode("trgtcd").text;
                if (!isNull(opener.model.getValue ( "/root/main/prcp/prcplist[prcpcd='" + srchprcpcd + "']/prcpcd" ))) {
                    
                    var drugmastspec = opener.model.getValue ( "/root/main/prcp/prcplist[prcpcd='" + srchprcpcd + "']/drugmastspec" ) + "^";
                    var drugmthdspccd = getArrayData (drugmastspec, 0, 0, "^", "|" );

                    if (drugmthdspccd == "999" && drugmthdspccd == "998") {
                            model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccd", opener.model.getValue ( "/root/main/prcp/prcplist[prcpcd='" + srchprcpcd + "']/drugmthdspccd"));
                            model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccdnm", opener.model.getValue ( "/root/main/prcp/prcplist[prcpcd='" + srchprcpcd + "']/drugmthdspccdnm"));           
                            return "mainspccd";
                    }
                }
            }
        } else {
            var srcNodeListSpc = model.instances(0).selectNodes ( "/root/initsrch/trgtcdlist[prcpclscd='" + tempcol2 + "']" );
            for (var i = 1; i <= srcNodeListSpc.length; i++) {
                if (srcNodeListSpc.item(i-1)==null) continue;
                var srchprcpcd = srcNodeListSpc.item(i-1).selectSingleNode("trgtcd").text;
                if (!isNull(model.getValue ( "/root/main/prcp/prcplist[prcpcd='" + srchprcpcd + "']/prcpcd" ))) {
                    
                    var drugmastspec = model.getValue ( "/root/main/prcp/prcplist[prcpcd='" + srchprcpcd + "']/drugmastspec" ) + "^";
                    var drugmthdspccd = getArrayData (drugmastspec, 0, 0, "^", "|" );

                    if (drugmthdspccd == "999" && drugmthdspccd == "998") {
                            model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccd", model.getValue ( "/root/main/prcp/prcplist[prcpcd='" + srchprcpcd + "']/drugmthdspccd"));
                            model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccdnm", model.getValue ( "/root/main/prcp/prcplist[prcpcd='" + srchprcpcd + "']/drugmthdspccdnm"));          
                            return "mainspccd";
                    }
                }
            }
        }
    }

    var drugmastspec = model.getValue ( srcNode + "[" + curRow + "]/drugmastspec" ) + "^";
    var drugmthdspccd = getArrayData (drugmastspec, 0, 0, "^", "|" );
    //var drugmthdspccd = model.getValue ( srcNode + "[" + curRow + "]/drugmthdspccd" );
    //drugmthdspccd 인스턴스가 계속 바뀌어서 처방복사할 때 떴던 팝업이 안떠서 수정함.
   

    var prcpcd = model.getValue ( srcNode + "[" + curRow + "]/prcpcd" );
    var prcpnm = model.getValue ( srcNode + "[" + curRow + "]/prcpnm" );
    if ( drugmthdspccd == "998" ) {              //검체코드가 998일때 띄운다.

        //검사대분류유형(testlrgkind) M:미생물, B:혈액은행, G: 분자/세포 유전, N:핵의학-체외
//      if ( getArrayData (drugmastspec, 0, 3, "^", "|" ) == "M" ) {
        setParameter ( "SPMMO03500_param_tclscd", prcpcd );
        setParameter ( "SPMMO03500_param_tclsnm", prcpnm );
        model.refresh();
        fPrcpModal ( "SPMMO03500", 200, 100 );
        if ( isNull(flag)) {
            if ( getParameter ("SPMMO03500_rtn_useyn") == "Y" ) {
                model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccd", getParameter( "SPMMO03500_rtn_spccd" ));
                model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccdnm", getParameter ("SPMMO03500_rtn_spcscrnnm" ));
            }
        }
    } else if ( drugmthdspccd == "999" ) {
        setParameter ( "SPMMO03400_param_tclscd", prcpcd );
        setParameter ( "SPMMO03400_param_tclsnm", prcpnm );
        model.refresh();
        fPrcpModal ( "SPMMO03400", 200, 100 );
        if ( isNull(flag)) {
            if ( getParameter ("SPMMO03400_rtn_useyn") == "Y" ) {
                model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccd", getParameter( "SPMMO03400_rtn_spccd" ));
                model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccdnm", getParameter ("SPMMO03400_rtn_spcscrnnm" ));
            }
        }
    } else {

        if ( clickFlag == "Y" ) {
            setParameter ( "SPMMO03400_param_tclscd", prcpcd );
            setParameter ( "SPMMO03400_param_tclsnm", prcpnm );
            model.refresh();
            fPrcpModal ( "SPMMO03400", 200, 100 );
            if ( isNull(flag)) {
                if ( getParameter ("SPMMO03400_rtn_useyn") == "Y" ) {
                    model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccd", getParameter( "SPMMO03400_rtn_spccd" ));
                    model.setValue ( srcNode + "[" + curRow + "]/drugmthdspccdnm", getParameter ("SPMMO03400_rtn_spcscrnnm" ));
                }
            }
        }
    }
    
    if ( isNull(flag)) {
    if ( getParameter ("SPMMO03500_rtn_useyn") == "Y" || getParameter ("SPMMO03400_rtn_useyn") == "Y") {
        fSetCpVal(curRow, "U");
    }
  }
    
}

/**@desc   : 지시처방입력
 * @return : void
 * @authur : 엄영만 2015. 4. 29
 */
function fDirecPrcp() {
	var insrow = 1;
	
	if ( grd_prcplist.row == grd_prcplist.rows-1 ) {
		insrow = grd_prcplist.rows - 1;
	} else {
		insrow = grd_prcplist.row+1;
	}
	model.copyNode ( "/root/prcpsrch", "/root/directprcp" );
	var srchRow = addPrcpDetl ( "import" , "/root/prcpsrch/prcplist" , "/root/main/prcp" , 1 , insrow, "00" );
	model.recalculate();
	grd_prcplist.refresh();
	grd_prcplist.row =  insrow;
	grd_prcplist.col = grd_prcplist.colRef ( "prcpnm" );
	model.setfocus( "grd_prcplist" );
	grd_prcplist.editCell();
}

/**@desc   : 약속처방등록
 * @return : void
 * @authur : 마정민 2007. 6. 6
 */
function fPrmsPrcp() {
    if (btn_prmsprcp.selected) {        
        model.setValue("/root/init/prmsautoflag", "N");
        if( model.getValue ( "/root/cp" ) != "Y" ){
            ivw_prcp.window.javascript.fPrmsSave();
        }else{
            ivw_prcp2.window.javascript.fPrmsSave();        //2007.11.26 수정
        }
    } else {
        btn_prmsprcp.dispatch ( "DOMActivate" );
        btn_prmsprcp.selected = true;
        
        // 약속처방 폴더선택이 없는 경우 자동등록 처리
        // 2008. 07. 25 오지훈
        model.setValue("/root/init/prmsautoflag", "Y");
        if( model.getValue ( "/root/cp" ) != "Y" ){
            ivw_prcp.window.javascript.fPrmsSave();
        }else{
            ivw_prcp2.window.javascript.fPrmsSave();
        }
    }    
}

/**@desc   : 경구약 기본용법 조회
 * @return : void
 * @authur : 마정민 2007. 6. 6
 */
function fBaseMthd(currow) {
    if ( isNull(currow)) {
        currow = grd_prcplist.row;
    } else if ( currow == "oldprcp" ) {
        currow = 1;
        prcpNode = "/root/oldprcpchngsrch/prcplist";
    }

     //횟수 수정시 경구약의 기본용법을 가져온다.
    var prcpclscd     = model.getValue ( prcpNode + "[" + currow + "]/prcpclscd");
    var prcptims      = model.getValue ( prcpNode + "[" + currow + "]/prcptims");
    var drugmthdspccd = model.getValue ( prcpNode + "[" + currow + "]/drugmthdspccd" );
    var prcpcd        = model.getValue ( prcpNode + "[" + currow + "]/prcpcd" );
    var prcpdd        = model.getValue ( "/root/init/prcpdd" );
    if (prcpdd == ""){
        prcpdd = getCurrentDate();
    }

    var mthdcd = "";
    var mthdKind = "";

    if ( prcpclscd == "F2" ) {
        makePrcpNm( prcpNode, currow);
        return;
    } else if ( prcpclscd != "A2" ) {
        return;
    } else { // 경구약이면
        mthdKind = "N";
        
        if ( model.getValue ( prcpNode + "[" + currow + "]/erprcpflag") == "Y" ) {  // 응급약이면
            if (prcptims == "1") { //2011.07.07 엄영만 경구약, 응급, 횟수 1 이면 용법 [지금복용] 으로 변경
                //mthdcd = "A10D1"; // 지금 복용 용법 코드
            } else { // 응급약은 1회만 가능
                messageBox ( "응급약은 1회만", "I006" );
                model.setValue ( prcpNode + "[" + currow + "]/prcptims", 1 );
                model.refresh();
                return;
            }
        } else if ( model.getValue ( prcpNode + "[" + currow + "]/prnprcpflag") == "Y" ) { // PRN 약이면
            if (prcptims == "1") { //2018.03.05 엄영만 경구약, PRN, 횟수 1 이면 용법 [필요시복용] 으로 변경
                mthdcd = "A10PQ"; // 필요시복용 용법 코드
            } else { // PRN약은 1회만 가능
                messageBox ( "PRN약은 1회만", "I006" );
                model.setValue ( prcpNode + "[" + currow + "]/prcptims", 1 );
                model.refresh();
                return;
            }
        } else { //기본 용법 가져온다.
            if ( drugmthdspccd.length >= 3 ) {
                //20081213 변경개발요청서 497. 20081213 마정민 수정.
                //네번째 자리가 E가 아닌 경우 용법코드의 네번째 자리도 A로 변경해 줄 것을 요청
                if ( drugmthdspccd.length >= 4 && ( drugmthdspccd.substring ( 3, 4 ) != "A" && drugmthdspccd.substring ( 3, 4 ) != "E" )) {
                    mthdcd = drugmthdspccd.substring ( 0, 2 ) + prcptims + "A" + drugmthdspccd.substring ( 4, drugmthdspccd.length );
                } else {
                    mthdcd = drugmthdspccd.substring ( 0, 2 ) + prcptims + drugmthdspccd.substring ( 3, drugmthdspccd.length );
                }
            }
        }

        model.resetInstanceNode ( "/root/send" );
        model.setValue( "/root/send/cond1", mthdKind );
        model.setValue( "/root/send/cond2", prcptims );  //횟수
        model.setValue( "/root/send/cond3", "base" );  //기본정보값만 가져오는지 표시한다.
        model.setValue( "/root/send/cond4", mthdcd );  //기본정보값만 가져오는지 표시한다.

        // 응급약이 아니면 약품의 기본 횟수가 변경된 횟수이면 약품의 기본 용법을 가져온다. (응급약은 지금복용으로)
        //if ( model.getValue ( prcpNode + "[" + currow + "]/erprcpflag") != "Y" ) { 
            model.setValue( "/root/send/cond5", prcpcd );  
            model.setValue( "/root/send/cond6", prcpdd );  
        //}

        if (submit ( "TRMMO01901", false )) {
            var mthdcd   = model.getValue ( "/root/tmedmthd/tmedmthdlist/mthdcd" );
            var mthdcnts = model.getValue ( "/root/tmedmthd/tmedmthdlist/abbrnm" );
            if ( ! isNull(mthdcd)) {
                model.setValue ( prcpNode + "[" + currow + "]/drugmthdspccd", mthdcd );
                model.setValue ( prcpNode + "[" + currow + "]/drugmthdspccdnm", mthdcnts );
            } else {
                model.setValue ( prcpNode + "[" + currow + "]/drugmthdspccd", "-");
                model.setValue ( prcpNode + "[" + currow + "]/drugmthdspccdnm", "-" );
            }
        }
        model.refresh();
    }
}

/**@desc   : 처방화면 컬럼 초기화
 * @return : void
 * @authur : 마정민 2007. 6. 20
 */
function fScrnInitialize(){
   model.makeValue("/root/send/reqdata/scrnid", "SMMMO00100");
   submit("TRMMB01103");
   var node = instance1.selectSingleNode("/root/hidden/userscrnenvinfo/gridseq");
   if(node){
      var compscnts = model.getValue("/root/hidden/userscrnenvinfo/gridseq/compscnts");
      var compsrefcnts = model.getValue("/root/hidden/userscrnenvinfo/gridseq/compsrefcnts");
      var compssizecnts = model.getValue("/root/hidden/userscrnenvinfo/gridseq/compssizecnts");
      setScrnEnvEstb(grd_prcplist, compscnts, compsrefcnts, compssizecnts);
      model.recalculate();    
      //변수선언
      /*
      var prcpclscd = grd_prcplist.colref("prcpclscd");     //처방분류 index
      var prcpKindCdCol = grd_prcplist.colref("prcpclscd"); //처방종류 index
      var prcpnmCol = grd_prcplist.colref("prcpnm");        //처방명 컬럼 index
      var prcpVolCol = grd_prcplist.colref("prcpvol");      //용량 컬럼 index
      var prcpQtyCol = grd_prcplist.colref("prcpqty");      //수량 컬럼 index
      var prcpTimsCol = grd_prcplist.colref("prcptims");    //횟수 컬럼 index
      var prcpDayNoCol = grd_prcplist.colref("prcpdayno");  //일수 컬럼 index
      var prcpDeliveFactCol = grd_prcplist.colref("prcpdelivefact"); //전달사항 컬럼 index
      var prcpHopeHdCol = grd_prcplist.colref("prcphopehd");     //희망일자 컬럼 index
      */
   }
}

/**@desc   : 처방화면 오른쪽 마우스 클릭 처방복사
 * @return : void
 * @authur : 마정민 2007. 6. 21
 */
function fPrcpCopy() {

    for (var i = grd_prcplist.selectedRows-1; i >= 0; i--) {
        var inclprcpno = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/inclprcpno" ); 
        if ( !isNull(inclprcpno) && inclprcpno != "-" ) {
            if ( eval(inclprcpno) > 0  ) {
                messageBox ( "M-SET은 복사하기 하실 수 없습니다.", "I" );
                return;
            }
       }
    }
    
    if ( model.getValue ("/root/init/cropflag") == "Y" ) {
        if (messageBox ( "잘라낸 데이터가 이미 있습니다. 복사하시겠습니까?", "Q" ) != "6" ) {
            return;
        }
    }
    var selectedRows = grd_prcplist.selectedRows;
    var cnt=0;
    //by sonjy 20091121 임시처방 복사 시 복사대상이 신규모드로 바뀜. => 복사후 붙여넣기시 처방이 두개씩 생김.
    //복사대상의 원상태는 돌려놓는 로직 추가. 
    var orgstatus = "";
    var orgprcphistcd = "";
    
    for (var i = selectedRows-1; i >= 0; i--) {
        orgstatus = "";
        orgprcphistcd = "";
        if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status" ) != "S" ){ //검색은 드래그 안한다.
            if( model.getValue("/root/cp") != "S" ){
            
                //by sonjy 20091121임시처방 ( 수정포함 )일 경우 원상태값을 저장
                if( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status" ) == "-" || 
                    model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status" ) == "U"  ){
                    orgstatus = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status" );
                    orgprcphistcd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcphistcd" );  
                    //by sonjy 20091124 임시처방 복사 후 인증저장시 오류발생 수정 
                    model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcphistcd", "O" );
                }
                  
                model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status", "I" )
            }
            fPrcpBuffer( ++cnt, grd_prcplist.selectedrow(i), "/root/prcpdrag", prcpNode );
            
            //원상태값으로 돌려놓는다.
            if( !isNull(orgstatus) ) model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status", orgstatus ); 
            orgstatus = "";
            if( !isNull(orgprcphistcd) ) model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcphistcd", orgprcphistcd ); 
            orgprcphistcd = "";
        }
    }

    /*var srcNodeList = model.instances(0).selectNodes("/root/prcpdrag/prcplist");
    var destNode = model.instances(0).selectSingleNode("/root/main/prcp");
    var dropRow = grd_prcplist.rows - 2;
    
    for ( var i= 1; i<=srcNodeList.length ; i++){       
        row = dropRow + i;
        model.duplicate( "/root/main/prcp", "/root/prcpdrag/prcplist[" + i + "]", "*[" + row + "]");
        fSetCpVal( row, "I");
    }
    model.recalculate();   
    model.refresh();*/
}

/**@desc   : 처방화면 오른쪽 마우스 클릭 처방잘라내기
 * @return : void
 * @authur : 마정민 2007. 10. 22
 */
function fPrcpCrop() {

    for (var i = grd_prcplist.selectedRows-1; i >= 0; i--) {
        var inclprcpno = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/inclprcpno" ); 
        if ( !isNull(inclprcpno) && inclprcpno != "-" ) {
            if ( eval(inclprcpno) > 0  ) {
                messageBox ( "M-SET은 잘라내기 하실 수 없습니다.", "I" );
                return;
            }
       }
    }

    if ( model.getValue ("/root/init/cropflag") == "Y" ) {
        if (messageBox ( "잘라낸 데이터가 이미 있습니다. 잘라내시겠습니까?", "Q" ) != "6" ) {
            return;
        }
    }
    var selectedRows = grd_prcplist.selectedRows;
    var cnt=0;

    for (var i = selectedRows-1; i >= 0; i--) {
        if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status") != "S" ){ //검색은 드래그 안한다.
            fPrcpBuffer( ++cnt, grd_prcplist.selectedrow(i), "/root/prcpdrag", prcpNode );
            model.removenode ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]" );
        }
        model.setValue ( "/root/init/cropflag", "Y" );
    }

    fPrcpColor();
    model.refresh();
}

/**@desc   : 처방화면 오른쪽 마우스 클릭 처방붙여넣기
 * @param  : prcphopeddflag - 6: prcpdd 와 prcphopedd를 똑같게 처리, 7: prcphopedd가 prcphopedd에 비해 과거날짜만 바꿔 줌.
 * @return : void
 * @authur : 마정민 2007. 10. 22
 */
function fPrcpPaste( prcphopeddflag ) {

    model.setValue ( "/root/init/cropflag", "N" );
    srcNodeList = model.instances(0).selectNodes("/root/prcpdrag/prcplist");

    var prcpdd = model.getValue ( "/root/init/prcpdd" );

    var destNode = model.instances(0).selectSingleNode("/root/main/prcp");
    var dropRow = grd_prcplist.row;

    if ( dropRow == -1 ){
        dropRow = grd_prcplist.rows -1;
    }
    var endRow = grd_prcplist.rows -1;
    var prcphopedd = "";

    if ( dropRow == endRow ) {
        dropRow = dropRow -1;
    } 

    var row = 0;
    var cnt = 1;
    
    for (i= srcNodeList.length; i >= 1; i--) {    
        row = dropRow + cnt++;
        
        //by sonjy 오류 수정 20091121 임시처방의 경우 잘라내기, 붙여넣기 후 임시저장시 오류 발생 => 임시저장은 이미 저장된 처방임. prcppkspec초기화시 오류 발생 
        //임시처방 수정 혹은 임시처방 모드일 경우 처리 추가. 
        //model.setValue ( "/root/prcpdrag/prcplist[" + i + "]/prcppkspec", prcpdd + "|0|0|" + getUserInfo("dutplceinstcd"));
        if( model.getValue ( "/root/prcpdrag/prcplist[" + i + "]/status") == "-"  ||  model.getValue ( "/root/prcpdrag/prcplist[" + i + "]/status") == "U" ){ 
            if( model.getValue ( "/root/prcpdrag/prcplist[" + i + "]/status") == "-") model.setValue ( "/root/prcpdrag/prcplist[" + i + "]/status", "U" );
            
        }else {
            model.setValue ( "/root/prcpdrag/prcplist[" + i + "]/prcppkspec", prcpdd + "|0|0|" + getUserInfo("dutplceinstcd"));
        }
        prcphopedd = model.getValue ( "/root/prcpdrag/prcplist[" + i + "]/prcphopedd" );
        if ( isNull(prcphopedd) || prcphopedd == "-" ) {
            prcphopedd = prcpdd;
        }
        if ( prcphopedd < prcpdd || prcphopeddflag == "6" ) {
            model.setValue ( "/root/prcpdrag/prcplist[" + i + "]/prcphopedd", prcpdd );
        }
        model.duplicate( "/root/main/prcp", "/root/prcpdrag/prcplist[" + i + "]", "*[" + row + "]");
        fSetCpVal( row, "I");
    }
    model.removeNodeset ( "/root/prcpdrag/prcplist" );
    model.recalculate();   
    fPrcpColor();
    model.refresh();
}

/**@desc   : 처방용법복사
 * @return : void
 * @authur : 마정민 2007. 10. 17
 */
function fMthdCopy() {
    var prcpclscd = model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.row + "]/prcpclscd" );

    if ( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" ) {

        var prcptims = model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.row + "]/prcptims" ); 
        var drugmthdspccd = model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.row + "]/drugmthdspccd" );
        var drugmthdspccdnm = model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.row + "]/drugmthdspccdnm" );  

        model.setValue ( "/root/init/mthdcopy/prcpclscd", prcpclscd );
        model.setValue ( "/root/init/mthdcopy/prcptims", prcptims );
        model.setValue ( "/root/init/mthdcopy/drugmthdspccd", drugmthdspccd );
        model.setValue ( "/root/init/mthdcopy/drugmthdspccdnm", drugmthdspccdnm );
    } else {
        messageBox ( "약주사만 용법복사가", "I006" );
    }
}

/**@desc   : 처방용법붙혀넣기
 * @return : void
 * @authur : 마정민 2007. 10. 17
 */
function fMthdPaste() {

    var selectedRows = grd_prcplist.selectedRows;

    for ( var i=selectedRows-1; i >= 0; i-- ){  
        if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" ) == model.getValue ( "/root/init/mthdcopy/prcpclscd")){
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcptims", model.getValue ( "/root/init/mthdcopy/prcptims"));
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/drugmthdspccd", model.getValue ( "/root/init/mthdcopy/drugmthdspccd"));
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/drugmthdspccdnm", model.getValue ( "/root/init/mthdcopy/drugmthdspccdnm"));
            
            fSetCpVal(grd_prcplist.selectedrow(i), "U");
        } else {
            grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;
        }
    }
    model.resetInstanceNode ( "/root/init/mthdcopy" );
}

/**@desc   : 우측상단 진단화면에서 개인진단 즐겨찾기 추가
 * @return : void
 * @authur : 오지훈 2007. 7. 2
 */
function fAddEnjoyPrivate(){
   var header = "settypecd▦setkindcd▦setclscd▦settrgtcd▦detlsetcd▩";
   var totRow = grd_diaglist.rows;
   for(var i = 0; i < totRow ; i++){
      if(grd_diaglist.isselected(i) == true){
         var diagcd = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/diagcd");
         var settrgtcd = getUserInfo("userid");
         header += "E▦P▦D▦" + settrgtcd + "▦" + diagcd + "▩";
      }
   }
   model.makeValue("/root/send/savedata", header);   
   submit("TXMMB00604");
}

/**@desc   : 우측상단 진단화면에서 과진단 즐겨찾기 추가
 * @return : void
 * @authur : 오지훈 2007. 7. 2
 */
function fAddEnjoyDept(){
   var header = "settypecd▦setkindcd▦setclscd▦settrgtcd▦detlsetcd▩";
   var totRow = grd_diaglist.rows;
   for(var i = 0; i < totRow ; i++){
      if(grd_diaglist.isselected(i) == true){
         var diagcd = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/diagcd");
         var settrgtcd = getUserInfo("dutplcecd");
         header += "E▦D▦D▦" + settrgtcd + "▦" + diagcd + "▩";
      }
   }
   model.makeValue("/root/send/savedata", header);   
   submit("TXMMB00604");
}

/**@desc   : 즐겨찾기SET Open
 * @return : void
 * @authur : 오지훈 2007. 7. 4
 */
function fOpenEnjoySet(){
   modal ("SPMMO03700");
   if ( getParameter( "SPMMO03700_rtn_useyn" ) == "Y" ) {
        addDiagSetValue (getParameter( "SPMMO03700_rtn" ));
        setParameter( "SPMMO03700_rtn_useyn", "" );
   }
   model.recalculate();   
}

/**@desc   : 처방Lock 정보호출
 * @return : void
 * @authur : 마정민 2007. 7. 6
 */
function fgetPrcpLock() {
    var seqno = "";
    var orddd = "";

    if ( model.getValue ( "/root/paminfo/list/ioflag" ) == "O" ) {
        seqno = model.getValue ( "/root/paminfo/list/acptseqno" );
        orddd = model.getValue ( "/root/paminfo/list/orddd" );
    } else {
        seqno = model.getValue ( "/root/paminfo/list/seqno" );
        orddd = model.getValue ( "/root/paminfo/list/indd" );
    }
    
    model.setValue ( "/root/prcplockcond/ioflag", model.getValue ( "/root/paminfo/list/ioflag" ));
    model.setValue ( "/root/prcplockcond/pid", model.getValue ( "/root/paminfo/list/pid" ));
    model.setValue ( "/root/prcplockcond/orddd",  orddd );
    model.setValue ( "/root/prcplockcond/cretno", model.getValue ( "/root/paminfo/list/cretno" ));

    model.setValue ( "/root/prcplockcond/acptseqno", seqno );
    model.setValue ( "/root/prcplockcond/userid", getUserInfo("userid"));
    model.setValue ( "/root/prcplockcond/usernm", getUserInfo("usernm"));

    var prcpLockNodeList = model.instances(0).selectNodes(  "/root/prcplockcond" );
    model.setValue ( "/root/send/cond1", getNodeListCSV(prcpLockNodeList)); 

    if (!submit ( "TRMMO00107" )) {

    } else {
        if ( model.getValue ( "/root/prcplock/prcplocklist/flag") == "N" )  {
            var msg = model.getValue ( "/root/prcplock/prcplocklist/msg");
            messageBox ( msg, "E" );
            //btn_prcpsave.disabled = true;
        } else if ( model.getValue ( "/root/prcplock/prcplocklist/flag") == "E" ) {
            var msg = model.getValue ( "/root/prcplock/prcplocklist/msg");
            messageBox ( msg, "E" );
            window.close();
        }
    }   
}

/**@desc   : 처방수정.
 * @       : 신규일때는 수정표시 안함.
 * @       : 삭제,D/C 상태일때는 취소후 수정.
 * @param  :
 * @id     : grd_prcplist
 * @event  : xforms-value-changed
 * @return : void
 * @authur : 마정민 2007. 3. 27
 * @---------------------------------------------------
 */
function fPrcpUpdate() {
    var status = model.getValue ( prcpNode + "[" + grd_prcplist.row+ "]/status" );
    if (status=="-") {
//      model.setValue ( prcpNode + "[" + grd_prcplist.row+ "]/status", "U" );
        fSetCpVal(grd_prcplist.row, "U");       
        model.recalculate();
    } 
    if ( status == "I" || status == "-" ) {
       model.setValue ( prcpNode + "[" + grd_prcplist.row + "]/tempcol9", "" ); 
    }
    fPrcpColor();
}

/**@desc   : 퇴원예고등록 또는 수정처리를 위한 Initialize
 * @return : void
 * @authur : 오지훈 2007. 7. 24
 * @---------------------------------------------------
 */
function fDschNotiInit(){
    //ioflag▦pid▦orddd▦cretno▦instcd▦acptseqno▦orgorddd▦
    //외래/입원구분▦등록번호▦진료일자▦생성번호▦기관코드▦등록일련번호▦원진료일자▦
    var ioflag = model.getValue ( "/root/paminfo/list/ioflag" );
    if ( ioflag == "O" ) {
        var pid         = model.getValue ( "/root/paminfo/list/pid" );
        var orddd       = model.getValue ( "/root/paminfo/list/orddd" );
        var cretno      = model.getValue ( "/root/paminfo/list/cretno" );
        var instcd      = model.getValue ( "/root/paminfo/list/instcd" );
        var acptseqno   = model.getValue ( "/root/paminfo/list/acptseqno" );
        var orgorddd    = model.getValue ( "/root/paminfo/list/orgorddd" );
        setParameter("condparam", ioflag + "▦" + pid + "▦" + orddd + "▦" + cretno + "▦" + instcd + "▦" + acptseqno + "▦" + orgorddd );
    } else {
        //ioflag▦pid▦indd▦cretno▦seqno▦instcd▦
        //외래/입원구분▦등록번호▦입원일자▦생성번호▦일련번호▦기관코드
        var pid         = model.getValue ( "/root/paminfo/list/pid" );
        var indd        = model.getValue ( "/root/paminfo/list/indd" );
        var cretno      = model.getValue ( "/root/paminfo/list/cretno" );
        var instcd      = model.getValue ( "/root/paminfo/list/instcd" );
        var seqno       = model.getValue ( "/root/paminfo/list/seqno" );
        var srchdd      = getCurrentDate();
        
        if(ioflag == "D"){ 
            ioflag = "I";
            srchdd = indd; // DSC는 입원일로 조회 하도록 수정. 미래일자 퇴원 예고시 오류 해결 2016.06.13 엄영만
        } 

        setParameter("condparam", ioflag + "▦" + pid + "▦" + indd + "▦" + cretno + "▦" + instcd + "▦" + srchdd);
    }
    
    var xpt = window.screenleft + 0;
    var ypt = window.screenTop + 0;                 
    var coord = getRelativeCoordinate ( xpt, ypt );
    var mon = coord[0];
    xpt = coord[1];
    ypt = coord[2];
    modal("SPMMO08900", mon,  xpt, ypt, "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
}

/**@desc   : window close 시 lock 정보 해제
 * @return : void
 * @authur : 마정민 2007. 7. 31
 * @---------------------------------------------------
 */
function fCloseRemvLock() {
    var childrenLength = window.children.length - 1;
    for( var i = childrenLength; i >= 0; i-- ) {
        window.children.item(i).model.dispatch("xforms-close");
    } 
    
    if ( model.getValue ( "/root/paminfo/list/elbulbodstat" ) != "0") {             
        model.setValue ( "/root/prcplockcond/userid", "-"); 
        var prcpLockNodeList = model.instances(0).selectNodes(  "/root/prcplockcond" );
        model.setValue ( "/root/send/cond1", getNodeListCSV(prcpLockNodeList)); 
        submit ( "TXMMO00104", false );
    }

}

/**@desc   : LOCK 버튼 클릭시 락정보 해제
 * @return : void
 * @authur : 마정민 2007. 7. 31
 * @---------------------------------------------------
 */
function fRemvLock() {
    if ( model.getValue ( "/root/paminfo/list/elbulbodstat" ) == "0") {
        messageBox ( "간호접수 상태에서는 LOCK 해제", "E001" );
        return;
    }               
    model.setValue ( "/root/prcplockcond/userid", "-"); 
    var prcpLockNodeList = model.instances(0).selectNodes(  "/root/prcplockcond" );
    model.setValue ( "/root/send/cond1", getNodeListCSV(prcpLockNodeList)); 
    if (submit ( "TXMMO00104" )) {
        //btn_prcpsave.disabled = false;
    }
}


/**@desc   : 추가처방화면 초기화
 * @id     : model1
 * @event  : xforms-model-construct-done
 * @return : void
 * @authur : 마정민 2007. 3. 14
 */
function fAddPrcpInitConDone( pid, orddd, cretno, instcd, ioflag, saveflag , dschdd, srchdd ) {

    model.removeNodeSet ( prcpNode );                                      //처방화면 그리도 초기화
    appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" );
    
    if ( !isNull(pid)){
        model.makeValue ( "/root/send/init_pid" , pid);
        model.makeValue ( "/root/send/init_orddd", orddd);
        model.makeValue ( "/root/send/init_cretno", cretno);
        model.makeValue ( "/root/send/init_instcd", instcd);
        model.makeValue ( "/root/send/init_ioflag", ioflag);

        if ( !isNull(dschdd) && dschdd != "99991231" && dschdd != "-" ){
            model.makeValue ( "/root/send/srchdd", dschdd);
        } else {
            if (srchdd == "" || srchdd == null) {
                model.makeValue ( "/root/send/srchdd", "");
            } else {
               model.makeValue ( "/root/send/srchdd", srchdd);    
            }
            
        }

        if ( ioflag == "O" || ioflag == "S" )   {
            model.setValue ( "/root/send/init_ioflag", "O" );
            model.makeValue ( "/root/send/init_pseuacptflag", model.getValue("/root/formerkey/pseuacptflag"));
            if (submit("TRMMO04208",false)){
                model.makeNode ( "/root/paminfo/list" );
                model.makeNode ( "/root/patflag/list" );
                model.copyNode ( "/root/paminfo/list", "/root/topinfo/outpatpaminfo" );
                model.copyNode ( "/root/patflag/list", "/root/topinfo/outpatflaginfo" );
            } else {
                return;
            }

        } else {
            if (ioflag == "D"){
                model.makeValue("/root/send/init_ioflag", "I");
            }
            if (submit ("TRMMO04308",false)){
                model.makeNode ( "/root/paminfo/list" );
                model.makeNode ( "/root/patflag/list" );
                model.copyNode ( "/root/paminfo/list", "/root/topinfo/inpatpaminfo" );
                model.copyNode ( "/root/patflag/list", "/root/topinfo/inpatflaginfo" );
            } else {
                return;
            }
        }
    }   

     if ( saveflag != "Y" ) {
          prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
          if ( ioflag == "O" || ioflag == "S" )   {
            model.setValue ( "/root/init/orddd" , model.getValue ( "/root/paminfo/list/orddd" ));     
          } else {
            model.setValue ( "/root/init/orddd" , model.getValue ( "/root/paminfo/list/indd" ));     
          }

          if ( !isNull(prcpgenrflag)) {
              model.setValue ( "/root/init/rrgstno1",  model.getValue ( "/root/paminfo/list/rrgstno1"));
              model.setValue ( "/root/init/rrgstno2",  model.getValue ( "/root/paminfo/list/rrgstno2"));
              model.setValue ( "/root/init/orddeptnm", model.getValue("/root/paminfo/list/orddeptnm"));
              model.setValue ( "/root/init/srchcond2", pid);
              model.setValue ( "/root/init/srchcond3", model.getValue("/root/paminfo/list/hngnm"));
              model.setValue ( "/root/init/srchcond4", model.getValue("/root/patflag/list/prcpgenrflag"));
              model.setValue ("/root/init/sex", model.getValue("/root/paminfo/list/sex"));
              model.setValue ("/root/init/age", model.getValue("/root/paminfo/list/age"));
              model.setValue ("/root/init/wardcd", model.getValue("/root/paminfo/list/wardcd"));          
          }
              cmb_issdept.visible = true;

          if ( prcpgenrflag == "O" || prcpgenrflag == "S" ){ //외래일때
              cmb_prcpkind.visible = false; 
              cmb_prcpdd.visible = false;
              cmb_issdept.attribute ( "left" ) = 454;
              btn_issdept.attribute ( "left" ) = 558;
              cmb_hosinprcpresn.visible = true;
              caption14.visible = true;
              cmb_hosinprcpresn.attribute ( "left" ) = 760;
              grd_prcplist.colHidden(prcpKindCdCol) = true;
              model.setValue ( "/root/init/hosinprcpresncd", model.getValue ( "/root/paminfo/list/hosoutexptresncd" ));   
              model.setValue ( "/root/init/prcpkindcd", "20" ); //처방종류(추가)
              model.setValue ( "/root/init/prcpdd", model.getValue ( "/root/paminfo/list/orddd" ));                 

          } else { 
              model.setValue ( "/root/init/wardcd" , model.getValue ( "/root/paminfo/list/roomcd" ) + "호" );
              model.setValue ( "/root/init/orddd" , model.getValue ( "/root/paminfo/list/indd" ));          
              //입원, 응급일때           
              model.setValue ( "/root/init/hosinprcpresncd", "00");     
              
              // 가퇴원 누락처방 날자셋팅 - 20081221 by MoonSH             
              var chkMissPrcp = getGlobalVariable("SPMMO16800_rtn1"); 
              if (chkMissPrcp == "Y"){ 
                 setParameter ( "SPMMO16800_rtn1", "" ); 
                 var missPrcpdd = model.getValue("/root/prcpresn/prcpdd"); 
                 model.setValue ( "/root/init/prcpdd", missPrcpdd); 
                 cmb_prcpdd.visible = false; 
              } else { 
                 model.setValue ( "/root/init/prcpdd", getCurrentDate()); 
                 cmb_prcpdd.visible = true; 
              } 
               
              cmb_issdept.attribute ( "left" ) = 662;
              btn_issdept.attribute ( "left" ) = 764;
              cmb_hosinprcpresn.visible = false;
              cmb_prcpkind.visible = true; 
              //cmb_prcpdd.visible = true;
              caption14.visible = false;
              model.setValue ( "/root/init/prcpkindcd", "20" ); //처방종류(추가)
              if ( prcpgenrflag == "E" || prcpgenrflag == "D" ) {
                 cmb_hosinprcpresn.visible = true;
                 cmb_hosinprcpresn.attribute ( "left" ) = "766";
                 cmb_hosinprcpresn.attribute ( "width" ) = "224";
              }
          }        
        }

        fInitSrch();
        //진단호출
        if ( !isNull(pid) || saveflag == "Y" ){
            fPatDiagSrch("addprcp");
            var srcNodeList = model.instances(0).selectNodes( "/root/main/diaginfo/diagcdlist" );
            if (srcNodeList.length < 1 ){
                //원무에서 화면을 호출할 경우 저장된 진단이 없으면 기초정보에 등록된 진단코드로 검색한다.
                if (getScreenMenuParameter() == "PAM") {
                    fDiagSrch("addprcp");
                }
            }           
        }

        if (window.model.getValue("/root/init/detlivw") == "m" ) {
            if(ivw_prcp.visible == true ) ivw_prcp.window.javascript.fIvwDetlVwCom();
            if(ivw_prcp3.visible == true ) ivw_prcp3.window.javascript.fIvwDetlVwCom();
        }   else if ( model.getValue( "/root/init/detlvw" ) == "m"  ) {
            fDetlVw("y");               
        }

        bfPrcpdd = model.getValue ( "/root/init/prcpdd" );
        var sDutPlceCd = getUserInfo("dutplcecd");
        if ( saveflag != "Y" && sDutPlceCd != "4072000000" && sDutPlceCd != "4070700000" ) { // 심사팀은 전처방 화면이 먼저 열리도록 처리 2012.09.18 엄영만
            ivw_prcp3.src = "SMMMO02100_전회처방.xrw";
            btn_prmsprcp.selected = true;
            ivw_prcp3.visible = false;
            ivw_prcp.visible = true;
            if(model.getValue ( "/root/cp" ) != "Y"){
                ivw_prcp.src = "SMMMO02300_약속처방.xrw";
            }else{
                ivw_prcp2.src = "SMMMO02300_약속처방.xrw";
            }
        } else {
            if (!btn_ivbfprcp.selected) {
                btn_ivbfprcp.selected = true;
                ivw_prcp3.visible = true;
                ivw_prcp.visible = false;
                //ivw_prcp.src = "SMMMO02100_전회처방.xrw";
            }
            ivw_prcp3.src = "SMMMO02100_전회처방.xrw";
        }
        model.setValue ( "/root/init/prcpinptflag", "28" ); //시행부서처방
        //btn_prcpsave.disabled = false;
        model.refresh();
}

/**@desc   : 외래에서 입원전환된 환자인지 check
 * @return : void
 * @authur : 마정민 2007. 8. 6
 */
function fTranInddChk() {
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    var usge = model.getValue ( "/root/usge" );
    if ( prcpgenrflag == "O" && usge == "prcp" ) {
        var tranflag = model.getValue ( "/root/paminfo/list/tranflag" );    
        //20081024 마정민수정 tranindd 에서 tranflag 로 수정
        if ( tranflag == "Y" ) {
            messageBox ( "현재 재원중인", "I005" );
        }
    }
}


/**@desc   : 추가처방 authflag check
 * @return : void
 * @authur : 마정민 2007. 8. 9
 */
function fAuthFlagChk() {

    /*
    세션의 직종구분을 가지고 hadrd code 테블의 직종값과 비교하여 prcpauthflag 를 setting 한다.  
    처방권한구분    2   간호사처방       ( 간호사 직종 추가처방 )
    처방권한구분    3   지원부서의사처방 ( 의사ID 직종 추가처방 )
    처방권한구분    4   기타처방         ( 나머지 )

    //권한 구분 값도 인자값으로 
    if ( !isNull( prcpauthflag)) {
        if ( prcpauthflag != "2" && prcpauthflag != "3" && prcpauthflag != "4" ) {
            model.alert ( "처방권한 구분자가 맞지 않습니다. 세션 직종구분 정보로 처리하겠습니다." );
            prcpauthflag = "";
        } else {
            model.setValue ( "/root/init/prcpauthflag", prcpauthflag );
        }
    }
    */
    //if ( isNull( prcpauthflag )) {
        model.setValue ( "/root/send/cond1", "8" );
        model.setValue ( "/root/send/cond2", "" );
        // hardcodelist 에서 직종코드를 가져온다.
        if (submit ( "TRMMO00204", false )) {
            var cnt = 0;
            var jobkindcd = getUserInfo("jobkindcd");
            var srcNodeList = model.instances(0).selectNodes( "/root/hardcode/hardcodelist" );
            for ( var i=1; i <= srcNodeList.length ; i++ ) {
                var trgtcdnm = model.getValue ( "/root/hardcode/hardcodelist[" + i + "]/trgtcdnm" ) + "^";
                var prcplen = trgtcdnm.split("|").length;
                for ( var j=1; j < prcplen-1; j++ ) {
                    trgtcdnmsplit = getArrayData ( trgtcdnm, 0, j, "^", "|" ); //치식이 입력될 row
                    if (trgtcdnmsplit == jobkindcd) {
                        //직종코드의 구분값을 가져온다.
                        var trgtcd = model.getValue ( "/root/hardcode/hardcodelist[" + i + "]/trgtcd" );
                        //의사의 직종코드에서 값이 있으면 3번으로 setting
                        if ( trgtcd == "DR" ) { 
                            cnt++;
                            model.setValue ( "/root/init/prcpauthflag", "3" );
                        } else if ( trgtcd == "NR" ) {
                            cnt++;
                            model.setValue ( "/root/init/prcpauthflag", "2" );
                        } 
                        break;
                    }
                }
            }
            if ( cnt == 0) {
                model.setValue ( "/root/init/prcpauthflag", "4" );
            }
        } else {
            model.setValue ( "/root/init/prcpauthflag", "4" );
        }
    //}
}

/**@desc   : 처방화면에서 초기 검색 값을 가져옴
 * @return : void
 * @authur : 마정민 2007. 8. 9
 */
function fInitSrch() {  

    fInitSrchLogin();
    fInitSrchPrcp();
}

/**@desc   : 처방화면에서 환자초기검색 값을 가져옴
 * @return : void
 * @authur : 마정민 2007.01.26
 */
function fInitSrchPrcp() {  
    
    //model.addlog("          SPEED CHECK START OF fInitSrchPrcp()");
    if ( model.getValue ( "/root/usge" ) == "prcp" ) {

        var orddd = "";
        if (model.getValue ( "/root/paminfo/list/ioflag" ) == "O" || model.getValue ( "/root/paminfo/list/ioflag" ) == "S") {
            orddd = model.getValue ( "/root/paminfo/list/orddd" );
        } else {
            orddd = model.getValue ( "/root/paminfo/list/indd" );
        }

        model.setValue ( "/root/initsrchcond/ioflag", model.getValue ( "/root/paminfo/list/ioflag" ));
        model.setValue ( "/root/initsrchcond/pid", model.getValue ( "/root/paminfo/list/pid" ));
        model.setValue ( "/root/initsrchcond/orddd", orddd);
        model.setValue ( "/root/initsrchcond/cretno", model.getValue ( "/root/paminfo/list/cretno" ));
        model.setValue ( "/root/initsrchcond/instcd", getUserInfo("dutplceinstcd"));
        model.setValue ( "/root/initsrchcond/prcpdd", model.getValue ( "/root/init/prcpdd"));
        model.setValue ( "/root/initsrchcond/deptcd", getUserInfo ( "dutplcecd" )); 
        model.setValue ( "/root/initsrchcond/userid", getUserInfo ( "userid" )); 
        model.setValue ( "/root/initsrchcond/scrnkindcd", "00");
        model.setValue ( "/root/initsrchcond/scrnid", "SMMMO00100" );
        model.setValue ( "/root/initsrchcond/suppkind", model.getValue ( "/root/paminfo/list/suppkind" ));
        model.setValue ( "/root/initsrchcond/orddeptcd", model.getValue ( "/root/paminfo/list/orddeptcd" ));
        
        if (model.getValue ( "/root/addprcp" ) == "Y") {
            model.setValue ( "/root/initsrchcond/prcpkind", "addprcp" );
        } else {
            model.setValue ( "/root/initsrchcond/prcpkind", "prcp" );
        }

        submit ( "TRMMO00206", false ); 

        if ( model.getValue ( "/root/usge" ) == "prcp" ) {
            if ( model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "E" ) {
                var erprcpyn = model.getValue ( "/root/initsrchprcp/prcpetccnts/erprcpyn" );
                var erresn = getArrayData ( erprcpyn + "^", 0, 0, "^", "|" );
                if (!isNull(erresn) &&  erresn != "-" &&  erresn != "Y" ) {
                    model.setValue ( "/root/init/erresn", erresn );
                    //응급의료 관리료가 G3인경우 응급환자
                    if ( erresn == "G3" ) {
                        model.setValue ( "/root/init/hosinprcpresncd", "11" );
                    } 
                } else {
                    model.setValue ( "/root/init/erresn", "" );
                }
            } else {
                    model.setValue ( "/root/init/erresn", "" );
            }
        }

        if ( model.getValue ( "/root/initsrchprcp/prcpetccnts/serdiagyn" ) == "Y" ){
            if ( model.getValue ( "/root/addprcp" ) != "Y" && isNull(model.getValue ( "/root/cp" )) ) {  // !"Y" -> isNull로 조건 변경(2009.05.12 JJE)
                output1.attribute ("color") ="#ff0000";
            }
        } else {
            if ( model.getValue ( "/root/addprcp" ) != "Y" && isNull(model.getValue ( "/root/cp" )) ) {  // !"Y" -> isNull로 조건 변경(2009.05.12 JJE)
                output1.attribute ("color") ="#000000";
            }
        }

        //입원당일 admission 처방이 없으면 변경해 준다.
        if (model.getValue ( "/root/initsrchprcp/prcpetccnts/admiprcpyn" ) == "Y" && isNull(model.getValue ( "/root/operation/list/oprsrvno"))){
            model.setValue ( "/root/init/prcpkindcd", "00" );
        }
        
        //20131119 이정택 추가(산정특례 기간 알 수 있도록 표시)
        if(!isNull(model.getValue( "/root/initsrchprcp/prcpetccnts/message"))){
        	model.makeValue("/root/init/message", model.getValue( "/root/initsrchprcp/prcpetccnts/message"));
        	output3.attribute ("color") ="#ff0000";
        }else{
        	model.makeValue("/root/init/message", "");
        }
        //20131119

    }
   
    // 처방 메인 refresh 단일화를 위한 셋팅 - 20081212 by Moonsh
    var refreshInfo = getGlobalVariable("OrderMainRefresh");
    if ( refreshInfo != "Y" ) {
        model.refresh(); 
    }
    
    //model.addlog("          SPEED CHECK END OF fInitSrchPrcp()");
}

/**@desc   : 처방화면에서 환자초기검색 값을 가져옴
 * @return : void
 * @authur : 마정민 2007.01.26
 */
function fInitSrchLogin() { 
    if (!getOrderBasicInfo("/root/initsrch")) {
        model.setValue ( "/root/initsrchcond/instcd", getUserInfo("dutplceinstcd"));
        model.setValue ( "/root/initsrchcond/prcpdd", model.getValue ( "/root/init/prcpdd"));
        submit ( "TRMMO00205", false ); 
    }
}

/**@desc   : 처방화면에서 button 초기화 setting
 * @return : void
 * @authur : 마정민 2007. 8. 9
 */
function fInitBtnSet() {
    var srcNodeList = model.instances(0).selectNodes( "/root/initsrch/btnenvcnts" );

    for ( var i=1; i <= 19; i++ ) {
        if ( i <= srcNodeList.length) {
            var btncd = model.getValue ( "/root/initsrch/btnenvcnts[" + i + "]/btncd" );
            var btnnm = "button" + i;
            var buttonObj = document.controls(btnnm);
            buttonObj.text = model.getValue ( "/root/initsrch/btnenvcnts[" + i + "]/btnnm");
            buttonObj.visible = true;
            buttonObj.attribute("_value") = btncd;
        } else {
            var btnnm = "button" + i;
            var buttonObj = document.controls(btnnm);
            buttonObj.visible = false;
        }
    }
    fInitSrchBtnSet();
    
    // 처방상세화면 표시여부  개인별 조회 option 추가  2014.07.16 엄영만
    var sOption55 =  model.getValue ("/root/initsrch/envinfo[qestcd='055']/answcnt");
    if(sOption55 == "001" && typeof(ivw_prcpdetail) == "object" &&  model.getValue ( "/root/cp" ) != "Y" ) { // 처방 상세 화면 표시 (CP 제외)
        grd_prcplist.attribute("height") = "476";
		ivw_prcpdetail.visible           = true;
    } else {
        grd_prcplist.attribute("height") = "616";
		ivw_prcpdetail.visible           = false;
    }
    
    // 처방에서 대상자탭 사용여부  개인별 조회 option 추가  2014.07.16 엄영만
    var sOption56 =  model.getValue ("/root/initsrch/envinfo[qestcd='056']/answcnt");
    if(sOption56 == "001") { // 진료대상사 사용
        btn_patlist.visible = true;
        btn_prmsop.visible  = false;
        btn_clinc.visible   = false;
    } else {
        btn_patlist.visible = false;
        btn_prmsop.visible  = true;
        btn_clinc.visible   = true;
    }
    
    // 처방화면 오픈시 가야할곳 출력여부  개인별 조회 option 추가  2017.04.27 엄영만
    var sOption82 =  model.getValue ("/root/initsrch/envinfo[qestcd='082']/answcnt");
    if(sOption82 == "001") { // "Y"
        model.setValue ("/root/init/patgolistprtyn", "Y");
    } else {
        model.setValue ("/root/init/patgolistprtyn", "N");
    }
    
}

/**@desc   : 처방화면에서 버튼값 설정
 * @return : void
 * @authur : 마정민 2007. 8. 9
 */
function fBtnClick() {
    var buttonObj = document.controls(event.target);
    var buttonValue = buttonObj.attribute("_value");
    
    var sOrdDd   = "";
    var sOrddrId = "";   
    var sPrcpGenrFlag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    var sOrdDeptCd = model.getValue("/root/paminfo/list/orddeptcd");
    var sPid       = model.getValue ("/root/paminfo/list/pid");
    var sCretno    = model.getValue ("/root/paminfo/list/cretno");

    if ( sPrcpGenrFlag == "O" || sPrcpGenrFlag == "S" ) {
        sOrdDd   = model.getValue ("/root/paminfo/list/orddd");
        sOrddrId = model.getValue ("/root/paminfo/list/orddrid");
    } else {
        sOrdDd   = model.getValue ("/root/paminfo/list/indd");
        sOrddrId = model.getValue ("/root/paminfo/list/medispclid");
    }

    if ( buttonValue == "01") { //대상자
        var patListObj = getMainViewer();
        patListObj.javascript.open("SPMMO04200");
    } else if ( buttonValue == "02") { //항암처방
        model.setValue ( "/root/hidden/receivedata/orddeptcd", sOrdDeptCd);
        model.setValue ( "/root/hidden/receivedata/ioflag",    sPrcpGenrFlag );
        model.setValue ( "/root/hidden/receivedata/pid",       sPid);
        model.setValue ( "/root/hidden/receivedata/age",       model.getValue ( "/root/paminfo/list/age" ));
        model.setValue ( "/root/hidden/receivedata/sex",       model.getValue ( "/root/paminfo/list/sex" ));
        model.setValue ( "/root/hidden/receivedata/cretno",    sCretno);
        model.setValue ( "/root/hidden/receivedata/orddd",     sOrdDd );

        var xpt = window.screenleft;
        var ypt = window.screenTop + 10;

        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];
        modal ( "SMADB01000" , mon, xpt, ypt, "SMADB01000","/root/hidden/receivedata","/root/send/srchdata/receivedata", "", false );
        
        fPatDiagSrch();
        //항암프로토콜을 저장시 지시처방을 항암프로토콜명으로 만들어준다.
        if (getParameter("SMADB01000_saveyn") =="Y") {
            
            var insrow = 1;
            
            if ( grd_prcplist.row == grd_prcplist.rows-1 ) {
                insrow = grd_prcplist.rows - 1;
            } else {
                insrow = grd_prcplist.row+1;                            
            }
            model.copyNode ( "/root/prcpsrch", "/root/directprcp" );
            var srchRow = addPrcpDetl ( "import" , "/root/prcpsrch/prcplist" , "/root/main/prcp" , 1 , insrow, "00" );                  
            //model.duplicate( model.instances(0).selectSingleNode( "/root/main/prcp" ), "/root/directprcp/prcplist", "*[" + insrow + "]"); 
            model.setValue("/root/main/prcp/prcplist[" + insrow + "]/prcpnm", getParameter("SMADB01000_prcpnm"));
            clearParameter("SMADB01000_saveyn");
            clearParameter("SMADB01000_prcpnm");
            model.recalculate();
            grd_prcplist.refresh();

            grd_prcplist.row =  insrow;
            grd_prcplist.col = grd_prcplist.colRef ( "prcpnm" );                        

            model.setfocus( "grd_prcplist" );                       
            
            grd_prcplist.editCell();                    
        }

    } else if ( buttonValue == "03") { //재활예약
        setParameter("SMAEA01900_Param_doctorYn", "Y");
        fPrcpModal ("SMAEA01900", 0, 40);
        clearParameter("SMAEA01900_Param_doctorYn");
    } else if ( buttonValue == "04") { //입원결정
        setParameter("SPMMO00100_param", param);
        fPrcpModal ("SPMMO00100", 100, 40);
    } else if ( buttonValue == "05") { //임상연구
        submit("TRMMO00120", false);        
        
        if (model.getValue("/root/temp/subjrgstyn") == "N" ){
            messageBox("임상연구 처방은 피험자등록" , "E012");
            return -1;
        }
        
        var clincstdyno   = model.getValue ( "/root/temp/clincstdyno" );
        
        if (sPrcpGenrFlag == "I" || sPrcpGenrFlag == "D" || sPrcpGenrFlag == "E") {
            model.setValue ( "/root/send/cond1", sPid );
            model.setValue ( "/root/send/cond2", sOrdDd );
            model.setValue ( "/root/send/cond3", sCretno );

            if (!submit ( "TXMMO00113", false )) {
                messageBox("임상접수를 생성하는데 ", "E009");
            } else {
                messageBox("임상접수 생성이  ", "I002");
            }
            model.resetInstanceNode ( "/root/send" );

        } else if (sPrcpGenrFlag == "O" ) {
            var centcd      = model.getValue ( "/root/paminfo/list/centcd" );
            var subdeptcd   = model.getValue ( "/root/paminfo/list/subdeptcd" );

            model.setValue ( "/root/send/cond1",  "I" );                            //otpt_flag
            model.setValue ( "/root/send/cond2",  sPid );                           //otpt_pid
            model.setValue ( "/root/send/cond3",  sOrdDd );                         //otpt_orddd
            model.setValue ( "/root/send/cond4",  sOrdDeptCd );                     //otpt_orddeptcd
            model.setValue ( "/root/send/cond5",  sOrddrId );                       //otpt_orddrid
            model.setValue ( "/root/send/cond6",  getCurrentTime().substr(0,4) );   //otpt_ordtm
            model.setValue ( "/root/send/cond7",  "-" );                            //otpt_rsrvflag
            model.setValue ( "/root/send/cond8",  "-" );                            //otpt_etcordflag
            model.setValue ( "/root/send/cond9",  getUserInfo("dutplceinstcd"));    //otpt_instcd
            model.setValue ( "/root/send/cond10", getUserInfo("userid"));           //sess_userid
            model.setValue ( "/root/send/cond11", "N" );                            //otpt_medamtestmyn
            model.setValue ( "/root/send/cond12", "09" );                           //otpt_medamtfreeresn
            model.setValue ( "/root/send/cond13", centcd );                         //otpt_centcd
            model.setValue ( "/root/send/cond14", subdeptcd );                      //otpt_subdeptcd
            model.setValue ( "/root/send/cond15", clincstdyno );                    //otpt_clincstdyno

            if (!submit ( "TXMMO00112", false )) {
                messageBox("임상접수를 생성하는데 ", "E009");
            } else {
                var errmsg = model.getValue("/root/temp/rtnstdyotpt/errmsg");
                if (errmsg.getTrim() == "" ) {
                    messageBox("임상접수 생성이  ", "I002");
                } else {
                    messageBox(errmsg, "E");
                }
            }
            model.resetInstanceNode ( "/root/send" );
        } else {
            messageBox ( "외래, 입원, 응급, DSC만 가능합니다.", "E" );
        }

    } else if ( buttonValue == "06") { //cp처방
        if ( model.getValue ( "/root/cp" ) != "Y" ) {
            var mainObj = getMainViewer();
            mainObj.window.javascript.open("SPMMP01200", "2","0","20");
        }
        
    } else if ( buttonValue == "07") { //tpn처방
        var prcpdd = model.getValue ( "/root/init/prcpdd" );
        
        model.makeValue ( "/root/temp/patdata/pid",       sPid);
        model.makeValue ( "/root/temp/patdata/ioflag",    sPrcpGenrFlag );
        model.makeValue ( "/root/temp/patdata/orddeptcd", sOrdDeptCd);
        model.makeValue ( "/root/temp/patdata/orddd",     sOrdDd );
        model.makeValue ( "/root/temp/patdata/orddrid",   sOrddrId );
        model.makeValue ( "/root/temp/patdata/prcpdd",    prcpdd );
                                                                                
        var xpt = window.screenleft;
        var ypt = window.screenTop + 10;

        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];

        modal ( "SMADB01100" , mon, xpt, ypt, "SMADB01000","/root/temp/patdata","/root/temp/patdata", "", false );
    } else if ( buttonValue == "08") { //퇴원예고
        if (fContainsHardCD("341", "Y") && checkRtnDrug()) { // 간호 반납약 체크, 하드코드 341 체크
            return;
        } 
        
        if (fContainsHardCD("341", "Y") && checkRtnPrcp()) { // 반환요청 처방(E)  체크, 하드코드 341 체크 퇴원예고 등록시 반환요청(E) 처방 여부를 체크한다. 20130803 엄영만  
            return;
        }
        
        if(checkTellPrcp()) { // 미확인 구두처방 체크
            return;
        }
        
        if (fContainsHardCD("280", "Y") && !fCheckOpFee( "0", "0", "/root/main/prcp/prcplist", "N", "dsch" )) { // 수술료 처방 체크 블러킹
            return;
        }
        
        checkMaxKTAS(); // KTAS 등급 체크 안내 팝업 2017.03.27 엄영만 요청서 20161230029
         
        preDsch(); // 퇴원예고
    } else if ( buttonValue == "09") { //통합예약
        //fPrcpModal ( "SMAEA02000", 0, 60 );
        fPrcpModal ( "SMPEA00100", 0, 60 );
    } else if ( buttonValue == "10") { //Medical Reference
        fPrcpModal ( "SMMMD05200", 0, 60 );
    } else if ( buttonValue == "11") { //수술예약
        fPrcpModal ("SPMMO00200", 0, 80);
    } else if ( buttonValue == "12") { //외래예약   
    
        setParameter("SMPMO00300_PARM1", sOrdDeptCd); //진료과코드
        setParameter("SMPMO00300_PARM2", sOrddrId);   //진료의사코드
        setParameter("SMPMO00300_PARM3", sPid);       //환자번호   

                    
        fPrcpModal ("SMPMO00300", 0, 80);
    } else if ( buttonValue == "13") { //환자정보
        
        fPrcpModal ( "SMMMO02500", 0, 60 );

    } else if ( buttonValue == "14") { //외출외박
        if ( sPrcpGenrFlag != "O" ) {
            model.setValue ( "/root/hidden/target/pid"  ,  sPid );
            model.setValue ( "/root/hidden/target/indd" ,  sOrdDd );
            model.setValue ( "/root/hidden/target/cretno", sCretno );
            model.setValue ( "/root/hidden/target/hngnm" , model.getValue ( "/root/paminfo/list/hngnm") );

            var xpt = window.screenleft + 10;
            var ypt = window.screenTop + 10;

            var coord = getRelativeCoordinate ( xpt, ypt );
            var mon = coord[0];
            xpt = coord[1];
            ypt = coord[2];

            modal ( "../../../pam/inordamtmngtweb/xrw/SPPMI01100",mon,xpt,ypt, "SPPMI01100", "/root/hidden/target", "/root/hidden/target", "", false );
        } else {
            messageBox ( "외래환자에는 사용", "E001" );
        }

    } else if ( buttonValue == "15") { //전과신청
        if ( sPrcpGenrFlag != "O" && sPrcpGenrFlag != "S" ) {
            if (fContainsHardCD("341", "Y") && checkRtnDrug()) { // 간호 반납약 체크, 하드코드 341 체크
                return;
            } 
            
            if (fContainsHardCD("341", "Y") && checkRtnPrcp()) { // 반환요청 처방(E)  체크, 하드코드 341 체크 전과전실  등록시 반환요청(E) 처방 여부를 체크한다. 20130803 엄영만  
                return;
            }
            
            if(checkTellPrcp()) { // 미확인 구두처방 체크
                return;
            }
            
            checkMaxKTAS(); // KTAS 등급 체크 안내 팝업 2017.03.27 엄영만 요청서 20161230029
            
            //if (checkTransferMibi()) { // 미비기록(전출기록 등) 를 체크한다. 20130808 엄영만  2013.08.26 원무에서 처리 하기로 함.
            //    return;
            //}  
            
            model.setValue ( "/root/hidden/target/pid",    sPid);
            model.setValue ( "/root/hidden/target/indd",   sOrdDd );
            model.setValue ( "/root/hidden/target/cretno", sCretno);
            model.setValue ( "/root/hidden/target/hngnm",  model.getValue ( "/root/paminfo/list/hngnm" ));

            var xpt = window.screenleft + 10;
            var ypt = window.screenTop + 10;

            var coord = getRelativeCoordinate ( xpt, ypt );
            var mon = coord[0];
            xpt = coord[1];
            ypt = coord[2];

            modal ( "../../../pam/inordamtmngtweb/xrw/SPPMI02700",mon,xpt,ypt, "SPPMI02700", "/root/hidden/target", "/root/hidden/target", "", false );
        } else {
            messageBox ( "외래환자에는 사용", "E001" );
        }
    } else if ( buttonValue == "16") { //항생제 
        fPrcpModal("SPMMD01600", 20, 50);               
    } else if ( buttonValue == "17") { //수술장부
        var hngnm    = model.getValue("/root/paminfo/list/hngnm");
        var sex      = model.getValue("/root/paminfo/list/sex");
        var age      = model.getValue("/root/paminfo/list/age");
        var insukind = model.getValue("/root/paminfo/list/insukind");
        var suppkind = model.getValue("/root/paminfo/list/suppkind");
        
        var param    = sPid       + "▦" + 
                       hngnm      + "▦" + 
                       sex        + "▦" + 
                       age        + "▦" + 
                       insukind   + "▦" + 
                       suppkind   + "▦" + 
                       sOrdDd     + "▦" + 
                       sOrdDeptCd + "▦" +
                       sPrcpGenrFlag;
        setParameter("SMMMO05700_param", param);
        modal("SMMMO05700");
    } else if ( buttonValue == "18") { //통합결과조회
        var xpt = window.screenleft + 10;
        var ypt = window.screenTop + 10;

        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];
        var mainObj = getMainViewer();
        mainObj.window.javascript.model.makeValue("/root/temp/SMAER00800/pid", model.getValue("/root/paminfo/list/pid"));
        mainObj.window.javascript.open("SMAER00800", mon, xpt, ypt, "SMAER00800", "/root/temp/SMAER00800/pid", "/root/send/data/singdata/srchpid");
        //open("SMAER00800", mon, xpt, ypt, "SMAER00800", "/root/source/pid", "/root/paminfo/list/pid");
    } else if ( buttonValue == "19") { //self 처방 조회 버튼 추가 20100520 by LYJ
        var xpt = window.screenleft + 10;
        var ypt = window.screenTop + 10;

        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];
        setParameter ( "SPMMO19300_prcp", "prcpbtn");
        modal("SPMMO19300", mon, xpt, ypt, "SPMMO19300", "/root/paminfo/list", "/root/paminfo/list/pid");
        focusMain ( grd_prcplist.row );
    } else if ( buttonValue == "20") { //구두처방 확인 버튼 추가 20170908 엄영만
        var xpt = window.screenleft + 10;
        var ypt = window.screenTop + 10;

        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];

        modal("SPMMO00710", mon, xpt, ypt, "SPMMO00710");
    }
    
}

/**간호반납 요청 처방 체크*/
function checkRtnDrug(){
    var bRtn = false;
    var sPrcpGenrFlag = model.getValue ("/root/patflag/list/prcpgenrflag");
    
    if (sPrcpGenrFlag == "I") {
        var sPid       = model.getValue("/root/paminfo/list/pid");
        var sOrdDd     = model.getValue("/root/paminfo/list/indd");
        var sCretno    = model.getValue("/root/paminfo/list/cretno"); 
        var sOrdDeptCd = model.getValue("/root/paminfo/list/orddeptcd");    
        
        model.makeValue("/root/checkrtndrug/reqdata/pid",       sPid);
        model.makeValue("/root/checkrtndrug/reqdata/orddd",     sOrdDd);
        model.makeValue("/root/checkrtndrug/reqdata/cretno",    sCretno);
        model.makeValue("/root/checkrtndrug/reqdata/orddeptcd", sOrdDeptCd);
        
        submit("TRMMO00146", false);
        
        if( model.getValue ( "/root/checkrtndrug/rtndata/rtnyn" ) == "Y") { // 반환요청 처방이 존재 하면
            bRtn = true;
            if ("6" == messageBox ( "확인 되지 않은 간호반납 요청 처방이 존재하여 진행 할수 없습니다.\n\n간호반납 요청 처방을 확인 하시겠습니까?", "Q999" )) {
                fDrugPrcpDc();
            }
        }
    }
    
    return bRtn
}

/**@desc   : 반환요청(E) 처방 존재 유무 확인(submit)
 * @param  : 
 * @return : true, false
 * @authur : 엄영만 2013. 08. 05
 */
function checkRtnPrcp(){
	var bRtn = false;

    var sPid       = model.getValue("/root/paminfo/list/pid");
    var sInDd      = model.getValue("/root/paminfo/list/indd");
    var sCretno    = model.getValue("/root/paminfo/list/cretno"); 
    var sOrdDeptCd = model.getValue("/root/paminfo/list/orddeptcd");    
    
    model.makeValue("/root/checkreturnprcp/reqdata/pid",       sPid);
    model.makeValue("/root/checkreturnprcp/reqdata/indd",      sInDd);
    model.makeValue("/root/checkreturnprcp/reqdata/cretno",    sCretno);
    //model.makeValue("/root/checkreturnprcp/reqdata/orddeptcd", sOrdDeptCd);	
	
	if(submit("TRMMO00404", false)){
	    var nCnt = model.getValue("/root/checkreturnprcp/rtndata/cnt");
	    
	    if(nCnt > 0) {
	        bRtn = true;
	        if ( "6" == messageBox("[반환요청] 상태의 처방이 존재 하여 진행할 수 없습니다.\n\n반환요청 처방 내역을 확인 하시겠습니까?", 'Q999')) {
	            setParameter("SPMMO50400_pid",         sPid);
    			setParameter("SPMMO50400_indd",        sInDd);
    			setParameter("SPMMO50400_cretno",      sCretno);
    			//setParameter("SPMMO50400_orddeptcd",   sOrdDeptCd);
    			
    			modal("SPMMO50400");
	        }
	    }
    }
	
    return bRtn;
}

/**@desc   : 미확인 구두처방 존재 유무 확인(submit)
 * @param  : 
 * @return : true, false
 * @authur : 엄영만 2014. 12. 15
 */
function checkTellPrcp(){
	var bRtn = false;

    var sPid       = model.getValue("/root/paminfo/list/pid");
    var sInDd      = model.getValue("/root/paminfo/list/indd");
    var sCretno    = model.getValue("/root/paminfo/list/cretno"); 
    var sOrdDeptCd = model.getValue("/root/paminfo/list/orddeptcd");
    
    model.makeValue("/root/checktellprcp/reqdata/pid",       sPid);
    model.makeValue("/root/checktellprcp/reqdata/indd",      sInDd);
    model.makeValue("/root/checktellprcp/reqdata/cretno",    sCretno);
    
	if(submit("TRMMO00155", false)){
	    var nCnt = model.getValue("/root/checktellprcp/rtndata/cnt");
	    
	    if(nCnt > 0) {
	        bRtn = true;
	        if ( "6" == messageBox("미확인 [구두]처방이 존재 하여 진행할 수 없습니다.\n\n[구두] 처방 내역을 확인 하시겠습니까?", 'Q999')) {
	            fConfirmTellPrcp();
	        }
	    }
    }
	
    return bRtn;
}

/**@desc   : 전과 신청시 미비기록 존재 유무 확인(submit)
 * @param  : 
 * @return : true, false
 * @authur : 엄영만 2013. 08. 08
 */
function checkTransferMibi() {
    var bRtn = false;

    var sPid       = model.getValue("/root/paminfo/list/pid");
    var sInDd      = model.getValue("/root/paminfo/list/indd");
    var sCretno    = model.getValue("/root/paminfo/list/cretno"); 
    var sOrdDeptCd = model.getValue("/root/paminfo/list/orddeptcd");    
    
    model.makeValue("/root/checktransfermibi/reqdata/pid",        sPid);
    model.makeValue("/root/checktransfermibi/reqdata/indd",       sInDd);
    model.makeValue("/root/checktransfermibi/reqdata/cretno",     sCretno);
    model.makeValue("/root/checktransfermibi/reqdata/orddeptcd",  sOrdDeptCd);	
    model.makeValue("/root/checktransfermibi/reqdata/unprepdrid", getUserInfo("userid"));	 // 전출신청자
    model.makeValue("/root/checktransfermibi/reqdata/fromdd",     getCurrentDate());	     // 전출신청일
    
    if(submit("TRMMO00152", false)){
	    var nTrnasfernoteCnt = model.getValue("/root/checktransfermibi/rtndata/trnasfernotecnt");
	    var sTransferChkYn   = model.getValue("/root/checktransfermibi/rtndata/transferchkyn");
	    var sTransferMsg     = model.getValue("/root/checktransfermibi/rtndata/transfermsg");
	    
	    var nMibiCnt         = model.getValue("/root/checktransfermibi/rtndata/mibicnt");
	    var sMibiChkYn       = model.getValue("/root/checktransfermibi/rtndata/mibichkyn");
	    var sMibiMsg         = model.getValue("/root/checktransfermibi/rtndata/mibimsg");
	    
	    if( sTransferChkYn == "Y" && nTrnasfernoteCnt == 0) {
	        messageBox(sTransferMsg, 'E999');
	        bRtn = true;
	    }
	    
	    if( sMibiChkYn == "Y" && nMibiCnt > 0) {
	        messageBox(sMibiMsg, 'E999');
	        bRtn = true;
	    }
    }
	
    return bRtn;
}

/**@desc   : KTAS 등급 확인 및 수정요청 팝업(submit)
 * @param  : 
 * @return : true, false
 * @authur : 엄영만 2017. 03. 27
 */
function checkMaxKTAS(){
	var sIoFlag    = model.getValue("/root/paminfo/list/ioflag");    
    var sPid       = model.getValue("/root/paminfo/list/pid");
    var sInDd      = model.getValue("/root/paminfo/list/indd");
    var sCretno    = model.getValue("/root/paminfo/list/cretno"); 
    
    if(sIoFlag == "E") { //응급실 환자만 체크
        model.makeValue("/root/checkmaxktas/reqdata/pid",       sPid);
        model.makeValue("/root/checkmaxktas/reqdata/indd",      sInDd);
        model.makeValue("/root/checkmaxktas/reqdata/cretno",    sCretno);
        
    	if(submit("TRMMO00159", false)){
    	    var sMaxKtas = model.getValue("/root/checkmaxktas/rtndata/maxktas");
    	    if(sMaxKtas == "4" || sMaxKtas == "5" || sMaxKtas == "8") {
    	        if("6" == messageBox("응급중증도 KTAS (" + sMaxKtas + ")등급 입니다.\n\n KTAS 재평가 하시겠습니까?", 'Q999')) {
	                var sHngNm           = model.getValue("/root/paminfo/list/hngnm");
                    var sSa              = model.getValue("/root/paminfo/list/sex") +"/"+ model.getValue("/root/paminfo/list/age") ;
                    var sOrdDeptCd       = model.getValue("/root/paminfo/list/orddeptcd");
                    var sOrdDeptNm       = model.getValue("/root/paminfo/list/orddeptnm");
                    var sRoomCd          = model.getValue("/root/paminfo/list/roomcd");
                    var sOrdDrId         = model.getValue("/root/paminfo/list/medispclid");
                    
                    
                    var sDisParam = sPid +"▦" + sHngNm +"▦" + sSa+"▦" + sOrdDeptNm +"▦" + sRoomCd + "▦";
            		setParameter("pid",			sPid );
            		setParameter("orddd",		sInDd );
            		setParameter("cretno",		sCretno);
            		setParameter("ioflag",		sIoFlag);
            		setParameter("orddeptcd",	sOrdDeptCd);
            		setParameter("orddrid",	    sOrdDrId);
            		setParameter("disppatinfo", sDisParam);	   //등록번호▦환자명▦성별/나이▦진료과▦병실▦
                	setParameter("openmode",    "newform");	   //신규작성
        			setParameter("formcd",      "1500017172"); //KTAS 중증도 분류
            
            		modal("SSMMR01100", 1, 0, 0 ,"", "", "");
    	        }
    	    }
        }
    }
}

/**퇴원예고창 */
function preDsch(){
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    if ( prcpgenrflag == "O" ) {
        messageBox ( "외래환자에는 사용", "E001" );
        return;
    } else {
        fPrcpModal ( "SPMMO00400", 55, 60 );                           
    }
     
    var useyn = getParameter("SPMMO00400_rtn_useyn");
    if(useyn == "Y"){
        setParameter("SPMMO00400_rtn_useyn", "");

        //상단올리기
        fDschNotiInit();
        var pamInfoCvs = getGlobalVariable("paminfo");  
        var insukindcd = getPatientInfoDetail("insukind");
        var vopt_insuinfo = "";
        if(pamInfoCvs != null){ //cvs가 null이 아닌 경우에만 처리함.
            model.removeNodeSet ( "/root/paminfo/list" ); //상단화면 정보 초기화
            setCSVToNode ( "/root/paminfo", pamInfoCvs );
            model.setValue ( "/root/init/pid", model.getValue ( "/root/paminfo/list/pid" ));
             
            var vopt_patinfo  = model.getValue ( "/root/paminfo/list/dispnm2" ) + " " + model.getValue ( "/root/paminfo/list/sex" ) + "/" + model.getValue ( "/root/paminfo/list/age" );
            if ( model.getValue ( "/root/paminfo/list/roomcd" ) != "" ){
                vopt_patinfo = vopt_patinfo + " " + model.getValue ( "/root/paminfo/list/roomcd" ) + "호";
            }
            
            if (insukindcd == "21"){
               vopt_insuinfo = "[의료급여1]";
            } else if (insukindcd == "22"){
               vopt_insuinfo = "[의료급여2]";
            } else if (insukindcd == "81"){
               vopt_insuinfo = "[장기요양]";
            } else {
               vopt_insuinfo =   "[" + getPatientInfo("insukind") + "]" ;
            }
            model.setValue ( "/root/init/insuinfo", vopt_insuinfo );
            
            if ( insukindcd == "31" || insukindcd =="41"){
               if (getPatientInfoDetail("ioflag") == "O"){
                   messageBox ( "자보/산재 환자입니다. \n관련 처방을 모두 [급여]로 처방하여 주시기 바랍니다.\n기왕증은 건강보험으로 재접수하여 처방해 주시기 바랍니다.", "I" );
               } else {
                   messageBox ( "자보/산재 환자입니다. \n관련 처방은 모두 [급여]로 처방하여 주시기 바랍니다. \n그 외 처방은 처방 상세팝업에서 기왕증 체크 후 처방해 주시기 바랍니다.", "I" );
               }
            }
            model.setValue ( "/root/init/patinfo", vopt_patinfo );
        }
        
        var patFlagCvs = getGlobalVariable("patflag");
        if(patFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
            model.removeNodeSet ( "/root/patflag/list" ); //상단화면 정보 초기화
            setCSVToNode ( "/root/patflag", patFlagCvs );
            prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
        }
         
        
         //환자리스트 불러오기
        var mainObj = getMainViewer();
        var ordPatObj = mainObj.javascript.getOpenWindow("SMMMO04100");   //현재 활성화된 진료대상자 화면 객체                
        if(ordPatObj == null){ //두 객체값이 다른 경우 새로운 진료대상자 화면을 open함
            mainObj.javascript.open("SMMMO04100",1, 200, 100);
        } else {
            ordPatObj.javascript.fPrcpCallPatList();
        }
         
        if( model.getValue("/root/cp") == "Y" ){
            if( model.getValue("/root/temp1/getdata/appstat") == "50" ){
                fOpenPrcpWindow();
                return;
            } else {
                if( model.getValue("/root/temp1/getdata/prtlflagcd") != "02" ){  //CP면 퇴원처방 자동발행
                    btn_cpbatch.dispatch("DOMActivate");
                } else {
                    btn_inqr.dispatch("DOMActivate"); //CPG면 문진팝업 호출 (2010.04.16 JJE)
                }
            }
        }
    }
}


/**@desc   : 전처방에서 급비변경후 환자정보 다시 SETTING
 * @return : void
 * @authur : 마정민 2007. 9. 10
 */
function fInitPaminfo() {

    //ioflag▦pid▦orddd▦cretno▦instcd▦acptseqno▦orgorddd▦
    //외래/입원구분▦등록번호▦진료일자▦생성번호▦기관코드▦등록일련번호▦원진료일자▦
    var ioflag = model.getValue ( "/root/paminfo/list/ioflag" );

    if ( ioflag == "O" || ioflag == "S" )    {
        var pid = model.getValue ( "/root/paminfo/list/pid" );
        var orddd = model.getValue ( "/root/paminfo/list/orddd" );
        var cretno = model.getValue ( "/root/paminfo/list/cretno" );
        var instcd = model.getValue ( "/root/paminfo/list/instcd" );
        var acptseqno = model.getValue ( "/root/paminfo/list/acptseqno" );
        var orgorddd = model.getValue ( "/root/paminfo/list/orgorddd" );                    
        setParameter("condparam", ioflag + "▦" + pid + "▦" + orddd + "▦" + cretno + "▦" + instcd + "▦" + acptseqno + "▦" + orgorddd );
    } else {
        //ioflag▦pid▦indd▦cretno▦seqno▦instcd▦
        //외래/입원구분▦등록번호▦입원일자▦생성번호▦일련번호▦기관코드
        var pid = model.getValue ( "/root/paminfo/list/pid" );
        var indd = model.getValue ( "/root/paminfo/list/indd" );
        var cretno = model.getValue ( "/root/paminfo/list/cretno" );
        var instcd = model.getValue ( "/root/paminfo/list/instcd" );
        var seqno = model.getValue ( "/root/paminfo/list/seqno" );
        var prcpdd = model.getValue ( "/root/init/prcpdd" );
        setParameter("condparam", ioflag + "▦" + pid + "▦" + indd + "▦" + cretno + "▦" + instcd + "▦" + prcpdd);
    }

    modal("SPMMO08900");

    var useyn = getParameter("SPMMO08900_rtn_useyn");
    if(useyn == "Y"){
        setParameter("SPMMO08900_rtn_useyn", "");

      var pamInfoCvs = getGlobalVariable("paminfo");  
      
      if(pamInfoCvs != null){ //cvs가 null이 아닌 경우에만 처리함.
          model.removeNodeSet ( "/root/paminfo/list" ); //상단화면 정보 초기화
          setCSVToNode ( "/root/paminfo", pamInfoCvs );
      }

      var patFlagCvs = getGlobalVariable("patflag");      
      
      if(patFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
          model.removeNodeSet ( "/root/patflag/list" ); //상단화면 정보 초기화
          setCSVToNode ( "/root/patflag", patFlagCvs );
      } 
      

      var operationFlagCvs = getGlobalVariable("operation");  
      if(operationFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
          model.removeNodeSet ( "/root/operation/list" ); //상단화면 정보 초기화
          setCSVToNode ( "/root/operation", operationFlagCvs );
      } 
    }

    // 2017.02.09 진료대상자 화면이 존재할 경우만 처리
    var mainObj = getMainViewer();                
    var ordPatObj = mainObj.javascript.getOpenWindow("SMMMO04100");   //현재 활성화된 진료대상자 화면 객체                
    if(ordPatObj != null){
       ordPatObj.javascript.fPrcpCallPatList();
    }      
}

function fDrugPrcpDc() {
    //투약반환요청이 있을 경우 관련 팝업을 띄운다.
    if ( model.getValue ( "/root/initsrchprcp/prcpetccnts/drugprcprtnyn" ) == "Y" ){
        //나중에 예약처방도 수정        modal ( "SPMMO00700", 1,  xpt, ypt, "prcpdetl", "/root/prcpsrch", "/root/main/prcp" );

        var orddd = "";
        if (model.getValue ( "/root/paminfo/list/ioflag" ) == "O" || model.getValue ( "/root/paminfo/list/ioflag" ) == "S") {
            orddd = model.getValue ( "/root/paminfo/list/orddd" );
        } else {
            orddd = model.getValue ( "/root/paminfo/list/indd" );
        }

        model.setValue ( "/root/send/cond1",  model.getValue ( "/root/paminfo/list/pid" ));
        model.setValue ( "/root/send/cond2",  orddd);
        model.setValue ( "/root/send/cond3",  model.getValue ( "/root/paminfo/list/cretno" ));
        model.setValue ( "/root/send/cond4",  model.getValue ( "/root/paminfo/list/instcd" ));
        model.setValue ( "/root/send/cond5",  "drugdcprcp");
        model.setValue ( "/root/send/cond6",  "");
        model.setValue ( "/root/send/cond9",  "DC");
        model.setValue ( "/root/send/cond99",  "getBfPrcpSrchInfo");
        submit ( "TRMMO00100", false );

        var xpt = window.screenleft + 100;
        var ypt = window.screenTop + 100;

        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];

        var srcNodeList = model.instances(0).selectNodes( "/root/prcpsrch/prcplist" );
        if ( srcNodeList.length > 0 ) {
            fCpInPrcpVisible();
            setParameter ( "SPMMO00700_rtn1", "drugdc" );
            modal ( "SPMMO00700", mon,  xpt, ypt, "prcpdetl", "/root/prcpsrch", "/root/main/prcp", "", false );
            setParameter ( "SPMMO00700_rtn1", "" );
        }
    }
}

function fConfirmTellPrcp() {
    //미확인 간호 구두처방이 있을 경우 관련 팝업을 띄운다.
    if ( model.getValue ( "/root/initsrchprcp/prcpetccnts/tellprcpyn" ) == "Y" ){
        var xpt = window.screenleft + 100;
        var ypt = window.screenTop + 100;

        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];
        
        modal("SPMMO00710", mon,  xpt, ypt, "prcpdetl", "/root/paminfo/list", "/root/send", "", false); 
    }
}

/**@desc   : 마취화면에서 보내준 처방 검색
 * @return : void
 * @authur : 마정민 2007. 9. 18
 */
function fAnstPrcp() {

    /*  SMMMR03700_paramyn = "Y", 
        SMMMR03700_opansflagcd,
        SMMMR03700_ansttm (4자리),
        SMMMR03700_anstfromdt(12자리),
        SMMMR03700_ansttodt(12자리) */

    if ( opener.javascript.getParameter ( "SMMMR03700_paramyn" ) == "Y" ) {
        model.setValue ( "/root/anst/paramyn", "Y" );
        model.setValue ( "/root/anst/anstrecno",    opener.javascript.getParameter ( "SMMMR03700_anstrecno" ) ); 
        model.setValue ( "/root/anst/opansflagcd",  opener.javascript.getParameter ( "SMMMR03700_opansflagcd" ));
        model.setValue ( "/root/anst/ansttm",       opener.javascript.getParameter ( "SMMMR03700_ansttm" ));
        model.setValue ( "/root/anst/anstfromdt",   opener.javascript.getParameter ( "SMMMR03700_anstfromdt" ));
        model.setValue ( "/root/anst/ansttodt",     opener.javascript.getParameter ( "SMMMR03700_ansttodt" ));
        //마취의, 특진의여부 추가 by sonjy 20080925  start
        model.makeValue ( "/root/anst/anst_drid"        , opener.javascript.getParameter ( "SMMMR03700_anstdrid" ));    //마취의 1 setting 
        model.makeValue ( "/root/anst/anst_specordflag" , opener.javascript.getParameter ( "SMMMR03700_refseq" ));      //마취의 1 특진의 여부  
        //20131107 이정택 추가
        model.makeValue ( "/root/anst/anst_anstdrnm"    , opener.javascript.getParameter ( "SMMMR03700_anstdrnm" ));       //마취의 1의 이름
        //20131107
        
        model.setValue ( "/root/init/prcpkindcd",   "35" );  //수술 중 처방으로 setting
        model.setValue ( "/root/init/prcpinptflag", "27" ); //마취기록에서 호출한 처방
        //마취의, 특진의여부 추가 by sonjy 20080925  end
        cmb_prcpkind.disabled = true;
        cmb_prcpkind.refresh();
    }

    var SMMMR03700_prcp = opener.javascript.getParameter ( "SMMMR03700_prcp" );
    opener.javascript.setParameter ( "SMMMR03700_prcp", "" );
    if ( !isNull(SMMMR03700_prcp) && !isNull(model.getValue ( "/root/paminfo/list/pid" ))) {
        var prcpcd = "";
        var prcpvol = "";
        var drugmthdcd = "";
        var mthdcnts = "";
        var prcplen = SMMMR03700_prcp.split("▩").length;

        for ( var i=1; i < prcplen-1; i++ ) {
            appendChildPrcp ( "/root/reset/anstprcplist", "/root/anstprcp", "main" ); //검색라인추가 
            prcpcd = getArrayData ( SMMMR03700_prcp, i, 0, "▩", "▦" );
            prcpvol = getArrayData ( SMMMR03700_prcp, i, 1, "▩", "▦" );
            drugmthdcd = getArrayData ( SMMMR03700_prcp, i, 2, "▩", "▦" );
            mthdcnts = getArrayData ( SMMMR03700_prcp, i, 3, "▩", "▦" );
            model.setValue ( "/root/anstprcp/anstprcplist[" + i + "]/prcpcd", prcpcd );
            model.setValue ( "/root/anstprcp/anstprcplist[" + i + "]/prcpvol", prcpvol );
            model.setValue ( "/root/anstprcp/anstprcplist[" + i + "]/drugmthdcd", drugmthdcd );
            model.setValue ( "/root/anstprcp/anstprcplist[" + i + "]/mthdcnts", mthdcnts );

            model.setValue ( "/root/anstprcp/anstprcplist[" + i + "]/prcpdd",  model.getValue ( "/root/init/prcpdd" ));
            model.setValue ( "/root/anstprcp/anstprcplist[" + i + "]/insukind", model.getValue ( "/root/paminfo/list/insukind"));
        }

        var saveInfo = model.instances(0).selectNodes( "/root/anstprcp/anstprcplist" );
        model.setValue ( "/root/send/cond1", getNodeListCSV (saveInfo)); 
        submit ( "TRMMO00115", false ); 
        var srcNodeList = model.instances(0).selectNodes( "/root/prcpsrch/prcplist" );
        for (var i=1; i<=srcNodeList.length; i++) {
            model.setValue ( "/root/prcpsrch/prcplist[" + i + "]/prcpexecdeptcd", model.getValue("/root/initsrch/opanstdeptcd/trgtcd")  );
        }
        //prcpinptflag 27 마취기록
        addPrcp ( "import", "/root/prcpsrch/prcplist", "/root/main/prcp",  "Y", "status", "", grd_prcpsrchlist, "N", "27");
    }
}
    
function fPrcpSaveChkBf( prcpchkflag ) {
    var srcNodeList = model.instances(0).selectNodes( "/root/main/prcp/prcplist" );
    var prcpsetcd = "";
    var inclprcpcd = "";
    var drugmastspec = "";
    var prcpclscd = "";
    var prcpkindcd = "";
    var prcpkindchk = 0;
    var prcpkindcd 
    var prcpcd = "";
    var prcpcd = "";
    var prcpexecdeptcd = "";
    var precureprcpflag = "";
    var spcldrug = "";
    var iFind = -1;
    var iFind2 = -1;
    var sTestreqlnkno = ""; 
    var drugbatchcnt = "";
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    var savecnt = 0;    
    var prcpdschcnt = 0; //by sonjy 2008-07-30 중증등록암 관련 추가 퇴원처방 여부.    
    var antideptcd = ""; //by sonjy 2008-08-12 항암제 및 퇴원후 외래/입원전검사처방시 수행부서setting.
    
    ocrcalcscorcd = "";

    model.setValue ( "/root/init/drugbatch", "N" );
    model.setValue ( "/root/init/prgtbooprcpyn", "N" );
    model.removeNodeset ( "/root/prcper/prcplist" );
    
    //kimsj 수혈동의서 동의서 유무, 마지막 수혈일 체크
    var bldFind         = "N";
    var ocrbldexists    = "";  // 수혈동의서 존재 여부
    var ocrbldprnt      = model.getValue ( "/root/initsrchprcp/prcpetccnts/ocrbldprnt" );    
    var ocrbldprntArray = ocrbldprnt.split("|");
    var ocrbldynhrcd    = "N"; // 수혈동의서 확인메시지 사용여부[병원별]
    reqHardCodeInfo("/root/hidden/ocrbldynhrcd", "/root/hidden/ocrbldynhrcd", "198");
    ocrbldynhrcd = model.getValue("/root/hidden/ocrbldynhrcd/hardcd/hardcd");
    
    for (var i=1; i<=srcNodeList.length; i++) {

        if (model.getValue ( "/root/main/prcp/prcplist[" + i + "]/status" ) == "S" ) continue;
        if (model.getValue ( "/root/main/prcp/prcplist[" + i + "]/status" ) == "D" ) continue;
        savecnt++;
        model.setValue ( "/root/main/prcp/prcplist[" + i + "]/tempcol5", i );
        model.setValue ( "/root/main/prcp/prcplist[" + i + "]/tempcol3", "" );
        prcpclscd      = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpclscd" );
        prcpsetcd      = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpsetcd" );
        drugmastspec   = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/drugmastspec" );
        prcpkindcd     = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpkindcd" );
        prcpcd         = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpcd" );
        prcpexecdeptcd = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd" );
        spcldrug = getArrayData ( drugmastspec + "^", 0, 23, "^", "|" ); 

        model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpauthflag", model.getValue ( "/root/init/prcpauthflag" ));
        if ( (prcpclscd == "C2" || prcpclscd == "C4") && model.getValue ( "/root/main/prcp/prcplist[" + i + "]/drprcpetc9" ) == "-" ) { // 사전심사 승인후 검사는 팝업 됮 않도록 처리 2016.03.31 엄영만
            fPrintDyeFrm(i, prcpcd); //@@@ 조영제 출력팝업 한번만 호출하도록 수정 (2010.07.22 JJE)
            if (model.getValue ( prcpNode + "[" + i + "]/testreqlnkno") == "DYENO" ) { // 처방취소 버튼 시 저장 중지 및  다시 저장 시 재 팝업 되도록 수정  20100818 LYJ
                setParameter("SPAER01900_popupYN", "N" );
                return false;
            }
        }

        //********************************* 단독처방 불가약 메시지처리 ***********************************//
        var addprcpcd = model.getValue ( "/root/initsrch/independprcpimpsi[prcpcd='" + prcpcd + "']/addprcpcd" );
        if ( !isNull(addprcpcd)) { //같이 내야할 처방이 없으면 메시지 처리
            if (isNull (model.getValue ( "/root/main/prcp/prcplist[prcpcd='" + addprcpcd + "']/prcpcd" ))) {
                var prcpmsg = model.getValue ( "/root/initsrch/independprcpimpsi[prcpcd='" + prcpcd + "']/prcpmsg" );
                messageBox ( prcpmsg, "E" );
                model.removeNode ( "/root/initsrch/independprcpimpsi[prcpcd='" + prcpcd + "']" );
            } 
        }
        
        //*************************** OCR 자동출력할 처방이 있는지 체크 **********************************//
        if ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/tempcol13" ) == "Y" ) {
            // kimsj 수혈동의서 자동출력 
            if ( ocrbldynhrcd == "Y" ) {
                bldFind = "N";
                for( m=0; m < ocrbldprntArray.length; m++ ){ 
                    if( prcpcd == ocrbldprntArray[m]) { 
                        bldFind = "Y";
                        break;
                    } 
                }
                if ( bldFind == "Y" ) { // 수혈동의서일 경우
                    if(isNull(ocrbldexists)) { // 수혈 동의서 존재 여부 한번만 체크 하도록
                        if ( prcpgenrflag == "O" || prcpgenrflag == "S" ) {
                            var orddd = model.getValue ( "/root/paminfo/list/orddd" );
                        } else {
                            var orddd = model.getValue ( "/root/init/prcpdd" );               
                        }
                        
                        model.makeValue("/root/send/reqdata/ocrbld_pid"    , model.getValue("/root/paminfo/list/pid"));
                        model.makeValue("/root/send/reqdata/ocrbld_orddd"  , orddd);
                        model.makeValue("/root/send/reqdata/ocrbld_ioflag" , prcpgenrflag);
                        model.makeNode("/root/hidden/ocrbldyn"); 
                        submit("TRMMO00132");
                        
                        model.removenode("/root/send/reqdata/ocrbld_pid");
                        model.removenode("/root/send/reqdata/ocrbld_orddd");
                        model.removenode("/root/send/reqdata/ocrbld_ioflag");
                        
                        ocrbldexists = model.getValue ( "/root/hidden/ocrbldyn/ocrbldyn/ocryn" );
                    }
                    
                    if ( ocrbldexists == "D" || ocrbldexists == "N") { // 동의서가 없거나 불출일 60일(입원55일) 경과
                        model.makeValue ( "/root/hidden/ocrbldyn/ocrbldyn/ocrmsgyn", "Y" ); //메세지는 다른 부분으로 적용 (메세지 두번 나오는 현상 발생)
                        if ( prcpgenrflag == "O" || prcpgenrflag == "S" )   ocrcalcscorcd = ocrcalcscorcd + prcpcd + "▦";          
                    }
                } else {    // 수혈동의서가 아닐경우
                    ocrcalcscorcd = ocrcalcscorcd + prcpcd + "▦";
                }
            } else {
                ocrcalcscorcd = ocrcalcscorcd + prcpcd + "▦";
            }   
        }
        
        //입원전검사(당일/전일)도 퇴원후 외래와 같은 처리 by sonjy 2008-07-25
        if ( prcpkindcd == "70"  || prcpkindcd == "90"  || prcpkindcd == "95"  ) {
            //CP 미완성 처방 저장 시, 저장할 범위가 아닌 status '-' 중 퇴원처방 있을 때에는 퇴원예고 체크 skip 해야 함 (2008.10.16 JJE)
            if( model.getValue("/root/cp") == "Y" && model.getValue("/root/main/prcp/prcplist[" + i + "]/status") == "-" ){
                if( model.getValue("/root/main/prcp/prcplist[" + i + "]/prcphistcd") == "T" ) {
                    prcpkindchk++;
                }
            }else{
                prcpkindchk++;
            }
        } else if ( prcpkindcd == "60" ) {
            prcpdschcnt++; // by sonjy 2008-07-30 중증등록암관련...퇴원처방 여부.
        }

        if ( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" ) {
            //처방검색 용량보정
            var calcmthdcd   = getArrayData ( drugmastspec + "^", 0, 26, "^", "|" ); 
            if ( calcmthdcd == 1 ) {
                var drprcpetc7 = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/drprcpetc7" );
                var drprcpetc8 = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/drprcpetc8" );
                var prcptims   = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcptims" );
                var prcpvol    = Math.floor( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpvol" )*100 );
                var prcpqty    = Math.floor( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpqty" )*100 );
                var totqty     = Math.floor( drprcpetc8*prcptims*100 );
                var totvol     = Math.floor( drprcpetc7*prcptims*100 );
                
                if ( prcpqty != totqty ) {
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpvol", drprcpetc7 * prcptims  );
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpqty", drprcpetc8 * prcptims );
                }
                if ( prcpvol != totvol ) {
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpvol", drprcpetc7 * prcptims  );
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpqty", drprcpetc8 * prcptims );
                }                                                       
            } else {
                var drprcpetc7 = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/drprcpetc7" );
                var drprcpetc8 = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/drprcpetc8" );
                var prcpvol    = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpvol" );
                var prcpqty    = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpqty" );                     
               
                if ( prcpqty != drprcpetc8 ) {                          
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpvol", drprcpetc7   );
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpqty", drprcpetc8   );
                }
                if ( prcpvol != drprcpetc7 ) {
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpvol", drprcpetc7    );
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpqty", drprcpetc8   );
                }               
            }
            
            //************************* 약시행부서 setting ***********************//
            //입원일 경우 시행부서 병동약국
            if ( prcpgenrflag != "O" && model.getValue ( "/root/main/prcp/prcplist[" + i + "]/inclprcpno") == "0" ) {
                //항암제 및 항암제와 mix인 경우는 항암제의 시행부서로. by sonjy 2008-08-12 김은희 약사 요청.
                //퇴원후 외래 및 입원전검사의 경우 외래이므로 바꾸지 않는다. by sonjy 2008-08-12 서소영 mit 요청
                antideptcd = fDrugDeptcdChk( "/root/main/prcp", i) ; 
                model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", antideptcd);
            }

            //복막투석액(spcldrug=K) 일 경우 인공신장실 복막투석가로 SETTING   
            if ( spcldrug  == "K" && model.getValue ( "/root/main/prcp/prcplist[" + i + "]/precureprcpflag" ) == "Y" ) {
                if(getUserInfo("dutplceinstcd") == "031") { // 2017.11.17 칠곡에는 해당 부서가 없음.
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", "2010702030" ); 
                }
            }
            //************************* 약시행부서 setting 끝 *********************//
            
            //20081212 by sonjy 윤영옥 선생님 요청사항 상기도 감염시 항생제처방 제한
            if(prcpgenrflag == "O"  ){
                if( !fChkInfecLimAntiDrug( "/root/main/prcp/prcplist" , i  ) ) return false ;
            }
        } else if ( model.getValue ( "/root/addprcp" ) == "Y" && prcpclscd == "D2" && opener.window.javascript.getScreenID() == "SMAER00400" ) { //20080923 벙리처방의뢰지 번호
            if ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/testreqlnkno" ) != 0 ){
                sTestreqlnkno = sTestreqlnkno + model.getValue ( "/root/main/prcp/prcplist[" + i + "]/testreqlnkno" ) + ",";
            }
        }
            
        //********************************* 선처치, 재료 시행부서 - 일 때 처리 *************************//
        if ( prcpexecdeptcd == "-" || isNull(prcpexecdeptcd)) {
            precureprcpflag = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/precureprcpflag" );
            if ( precureprcpflag == "Y" || prcpclscd == "M2" ) { //선처치, 재료일때 시행부서가 - 일 경우는 발행처를 시행부서로 넣어준다.
                model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", model.getValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd" ));
            }
        }
                       
        // 수술/마취 관련 처방 시행부서 설정.
        if ( model.getValue ( "/root/anst/paramyn") == "Y" ) { //마취 기록 처방
            //마취 기록에서 띄우는 화면은 시행부서, 발행처 처리
            if ( prcpclscd != "B2" && prcpclscd != "B4" && prcpclscd != "B6" && prcpclscd != "C2" && prcpclscd != "C4" && prcpclscd != "C6" && prcpclscd != "D2" && prcpclscd != "E2" ) {
                var oproomcd = model.getValue("/root/operation/list/oproomcd");
                var dscDeptcd = model.getValue("/root/init/operationroominfo/hardcd[hardcd = '" + oproomcd + "']/hardcdnm");
                if (dscDeptcd != "") {
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd",      dscDeptcd);       //일일수술실
                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", dscDeptcd);  //일일수술실                                  
                } else {
                    if ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prnprcpflag" ) == "Y" ) {
                        //20080913 마정민수정: 이훈재과장의 요청으로 발행부서(issdeptcd) 마취통증의학과(2090000000)에서 회복실, 수술실마취로 수정
                        model.setValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd",      model.getValue("/root/initsrch/recovdeptcd/trgtcd") );       //회복실
                        model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", model.getValue("/root/initsrch/recovdeptcd/trgtcd") );  //회복실        
                    } else {
                        //20100609 수술중처방 집계 관련 보완. 시행부서가 회복실, 수술실이면 그대로 두고 아니면 수술실마취로 세팅.
                        if ( model.getValue("/root/main/prcp/prcplist["+i+"]/prcpexecdeptcd") == model.getValue("/root/initsrch/recovdeptcd/trgtcd") || 
                            model.getValue("/root/main/prcp/prcplist["+i+"]/prcpexecdeptcd") == model.getValue("/root/initsrch/opdeptcd/trgtcd") ) {
                            model.setValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd", model.getValue("/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd") );
                        } else {
                            model.setValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd",      model.getValue("/root/initsrch/opanstdeptcd/trgtcd") );       //수술실 마취
                            model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", model.getValue("/root/initsrch/opanstdeptcd/trgtcd") );  //수술실 마취       
                        }
                    }
                }
            }
        } else { //마취 기록 처방이 아닌것 
            if ( prcpkindcd == "35") { // 수술중 처방이면
                if(getUserInfo( "dutplcecd" ) == model.getValue("/root/initsrch/anstdeptcd/trgtcd")) { // 마취과 의사 여부
                    //20080920 마정민수정: 수술환자 리스트에서 마취과 의사가 낸 수술중 처방은 수술실 마취
                    if ( !isNull(model.getValue ( "/root/operation/list/oprsrvno"))) {
                        if ( prcpclscd != "B2" && prcpclscd != "B4" && prcpclscd != "B6" && prcpclscd != "C2" && prcpclscd != "C4" && prcpclscd != "C6" && prcpclscd != "D2" && prcpclscd != "E2" ) {
                            var oproomcd  = model.getValue("/root/operation/list/oproomcd");
                            var dscDeptcd = model.getValue("/root/init/operationroominfo/hardcd[hardcd = '" + oproomcd + "']/hardcdnm");
                            if (dscDeptcd != "") {   // 수술방이 일일수술실일 경우는 무조건 일일수술실로 한다. : 20110711 김영학
                                model.setValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd", dscDeptcd);       //일일수술실
                                model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", dscDeptcd);  //일일수술실  
                            } else if ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prnprcpflag" ) == "Y" ) {
                                //20080913 마정민수정: 이훈재과장의 요청으로 발행부서(issdeptcd) 마취통증의학과(2090000000)에서 회복실, 수술실마취로 수정
                                model.setValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd", model.getValue("/root/initsrch/recovdeptcd/trgtcd") );       //회복실
                                model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", model.getValue("/root/initsrch/recovdeptcd/trgtcd") );  //회복실        
                            } else {
                                //20100609 수술중처방 집계 관련 보완. 시행부서가 회복실, 수술실이면 그대로 두고 아니면 수술실마취로 세팅.
                                if ( model.getValue("/root/main/prcp/prcplist["+i+"]/prcpexecdeptcd") == model.getValue("/root/initsrch/recovdeptcd/trgtcd") || 
                                    model.getValue("/root/main/prcp/prcplist["+i+"]/prcpexecdeptcd") == model.getValue("/root/initsrch/opdeptcd/trgtcd") ) {
            
                                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd", model.getValue("/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd") );
                                } else {
                                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd", model.getValue("/root/initsrch/opanstdeptcd/trgtcd") );       //수술실 마취
                                    model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", model.getValue("/root/initsrch/opanstdeptcd/trgtcd") );  //수술실 마취       
                                }
                            }
                        }
                    }
                } else { // 마취과 의사가 아닌것
                    //20080917 마정민수정: 마취과 의사가 내지 않는 수술중 처방은 모두 수술실로 처리한다.
                    if ( prcpclscd != "B2" && prcpclscd != "B4" && prcpclscd != "B6" && prcpclscd != "C2" && prcpclscd != "C4" && prcpclscd != "C6" && prcpclscd != "D2" && prcpclscd != "E2" &&  prcpclscd != "F2" && prcpclscd != "G2") {
                        var oproomcd = model.getValue("/root/operation/list/oproomcd");
                        var dscDeptcd = model.getValue("/root/init/operationroominfo/hardcd[hardcd = '" + oproomcd + "']/hardcdnm");
                        if (dscDeptcd != "") {
                            model.setValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd", dscDeptcd);       //일일수술실
                            model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", dscDeptcd);  //일일수술실                                  
                        } else {
                        	// 20131230 이정택 마취과 의사가 아닐시 집계 부서를 마취회복실로 지정하면 마취회복실로 나가도록 수정
                        	var issdeptcd=model.getValue("/root/main/prcp/prcplist[" + i + "]/issdeptcd");
                        	var recovdeptcd=model.getValue("/root/initsrch/recovdeptcd/trgtcd");
                        	if(issdeptcd==recovdeptcd){
                        		model.setValue ("/root/main/prcp/prcplist[" + i + "]/issdeptcd", recovdeptcd);       //마취회복실
                                model.setValue ("/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", recovdeptcd);  //마취회복실
                        	}else{
                        		model.setValue ( "/root/main/prcp/prcplist[" + i + "]/issdeptcd", model.getValue("/root/initsrch/opdeptcd/trgtcd"));       //수술실
                                model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd", model.getValue("/root/initsrch/opdeptcd/trgtcd"));  //수술실
                        	}      
                        }
                    }
                }
            }
        }  

        //20080917 마정민수정: 수술중처방마약batch체크, 20090625 마정민 추가 이훈재과장요청으로 향정추가
        if ( prcpkindcd == "35" && ( spcldrug == "M" || spcldrug == "H" ) && ( prcpgenrflag == "I" || prcpgenrflag == "D" ) &&
            model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpexecdeptcd" ) == model.getValue("/root/initsrch/opanstdeptcd/trgtcd") ) { 
            drugbatchcnt++;
        }
        
        if( model.getValue("/root/cp") == "Y" ){
            model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcpinptflag", "05" );       //CP창에서 발행하는 처방은 모두 CP(05) (2008.10.14 JJE)
        }
    }

    if ( drugbatchcnt > 0 ){
        model.setValue ( "/root/init/drugbatch", "Y" ); 
    }
    
    if (!isNull(sTestreqlnkno)) {
        opener.javascript.setParameter ( "SMAER00400_patholno", sTestreqlnkno );
    }

    //************************************** 퇴원후 외래처방 체크 *********************//    
    //퇴원처방발행 여부 by sonjy 2008-07-30 (중증등록암관련)
    model.makeValue ( "/root/hidden/dschprcpyn", "N" ); 
    if( prcpdschcnt > 0) model.makeValue ( "/root/hidden/dschprcpyn", "Y" ); 
    
    if ( prcpkindchk > 0  && prcpgenrflag != "O" ) {
        if( getParameter("SMMMP00800_cpsaveflag") == "T" && model.getValue("/root/init/prcpdd") > getCurrentDate() ){
            return true;
        }
        return fFollowUp();
    }

    return true;
}

/**@desc   : 처방화면 close, 진료대상자 CP검색, CP Main, 처방 Main 조정하기 위해 구현함
 * @return : void
 * @authur : 오지훈 2007. 9. 29
 */
function fPrcpWndClose(){
  if(!fPrcpSavePatList()){
    window.close();
  }
}

/**@desc   : 그룹 all size prcp popup
 * @return : void 11
 * @authur : 마정민 2007.10.02     
 */
 function fGroupAllSizePrcpPop (srchRow) {

    if ( isNull(srchRow)) {
        srchRow = grd_prcplist.row;
    }
    //그룹처방일 때는 그 안에 all size 재료 처방이 있는지 찾는다.
    if ( model.getValue( "/root/main/prcp/prcplist[" + srchRow + "]/grupsnglflag" ) == "G" ) {

        model.setValue ( "/root/send/cond1", model.getValue( "/root/main/prcp/prcplist[" + srchRow + "]/prcpcd" ));
        model.setValue ( "/root/send/cond2", model.getValue ( "/root/init/prcpdd" ));
        model.setValue ( "/root/send/cond3", getUserInfo("dutplceinstcd"));
        submit ( "TRMMO00118", false );

        if ( !isNull(model.getValue ( "/root/allsizegrupprcp/allsizegrupprcplist/prcpcd"))){
            var xpt = window.screenleft + 100;
            var ypt = window.screenTop + 50;                    
            var coord = getRelativeCoordinate ( xpt, ypt );
            var mon = coord[0];
            xpt = coord[1];
            ypt = coord[2];
            if ( model.getValue ( "/root/main/prcp/prcplist[" + srchRow + "]/matrsetprcpspec") != "-" ) {
                setParameter ( "SPMMO14200_param1", model.getValue ( "/root/main/prcp/prcplist[" + srchRow + "]/matrsetprcpspec"));
            }
            model.refresh();
            modal ( "SPMMO14200", mon,  xpt, ypt, "SPMMO14200", "/root/allsizegrupprcp", "/root/allsizegrupprcp", "", false );
            clearParameter (  "SPMMO14200_param1" );
            if ( !isNull(getParameter ( "SPMMO14200_matrsetprcpspec" ))) {
                model.setValue ( "/root/main/prcp/prcplist[" + srchRow + "]/matrsetprcpspec", getParameter ( "SPMMO14200_matrsetprcpspec" ));
                fPrcpUpdate();
                clearParameter ( "SPMMO14200_matrsetprcpspec" );
            }
        }
    }
}

/**@desc   : 처방 복사시 처방상세팝업 관리
 * @return : void
 * @authur : 마정민 2007.10.01
 */
function addPrcpPop ( srchRow, usge, prcpclscd, srchRow ) {
    //model.addLog("    *************    Start Of addPrcpPop()");  
    var iFind = -1;
    if ( usge == "prcp" ) {
        var prcpessninptflag = model.getValue ( prcpNode + "[" + srchRow + "]/prcpessninptflag");
        var prnprcpflag      = model.getValue ( prcpNode + "[" + srchRow + "]/prnprcpflag");
        var selfprcpflag     = model.getValue ( prcpNode + "[" + srchRow + "]/selfprcpflag");
        var prcpcd           = model.getValue ( prcpNode + "[" + srchRow + "]/prcpcd");
        var drugmastspec     = model.getValue ( prcpNode + "[" + srchRow + "]/drugmastspec");
        var tempcol2         = model.getValue ( prcpNode + "[" + srchRow + "]/tempcol2");
        var tempcol24        = model.getValue ( prcpNode + "[" + srchRow + "]/tempcol24");
      
        var choiordClscdautoyn = model.getValue("/root/hidden/autochoiordprcp/hardcd[hardcd = 'CLSCD' and hardcdnm ='" + tempcol2 + "']/hardcdnm");
        var choiordPrcpcdautoyn = model.getValue("/root/hidden/autochoiordprcp/hardcd[hardcd = 'PRCPCD' and hardcdnm ='" + prcpcd + "']/hardcdnm");
      
        if ( tempcol24 == "Y" && ( !isNull(choiordClscdautoyn) || !isNull(choiordPrcpcdautoyn))) {      
            fChgChoiDr ( "auto", srchRow );
        }

        if ( prcpessninptflag == "1" || prcpessninptflag == "2" || prcpessninptflag == "3" || prcpessninptflag == "4" || prcpessninptflag == "5" ){
            var pid     = model.getValue ( "/root/paminfo/list/pid" );
            var indd    = model.getValue ( "/root/paminfo/list/indd" );
            var cretno  = model.getValue ( "/root/paminfo/list/cretno" );
            var ordtype = model.getValue ( "/root/paminfo/list/ordtype" );
            
            if ( ordtype == "O" || ordtype == "S" ) {
                var prcpgenrflag = "O";
            } else {
                var prcpgenrflag = "I";
            }

            model.setValue ( "/root/send/cond1", pid );
            model.setValue ( "/root/send/cond2",  indd );
            model.setValue ( "/root/send/cond11",  cretno );
            model.setValue ( "/root/send/cond9",  prcpgenrflag );
            
            submit("TRMMO00130");
            var opansCnt = model.getValue ("/root/opanssrch/opansinfo/opanscnt");
            
            for (var i=1; i < grd_prcplist.rows; i++) {  
                if ( i != srchRow && model.getValue ( prcpNode + "[" + i + "]/prcpclscd") == "H2" && 
                     (model.getValue ( prcpNode + "[" + i + "]/prcpessninptflag") == "3" || model.getValue ( prcpNode + "[" + i + "]/prcpessninptflag") == "5" )) {
                        opansCnt++; 
                }
            }
            
            if (opansCnt == 0 && model.getValue ( prcpNode + "[" + srchRow + "]/opansflagcd") == "-") {
                model.setValue ( prcpNode + "[" + srchRow + "]/opansflagcd", "4" ); //주수술
            }
            
            fCpInPrcpVisible();
            model.refresh();
            fPrcpDetl( srchRow, "", "480", "auto" );
        } else if ( prcpclscd == "C2" ) { //20090120 prcpclscd == "E2" 는 존재하지 않아서 지운다.
            /*2007-12-17 마정민 수정 진료 ITC 요청에 의해 방사선 처방 임상소견 필수입력을 위한 자동 팝업
              단순방사선 검사를 제외한 나머지 영상검사라 하면, 특수방사선검사(수익분류-19), 방사선혈관조영술(20), 방사선초음파(21), 방사선CT(22), 방사선 BMD(23), 방사선HIFU(24), 방사선MRI(25), 외부영상판독CD(26) 를 말함.
            */
            var ck = model.getValue ( prcpNode + "[" + srchRow + "]/tempcol2").substring ( 0, 2 );
            if (ck=="19"||ck=="20"||ck=="21"||ck=="22"||ck=="23"||ck=="24"||ck=="25"||ck=="26" || model.getValue ( prcpNode + "[" + srchRow + "]/tempcol2") == "18|02|06") {
                fCpInPrcpVisible();
                model.refresh();
                fPrcpDetl( srchRow, "", "480", "auto" );
            }
        } else if ( prcpclscd == "C6") {
            /* 20090717 kimsj(핵의학 류형기)
            * PET CT처방 임상소견 필수입력위한 자동팝업 추가 (수익분류3 기타인 경우 제외) 
            * 핵의학(09)-감마영상검사(09)-근골격(04) 임상소견 필수입력위한 자동팝업 추가 2013.02.06 엄영만
            */
            var ck = model.getValue ( prcpNode + "[" + srchRow + "]/tempcol2").substring ( 0, 5 );
            var dk = model.getValue ( prcpNode + "[" + srchRow + "]/tempcol2").substring ( 6, 8 );
            if ( (ck == "09|02" && dk != "04") || (ck == "09|01" && dk == "04") ) {
                fCpInPrcpVisible();
                model.refresh();
                fPrcpDetl( srchRow, "", "480", "auto" );
            }
        }
                
        //CP 추가처방은 의뢰지 skip (2008.09.02 JJE)
        if( model.getValue("/root/cp") != "Y" ){
            fReqfrm ( srchRow, "copy" );
        }else{
            if( curSavePrcpFlag_SMMMO00110 != "T" ){    //CP화면에서 미래처방인 경우, 의뢰지 팝업 skip
                fReqfrm ( srchRow, "copy" );
            }
        }

        if ( prcpclscd == "B4" ) { //수혈 (혈액수혈)
            //수혈적응증 입력을 위해 수혈 상세팝업
            fPrcpDetl( srchRow, "", "480", "auto" ); // 무조건 상세팝업
            var addcnt = getParameter ( "SPMMO01500_addcnt" );
            clearParameter ( "SPMMO01500_addcnt" );  
            if ( addcnt != null && addcnt != 0 ) {
                srchRow = eval(srchRow) + eval(addcnt);
            }
        } else if ( prcpclscd == "03" ) {           // 식이일 때는 자동팝업
            var dietprcpgenrflag = model.getValue ( prcpNode + "[" + srchRow + "]/dietprcpgenrflag");
            if ( isNull(dietprcpgenrflag) || dietprcpgenrflag == "-" ) {
                fPrcpDetl( srchRow, "", "480", "auto" );
                if ( dietcnt != null && dietcnt != 0 ) {
                    srchRow = eval(srchRow) + eval(addcnt) -1;
                }
            }
        }

        var limprcpcd = model.getValue ( "/root/initsrch/prcpetccnts/limprcpcd" );
        if( prcpcd.charAt(0) != "*" ){ 
            iFind = limprcpcd.search( prcpcd );
        }
    } 

    if ( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" ) {
        var drprcpetc6 = model.getValue ( prcpNode + "[" + srchRow + "]/drprcpetc6");
        var drugmthdspccd = model.getValue ( prcpNode + "[" + srchRow + "]/drugmthdspccd");
        if ( isNull(drugmthdspccd) || drugmthdspccd == "-" ) {
            setParameter ( "SPMMO01900_srchRow", srchRow );
            fPrcpModal ( "SPMMO01900", 280, 100 );
            clearParameter ( "SPMMO01900_srchRow" );
        }
        if ( model.getValue("/root/hidden/prnprcpyninfo/hardcd/hardcd")=="Y" &&  model.getValue ( "/root/cp" ) != "Y"){
             if (prnprcpflag == "Y"){//  2009.12.31  LYJ PRN처방 여부를 가려 횟수와 사유를 입력받는다.
                 var prnl = getArrayData ( drugmastspec, 0, 33, "^", "|" );
                 if (prnl=="N"){
                     messageBox ( "PRN 처방이 불가능한 처방입니다. PRN 지정을 자동 해지합니다." , "E" );
                     model.setValue ( prcpNode + "[" + srchRow + "]/prnprcpflag", "N" );
                     model.setValue ( prcpNode + "[" + srchRow + "]/tempprcpflag", "N" );
                     model.setValue ( prcpNode + "[" + srchRow + "]/prcpnm",model.getValue(prcpNode + "[" + srchRow + "]/orgprcpnm" ));
                     model.setValue ( prcpNode + "[" + srchRow + "]/drprcpetc6", "" );
                 }else {
                    if (drprcpetc6 == "-" || drprcpetc6 =="" ){
                        var prcpinptflag = model.getValue ( prcpNode + "[" + srchRow + "]/prcpinptflag");
                        var monitorNumber = app.monitorNumber;
                        var monitorResolutions = app.monitorResolution;
                        var monitorResolutionsArr = monitorResolutions.split('|');
                        var resolution = monitorResolutionsArr[monitorNumber-1];
                        var resolution_width = resolution.split(',')[0];
                        var resolution_height = resolution.split(',')[1];
                        var xpt = (resolution_width - 246) / 2;
                        var ypt = (resolution_height - 119) / 2;

                         setParameter ( "SPMMO19200_pop", "bfprcp" );
                         setParameter ( "SPMMO19200_prcpcd", model.getValue(prcpNode + "[" + srchRow + "]/prcpcd" ) );
                         setParameter ( "SPMMO19200_prcpnm", model.getValue(prcpNode + "[" + srchRow + "]/prcpnm" ) );
                         
                         modal("SPMMO19200",monitorNumber,xpt, ypt, "SPMMO19200", "/root/tmp/prnresncd", "/root/main/prcp/prcplist/prnresncd", "sysmenu:hidden;", false ); 

                         var popPrnyn = getParameter ( "SPMMO19200_rtn1" );
                         if (popPrnyn == "N") {
                             model.setValue ( prcpNode + "[" + srchRow + "]/prnprcpflag",   "N" );
                             model.setValue ( prcpNode + "[" + srchRow + "]/prcpnm",        model.getValue(prcpNode + "[" + srchRow + "]/orgprcpnm" ));
                             model.setValue ( prcpNode + "[" + srchRow + "]/tempprcpflag",  "N");
                             model.setValue ( prcpNode + "[" + srchRow + "]/drprcpetc6",    "" );
                         }else {
                             var popResncd      = getParameter("SPMMO19200_resncd");
                             var prnNum         = getParameter("SPMMO19200_prnNum");
                             var prncmt         = getParameter("SPMMO19200_resncmt");
                             var prnTerm        = getParameter("SPMMO19200_prnTerm");
                             var Sprnprcpdtl    = prnNum + "|" + popResncd + "|" + prncmt + "|" + prnTerm;
                             model.setValue ( prcpNode + "[" + srchRow + "]/drprcpetc6",Sprnprcpdtl );
                        }
                    }
                }
            }
        }
        
        if (prcpclscd == "A6" && selfprcpflag == "Y" ){ // 20101018 LYJ 주사제 상세용법 자동 팝업  
            var prcpClsCd = model.getValue ( prcpNode + "[ " + srchRow + "]/prcpclscd" );
            //var monitorResolutions = app.monitorResolution;
            //var monitorResolutionsArr = monitorResolutions.split('|');
            //var resolution = monitorResolutionsArr[monitorNumber-1];
            //var resolution_width = resolution.split(',')[0];
            //var resolution_height = resolution.split(',')[1];
            //var xpt = (resolution_width - 380) / 2; 
            //var ypt = (resolution_height - 119) / 2;

            var xpt = getScreenCenterPoint(0, 380);
            var ypt = getScreenCenterPoint(1, 119);
            
            modal ( "SPMMO01200", null,  xpt, ypt, "prcpdetl", prcpNode + "[" +  srchRow + "]", prcpNode, "sysmenu:hidden", false );
            
            if ( getParameter("SPMMO01200_selfprcpflag") == "N"){
                model.removeNode ( prcpNode + "[" +  srchRow + "]" );
                model.recalculate();
                grd_prcplist.refresh();
                clearParameter ( "SPMMO01200_selfprcpflag" );
                return srchRow-1;
            } else {
                fPrcpDetlApp ( prcpClsCd, "/root/prcptemp/prcplist", "/root/main/prcp", srchRow ); 
            }
        }
    } else if ( prcpclscd == "B2" || prcpclscd == "B6" ) { //진단검사 검체 팝업
         fGetSpc ( srchRow );
    } 

    if ( prcpclscd == "A6" || prcpclscd == "F2" ) {
        var prcpinptflag = model.getValue ( prcpNode + "[" + srchRow + "]/prcpinptflag");
        if ( prcpinptflag == "01" || prcpinptflag == "02" ) {
            var prcpdayno = model.getValue ( prcpNode + "[" + srchRow + "]/prcpdayno");
            if ( !isNull(prcpdayno) && prcpdayno > 1 ) {
                if( prcpclscd == "A6" || model.getValue ( prcpNode + "[" + srchRow + "]/prcpcd") == "MUR0001" ){
                  // by sonjy 2008-08-07 재활(요실금제외)  약속set copy시 약속set의 일수와 다르게 copy되는 부분 막음. 조과장님 요청. 
                  model.setValue ( prcpNode + "[" + srchRow + "]/prcpdayno", "1" );  
                  model.setValue ( prcpNode + "[" + srchRow + "]/contprcpspec", "-" );
                }
            }
        }
    }

    //start: 영상 검사 자동팝업에서 취소를 한 경우, copy한 처방 취소 처리 (2010.02.02 JJE)
    if( getParameter("cnclCopyPrcpYN_Param") == "Y" ){
        model.removeNode ( prcpNode + "[" +  srchRow + "]" );
        model.recalculate();
        grd_prcplist.refresh();
        clearParameter ( "cnclCopyPrcpYN_Param" );
        return srchRow-1;
    }
    //end

    //  HLA검사 공여자 정보 등록.   
    // hardcode 170 처방 중 공여자가 등록될 시 자동 본인부담 처리 setValue는 화면단에서 2009.11.17 이윤정
    if ( model.getValue ( "/root/initsrch/pretest/trgtcd" ) == "Y" ) {
        if ( getParameter("SPMMO15600_srchRow") == "" ) {
            if ( !isNull(model.getValue ( "/root/initsrch/hlaprcpcd[prcpcd='" + prcpcd + "']/prcpcd" ))) {
                var hlaselfprcpcd = model.getValue("/root/initsrch/hlaselfprcpcd/trgtcd");
                setParameter("SPMMO15600_hlaselfprcpcd", hlaselfprcpcd);
                setParameter("SPMMO15600_srchRow", srchRow);
                modal ( "SPMMO15600" );
                
                var dnorAddcnt = getParameter("SPMMO15600_addcnt");
                clearParameter("SPMMO15600_srchRow");
                clearParameter("SPMMO15600_addcnt");
                srchRow = dnorAddcnt ;
            }
        }
    }

    //model.addLog("    *************    End Of addPrcpPop()");  
    
    return srchRow
}

/**@desc   : 처방 복사시 처방상세팝업 관리
 * @return : void
 * @authur : 엄영만 2013.07.25
 *           서버에서 체크 하는 로직에 맞춰 신규 생성
 */
function addPrcpPop_App(srchRow, usge) {
    //model.addLog("    *************    Start Of addPrcpPop()");  
    var prcpgenrflag = "";
    var prcpclscd    = model.getValue ( prcpNode + "[" + srchRow + "]/prcpclscd");
    var sChoiOrdFlag = model.getValue ( prcpNode + "[" + srchRow + "]/choiordflag");
    var sSpecDrId    = model.getValue ( prcpNode + "[" + srchRow + "]/specdrid");
    
    //2011.11.07 엄영만 선택진료여부 및 선택진료의사 셋팅
	if("D2" != prcpclscd || "prcp" != usge){ // 처방시에 병리처방은 의뢰지 팝업후 검체코드설정되면 선택의사 설정 함.(의뢰지 작성후 팝업 되도록) 2011.11.25 엄영만.
		if(sChoiOrdFlag == "Y" && (sSpecDrId == "" || sSpecDrId == "-")){
		    fChgChoiDr ( "auto", srchRow );
	    }
	} // end if
      
    if ( usge == "prcp" ) {
        var prcpessninptflag = model.getValue ( prcpNode + "[" + srchRow + "]/prcpessninptflag");
        var prnprcpflag      = model.getValue ( prcpNode + "[" + srchRow + "]/prnprcpflag");
        var selfprcpflag     = model.getValue ( prcpNode + "[" + srchRow + "]/selfprcpflag");
        var drugmastspec     = model.getValue ( prcpNode + "[" + srchRow + "]/drugmastspec");
        var tempcol2         = model.getValue ( prcpNode + "[" + srchRow + "]/tempcol2");
      
        if ( prcpessninptflag == "1" || prcpessninptflag == "2" || prcpessninptflag == "3" || prcpessninptflag == "4" || prcpessninptflag == "5" ){
            var pid     = model.getValue ( "/root/paminfo/list/pid" );
            var indd    = model.getValue ( "/root/paminfo/list/indd" );
            var cretno  = model.getValue ( "/root/paminfo/list/cretno" );
            var ordtype = model.getValue ( "/root/paminfo/list/ordtype" );
            
            if ( ordtype == "O" || ordtype == "S" ) {
                prcpgenrflag = "O";
            } else {
                prcpgenrflag = "I";
            }

            model.setValue ( "/root/send/cond1", pid );
            model.setValue ( "/root/send/cond2",  indd );
            model.setValue ( "/root/send/cond11",  cretno );
            model.setValue ( "/root/send/cond9",  prcpgenrflag );
            
            submit("TRMMO00130");
            var opansCnt = model.getValue ("/root/opanssrch/opansinfo/opanscnt");
            
            for (var i=1; i < grd_prcplist.rows; i++) {  
                if ( i != srchRow && model.getValue ( prcpNode + "[" + i + "]/prcpclscd") == "H2" && 
                     (model.getValue ( prcpNode + "[" + i + "]/prcpessninptflag") == "3" || model.getValue ( prcpNode + "[" + i + "]/prcpessninptflag") == "5" )) {
                        opansCnt++; 
                }
            }
            
            if (opansCnt == 0 && model.getValue ( prcpNode + "[" + srchRow + "]/opansflagcd") == "-") {
                model.setValue ( prcpNode + "[" + srchRow + "]/opansflagcd", "4" ); //주수술
            }
            
            fCpInPrcpVisible();
            model.refresh();
            fPrcpDetl( srchRow, "", "480", "auto" );
        } else if ( prcpclscd == "C2" ) { //20090120 prcpclscd == "E2" 는 존재하지 않아서 지운다.
            // 2007-12-17 마정민 수정 진료 ITC 요청에 의해 방사선 처방 임상소견 필수입력을 위한 자동 팝업 단순방사선 검사를 제외한 나머지 영상검사라 하면, 특수방사선검사(수익분류-19), 방사선혈관조영술(20), 방사선초음파(21), 방사선CT(22), 방사선 BMD(23), 방사선HIFU(24), 방사선MRI(25), 외부영상판독CD(26) 를 말함.
            var ck = tempcol2.substring ( 0, 2 );
            if (ck=="19"||ck=="20"||ck=="21"||ck=="22"||ck=="23"||ck=="24"||ck=="25"||ck=="26" || model.getValue ( prcpNode + "[" + srchRow + "]/tempcol2") == "18|02|06") {
                fCpInPrcpVisible();
                model.refresh();
                fPrcpDetl( srchRow, "", "480", "auto" );
            }
        } else if ( prcpclscd == "C6") {
            /* 20090717 kimsj(핵의학 류형기)
            * PET CT처방 임상소견 필수입력위한 자동팝업 추가 (수익분류3 기타인 경우 제외) 
            * 핵의학(09)-감마영상검사(09)-근골격(04) 임상소견 필수입력위한 자동팝업 추가 2013.02.06 엄영만
            */
            var ck = tempcol2.substring ( 0, 5 );
            var dk = tempcol2.substring ( 6, 8 );
            if ( (ck == "09|02" && dk != "04") || (ck == "09|01" && dk == "04") ) {
                fCpInPrcpVisible();
                model.refresh();
                fPrcpDetl( srchRow, "", "480", "auto" );
            }
        } else if ( prcpclscd == "Z0") { // 2015.03.05 신체억제대 처방 전달사항 필수 입력 처리
            var sPrcpCd = model.getValue ( prcpNode + "[" + srchRow + "]/prcpcd");
            if(sPrcpCd == "PE100") {
                fPrcpDetl( srchRow, "", "480", "auto" ); // 상세팝업
            } 
        }
                
        //CP 추가처방은 의뢰지 skip (2008.09.02 JJE)
        if( model.getValue("/root/cp") != "Y" ){
            fReqfrm ( srchRow, "copy" );
        }else{
            if( curSavePrcpFlag_SMMMO00110 != "T" ){    //CP화면에서 미래처방인 경우, 의뢰지 팝업 skip
                fReqfrm ( srchRow, "copy" );
            }
        }

        if ( prcpclscd == "B4" ) { //수혈 (혈액수혈)
            //수혈적응증 입력을 위해 수혈 상세팝업
            fPrcpDetl( srchRow, "", "480", "auto" ); // 무조건 상세팝업
            var addcnt = getParameter ( "SPMMO01500_addcnt" );
            clearParameter ( "SPMMO01500_addcnt" );  
            if ( addcnt != null && addcnt != 0 ) {
                srchRow = eval(srchRow) + eval(addcnt);
            }
        } else if ( prcpclscd == "03" ) {           // 식이일 때는 자동팝업
            var dietprcpgenrflag = model.getValue ( prcpNode + "[" + srchRow + "]/dietprcpgenrflag");
            if ( isNull(dietprcpgenrflag) || dietprcpgenrflag == "-" ) {
                fPrcpDetl( srchRow, "", "480", "auto" );
                if ( dietcnt != null && dietcnt != 0 ) {
                    srchRow = eval(srchRow) + eval(addcnt) -1;
                }
            }
        }
    } 

    if ( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" ) {
        var drprcpetc6 = model.getValue ( prcpNode + "[" + srchRow + "]/drprcpetc6");
        var drugmthdspccd = model.getValue ( prcpNode + "[" + srchRow + "]/drugmthdspccd");
        if ( isNull(drugmthdspccd) || drugmthdspccd == "-" ) {
            setParameter ( "SPMMO01900_srchRow", srchRow );
            fPrcpModal ( "SPMMO01900", 280, 100 );
            clearParameter ( "SPMMO01900_srchRow" );
        }
        if ( model.getValue("/root/hidden/prnprcpyninfo/hardcd/hardcd")=="Y" &&  model.getValue ( "/root/cp" ) != "Y"){
             if (prnprcpflag == "Y"){//  2009.12.31  LYJ PRN처방 여부를 가려 횟수와 사유를 입력받는다.
                 var prnl = getArrayData ( drugmastspec, 0, 33, "^", "|" );
                 if (prnl=="N"){
                     messageBox ( "PRN 처방이 불가능한 처방입니다. PRN 지정을 자동 해지합니다." , "E" );
                     model.setValue ( prcpNode + "[" + srchRow + "]/prnprcpflag", "N" );
                     model.setValue ( prcpNode + "[" + srchRow + "]/tempprcpflag", "N" );
                     model.setValue ( prcpNode + "[" + srchRow + "]/prcpnm",model.getValue(prcpNode + "[" + srchRow + "]/orgprcpnm" ));
                     model.setValue ( prcpNode + "[" + srchRow + "]/drprcpetc6", "" );
                 }else {
                    if (drprcpetc6 == "-" || drprcpetc6 =="" ){
                        var prcpinptflag = model.getValue ( prcpNode + "[" + srchRow + "]/prcpinptflag");
                        var monitorNumber = app.monitorNumber;
                        var monitorResolutions = app.monitorResolution;
                        var monitorResolutionsArr = monitorResolutions.split('|');
                        var resolution = monitorResolutionsArr[monitorNumber-1];
                        var resolution_width = resolution.split(',')[0];
                        var resolution_height = resolution.split(',')[1];
                        var xpt = (resolution_width - 246) / 2;
                        var ypt = (resolution_height - 119) / 2;

                         setParameter ( "SPMMO19200_pop", "bfprcp" );
                         setParameter ( "SPMMO19200_prcpcd", model.getValue(prcpNode + "[" + srchRow + "]/prcpcd" ) );
                         setParameter ( "SPMMO19200_prcpnm", model.getValue(prcpNode + "[" + srchRow + "]/prcpnm" ) );
                         
                         modal("SPMMO19200",monitorNumber,xpt, ypt, "SPMMO19200", "/root/tmp/prnresncd", "/root/main/prcp/prcplist/prnresncd", "sysmenu:hidden;", false ); 

                         var popPrnyn = getParameter ( "SPMMO19200_rtn1" );
                         if (popPrnyn == "N") {
                             model.setValue ( prcpNode + "[" + srchRow + "]/prnprcpflag", "N" );
                             model.setValue ( prcpNode + "[" + srchRow + "]/prcpnm",model.getValue(prcpNode + "[" + srchRow + "]/orgprcpnm" ));
                             model.setValue ( prcpNode + "[" + srchRow + "]/tempprcpflag","N");
                             model.setValue ( prcpNode + "[" + srchRow + "]/drprcpetc6", "" );
                         }else {
                             var popResncd  = getParameter("SPMMO19200_resncd");
                             var prnNum     = getParameter("SPMMO19200_prnNum");
                             var prncmt     = getParameter("SPMMO19200_resncmt");
                             var prnTerm    = getParameter("SPMMO19200_prnTerm");
                             var Sprnprcpdtl = prnNum + "|" + popResncd + "|" + prncmt + "|" + prnTerm;
                             model.setValue ( prcpNode + "[" + srchRow + "]/drprcpetc6",Sprnprcpdtl );
                        }
                    }
                }
            }
        }
        
        if (prcpclscd == "A6" && selfprcpflag == "Y" ){ // 20101018 LYJ 주사제 상세용법 자동 팝업  
            var prcpClsCd = model.getValue ( prcpNode + "[ " + srchRow + "]/prcpclscd" );
            var xpt = getScreenCenterPoint(0, 380);
            var ypt = getScreenCenterPoint(1, 119);
            
            modal ( "SPMMO01200", null,  xpt, ypt, "prcpdetl", prcpNode + "[" +  srchRow + "]", prcpNode, "sysmenu:hidden", false );
            
            if ( getParameter("SPMMO01200_selfprcpflag") == "N"){
                model.removeNode ( prcpNode + "[" +  srchRow + "]" );
                model.recalculate();
                grd_prcplist.refresh();
                clearParameter ( "SPMMO01200_selfprcpflag" );
                return srchRow-1;
            } else {
                fPrcpDetlApp ( prcpClsCd, "/root/prcptemp/prcplist", "/root/main/prcp", srchRow ); 
            }
        }
    } else if ( prcpclscd == "B2" || prcpclscd == "B6" ) { //진단검사 검체 팝업
         fGetSpc ( srchRow );
    } 

    if ( prcpclscd == "A6") { // by sonjy 2008-08-07 약속set copy시 약속set의 일수와 다르게 copy되는 부분 막음. 조과장님 요청. 
        var prcpinptflag = model.getValue ( prcpNode + "[" + srchRow + "]/prcpinptflag");
        if ( prcpinptflag == "01" || prcpinptflag == "02" ) {
            var prcpdayno = model.getValue ( prcpNode + "[" + srchRow + "]/prcpdayno");
            if ( !isNull(prcpdayno) && prcpdayno > 1 ) {
                model.setValue ( prcpNode + "[" + srchRow + "]/prcpdayno", "1" );  
                model.setValue ( prcpNode + "[" + srchRow + "]/contprcpspec", "-" );
            }
        }
    }

    //start: 영상 검사 자동팝업에서 취소를 한 경우, copy한 처방 취소 처리 (2010.02.02 JJE)
    if( getParameter("cnclCopyPrcpYN_Param") == "Y" ){
        model.removeNode ( prcpNode + "[" +  srchRow + "]" );
        model.recalculate();
        grd_prcplist.refresh();
        clearParameter ( "cnclCopyPrcpYN_Param" );
        return srchRow-1;
    }//end

    //model.addLog("    *************    End Of addPrcpPop()");  
    
    return srchRow
}

/**@desc   : 믹스번호처리
 * @return : void
 * @authur : 마정민 2007.10.09
 */
function fMixNoCnt() {
    var selectedRows = grd_prcplist.selectedRows;
    var cnt = 0;
    for ( var i=selectedRows-1; i >= 0; i-- ){
        //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
        var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
        if ( selprcpclscd == "A6" ) {
            cnt++
        } else {
            grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;           
        }
    }
    if ( cnt <= 1 ) {
        messageBox ( "Mix할 처방이 ", "E014");
    } else {
        var selectedRows = grd_prcplist.selectedRows;

        //20090203 마정민수정: 항암과 TPN, 무균조제약은 서로 MIX되지 않도록 제한 기능 추가
        for ( var i=selectedRows-1; i >= 0; i-- ){
            spcldrug = getArrayData ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/drugmastspec" ) + "^", 0, 23, "^", "|" );
            if (spcldrug == "B" || spcldrug == "C" || spcldrug == "D" || spcldrug == "T" || spcldrug == "Q" ) {
                for ( var j=selectedRows-1; j >= 0; j-- ){
                    chkspcldrug = getArrayData ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(j) + "]/drugmastspec" ) + "^", 0, 23, "^", "|" );
                    if (chkspcldrug == "B" || chkspcldrug == "C" || chkspcldrug == "D" || chkspcldrug == "T" || chkspcldrug == "Q") {
                        if (spcldrug != chkspcldrug) {                          
                            messageBox ( "항암, TPN, 무균조제약은 서로 MIX", "E001");
                            return;
                        }
                    }
                }
            }
        }

        var prcpmixno = eval(model.getValue ( "/root/init/prcpmixno" )) + 1;
        for (var i=0; i< selectedRows; i++) {       
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpmixno", prcpmixno );
            makePrcpNm( prcpNode, grd_prcplist.selectedrow(i) );
            
            gGridUpdateChk("pack", i);  // 임시저장 수정 모드 
            fSetCpVal(grd_prcplist.selectedrow(i), "U");
        }
         model.setValue ( "/root/init/prcpmixno", prcpmixno );

         for (var i=1; i < grd_prcplist.rows; i++) {        
            var chkPrcpmixno = model.getValue ( prcpNode + "[" + i + "]/prcpmixno" );
            //믹스번호가 있는 것중에
            if ( chkPrcpmixno != "-" && !isNull(chkPrcpmixno)) {
                //삭제를 제외하고 값이 한개 밖에 없으면 mix를 해제해 준다.
                var srcNodeList = model.instances(0).selectNodes ( prcpNode + "[prcpmixno='" + chkPrcpmixno + "']" );
                if ( srcNodeList.length <= 1) {
                    model.setValue ( prcpNode + "[" + i + "]/prcpmixno", "-" );
                    makePrcpNm( prcpNode, i );
                }
            }
        } 

    }
}

/**@desc   : 믹스번호취소처리
 * @return : void
 * @authur : 마정민 2007.10.16
 */
function fMixNoDel() {
    var selectedRows = grd_prcplist.selectedRows;
    var cnt = 0;
    for ( var i=selectedRows-1; i >= 0; i-- ){
        //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
        var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
        if ( selprcpclscd == "A6" ) {
            cnt++
        } else {
            grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;           
        }
    }

    var selectedRows = grd_prcplist.selectedRows;
    for (var i=0; i< selectedRows; i++) {       
        model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpmixno", "-" );
        makePrcpNm( prcpNode, grd_prcplist.selectedrow(i) );
        
        fSetCpVal(grd_prcplist.selectedrow(i), "U");
    }

     for (var i=1; i < grd_prcplist.rows; i++) {        
        var chkPrcpmixno = model.getValue ( prcpNode + "[" + i + "]/prcpmixno" );
        //믹스번호가 있는 것중에
        if ( chkPrcpmixno != "-" && !isNull(chkPrcpmixno)) {
            //삭제를 제외하고 값이 한개 밖에 없으면 mix를 해제해 준다.
            var srcNodeList = model.instances(0).selectNodes ( prcpNode + "[prcpmixno='" + chkPrcpmixno + "']" );
            if ( srcNodeList.length <= 1) {
                model.setValue ( prcpNode + "[" + i + "]/prcpmixno", "-" );
                makePrcpNm( prcpNode, i );
            }
        }
    } 
}

/**@desc   : 특수조제믹스번호처리
 * @return : void
 * @authur : 마정민 2007.10.09
 */
function fTMixNoCnt() {
    var selectedRows = grd_prcplist.selectedRows;
    var cnt = 0;
    for ( var i=selectedRows-1; i >= 0; i-- ){
        //첫번째 SELECT 된 것을 기준으로 다른 것은 SELECT를 해제한다.
        var selprcpclscd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpclscd" );
        if ( selprcpclscd == "A6" ) {
            cnt++
        } else {
            grd_prcplist.select( grd_prcplist.selectedrow(i), 1, grd_prcplist.selectedrow(i), 1) = false;           
        }
    }
    if ( cnt <= 1 ) {
        messageBox ( "Mix할 처방이 ", "E014");
    } else {
        var selectedRows = grd_prcplist.selectedRows;
        var prcpmixno = eval(model.getValue ( "/root/init/prcpmixno" )) + 1;
        for (var i=0; i< selectedRows; i++) {       
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpmixno", "T" + prcpmixno );
            makePrcpNm( prcpNode, grd_prcplist.selectedrow(i) );
            
            fSetCpVal(grd_prcplist.selectedrow(i), "U");
        }
         model.setValue ( "/root/init/prcpmixno", prcpmixno );

         for (var i=1; i < grd_prcplist.rows; i++) {        
            var chkPrcpmixno = model.getValue ( prcpNode + "[" + i + "]/prcpmixno" );
            //믹스번호가 있는 것중에
            if ( chkPrcpmixno != "-" && !isNull(chkPrcpmixno)) {
                //삭제를 제외하고 값이 한개 밖에 없으면 mix를 해제해 준다.
                var srcNodeList = model.instances(0).selectNodes ( prcpNode + "[prcpmixno='" + chkPrcpmixno + "']" );
                if ( srcNodeList.length <= 1) {
                    model.setValue ( prcpNode + "[" + i + "]/prcpmixno", "-" );
                    makePrcpNm( prcpNode, i );
                }
            }
        } 

    }
}

function fFollowUp() {

    var pid = model.getValue ( "/root/paminfo/list/pid" );
    var indd = model.getValue ( "/root/paminfo/list/indd" );
    var cretno = model.getValue ( "/root/paminfo/list/cretno" );
    model.setValue ( "/root/send/cond1", pid );
    model.setValue ( "/root/send/cond2",  indd );
    //model.setValue ( "/root/send/cond3",  cretno ); 
    
    //퇴원예고여부가 먼저 CHECK되고 퇴원후 외래예약이 CHECK되도록 수정 by sonjy 2008-07-22 
    //cond3에 cretno를 줄경우 자꾸 null이 넘어감. cond4로 수정. 제한항생제 승인신청서 취소 후 해당 현상 발생하며 오류 발생.
    model.setValue ( "/root/send/cond3",  "" ); 
    model.setValue ( "/root/send/cond4",  cretno );  
 
    //기존에 해당 입원 원무키로 퇴원후 외래 예약이 있는지 체크
    if (  submit ( "TRMMO00119", false ) == false )   return false;  
 
    //submit ( "TRMMO00119", false );

    if ( isNull(model.getValue ( "/root/followup/followup/otpt_pid" ))) {
        fPrcpModal ( "SPMMO14400", 350, 200 );
        var SPMMO14400_rtnyn = getParameter ( "SPMMO14400_rtnyn" );
        clearParameter ( "SPMMO14400_rtnyn" );
        
        if ( SPMMO14400_rtnyn  == "Y" ) {                   
            var otpt_flag       = "I";
            var otpt_orddd      = getParameter ( "SPMMO14400_otpt_orddd" );
            var otpt_orddeptcd  = getParameter ( "SPMMO14400_orddeptcd" );
            var otpt_orddrid    = getParameter ( "SPMMO14400_orddrid" );
            var otpt_ordtm      = getParameter ( "SPMMO14400_ordtm" );
            var otpt_rsrvflag   = "8";
            var sess_userid     = getUserInfo ( "userid" );
            
            clearParameter ( "SPMMO14400_otpt_orddd" );
            clearParameter ( "SPMMO14400_orddeptcd" );
            clearParameter ( "SPMMO14400_orddrid" );
            clearParameter ( "SPMMO14400_ordtm" );
                                                                            
            model.setValue ( "/root/send/cond1", otpt_flag );
            //model.setValue ( "/root/send/cond2", pid );
            model.setValue ( "/root/send/cond3", model.getValue ( "/root/paminfo/list/dschdclrdt" ).substring( 0, 8 ));
            model.setValue ( "/root/send/cond4", otpt_orddeptcd );
            model.setValue ( "/root/send/cond5", otpt_orddrid );                                                               
            model.setValue ( "/root/send/cond6", otpt_ordtm );                                                             
            model.setValue ( "/root/send/cond7", otpt_rsrvflag );                                                                              
            model.setValue ( "/root/send/cond8", sess_userid );                                                                                
            model.setValue ( "/root/send/cond9",  indd );
            model.setValue ( "/root/send/cond10", cretno );
            model.makeValue("/root/send/cond11", pid);  //cond2는 처방저장 instance로 뒤덮어진다. 등록번호는 cond11로 2008.06.24
            if (submit ( "TXMMO00107", false )){
                for ( var i=1; i <= grd_prcplist.rows; i++ ) {
                    //퇴원후 외래처방 예약일 잡고 확인누르면 퇴원후 외래처방 PRCPHOPEDD를 모두 예약일로 수정한다.
                    //입원전검사(당일/전일)도 퇴원후 외래와 같은 처리 by sonjy 2008-07-25
                    if ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpkindcd" ) == "70" ||
                         model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpkindcd" ) == "90" ||
                         model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpkindcd" ) == "95" ) {
                        model.setValue ( "/root/main/prcp/prcplist[" + i + "]/prcphopedd", otpt_orddd );
                    }
                }
                return true;
            } else {
                return false;
            }
        } else {
            return false;
        }
    } else {
        return true;
    }
    return true;
}

/**@desc   : CP 안에 있는 처방이 팝업 및 에러로 보여져야 함
 * @
 * @return :
 * @author : 마정민
 * @---------------------------------------------------
 */
function fCpInPrcpVisible () {
    if ( model.getValue ( "/root/cp" ) == "Y") {
        if( invalYN_SMMMO00110 == "N" && prtlprcpstatus_SMMMO00110 != "U" ){
            // 다른 iviewer는 hidden / 처방 import, iviewer는 visible
            btn_action_tab.selected = true;
            ivw_outline.visible     = false;
            ivw_detail.visible      = false;
            imp_prcp.visible        = true;
            if(btn_ivbfprcp.selected){
                ivw_prcp2.visible = false;
                ivw_prcp3.visible = true;
            }else{
                ivw_prcp2.visible = true;
                ivw_prcp3.visible = false;
            }
        }
    }
}

/**@desc   : 처방 화면 close
 * @
 * @return :
 * @author : 오지훈 20087. 10. 14
 * @---------------------------------------------------
 */
function fClose_SMMMO00100(){
    model.close();
}

/**@desc   : 원무정보 재구성
 * @
 * @return :
 * @author : 오지훈 20087. 10. 14
 * @---------------------------------------------------
 */
function fReConPamInfo(){
  fPatDiagSrch();
  
  var pamInfoCvs = getGlobalVariable("paminfo");  
  var insukindcd = getPatientInfoDetail("insukind");
  var vopt_insuinfo = "";
  if(pamInfoCvs != null){ //cvs가 null이 아닌 경우에만 처리함.
      model.removeNodeSet ( "/root/paminfo/list" ); //상단화면 정보 초기화
      setCSVToNode ( "/root/paminfo", pamInfoCvs );
      model.setValue ( "/root/init/pid", model.getValue ( "/root/paminfo/list/pid" ));
      var vopt_patinfo  = model.getValue ( "/root/paminfo/list/dispnm2" ) + " " + model.getValue ( "/root/paminfo/list/sex" ) + "/" + model.getValue ( "/root/paminfo/list/age" );
      if ( model.getValue ( "/root/paminfo/list/roomcd" ) != "" ){
          vopt_patinfo = vopt_patinfo + " " + model.getValue ( "/root/paminfo/list/roomcd" ) + "호";
      }
     
      if (insukindcd == "21"){
        vopt_insuinfo = "[의료급여1]";
      }else if (insukindcd == "22"){
        vopt_insuinfo = "[의료급여2]";
      }else if (insukindcd == "81"){
        vopt_insuinfo = "[장기요양]";
      }else{
        vopt_insuinfo =   "[" + getPatientInfo("insukind") + "]" ;
      }
        model.setValue ( "/root/init/insuinfo", vopt_insuinfo );
     if ( insukindcd == "31" || insukindcd =="41"){
        if (getPatientInfoDetail("ioflag") == "O"){
        messageBox ( "자보/산재 환자입니다. \n관련 처방을 모두 [급여]로 처방하여 주시기 바랍니다.\n기왕증은 건강보험으로 재접수하여 처방해 주시기 바랍니다.", "I" );
        }else
         messageBox ( "자보/산재 환자입니다. \n관련 처방은 모두 [급여]로 처방하여 주시기 바랍니다. \n그 외 처방은 처방 상세팝업에서 기왕증 체크 후 처방해 주시기 바랍니다.", "I" );
        }
     model.setValue ( "/root/init/patinfo", vopt_patinfo );
     
  }

  var patFlagCvs = getGlobalVariable("patflag");    

  if(patFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
      model.removeNodeSet ( "/root/patflag/list" ); //상단화면 정보 초기화
      setCSVToNode ( "/root/patflag", patFlagCvs );
      prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
  } 
  

  var operationFlagCvs = getGlobalVariable("operation");  

  if(operationFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
      model.removeNodeSet ( "/root/operation/list" ); //상단화면 정보 초기화
      setCSVToNode ( "/root/operation", operationFlagCvs );
  }
}

/**@desc   : 응급의료 관리료 수정
 * @
 * @return :
 * @author : 마정민 20087. 10. 16
 * @---------------------------------------------------
*/
function fErMgrPay() {
    var prcpcd = model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.row + "]/prcpcd" );
    var status = model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.row + "]/status" );
    var trgtcd = model.getValue ( "/root/initsrch/ercalcscorcd[trgtcd='" + prcpcd + "']/trgtcd" );
    setParameter ( "SMMMO00100_cond1", "Y" );
    var erprcpyn = model.getValue ( "/root/initsrchprcp/prcpetccnts/erprcpyn" );
    var erprcpcd = getArrayData ( erprcpyn + "^", 0, 1, "^", "|" );
    // 응급의료 관리료 수정팝업 띄우기
    //1.수가코드가 ercalcscorcd 에 값이 있고

    if ( !isNull(trgtcd) || status == "S" ) {
        //2.erprcpyn가 Y이면 띄운다.
        setParameter ( "SMMMO06100_erprcpcd", "" );
        var erprcpyn = model.getValue ( "/root/initsrchprcp/prcpetccnts/erprcpyn" );
        if (model.getValue ( "/root/initsrchprcp/prcpetccnts/erprcpyn" ) != "Y" ){
            var erprcpcd = getArrayData ( erprcpyn + "^", 0, 1, "^", "|" );
            if ( erprcpcd != "-" || isNull(erprcpcd)) {
                setParameter ( "SMMMO06100_erprcpcd", erprcpcd );
            }
        }
        setParameter ( "SMMMO06100_currow", grd_prcplist.row );
        fPrcpModal ( "SMMMO06100", 0, 0 );
        clearParameter ( "SMMMO06100_currow" );
        clearParameter ( "SMMMO06100_erprcpcd" );
    }
}

/**@desc   : OCR 자동출력 
 * @
 * @return :
 * @author : 마정민 20087. 10. 17
 * @---------------------------------------------------
*/
function fOcrAutoPrint(calcscorcd) {
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    if ( prcpgenrflag == "O" || prcpgenrflag == "S" )  {
        var orddd = model.getValue ( "/root/paminfo/list/orddd" );
    } else {
        var orddd = model.getValue ( "/root/paminfo/list/indd" );               
    }

    model.setValue ( "/root/hidden/ocrprint/calcscor/pid", model.getValue ( "/root/paminfo/list/pid" ));
    model.setValue ( "/root/hidden/ocrprint/calcscor/cretno", model.getValue ( "/root/paminfo/list/cretno" ));
    model.setValue ( "/root/hidden/ocrprint/calcscor/orddd", orddd );
    model.setValue ( "/root/hidden/ocrprint/calcscor/ordtype", prcpgenrflag);
    model.setValue ( "/root/hidden/ocrprint/calcscor/calcscorcd", calcscorcd );
    
    var xpt = window.screenleft + 50;
    var ypt = window.screenTop + 50;                    
    var coord = getRelativeCoordinate ( xpt, ypt );
    var mon = coord[0];
    xpt = coord[1];
    ypt = coord[2];
    
    model.addLog("동의서 출력 - LSH");    
    model.addLog(model.instances(0).selectNodesXml("/root/hidden/ocrprint/calcscor"));        

    modal ( "SPMRF04500", mon,  xpt, ypt, "SSMRF03800", "/root/hidden/ocrprint/calcscor","/root/main/temp/calcscor", "", false );
}

/**@desc   : 검색button 초기화 setting
 * @return : void
 * @authur : 마정민 2007. 8. 20
 */
function fInitSrchBtnSet() {
    var srcNodeList = model.instances(0).selectNodes( "/root/initsrch/btnsrchenvcnts" );
    var btn_srchcnt = 0;


    for ( var i=1; i <= 16; i++ ) {
        if ( i <= srcNodeList.length ) {
            btn_srchcnt = i + 50;
            var btncd =model.getValue ( "/root/initsrch/btnsrchenvcnts[" + i + "]/btncd" );
            var btnnm = "button" + btn_srchcnt;
            var buttonObj = document.controls(btnnm);
            buttonObj.text = model.getValue ( "/root/initsrch/btnsrchenvcnts[" + i + "]/btnnm");
            buttonObj.visible = true;
            buttonObj.attribute("_value") = btncd;
        } else {
            btn_srchcnt = i + 50;
            var btnnm = "button" + btn_srchcnt;
            var buttonObj = document.controls(btnnm);
            buttonObj.visible = false;
        }
    }
}

/**@desc   : CP에서 약속set 만들때 값 setting
 * @param : 바꿔줄 상태값
 * @return :
 * @author : 2007. 10. 20
 * @---------------------------------------------------
*/
function fSetCpVal(i, flag) {
    if( model.getValue("/root/cp") == "S" ){
        var selectedRows = grd_prcplist.selectedRows;   
        
        if( model.getValue("/root/main/prcp/prcplist[" + i + "]/status") == "-" ){
            model.setValue("/root/main/prcp/prcplist[" + i + "]/status", flag);
        }
    }
}

/**@desc   : 외래검사처방 입원전환 ( 주사연속처방, 물리치료 연속처방은 제외 )
 * @return :
 * @author : 2007. 11. 29
 * @---------------------------------------------------
*/
function fSaveRsrvPrcpCvrt() {
    //kimsj 100311 환자입원과, 의사진료과 동일할 경우에만 팝업창 보여줌
    var userdept = getUserInfo ( "dutplcecd" );
    var pamdept = model.getValue ( "/root/paminfo/list/orddeptcd" );
    if ( model.getValue ( "/root/initsrchprcp/prcpetccnts/rsrvprcpyn" ) == "Y" && ( userdept == pamdept ) ){
        var xpt = window.screenleft + 200;
        var ypt = window.screenTop + 100;
        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];
        modal ( "SPMMO01000", mon,  xpt, ypt, "SPMMO01000", "/root/initsrchprcp", "/root/initsrch", "", false );
        if ( getParameter ( "SPMMO01000_rtnyn" ) == "Y" ) {
            btn_ivbfprcp.selected = true;
            ivw_prcp3.src = "SMMMO02100_전회처방.xrw";
        }
    }
}

/**@desc   : 수가조회 open
 * @
 * @param  :
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fOpenCalscorCD(){
  var currow = grd_prcplist.row;
  if(currow < 1){
    return;
  }
  var prcpcd = model.getValue(prcpNode + "[" + currow + "]/prcpcd");
  model.makeValue("/root/tmp/temp", prcpcd);
  modal("SMPIC00200", 1, 100, 200, "SMPIC00200", "/root/tmp/temp", "/root/temp");
}

/**@desc   : 보험정보 open
 * @
 * @param  :
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fOpenInsuInfo(){
  var currow = grd_prcplist.row;
  if(currow < 1){
    return;
  }
  
  //보험정보 조회시 처방코드 전달, 김민선
  //2008.07.10 오지훈 
  var prcpcd = model.getValue(prcpNode + "[" + currow + "]/prcpcd");
  model.removeNode("/root/tmp/prcpcd");
  model.makeValue("/root/tmp/prcpcd", prcpcd);
  modal("SPPIZ01600", 1, 100, 200, "SPPIZ01600", "/root/tmp/prcpcd", "/root/send/item3/calcscorcd");
  
  /*
  var pid = model.getValue("/root/paminfo/list/pid");
  model.makeValue("/root/tmp/pid", pid);  
  modal("SPPIZ01600");  
  modal("SPPIZ01600", 1, 100, 200, "SMPMC01400", "/root/tmp/pid", "/root/hidden/source/pid");
  */
}

/**@desc   : 검사실별 예약현황
 * @
 * @param  :
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fOpenExamRsrvInfo(){
  var currow = grd_prcplist.row;
  if(currow < 1){
    return;
  }
  modal("SMAEA00900", 1, 100, 200);
}

/**@desc   : 진료기록화면 Open 
 *         : 메인화면에 기록지가 없는 경우, 새 기록지 open 
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fOpenOrdRecMainWnd(){
   var mainObj = getMainViewer();
   var scrnID = mainObj.javascript.getScreenID();
   if(scrnID == "SMMMR00100"){
      mainObj.javascript.fInitPamInfo();         //원무기본정보 초기화처리
   }else{
      mainObj.javascript.navigate("SMMMR00100");
   }
}

/**@desc   : 조영제 동의서 출력
 *         : 
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fPrintfrm() {  
    
    if ( model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/testreqlnkno") == "DYENO" ) {

        var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
        if ( prcpgenrflag == "O" || prcpgenrflag == "S" )  {
            var orddd = model.getValue ( "/root/paminfo/list/orddd" );
        } else {
            var orddd = model.getValue ( "/root/paminfo/list/indd" );               
        }
        
        model.setValue ( "/root/hidden/ocrprint/calcscor/pid",          model.getValue ( "/root/paminfo/list/pid" ));
        model.setValue ( "/root/hidden/ocrprint/calcscor/cretno",       model.getValue ( "/root/paminfo/list/cretno" ));
        model.setValue ( "/root/hidden/ocrprint/calcscor/orddd",        orddd );
        model.setValue ( "/root/hidden/ocrprint/calcscor/ordtype",      prcpgenrflag);
        model.setValue ( "/root/hidden/ocrprint/calcscor/calcscorcd",   model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpcd"));
        model.makeValue ( "/root/hidden/ocrprint/calcscor/prcpyn",       "Y"); // 처방시 팝업 여부

        var xpt = window.screenleft + 400;
        var ypt = window.screenTop + 100;
        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];
        modal ( "SPAER01900", mon,  xpt, ypt, "prcpdetl", "/root/hidden/ocrprint/calcscor", "/root/hidden/ocrprint/calcscor", "", false );

        if ( getParameter("SPAER01900_lnkno" ) == "216" ) {
            model.setValue ( prcpNode + "[" + grd_prcplist.row + "]/testreqlnkno", "216" );
        } else {
            model.setValue ( prcpNode + "[" + grd_prcplist.row + "]/testreqlnkno", "DYENO" );
        }
    }
}

function fClearSaveInstance() {
    model.removeNodeset ( "/root/send/cond3/prcplist" );
}

function fAppendSaveNode( desNode, srcNodeList ) {
    var saveDrPrcpList = model.instances(0).selectNodes( srcNodeList );    //의사처방 저장데이터
    for(var i = 0; i < saveDrPrcpList.length; i++) {
        var destNode = model.instances(0).selectSingleNode( desNode );
        destNode.appendChild(saveDrPrcpList.item(i).cloneNode(true));
    }
}

/**@desc   : 약속수술 등록 
 * @param  :
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fPrmsOp(){
    if(btn_prmsop.selected == true) {
        if(model.getValue("/root/cp") != "Y"){
            ivw_prcp.window.javascript.fPrmsOp();
        }else{
            ivw_prcp2.window.javascript.fPrmsOp();
        }

    }else{
        btn_prmsop.dispatch("DOMActivate");
        btn_prmsop.selected = true;
        messageBox("수술SET 폴더를 선택하세요.", "E");
    }
}

/**@desc   : 마감후 반환 체크 및 사유 입력 ( 반환가능한 것 중에서 마감된 것은 반환사유 입력후 d/c )
 * @param  :
 * @return :
 * @author : 마정민
 * @---------------------------------------------------
 */
function fEndAftDC(){
    var srcNodeList = model.instances(0).selectNodes( "/root/result/saveexecprcplist" );
    var dclistcnt = 0;
    var ioflag = "O";
    for ( var i=1; i<=srcNodeList.length; i++ ) {   
        if (model.getValue ("/root/result/saveexecprcplist[" + i + "]/exec_status") == "C"
            && isNull(model.getValue ("/root/result/saveexecprcplist[" + i + "]/exec_mig" ))) {
            var enddd = model.getValue ("/root/result/saveexecprcplist[" + i + "]/exec_enddd");
            if ( !isNull(enddd) &&  enddd.length >= 4 && enddd.substring( 0, 4 ) != "9999") {                        
                dclistcnt++;
                model.makeValue("/root/endaftdc/list[" + dclistcnt + "]/prcpdd", model.getValue ("/root/result/saveexecprcplist[" + i + "]/exec_prcpdd") );
                model.makeValue("/root/endaftdc/list[" + dclistcnt + "]/prcpno", model.getValue ("/root/result/saveexecprcplist[" + i + "]/exec_prcpno"));
                model.makeValue("/root/endaftdc/list[" + dclistcnt + "]/prcphistno", model.getValue ("/root/result/saveexecprcplist[" + i + "]/exec_oldprcphistno"));
                model.makeValue("/root/endaftdc/list[" + dclistcnt + "]/execprcpno", model.getValue ("/root/result/saveexecprcplist[" + i + "]/exec_oldexecprcpno"));
                model.makeValue("/root/endaftdc/list[" + dclistcnt + "]/instcd", model.getValue ("/root/result/saveexecprcplist[" + i + "]/exec_instcd"));          
                if ( model.getValue ( "/root/patflag/list/prcpgenrflag") == "O" ) ioflag = "O";
                else ioflag = "I";
                model.makeValue("/root/endaftdc/list[" + dclistcnt + "]/ioflag", ioflag);
            }
        }
    }
    if ( dclistcnt > 0 )    {
        var xpt = window.screenleft + eval(100);
        var ypt = window.screenTop + eval(100);

        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];
        modal("SPPAS03000", mon, xpt, ypt, "SPPAS03000", "root/endaftdc", "root/target", "left:100; top:100; width:400; height:400; sysmenu:hidden; min:visible; max:hidden; :hidden; resize:true; caption:visible;", false);
        model.removeNodeSet ( "/root/endaftdc" )        
    }

}

function fSubjPrcpChk() {

    submit("TRMMO00120", false);
    
    var ioflag = model.getValue ( "/root/paminfo/list/ioflag" );
    
    if (model.getValue("/root/temp/subjrgstyn") == "N" ){
        messageBox("임상연구 처방은 피험자등록" , "E012");
        return -1;
    }
    
    if (model.getValue("/root/temp/subjinsukindyn") == "N" ){        // 임상연구 유형이 없을때
        if (ioflag == "O"){
            messageBox("임상연구로 접수되지 않은 환자입니다." , "I007");
        } else {
            messageBox("보조유형에 임상연구가 없는 환자입니다." , "I007");
        }
        return -1;
    } else {        // 임상연구 유형이 있을때.
        if (ioflag == "I" || ioflag == "D" || ioflag == "E") {
            model.setValue("/root/init/subjsubcretno", model.getValue("/root/temp/subjinsukindyn") ); 
        }
    }
    
    return 1;
}

/**환자 주진단 색깔표시
 * @param 
 * grdobj : grid
 * color  : 표시색깔
 */
function fDispPatMainDiag(){
   for(var i = 1; i < grd_diaglist.rows; i++){
        var diagkindcdflag = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/diagkindcdflag");
        if(diagkindcdflag == "M"){
            grd_diaglist.RowStyle(i, "data", "background-color") = "#ccffff";
        }else{
            grd_diaglist.RowStyle(i, "data", "background-color") = "#ffffff";
        }       
   }
   // 처방 메인 refresh 단일화를 위한 셋팅 - 20081212 by Moonsh 
   var refreshInfo = getGlobalVariable("OrderMainRefresh"); 
   if ( refreshInfo != "Y" ) { 
      grd_diaglist.refresh(); 
   }   

}

/**@desc   : 항암제일때 항암제의 부서 setting , 퇴원후 외래/입원전검사 일경우 변경없이 ...
 * @param  :
 * @return :
 * @author : SONJY
 * @---------------------------------------------------
 */ 
function fDrugDeptcdChk(strDest, vRow){
    if( vRow < 0 || isNull(strDest) ) return false;
    
    var drugmastspec = model.getValue ( strDest + "/prcplist[" + vRow + "]/drugmastspec");
    var spcldrugAnti = "";
    var spcldrug = "";
    if ( isNull(drugmastspec)) {
        spcldrugAnti = model.getValue ( strDest + "/prcplist[" + vRow + "]/anticanflag");
        spcldrug     = model.getValue ( strDest + "/prcplist[" + vRow + "]/spcldrug");
    } else {
        spcldrugAnti = getArrayData ( drugmastspec + "^", 0, 24, "^", "|" );
        spcldrug     = getArrayData ( drugmastspec + "^", 0, 23, "^", "|" );
    }
    var orgdeptcd    = model.getValue ( strDest + "/prcplist[" + vRow + "]/prcpexecdeptcd");
    var prcpkindcd   = model.getValue ( strDest + "/prcplist[" + vRow + "]/prcpkindcd");
    var prcpclscd    = model.getValue ( strDest + "/prcplist[" + vRow + "]/prcpclscd");
    var testreqlnkno = model.getValue ( strDest + "/prcplist[" + vRow + "]/testreqlnkno");

    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    
    //항암제 주사 일경우, 퇴원후 외래/입원전검사 주사 일경우 수가매핑부서로
    if((( spcldrugAnti == "1" || spcldrugAnti == "2" ) &&  prcpclscd == "A6" ) || 
         (( prcpkindcd == "70" ||  prcpkindcd == "90" || prcpkindcd == "95" ) && prcpclscd == "A6" )
      ){
        return orgdeptcd ;
    }

    //20100609 수술중처방 집계 관련 보완. 시행부서가 회복실, 수술실이면 그대로 두고 아니면 수술실마취로 세팅.
    if ( prcpkindcd == "35" && getUserInfo( "dutplcecd" ) == model.getValue("/root/initsrch/anstdeptcd/trgtcd") &&
        ( model.getValue(strDest + "/prcplist[" + vRow + "]/prcpexecdeptcd") == model.getValue("/root/initsrch/recovdeptcd/trgtcd") ||
        model.getValue(strDest + "/prcplist[" + vRow + "]/prcpexecdeptcd") == model.getValue("/root/initsrch/opdeptcd/trgtcd")) ) {
        return orgdeptcd;
    }
    
    if ( "3240807000" == orgdeptcd ){ //20080828 특수조제실일 경우는 예외처리한다.
        return orgdeptcd ;
    }

    //20080825 마정민 수정 B: 소아TPN, C:무균조제, Q:완제품TPN, T:조제TPN  처방일 때 기존 부서 그대로 설정
    if ( prcpclscd == "A6" && ( spcldrug == "B" || spcldrug == "C" || spcldrug == "Q" || spcldrug == "T" )) {
        return orgdeptcd ;
    }

    if( prcpgenrflag != "O" ) {
        orgdeptcd = "3240300000"; //병동약국으로 default setting 
    }
    
    if( prcpclscd != "A6" ) return orgdeptcd ;
    
    //항암제가 아니고 mix번호가 있을 경우 해당 mix번호의 처방중 항암제가 있을 때 항암제의 부서 return
    var mixno = model.getValue ( strDest + "/prcplist[" + vRow + "]/prcpmixno");
    var antilist = null ;
     
    if( mixno != "-" ) {
         
        antilist = model.instance1.selectNodes( strDest + "/prcplist[prcpmixno='" + mixno + "']" );
        if( antilist != null ) {
            for( var i = 0 ; i < antilist.length  ; i++){       
                if (!isNull(model.getValue ( strDest + "/prcplist[" + vRow + "]/spcldrug"))) {
                    spcldrugAnti = antilist.item(i).anticanflag.text ;
                    spcldrug = antilist.item(i).spcldrug.text ;
                } else {
                    drugmastspec = antilist.item(i).drugmastspec.text ;
                    spcldrugAnti = getArrayData ( drugmastspec + "^", 0, 24, "^", "|" );
                    spcldrug = getArrayData ( drugmastspec + "^", 0, 23, "^", "|" );
                }
                if(  spcldrugAnti == "1" || spcldrugAnti == "2" || spcldrug == "B" || spcldrug == "C" || spcldrug == "Q" || spcldrug == "T" ) {
                    orgdeptcd =  antilist.item(i).prcpexecdeptcd.text ;
                    break; 
                }
            }
        }
    }
    
    return orgdeptcd;
}

function fOldDrugMthdPop() {
    if (model.instance1.selectNodes("/root/migdrugmthd/migdrugmthdlist").length>0) {

        var xpt = window.screenleft + eval(150);
        var ypt = window.screenTop + eval(50);

        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];

        modal ("SPMMO15900", mon,  xpt, ypt, "SPMMO15900", "/root/migdrugmthd", "/root/migdrugmthd", "", false);
    }
}

/**@desc   : 외래, 주사(A6)인 경우, 일수 변경시 달력화면을 띄움, 연속처방 적용 
 * @param  :
 * @return :
 * @author : EMR MSH
 * @---------------------------------------------------
 */
function fDayValChnged() {
    //prcpdd를 선언하지 않고 아래에서 사용하고 있음. 오류수정 by sonjy 20091021
    var prcpdd = model.getValue ( "/root/init/prcpdd");
    
    var selectedRows = grd_prcplist.selectedRows;   
    var chngRow = grd_prcplist.row;
    
    for ( var j=0; j < selectedRows; j++ ){   
        var curRow = grd_prcplist.selectedrow(j);   // 현재 row 
        var strtRow = grd_prcplist.selectedrow(0);  // 시작 row 
        if( chngRow < 0 ) chngRow = strtRow;
        
        var prcpclscd = model.getValue("/root/main/prcp/prcplist[" + curRow + "]/prcpclscd");
        var selfprcpflag = model.getValue("/root/main/prcp/prcplist[" + curRow + "]/selfprcpflag");
        var prcpgenrflag = model.getValue("/root/patflag/list/prcpgenrflag");
        var prcpcd = model.getValue("/root/main/prcp/prcplist[" + curRow + "]/prcpcd");
        
        //by sonjy 20091019 수가계산방법 4일경우 외래/입원 관계없이 일수는 1로 고정 (요청번호 : 3667 ) 
        var drugmastspec = model.getValue("/root/main/prcp/prcplist[" + curRow + "]/drugmastspec");
        var calcmthdcd = getArrayData ( drugmastspec , 0, 26, "^", "|" ); 
        if( (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" )  && calcmthdcd == "4" ) {
            model.setValue("/root/main/prcp/prcplist[" + curRow + "]/prcpdayno", "1" );
        } 
         
        // 외래인 경우
        if(prcpgenrflag == "O"){
            // 주사면서 자가 처방이 아닌 경우
            //수가계산방법 4가 아닐 경우  by sonjy 20091019 (요청번호 : 3667 ) 
            if( (prcpclscd == "A6" && selfprcpflag != "Y" && calcmthdcd != "4" ) || prcpcd == "MUR0001"){

                //var prcpdayno = grd_prcplist.valueMatrix(strtRow, grd_prcplist.colRef("prcpdayno"));
                var prcpdayno =   model.getValue ("/root/main/prcp/prcplist[" + chngRow + "]/prcpdayno");
                
                var contprcpspec = model.getValue("/root/main/prcp/prcplist[" + curRow+ "]/contprcpspec");
                if(contprcpspec != "-"){
                    var contprcpsplit = contprcpspec.split("^");
                    var contprcprslt  = contprcpsplit[1].split("|");
                    var startdd = contprcprslt[1];
                    
                }else{
                    var startdd = model.getValue("/root/paminfo/list/orddd");
                    
                }
                var reqparam = startdd + "▩";
                
                //변경된 일수만큼의 일자 parameter를 생성함
                for(var i = 1; i < prcpdayno; i++){
                    var dd = ((startdd.toDate()).getAddDate(i)).getDateFormat();
                    reqparam += dd + "▩";
                }
                reqparam = reqparam.substring(0, reqparam.length-1);
                setParameter("paramcalflag", "multi");
                setParameter("defaultday"  , startdd);
                setParameter("reqparam"    , reqparam);
                setParameter("prcpdayno"   , prcpdayno);

                fPrcpModal("SPMMO10600", 20, 50);

                //달력에서 선택된 일자만큼 처방상세정보 생성 및 처방 정보 설정
                if ( !isNull(getParameter("rtn"))) { //20080703 마정민 수정 값이 있을 때문 처리
                    var actordddArray = getParameter("rtn").split("▩");
                    var contprcpspec = "status|actorddd|execprcpstatcd|prcpdd|execprcpno";
                    for(var i = 0; i < actordddArray.length; i++){
                        var actorddd = actordddArray[i];
                        contprcpspec = contprcpspec + "^I|" + actorddd + "|" + "" + "|" + startdd + "|" + "";
                    }
                
                    var rtnval = "";
                    var contprcpspecArray = contprcpspec.split("^");
                    for(var i = 1; i < contprcpspecArray.length; i++){
                        var tmp = contprcpspecArray[i].split("|");
                        rtnval = rtnval + tmp[1] + ",";
                    }
                    rtnval = rtnval.substring(0, rtnval.length-1);
                  
                    if(actordddArray.length == 1 && actorddd == prcpdd){
                        model.setValue("/root/main/prcp/prcplist[" + curRow + "]/contprcpspec", "-");
                    }else{
                        model.setValue("/root/main/prcp/prcplist[" + curRow + "]/contprcpspec", contprcpspec);
                    }
                    model.setValue("/root/main/prcp/prcplist[" + curRow + "]/prcpdayno", actordddArray.length);
                }
            }
        }   
    }   
}

/**@desc   : 영상학과에서 OCR 확인을 위한 코드별 테그 셋팅
 * @param  :
 * @return :
 * @author : EMR MoonSH
 * @---------------------------------------------------
 */
function fSetOcrTagNum() {
    var srcNodeList = model.instances(0).selectNodes( "/root/result/savedrprcplist" ); 
    var taglist = model.getValue("/root/properties/parameters/SPMRF04500_OCRTAG/SPMRF04500_OCRTAGvalue"); 
    
    if( !isNull(taglist) ){
        model.setValue("/root/properties/parameters/SPMRF04500_OCRTAG/SPMRF04500_OCRTAGvalue", ""); 
        
        var septag = taglist.split("▦"); 
        var tagcode = ""; 
        
        for (var i=0; i<=srcNodeList.length; i++) {
            var prcpcd = model.getValue ( "/root/result/savedrprcplist[" + i + "]/prcpcd" );        
            var prcpkindcd = model.getValue ( "/root/result/savedrprcplist[" + i + "]/prcpkindcd"  );
            for ( var j=0; j<septag.length-1; j++) {
                if ( septag[j]==prcpcd ) { 
                
                        tagcode = septag[j+1] ;                 
                        if ( prcpkindcd == "70" && model.getValue ( "/root/result/dschdrprcplist[dschdr_prcpcd ='" + prcpcd + "']/dschdr_drprcpetc3" ) == "" ){
                        model.setValue ( "/root/result/dschdrprcplist[dschdr_prcpcd ='" + prcpcd + "']/dschdr_drprcpetc3", tagcode);
                        // 퇴원후 외래 처방은 ORC 태그 정보 박히지 않는 오류 수정 . 20100607 by LYJ
                        }else {
                         model.setValue ( "/root/result/savedrprcplist[" + i + "]/drprcpetc3", tagcode ); 
                        }
                }
            }
        }
    }   
}

/**@desc   : 그리드 임시저장 수정 모드 
 * @param  : position(1.개별수정:per, 2.일괄수정:pack, 3.상세팝업개발수정:det_per, 4.일괄 상세팝업:det_pack), grid row, object 
 * @return :
 * @author : EMR MoonSH
 * @---------------------------------------------------
 */
function gGridUpdateChk(pos, grow, obj) {   
    
    if ( pos == "per" ) {   // 1.개별수정
        if (obj == "child"){ 
            if ( grow == "" ) { 
                grow = opener.grd_prcplist.row ; 
            } 
            var chkstatus = opener.model.getValue ( "/root/main/prcp/prcplist[" + grow + "]/status" ); 
            if ( chkstatus == "-" ) { 
                opener.model.setValue ( "/root/main/prcp/prcplist[" + grow + "]/status", "U" ); 
            } 
            //return ; 
        } else { 
            var chkstatus = model.getValue ( "/root/main/prcp/prcplist[" + grow + "]/status" ); 
            if ( chkstatus == "-" ) { 
                model.setValue ( "/root/main/prcp/prcplist[" + grow + "]/status", "U" ); 
            } 
        } 
    } else if ( pos == "pack" ) {   // 2.일괄수정 
        var chkstatus = model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(grow) + "]/status" ); 
        if ( chkstatus == "-" ) { 
            model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(grow) + "]/status", "U" ); 
        }       
    } else if ( pos == "det_per" ) { // 3.상세 팝업에서 개별 수정 
        // 1. popup 노드 get 
        // 2. main 그리드 row 노드 get 
        // 3. for 문을 이용 팝업과 메인의 노드 비교 
        
        var tarrow = grd_prcplist.row; 
        if ( model.getValue ( "/root/main/prcp/prcplist[" + tarrow + "]/status" ) != "-" ) return;

        var tarNodeList = model.instances(0).selectNodes( "/root/prcptemp/prcplist" ); 

        if ( tarNodeList.length > 0  ) {
            var tarChildNode = tarNodeList.item(0).childNodes; 
        } else {
            return ;    
        }
        
        var tarChildCnt = tarChildNode.length; 
        if( tarChildCnt == 0 ) return; 
        
        var srcNodeList = model.instances(0).selectNodes( "/root/main/prcp/prcplist[" + tarrow + "]" );  // changed node list 
        if ( srcNodeList.length > 0  ) {
            var srcChildNode = srcNodeList.item(0).childNodes; 
        } else {
            return ;    
        }
        
        var srcChildCnt = srcChildNode.length; 
        if( srcChildCnt == 0 ) return; 
        
        if ( tarChildCnt != srcChildCnt ) return ;      // popup 노드와 main 노드 갯수가 틀리면 노드 매핑 오류로 리턴 
        
        var i; 
        for( i = 0; i < srcChildCnt ; i++) { 
            tNodeName = tarChildNode.item(i).nodeName ; 
            tNodeText = tarChildNode.item(i).text ; 
            
            sNodeName = srcChildNode.item(i).nodeName ; 
            sNodeText = srcChildNode.item(i).text ; 
            
            if ( tNodeName == sNodeName ) { 
                if ( tNodeText != sNodeText ) { 
                    var chkstatus = model.getValue ( "/root/prcptemp/prcplist/status" ); 
                    if ( chkstatus == "-" ) { 
                        model.setValue ( "/root/prcptemp/prcplist/status", "U" ); 
                    } 
                    return ; 
                } 
            } else { 
                return ;                    // 소스 노드와 대상 노드의 노드가 틀릴 경우는 리턴 
            } 
        } 
    } else if ( pos == "det_pack" ) {   // 4. 일괄 상세팝업
        var chkstatus = model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(grow) + "]/status" ); 
        if ( chkstatus == "-" ) {
            model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(grow) + "]/status", "U" ); 
        }
    }   
    
}

/**@desc   : 진료대상자 리스트를 actvate 하기 위한 로직 추가
 * @param  : 
 * @return :
 * @author : EMR 김영학
 * @---------------------------------------------------
 */
function fSetUpperInfo() {
    // 진료대상자 리스트를 actvate 하기 위한 로직 추가  // 김영학 추가  :  2008. 11. 17
    curPatListObj= getOpenWindow("SMMMO04100"); //활성화된 진료대상자 화면 object loading
    
    var pid = getPatientInfo("pid");
    model.makeValue("/root/init/prcpobjsaveyn", "Y")

    if (curPatListObj != null) {
        
        var prcpsaveyn = model.getValue("/root/init/prcpobjsaveyn"); // 상단의 처방 저장여부를 가져온다
        var emrsaveyn = model.getValue("/root/init/emrobjsaveyn");   // 상단의 진료기록 저장여부를 가져온다.
        if (prcpsaveyn == "Y" && emrsaveyn == "Y") {            // 처방과 진료기록이 모두 저장된 경우는 포커스를 진료대상자로 이동
            //최소화 시킨 창을 최대화 시킴 (2009.10.26 JJE)
            curPatListObj.window.restore();
            curPatListObj.window.activate();
        }
    }   
}   


/**@desc   : 보험제한규정창이 메시지만 있을경우 창을 더이상 띄우지 않기 위해 레지스트리에 등록
 * @group  :
 * @ver    : 2008.12.09
 * @by     : 마정민
 * @modify: 
 * @---------------------------------------------------
 * @type   : 
 * @access : public
 * @param  : regnm : 레지스트리 명
 * @param  : regval : 레지스트리 값
 * @return :
 * @---------------------------------------------------
 */ 
function setRegistryPrcp(regnm, regval)
{
    model.registry("HKEY_LOCAL_MACHINE", "SOFTWARE\\HIS\\Config\\" + getUserId(), regnm, "STRING") = regval;
}

/**@desc   : 보험제한규정창이 메시지만 있을경우 창을 더이상 띄우지 않기 위해 레지스트리에 등록된 값을 가져옴
 * @ver    : 2008.12.09
 * @by     : 마정민
 * @modify: 
 * @---------------------------------------------------
 * @type   : 
 * @access : public
 * @param  : regnm : 레지스트리 명
 * @param  : 
 * @return : regval : 레지스트리 값
 * @---------------------------------------------------
 */ 
function getRegistryPrcp(regnm)
{
    var regval = model.registry("HKEY_LOCAL_MACHINE", "SOFTWARE\\HIS\\Config\\" + getUserId(), regnm, "STRING");
    return regval;
}

/**@desc   : 과거처방 사유입력창 팝업 
 * @
 * @param  : strSrc : 입력할 과거처방의 node 
 * @return :
 * @author : 손주연 2008-09-26 
 * @---------------------------------------------------
*/ 
function fChkLastPrcpResn(  strSrc ){
    var prcpdd = "";
    var resnrtn= "N";
    var admininfo  = "";
    admininfo = model.getValue ( "/root/admininfo" ) ;
    prcpdd = model.getValue ( "/root/init/prcpdd" ); //처방일 
    if( isNull(prcpdd) ) return true ; 
 
     
    if( eval(prcpdd) < eval( getCurrentDate().substr(0,8) ) ) { 
        
        setParameter ("SPMMO016500_resnflag" , "B" );               //과거처방사유구분 
        setParameter ("SPMMO016500_prcpinfo" , strSrc );            //처방LIST
        setParameter ("SPMMO016500_paminfo"  , "/root/paminfo/list");//원무정보 PID, INDD/ORDDD, CRETNO,INSTCD, ORDTYPE...
        setParameter ("SPMMO016500_rtn1"     , "N" );                   //입력여부 
        setParameter ("SPMMO016500_endrowdelyn" , "N" );            //처방LIST 최종ROW삭제여부 
        
        var xpt = window.screenleft + eval(300);
        var ypt = window.screenTop + eval(200);
    
        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];

        modal ("SPMMO16500", mon,  xpt, ypt, "SPMMO16500", "", "", "sysmenu:hidden; min:visible; max:visible; icon:visible", false);    //사유입력창 
          
        resnrtn =  getParameter ("SPMMO16500_rtn1" );    
        
        if( resnrtn != "Y" ) return false ;
    }
        
    return true  ; 
        
}

/**@desc   : 급성 상기도감염에 항생제 처방 제한  
            일수 촉박으로 인해 hardcoding 추후 login정보에 담을 예정  
 * @param  :  
 * @return :
 * @author : 손주연 20081212 
 * @---------------------------------------------------
*/  
function fChkInfecLimAntiDrug(  strSrc , sendRow  ){
    var mainDiag10cd = "";
    var diaglst = null;
    diaglst= model.instances(0).selectNodes("/root/main/diaginfo/diagcdlist[diagkindcdflag='M']") ; 
    if( diaglst != null && diaglst.length > 0) {
        mainDiag10cd = diaglst.item(0).icd10cd.text ;
    }
    
    if( isNull(mainDiag10cd) ) return true ;
    /* 급성상기도감염에 항생제 처방 제한
     * 조건 : HARDCDNO 101
     * 1) 의사의 진단명 주상병이 ICD10 기준 J00~J06에 해당할 경우(J00~J069까지)
     * 2) 항생제 처방이 발생된 경우  
     *
     * 골관절염 상병에 스테로이드 제제 처방 제한
     * 조건 :  HARDCDNO 122
     * 1) 의사의 진단명 주상병이 ICD10 기준 M13~M17(M130~M179), M19(M190~199)에 해당할 경우 주, 부상병 모두 체크로 변경
     * 2) 스테로이드제 처방이 발생된 경우(처방 소분류가 Hormones-adrenal corticosteroid가 처방될 경우(대분류가 외용제인건은 제외) )
    */ 
    var chkFlag = "" ;
    var icd10Chck   = mainDiag10cd.substring( 0, 3 );
    var sMsg = "";
    if ( icd10Chck >= "J00" && icd10Chck <= "J06"  ) { 
        chkFlag = "1" ;
    } else {
        diaglst= model.instances(0).selectNodes("/root/main/diaginfo/diagcdlist") ; 
        if( diaglst != null) {
            for( var i= 0 ; i < diaglst.length ; i++ ){
                mainDiag10cd = diaglst.item(i).icd10cd.text ; 
                icd10Chck   = mainDiag10cd.substring( 0, 3 );
                if ( icd10Chck >= "M130" && icd10Chck <= "M179"  ){
                    chkFlag = "2" ;
                    break;
                }
                if ( icd10Chck >= "M190" && icd10Chck <= "M199"  ){
                    chkFlag = "3" ;
                    break;
                }
            }
        }
    }
    
    if( isNull(chkFlag) )  return true ;
    
    var prcpclscd       = "";
    var drugmastspec    = "";
    var tempcol2        = "";
    var rtnFlag         = "";
    var srcNodeList = null;
     
    prcpclscd   =  model.getValue(strSrc + "[" + sendRow + "]/prcpclscd" );
    drugmastspec=  model.getValue(strSrc + "[" + sendRow + "]/drugmastspec" );
    tempcol2    =  model.getValue(strSrc + "[" + sendRow + "]/tempcol2" );
    if(prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" ) {
        if( chkFlag == "1"  && getArrayData ( drugmastspec + "^", 0, 23, "^", "|" ) == "P" ) {
            rtnFlag = "1" ;
        } else if ( ( chkFlag == "2" || chkFlag == "3" ) && !isNull(tempcol2) ){
            //처방 소분류가 Hormones-adrenal corticosteroid(경구/주사만) 
            if( (tempcol2 == "03|04|03" || tempcol2 == "04|04|03") && prcpclscd != "A4" ) rtnFlag = chkFlag ;
        }  
    } 
    
    if( rtnFlag == "1" ) {
        sMsg = "급성 상기도(J00~J069)에 항생제 처방은 권장되지 않고 있으며 평가결과가 공개되는 항목입니다. 항생제처방을 재고하시거나,상병명을 변경하여 주십시오.문의 보험팀(" +  model.getValue("/root/initsrch/callnoinfo[trgtcd='insurance']/trgtcdnm") + ")" ;
    } else if( rtnFlag == "2" || rtnFlag == "3" ) { 
        sMsg = "골관절염상병(M130~M179, M190~M199)에 Steroid제제의 전신적 사용은 권장되지 않고 있으며 평가결과가 공개되는 항목입니다. Steroid처방을 재고하시거나, 상병명을 변경하여 주십시오.문의 보험팀" + model.getValue("/root/initsrch/callnoinfo[trgtcd='insurance']/trgtcdnm");
    } 

    if( rtnFlag == "1" ) {
        messageBox(sMsg, "I" );
        if ( model.getValue ( "/root/initsrch/hrcdinfo1/trgtcd") != "N" ) {
            return false ;
        } else {
            if ( messageBox ( "계속 저장하시겠습니까?","Q") != "6" ) {
                return false ;
            }
        }
    } else if ( rtnFlag == "2" || rtnFlag == "3" ) {
        messageBox(sMsg, "I" );
        //return false ;
        //by sonjy 20090803 골관절염상병 병원별 blocking 적용 변경요청서 선진행 사항. HARDCDNO 122
        if ( model.getValue ( "/root/initsrch/steroidlimyn/trgtcd") != "N" ) {
            return false ;
        } else {
            if ( messageBox ( "계속 저장하시겠습니까?","Q") != "6" ) {
                return false ;
            }
        }
    }

    return true ; 
}    

/**@desc   : 당일결과 체크하면 체크값을 원무테이블에 입력해준다.
 * @param  :  
 * @return :
 * @author : 김영학 : 20090304
 * @---------------------------------------------------
*/  
function fSaveDayAftRcpt() {
    model.resetInstanceNode("/root/send");
    model.setValue ( "/root/send/cond1", model.getValue ( "/root/paminfo/list/pid" ));
    model.setValue ( "/root/send/cond2", model.getValue ( "/root/paminfo/list/orddd" ));
    model.setValue ( "/root/send/cond3", model.getValue ( "/root/paminfo/list/cretno" ));
    model.setValue ( "/root/send/cond4", model.getValue ( "/root/paminfo/list/prcptdayaftrcptyn" ));
    //model.setValue ( "/root/send/cond5", "1");
    submit("TXMMO00114", false);
    var ordPatObj = getOpenWindow("SMMMO04100");
    if (ordPatObj != null ) {
        ordPatObj.javascript.fPrcpCallPatList();    
    }
}

/**@desc   : 처방창 초기화 (상태에 따라 처방창이 처음 열리는 경우와 열려 있는 경우 초기화시켜주는 함수가 달라짐)
 * @param  :  
 * @return :
 * @author : 김영학 : 20090306
 * @---------------------------------------------------
*/  
function fInitPrcpWnd(status){
    if (status == "init") {
        btn_init.visible    = false;
        btn_reinit.visible  = false;
        
        button107.attribute ( "background-color" ) = "#7cbbdd"; 
        zesfInitSign();     
        
        fInitializeReady(); 
        fAnstPrcp();  // 마취화면에서 보내준 처방 검색          
        //임시처방 호출       
        model.setValue ( "/root/init/setprcpyn", "Y" );                                               
        if ( model.getValue ( "/root/initsrch/prcpetccnts/erprcpyn" ) == "Y" ) {
            setParameter ( "SMMMO00100_cond1", "Y" );
            fPrcpModal ( "SMMMO06100", 0, 0 );      
            grd_prcplist.rebuild();
            model.recalculate();
            model.setfocus( "grd_prcplist" );
        }
        
        fChkOuterCdListPop();  //외부등록CD 재판독 의뢰할 처방 있다면 popup 호출 (2010.02.24 JJE)
        
        model.setValue("/root/init/bfprcpload", "N");
        btn_ivbfprcp.selected = true;
        ivw_prcp3.visible= true;    
       
        ivw_prcp3.src = "SMMMO02100_전회처방.xrw";
          
        model.removeNode ( "/root/init/prcpkindcd/M0003[cdid=80]" );
        group2.visible = true;  
        
        ivw_prcp3.window.javascript.fBtnInit("C");   
    } else {
        fInitializeConDone();

        btn_reinit.visible  = false;
        btn_init.visible    = false;
        
        fChkOuterCdListPop();  //외부등록CD 재판독 의뢰할 처방 있다면 popup 호출 (2010.02.24 JJE)

        var BfPrcpObj = getOpenWindow("SMMMO02100") ;
        if (ivw_prcp3.src != "SMMMO02100_전회처방.xrw") {
            ivw_prcp3.src = "SMMMO02100_전회처방.xrw";
            model.removeNode ( "/root/init/prcpkindcd/M0003[cdid=80]" );
        }
        ivw_prcp3.window.javascript.fBtnInit("C"); 
        
        fInitializeReady("diag");
        
        fPatDiagSrch();                  

    }

    //20090515 마정민 상병 특례체크로직 추가. 의정부성모병원요청사항.
    //기존 의정부 성모병원은 부상병으로도 산정특례가 적용되어서 의사사 주,부 유형을 적확히 입력하지 않음
    //그래서 처방화면 로딩시 기존수진진단을 가져올때 마이그레이션 데이터이고 산정특례로 된 주진단이 없을 경우 메시지 처리
    var srcNodeListLen = model.instances(0).selectNodes ( diagNode ).length;
    for ( var i=1; i <= srcNodeListLen; i++ ) {
        var status = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/status");
        var diagremfact = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/diagremfact");
        if ( status == "I" && diagremfact == "Y" ) { //마이그레이션
            model.setValue("/root/main/diaginfo/diagcdlist[" + i + "]/diagremfact", "");
            var spclinfo = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/spclinfo");
            if ( spclinfo == "Y" ) { //산전특례
                //산정특례 처방이면 산전특례이면서 주상병이 있는지 찾는다.
                var spcmdiagcd = model.getValue ( "/root/main/diaginfo/diagcdlist[diagkindcdflag='M' and spclinfo='Y' and status='I']/diagcd" ); 
                if (isNull(spcmdiagcd)) { //값이 없으면 주상병으로 할 건지 물어본다.
                    var icd10cd = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/icd10cd");
                    if ( messageBox ( "[" + icd10cd + "] 상병은 특례상병입니다. 주상병으로 하시겠습니까?","Q") == "6" ) {
                        //하겠다고 하면 주상병으로 고침
                        var srcNodeList = model.instances(0).selectNodes ( "/root/main/diaginfo/diagcdlist" );
                        for ( var j=1; j <= srcNodeList.length; j++ ) {
                            if (i == j) {
                                model.setValue ( "/root/main/diaginfo/diagcdlist[" + j + "]/diagkindcdflag", "M" );
                            } else {
                                if (model.getValue ( "/root/main/diaginfo/diagcdlist[" + j + "]/diagkindcdflag" )=="M") {
                                    model.setValue ( "/root/main/diaginfo/diagcdlist[" + j + "]/diagkindcdflag", "S" );
                                    if (model.getValue ( "/root/main/diaginfo/diagcdlist[" + j + "]/status" ) == "-" ) { 
                                        //진단상태가 - 이면 U로 수정함
                                        model.setValue ( "/root/main/diaginfo/diagcdlist[" + j + "]/status", "U" );
                                    }
                                }
                            }
                        }
                        fDispPatMainDiag();
                        model.recalculate();
                        //break; 20090629 diagremfact '-' 처리하는것 때문에 주석처리
                    }
                }
            }
        }
   }   
    
    // 전처방 복사 로직 위치 이동 2011.11.16 엄영만
    // 환경설정(전처방 자동 copy 기능 설정)에 따른 전처방 copy 추가 (요청번호:8586, 2009.11.02 JJE)
    var prcpgenrflag     = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    var addprcpflag      = model.getValue("/root/init/addprcpflag");
    var copyPrcpInfoNode = instance1.selectSingleNode("/root/initsrch/envinfo[qestcd='016' and answcnt!='003']/answcnt"); //001:약만COPY, 002:전체COPY, 003:설정안함
    if( prcpgenrflag == "O" && addprcpflag != "Y" && copyPrcpInfoNode != null ){
        if (typeof(ivw_prcp3) == "object"){
            ivw_prcp3.window.javascript.fCopyBfPrcp("init");
        }
    }

    //KNUH, 사전심사 대기상태인 경우, 대기상태 처방리스트와 심사메세지를 팝업으로 보여줌 (2011.03.17 JJE)
    fOpenBfJudgInfoPop();
   
}

/**@desc   : 처방창 초기화 (처방창이 처음 열리는 경우)
 * @param  :  
 * @return :
 * @author : 김영학 : 20090306
 * @---------------------------------------------------
*/  
function fXformsReady() {
    //처방 속도개선을 위한 시간 체크 set 20101027  LYJ
    try {
        var SMMMO00100_S = new Date();
        var ordPatObj = getOpenWindow("SMMMO04100");    
        var SMMMO04100_chk = ordPatObj.javascript.getParameter("SMMMO04100_chk");
        if(ordPatObj != null && SMMMO04100_chk  == "Y"){
          ordPatObj.javascript.setParameter("SMMMO00100_S",SMMMO00100_S.getTime());
        }
    } catch(e) {
    }
    
    btn_reinit.visible = false; 
    
    // 신규처방 수정 모드을 위한 bind셋팅 - 20090630 by Moonsh 
    var AnswData = fGetIntefeAnsw("013"); 
    if( AnswData == "Y" ) { 
        bind14.attribute( "readonly" ) = ""; 
        bind2.attribute( "readonly" ) = ""; 
        model.setValue("/root/init/enviflag", "Y"); 
    } else {
        model.setValue("/root/init/enviflag", ""); 
    }
    
    fInitializeConDone();
    fBaseCdInit();              
    fInitBtnSet();          

    var answcnt = mmbfGetUserEnvQuestValue("006"); // "006" 환자선택시 진료프로그램 로딩 방식 (001:처방창만 블라인드, 002:기록창만 블라인드, 003:처방창과 기록창 블라인드, 004:처방창과 기록창 모두 오픈
    if (answcnt =="001" || answcnt =="003") {
        btn_init.visible = true;    
        group2.visible = true;
    } else {
        fInitPrcpWnd("init");
    }

    // CP 초기화 해주는 로직 전처방에서 처방.js로 이동 김영학 ( 2009.03.16)
    //JJE- (추가, srcOrdPatListwnd=null의 Y/N 상관없이 체크해야 함)
    var fstopenflag = model.getValue("/root/init/fstopenflag"); //처방화면이 최초 생성 여부
    var cpWdwFlag   = model.getValue("/root/cp");
    if( fstopenflag == "Y" && cpWdwFlag == "Y" ){       //CP가 open된 첫회만 수행(CP가 열린상태에서 다른환자 선택 시 수행 안함 -> fReconstruct()*2 방지)
        fReconstruct();
    }   
    
    button106.attribute ( "background-color" ) = "#f2fafe";                                 
    button107.attribute ( "background-color" ) = "#c0c0c0"; 
    
    //처방 마우스 오른쪽 클릭 메뉴를 병원마다 달리하기 위해 하드코드테이블에서 받아옴.
    fGetRghtClickList();
}

/**@desc   : 처방창 초기화 (처방창이 열려 있는 경우)
 * @param  :  
 * @return :
 * @author : 김영학 : 20090306
 * @---------------------------------------------------
*/  
function fXReReady(consulyn) {
    //처방 속도개선을 위한 시간 체크 set 20101027  LYJ
    try {
        var SMMMO00100_S = new Date();
        var ordPatObj = getOpenWindow("SMMMO04100");    
        var SMMMO04100_chk = ordPatObj.javascript.getParameter("SMMMO04100_chk");
        if(ordPatObj != null && SMMMO04100_chk  == "Y"){
          ordPatObj.javascript.setParameter("SMMMO00100_S",SMMMO00100_S.getTime());
        }
    } catch(e) {
    }

    btn_reinit.visible = false;    
    group_rmk.visible = false;                                             //처방 화면 참고사항 안보이게
    var answcnt = mmbfGetUserEnvQuestValue("006"); // "006" 환자선택시 진료프로그램 로딩 방식 (001:처방창만 블라인드, 002:기록창만 블라인드, 003:처방창과 기록창 블라인드, 004:처방창과 기록창 모두 오픈
    if(consulyn == "T") {
        answcnt = "";
    }
    
    if (answcnt =="001" || answcnt =="003") {
        btn_reinit.visible = true;
        btn_init.visible = false;
        var BfPrcpObj = getOpenWindow("SMMMO02100") ;
        if (ivw_prcp3.src != "SMMMO02100_전회처방.xrw") {
            ivw_prcp3.src = "SMMMO02100_전회처방.xrw";
            model.removeNode ( "/root/init/prcpkindcd/M0003[cdid=80]" );
        }
        ivw_prcp3.window.javascript.fBtnInit("B");              
    } else {
        fInitPrcpWnd();
    }
    
    fSelfHldPrcpSub(); //자가보유처방 조회 20100127 by LYJ 
    fChkValidRecInfo(); //kimsj 처방시 미비기록 유무 확인(submit) -- SMMMO04100.js에서 message 실행
}

/**@desc   : 차상위 추가 체크
 * @param  :  
 * @return :
 * @author : 20090327 마정민추가
 * @---------------------------------------------------
*/ 
function fScndChk() {
    model.setValue ( "/root/send/cond3", model.getValue ( "/root/paminfo/list/pid" )); 
    model.setValue ( "/root/send/cond4", model.getValue ( "/root/paminfo/list/orddd" ));
    model.setValue ( "/root/send/cond5", model.getValue ( "/root/paminfo/list/cretno" ));
    model.setValue ( "/root/send/cond6", model.getValue ( "/root/paminfo/list/instcd" ));
    model.setValue ( "/root/send/cond7", model.getValue ( "/root/paminfo/list/insukind" ));
    model.setValue ( "/root/send/cond8", model.getValue ( "/root/paminfo/list/suppkind" ));
    model.setValue ( "/root/send/cond9", model.getValue ( "/root/paminfo/list/rrgstno1" ));
    model.setValue ( "/root/send/cond10", model.getValue ( "/root/paminfo/list/rrgstno2" ));
    model.setValue ( "/root/send/cond11", getUserInfo ("userid") );
    model.setValue ( "/root/send/cond12", "Y" );
    model.setValue ( "/root/send/cond14", model.getValue ( "/root/init/chronicdiseaseyn" ));
    
    //by sonjy 20090803 가정간호 특례체크 관련 추가 
    //model.setValue ( "/root/send/cond15", model.getValue ( "/root/paminfo/list/etcordflag" ));
    submit ( "TRMMO00127", false );
    
    //by sonjy 20090803 가정간호 특례체크 관련 추가  : 시행부서처방에서 호출시 해당 내역 초기화 필요. => 호출뒤 처방검색시 오류발생 
    /*
    if (  model.getValue ( "/root/addprcp" ) == "Y" && model.getValue ( "/root/paminfo/list/etcordflag" ) == "N" ){ 
        model.setValue ( "/root/send/cond3", ""); 
        model.setValue ( "/root/send/cond4", ""); 
        model.setValue ( "/root/send/cond5", ""); 
        model.setValue ( "/root/send/cond6", ""); 
        model.setValue ( "/root/send/cond7", ""); 
        model.setValue ( "/root/send/cond8", ""); 
        model.setValue ( "/root/send/cond9", ""); 
        model.setValue ( "/root/send/cond10", ""); 
        model.setValue ( "/root/send/cond11", ""); 
        model.setValue ( "/root/send/cond12", ""); 
        model.setValue ( "/root/send/cond14", ""); 
        
        //by sonjy 20090803 가정간호 특례체크 관련 추가 
        model.setValue ( "/root/send/cond15", ""); 
    }
    */
}

/**@desc   : 예약처방. 예약처방으로 저장하면 PRCPHISTCD = 'X' 상태로 있다가 간호입실확인시 실처방으로 전환. 후인증.
 * @param  :  
 * @return :
 * @author : 20090327 마정민추가
 * @---------------------------------------------------
*/ 
function fSetRsrvPrcp() {
    var selectedRows = grd_prcplist.selectedRows;   
    
    //kimsj 외래간호 선처치 마스터에 등록된 처방을 예약처방으로 지정하는 경우 처방 저장 시 [선처치] 자동으로 해제
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    var precureprcp = model.getValue ( "/root/initsrchprcp/prcpetccnts/precureprcpcd" );
    var sFrtStage = "", sSndStage = "", sPreMasterYn = "";
    
    for (var i=0; i< selectedRows; i++) {
        if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status" )=="S") continue;
        if (prcpgenrflag == "O") {
            sPreMasterYn = "N";
            sFrtStage = precureprcp.split("^");
            for (var j=0; j < sFrtStage.length; j++) {
                sSndStage = sFrtStage[j].split("|");
                if ( model.getValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(i) + "]/prcpcd" ) == sSndStage[0] ) {  //처방코드, 선처치 마스터 코드(코드|선처치|부서)
                    //model.alert("선처치 처리부분으로 들어왔습니다! prcpcd : " + sSndStage[0]);
                    sPreMasterYn = "Y";
                    break;
                }
            }
        }
        
        if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpkindcd" ) == "80" ) {
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpkindcd", "20" );
            if ( model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prnprcpflag" ) == "Y" ) {
                model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prnprcpflag", "N" );
            }
            if (sPreMasterYn == "Y")    model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/precureprcpflag", "Y" ); //선처치
        } else {
            model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpkindcd", "80" );
            if (sPreMasterYn == "Y")    model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/precureprcpflag", "N" ); //선처치
        }

        makePrcpNm( prcpNode, grd_prcplist.selectedrow(i) );
        
        fSetCpVal(grd_prcplist.selectedrow(i), "U");
    }
}

function fGetRsrvPrcp() {    

    model.setValue ( "/root/send/cond1", model.getValue("/root/paminfo/list/pid")); //환자번호
    model.setValue ( "/root/send/cond2", getUserInfo("dutplceinstcd"));
    model.setValue ( "/root/send/cond3", getCurrentDate());
    
    submit ( "TRMMO00129", false );

    var srcNodeList = model.instances(0).selectNodes ("/root/result/prcplist"); 

    if ( srcNodeList.length > 0 ) {
        setParameter ( "SPMMO18200_pid", "1139716" );
        setParameter ( "SPMMO18200_orddd", "20090629");
        setParameter ( "SPMMO18200_cretno", "2");
        setParameter ( "SPMMO18200_prcpdd", getCurrentDate());
        setParameter ( "SPMMO18200_prcpinptflag", "33");
        setParameter ( "SPMMO18200_ioflag", "I");
        setParameter ( "SPMMO18200_prcpkindcd", "00");      
//      setParameter ( "SPMMO18200_prcpsignflag", "0");   //필요시 적용
        setParameter ( "SPMMO18200_prcpsignflag", "1");   //후인증
        setParameter ( "SPMMO18200_aftcertflag", "12");   //예약처방
        setParameter ( "SPMMO18200_aftcertdrid", "85015179");    //필요시 적용
        setParameter ( "SPMMO18200_prcperrflag", "Y");    //필요시 적용
        setParameter ( "SPMMO18200_title", "환자번호:21299741");    //필요시 적용
        //setParameter ( "SPMMO18200_prcpstatcd", "000"); //필요시 적용
        //setParameter ( "SPMMO18200_oprsrvno", "0");     //필요시 적용
        //setParameter ( "SPMMO18200_prcpauthflag", "0"); //필요시 적용
        

        var xpt = window.screenleft + 200;
        var ypt = window.screenTop + 100;
        var coord = getRelativeCoordinate ( xpt, ypt );
        var mon = coord[0];
        xpt = coord[1];
        ypt = coord[2];

        modal ( "SPMMO18200", mon,  xpt, ypt, "SPMMO01000", "/root/result", "/root/result", "", false );

        clearParameter ( "SPMMO18200_pid" );
        clearParameter ( "SPMMO18200_orddd" );
        clearParameter ( "SPMMO18200_cretno" );
        clearParameter ( "SPMMO18200_prcpdd" );
        clearParameter ( "SPMMO18200_prcpinptflag" );
        clearParameter ( "SPMMO18200_ioflag" );
        clearParameter ( "SPMMO18200_prcpkindcd" );
        clearParameter ( "SPMMO18200_prcpsignflag" );
        clearParameter ( "SPMMO18200_aftcertflag" );
        clearParameter ( "SPMMO18200_aftcertdrid" );
        clearParameter ( "SPMMO18200_prcperrflag"); 
        clearParameter ( "SPMMO18200_title"); 
    }

}

/**@desc   : 신규처방 수정모드 초기화 
 * @param  : 
 * @return : 
 * @author : 20090630 by Moonsh
 * @---------------------------------------------------
*/ 
function fCodeModifyInit() {        
    
    if ( event.keyCode == "13" ) {  
        var grdcnt = grd_prcplist.rows; 
        var modirow = grd_prcplist.row; 
        grdcnt = grdcnt - 1; 
        
        if ( grdcnt != modirow ) { 
            model.setValue("/root/init/rowmodify/modiinit", "Y"); 
            model.setValue("/root/init/rowmodify/modiflag", "Y"); 
            model.setValue("/root/init/rowmodify/modirow", modirow); 
            
            var bacprcpcd = model.getValue("/root/main/prcp/prcplist[" + modirow + "]/prcpcd"); 
            // 상태가 검색은 삭제가 안되므로, 검색에서 신규로 상태 변경 후 삭제 
            model.setValue( "/root/main/prcp/prcplist[" + modirow + "]/status", "I");           
            var grdcnt = grd_prcplist.rows; 

            grdcnt = grdcnt - 1; 
            model.setValue("/root/init/rowmodify/lastrow", grdcnt); 
            model.setValue("/root/main/prcp/prcplist[" + grdcnt + "]/prcpcd", bacprcpcd); 

            grd_prcplist.row = grdcnt; 
            grd_prcplist.focusColor = "#ffffff"; 
            prcpcd = bacprcpcd ; 
        } 
    } 
} 

/**@desc   : 신규처방 수정되는 열 추가 
 * @param  :  
 * @return :
 * @author : 20090630 by Moonsh
 * @---------------------------------------------------
*/ 
function fCodeModifyAdd() { 
    // Import여부 조회 
    var importflag = model.getValue("/root/init/rowmodify/importflag"); 
    
    // 검색 단어 수가 맞지 않을 경우 조회 전 값 셋팅 후 리턴 
    var srchnoflag = model.getValue("/root/init/rowmodify/srchnoflag"); 
    if ( srchnoflag == "Y" ) { 
        var modirow = model.getValue("/root/init/rowmodify/modirow"); 
        var prcpcd = model.getValue( "/root/main/prcp/prcplist[" + modirow + "]/prcpcd"); 
        var modiprcpcd = model.getValue("/root/init/rowmodify/modiprcpcd"); 
        var lastrow = grd_prcplist.rows ; 
        lastrow = lastrow - 1; 
        
        var lastprcpcd = model.getValue( "/root/main/prcp/prcplist[" + lastrow + "]/prcpcd"); 
        
        model.setValue( "/root/main/prcp/prcplist[" + modirow + "]/prcpcd", modiprcpcd); 
        model.setValue( "/root/main/prcp/prcplist[" + lastrow + "]/prcpcd", ""); 
        
        // 초기화 
        model.setValue("/root/init/rowmodify/modiflag", ""); 
        model.setValue("/root/init/rowmodify/enterflag", ""); 
        model.setValue("/root/init/rowmodify/srchnoflag", ""); 
        grd_prcplist.focusColor = "#ece1ec"; 
        
        grd_prcplist.row = modirow; 
        model.refresh();        
        return ; 
    } 
    
    // edit cell 상황에서 enter 칠때만 변경 코드 조회 적용 
    if ( event.keyCode == "13" || importflag == "Y") { 
        var tarrow = model.getValue("/root/init/rowmodify/modirow"); 
        var lastrow = model.getValue("/root/init/rowmodify/lastrow"); 

        grd_prcplist.row = tarrow; 
        // 해당 row 삭제 처리 
        fDeleteRow(); 
        
        var mstPrcpPath = "root/main/prcp/"; 
        var svcNode = instance1.selectNodes(mstPrcpPath + "prcplist"); 
        var mstNode = instance1.selectSingleNode(mstPrcpPath + "prcplist"); 
        
        var nodeLen = svcNode.length; 
        
        // 1. 검색 했으나 조회 조건이 없을 경우, 2. 그룹코드를 수정할 경우 
        if ( lastrow > nodeLen ) { 
            var srchcond = "N"; 
        } 

        // 1. 수정 후 코드 조회 건이 1건일 경우(대부분이 여기에 해당),  2. 검색했으나 조회 조건이 없을때... 
        if ( lastrow == nodeLen || srchcond == "N" ) { 
            // 위치 선정 
            tarrow = tarrow - 1; 
            lastrow = lastrow - 2; 
            
            var refChild = instance1.selectSingleNode(mstPrcpPath + "prcplist["+tarrow+"]");            
            if (srchcond != "N") { 
                var cloneNode = svcNode.item(lastrow).cloneNode(true); 
            } else { 
                nodeLen = nodeLen - 2; 
                var cloneNode = svcNode.item(nodeLen).cloneNode(true); 
            } 

            if ( tarrow != "0" ) { 
                mstNode.insertAfter(cloneNode ,refChild); 
            } 
            
            lastrow = lastrow + 2;                              // 한줄 추가된 것과 -1된거까지 합해서 +2를 해줘야 삭제될 row 

            // 조회 조건이 있을때만 노드 삭제 
            if ( srchcond != "N" ) { 
                model.removeNodeset (mstPrcpPath + "prcplist["+lastrow+"]"); 
            } else {                
                nodeLen = nodeLen + 2 ; 
                model.removeNodeset (mstPrcpPath + "prcplist["+nodeLen+"]"); 
            } 
            
            tarrow++ ;                                          // 대상 row 다음 row에 추가 되므로 선택될 row는 추가된 row 
            grd_prcplist.row = tarrow; 
        } else {                                                // 수정 후 코드 조회건이 1건 이상일 경우 
            tarrow = tarrow - 1; 
            lastrow = lastrow - 2; 
            var roop = nodeLen - lastrow; 
            for ( i=1; i < roop; i++ ) { 
                var refChild = instance1.selectSingleNode(mstPrcpPath + "prcplist["+tarrow+"]"); 
                tarrow++; 
                
                var cloneNode = svcNode.item(lastrow).cloneNode(true); 
                lastrow++; 
                
                mstNode.insertAfter(cloneNode ,refChild); 
            } 
            
            lastrow ++ ; 
            // for 문 돌면서 삭제 처리 
            for ( i=1; i < roop; i++ ) { 
                model.removeNodeset (mstPrcpPath + "prcplist["+lastrow+"]"); 
            } 
            
            var tarrow2 = model.getValue("/root/init/rowmodify/modirow"); 
            grd_prcplist.row = tarrow2; 
        }
        model.resetInstanceNode ("/root/init/rowmodify"); 
        grd_prcplist.focusColor = "#ece1ec"; 
        
        model.refresh();        
        fPrcpColor() ; 
    }           
}

/**@desc   : 약처방 용량,수량 검증
 * @return : true, false
 * @authur : 마정민 2009. 8. 12
*/
function fDrugCheck() {
    
    var srcNodeList = model.instances(0).selectNodes("/root/main/prcp/prcplist");
    for (var i=1; i<=srcNodeList.length; i++) {
        if ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpclscd" ).substring (0,1) == 'A' &&
            model.getValue ( "/root/main/prcp/prcplist[" + i + "]/status" ) == "I"
            ) {
            var orgprcpqty = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/drugmastspec" ) + "^", 0, 32 , "^", "|" );
            var orgprcpvol = getArrayData ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/drugmastspec" ) + "^", 0, 33 , "^", "|" );
            var prcpqty = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpqty" );
            var prcpvol = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpvol" );

            if ( !isNull(orgprcpqty) && !isNull(orgprcpvol) && Math.round ( prcpvol/orgprcpvol * orgprcpqty * 1000 ) != prcpqty * 1000 ){
                alert ( "값이틀립니다." + model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpcd" ));
                //return false;
            } else {
                alert ( "값이맞습니다."  + model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpcd" ));
            }
        }
    }
    return true;
}

/**@desc   : 통증관리 화면.
 * @return : true, false
 * @authur : 한재상 2009. 9. 9
 */
function fPainCnt() {
    var orddeptcd = model.getValue("/root/paminfo/list/orddeptcd");
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );

    var paincntyn = model.getValue("/root/initsrch/paincntyn/trgtcd");
    var srcNodeList = model.instances(0).selectNodes ("/root/initsrch/paincntdept[trgtcd='" + orddeptcd + "']" );

    if ( prcpgenrflag == "I" && paincntyn == "Y" && srcNodeList.length != 0 ) {
        var pid = model.getValue("/root/paminfo/list/pid");
        var indd = model.getValue("/root/paminfo/list/indd");
        var cretno = model.getValue("/root/paminfo/list/cretno");

        fConfirmPainAdmin(pid, indd, cretno, "dr", "/root/main/searchinfo/paincount");
    }
}

/**@desc   :병리처방 과거 블록 지정 => 변경 요청번호 7322 
 * @return : true, false
 * @authur : 손주연 2009.09.27
 */
function fSetPlgyPastBlock() {
    var selcnt = grd_prcplist.selectedrows;
    var i   = 0; 
    var tempcol2 = "";
    var chkcnt = 0;
    
    for (var j= 0; j < selcnt; j++) {
        i = grd_prcplist.selectedrow(j);
        tempcol2 = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/tempcol2" );
        
        //earncls1 : 07  earncls2 : 01, 02(조직, 세포) 신규 팝업 화면이 뜨지 않아야 함. 
        if ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpclscd" )  != 'D2' || 
             tempcol2.substring(0,5) == "07|01" || tempcol2.substring(0,5) == "07|02" ) { 
             messageBox (model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpnm" ) + "는 병리번호지정 가능한 처방이 아닙니다.", "I" );
             return false;
        } else {
            chkcnt++;
        } 
    }
    
    if( chkcnt < 1 ) return false;
    
    var xpt = window.screenleft + 100;
    var ypt = window.screenTop + 100;
    var coord = getRelativeCoordinate ( xpt, ypt );
    var mon = coord[0];  
    
    xpt = coord[1];
    ypt = coord[2];
    
    var pid = model.getValue ( "/root/paminfo/list/pid" );
    model.resetInstanceNode ( "/root/hidden/reqfrminfo" );
    model.setValue ( "/root/hidden/reqfrminfo/pid", pid );
    
    modal("SPLPJ02600",mon, xpt, ypt,"SPLPJ02600","/root/hidden/reqfrminfo","/root/hidden/reqfrminfo", "", false);
    var reqno = model.getValue ( "/root/hidden/reqfrminfo/reqno" );
    
    if ( !isNull(reqno)){
        for( var j = 0 ; j < selcnt ; j++){
            i = grd_prcplist.selectedrow(j);
            tempcol2 = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/tempcol2" );
            
            if( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpclscd" )  == 'D2' &&
             tempcol2.substring(0,5) != "07|01" && tempcol2.substring(0,5) != "07|02"  ){
                model.setValue ( "/root/main/prcp/prcplist[" + i + "]/testreqlnkno", model.getValue ( "/root/hidden/reqfrminfo/reqno" ));
                model.setValue ( "/root/main/prcp/prcplist[" + i + "]/drugmthdspccd", model.getValue ( "/root/hidden/reqfrminfo/spccd" ));
                model.setValue ( "/root/main/prcp/prcplist[" + i + "]/drugmthdspccdnm", model.getValue ( "/root/hidden/reqfrminfo/spcnm" ));
            }
         }
    }
    return true;
}

/**@desc   : 처방 화면의 처방코드 컬럼 SORTING
 * @param  : 
 * @return : 
 * @author : 전지은
 * @---------------------------------------------------
 */
function fGrdOnBeForeSort(){
    //2009.10.15 처방 화면의 처방코드 컬럼 SORTING 기능 추가 요청 - 검색라인이 맨위로 올라가는 것을 방지
    grd_prcplist.removeRow(false);
    
    //2009.10.29 mset 존재하면 copy&delete 해두었다가 정렬 후 추가해준다
    model.makeNode("/root/temp/tempsortprcp");
    copyNodeListType ( "/root/temp/tempsortprcp", "/root/main/prcp/prcplist[inclprcpno>'0' and prcpsetcd!='-']" , "replace", model, model); 
    for(var i=grd_prcplist.rows; i>=1; i--){
        if(model.getValue("/root/main/prcp/prcplist["+i+"]/inclprcpno") > "0" && model.getValue("/root/main/prcp/prcplist["+i+"]/prcpsetcd") != "-"){
            grd_prcplist.deleteRow(i, false);
        }
    }
}

/**@desc   : 처방 화면의 처방코드 컬럼 SORTING
 * @param  : 
 * @return : 
 * @author : 전지은
 * @---------------------------------------------------
 */
function fGrdOnAfterSort(){
    //2009.10.15 처방 화면의 처방코드 컬럼 SORTING 기능 추가 요청 - 정렬 후 검색라인 맨 밑에 추가
    grd_prcplist.gridToInstance();
    
    appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" ); //검색라인추가 
    
    //2009.10.29 mset처방의 자코드가 따로 그룹핑되도록 처리
    if(instance1.selectSingleNode("/root/temp/tempsortprcp/prcplist") != null){
        var msetCnt = instance1.selectNodes("/root/main/prcp/prcplist[inclprcpno>'0' and prcpsetcd='-']");
        //mset 개수만큼
        for( var m=0; m< msetCnt.length; m++ ){
            var mNode = msetCnt.item(m);
            var mInclprcpno = mNode.selectSingleNode("inclprcpno").text;
            var rowNum = instance1.selectNodes("/root/main/prcp/prcplist").length;
            var tempCnt = instance1.selectNodes("/root/temp/tempsortprcp/prcplist").length;
            //처방 수만큼 check
            for( var i=1; i<=rowNum; i++ ){
                var iInclprcpno = model.getValue("/root/main/prcp/prcplist["+i+"]/inclprcpno");
                var iPrcpsetcd = model.getValue("/root/main/prcp/prcplist["+i+"]/prcpsetcd");
                if(mInclprcpno == iInclprcpno && iInclprcpno > "0" && iPrcpsetcd == "-"){
                    //복사해둔 자코드들을 copy
                    for(var t=tempCnt; t>=1; t--){
                        var tInclprcpno = model.getValue("/root/temp/tempsortprcp/prcplist["+t+"]/inclprcpno");
                        if(iInclprcpno == tInclprcpno){
                            model.duplicate( "/root/main/prcp", "/root/temp/tempsortprcp/prcplist[" + t + "]", "*[" + (i+1) + "]");
                        }
                    }
                    break;
                }
            }
        }
        model.removenode("/root/temp/tempsortprcp");
    }
    
    grd_prcplist.rebuild();
    model.recalculate(); 
    grd_prcplist.refresh();
    fPrcpColor();
}

/**@desc   : 처방 이동 (위로 or 아래로 버튼을 통한 이동)
 * @param  : btnFlag 버튼구분(top or bottom)
 * @return : void
 * @authur : 전지은 2009.11.18
 * @---------------------------------------------------
 */
function fMovePrcpList ( btnFlag ) {
    var selectedRows = grd_prcplist.selectedRows;
    var frstRow   = 0;
    if( btnFlag == "top" )         frstRow = grd_prcplist.selectedRow(0);
    else if( btnFlag == "bottom" ) frstRow = grd_prcplist.selectedRow(selectedRows - 1);
    var allRows   = grd_prcplist.rows - 2; //caption, search row
    var addChkRow = 0;
    var cnt     = 0;
    var chngYN  = 0; //선택된 row인지 체크
    var rowNum  = 0;
    var chkNum  = 0; //위, 아래 row의 mset여부에 따라 달라지는 +/- row
    var moveCnt = 0;
    var iRow    = 0;
    var addNum  = 0; //추가해야할 num
//var pmFlag  = 0; //rowNum + - 여부 : 0 or else
    var selInclprcpno = "";
    var chkInclprcpno = "";
    
    var inclprcpnoExistYN = "N";
    var inclprcpnoCVS     = "";
    var inclprcpnoItem    = "";
    
    var printRow  = new Array();
    var printRow2 = new Array();
    var selRows   = new Array();
    
    if( !(selectedRows > 0) ) return;
    
    model.makeNode("/root/tmp_moveprcp");
    
    for(var i=selectedRows-1; i>=0; i--){
        if(model.getValue("/root/main/prcp/prcplist["+ grd_prcplist.selectedrow(i) +"]/inclprcpno") > "0" && model.getValue("/root/main/prcp/prcplist["+ grd_prcplist.selectedrow(i) +"]/prcpsetcd") == "-")
            inclprcpnoCVS = inclprcpnoCVS + model.getValue("/root/main/prcp/prcplist["+ grd_prcplist.selectedrow(i) +"]/inclprcpno") + "|";
    }
    inclprcpnoItem = inclprcpnoCVS.split("|");
    
    //전체 row를 보면서 rowSeq를 설정해 줌 , rowseq순으로 /root/tmp_moveprcp => /root/main/prcp 로 이동
    if( btnFlag == "top" ){
        
        for( var i=grd_prcplist.rows-1; i>0; i-- ){
            
            iRow = i;
            chkNum = 0;
            chngYN = 0;
            addNum = 0;
            //pmFlag = 0;
            
            if( iRow > 1 ){
                
                chkInclprcpno = model.getValue("/root/main/prcp/prcplist["+ iRow +"]/inclprcpno");
                
                if( inclprcpnoItem.length-1 > 0 ){
                    for(var k=0; k<inclprcpnoItem.length-1; k++){ //copy대상의 mset
                        if( chkInclprcpno != "0" && chkInclprcpno == inclprcpnoItem[k] ){
                            chngYN = 1;
                        }
                    }
                }
                
                if( chngYN == 0 && grd_prcplist.isselected(iRow) == true && chkInclprcpno == "0" ) chngYN = 1;
                
                if( chngYN == 1 ){  //선택된 row이면(선택된모코드의 자코드도 포함)
                    addChkRow = iRow - 1;
                    selInclprcpno = "";
                    
                    if( addChkRow > 0 && addChkRow < grd_prcplist.rows ){
                        
                        for(var j=addChkRow; j>=1; j--){
                            addYN = "N";
                            chkInclprcpno = model.getValue("/root/main/prcp/prcplist["+ j +"]/inclprcpno");
                            
                            if( inclprcpnoItem.length-1 > 0 ){
                                for(var k=0; k<inclprcpnoItem.length-1; k++){ //copy대상의 mset
                                    if( chkInclprcpno != "0" && chkInclprcpno == inclprcpnoItem[k] ){
                                        //addNum++;
                                        addYN = "Y";
                                    }
                                }
                            }
                            
                            if( addYN != "Y" && grd_prcplist.isselected(j) == true && chkInclprcpno == "0" ){
                                //addNum++;
                                addYN = "Y";
                            }
                            
                            if( addYN != "Y" ){
                                if( chkInclprcpno != "0" ){  // && chkInclprcpno != inclprcpnoItem[k]
                                    if( isNull(selInclprcpno) ) selInclprcpno = model.getValue("/root/main/prcp/prcplist["+ j +"]/inclprcpno");
                                    if( !isNull(selInclprcpno) && selInclprcpno == chkInclprcpno && isNull(printRow[chkNum]) ) printRow[printRow.length] = j;
                                    chkNum++;
                                }
                                else{
                                    if( printRow.length <= 0 ){
                                        if( isNull(printRow[chkNum]) ) printRow[printRow.length] = j;
                                        chkNum++;
                                    }
                                    break;
                                }
                            }
                            
                        }
                    }
                }
                
            }
            
            if( chngYN > 0 ){
                rowNum = i - printRow.length;
                moveCnt++;
                selRows[selRows.length] = rowNum;
                
                //임시처방은 순서변경 시 수정모드로 상태를 세팅해줌
                if( model.getValue ( prcpNode + "[" + i + "]/status") == "-") model.setValue ( prcpNode + "[" + i + "]/status", "U" );
                
            }else{
                if( printRow.length > 0 ){
                    for( var p=0; p<printRow.length; p++ ){
                        if( printRow[p] == i ) addNum = moveCnt;
                    }
                }
                
                rowNum = i + addNum;
                
                if( printRow.length == 0 || (printRow.length > 0 && i == printRow[printRow.length-1]) ){
                    moveCnt = 0;
                    printRow = new Array();
                }
            }
            
            //검색 row는 rowseq 변동 없음
            if( model.getValue(prcpNode + "["+ i +"]/status") == "S" ) rowNum = i;
            
            model.makeValue(prcpNode + "[" + i + "]/rowseq", rowNum);
            printRow2[i-1] = rowNum;
        }
        
    }
    
    else{
        
        for( var i=1; i<grd_prcplist.rows; i++ ){
            
            iRow = i;
            chkNum = 0;
            chngYN = 0;
            addNum = 0;
            //pmFlag = 0;
            
            if( iRow < grd_prcplist.rows ){
                
                chkInclprcpno = model.getValue("/root/main/prcp/prcplist["+ iRow +"]/inclprcpno");
                
                if( inclprcpnoItem.length-1 > 0 ){
                    for(var k=0; k<inclprcpnoItem.length-1; k++){ //copy대상의 mset
                        if( chkInclprcpno != "0" && chkInclprcpno == inclprcpnoItem[k] ){
                            chngYN = 1;
                        }
                    }
                }
                
                if( chngYN == 0 && grd_prcplist.isselected(iRow) == true && chkInclprcpno == "0" ) chngYN = 1;
                
                if( chngYN == 1 ){  //선택된 row이면(선택된모코드의 자코드도 포함)
                    addChkRow = iRow + 1;
                    selInclprcpno = "";
                    
                    if( addChkRow > 0 && addChkRow < grd_prcplist.rows ){
                        
                        for(var j=addChkRow; j<=allRows; j++){
                            addYN = "N";
                            chkInclprcpno = model.getValue("/root/main/prcp/prcplist["+ j +"]/inclprcpno");
                            
                            if( inclprcpnoItem.length-1 > 0 ){
                                for(var k=0; k<inclprcpnoItem.length-1; k++){ //copy대상의 mset
                                    if( chkInclprcpno != "0" && chkInclprcpno == inclprcpnoItem[k] ){
                                        //addNum++;
                                        addYN = "Y";
                                    }
                                }
                            }
                            
                            if( addYN != "Y" && grd_prcplist.isselected(j) == true && chkInclprcpno == "0" ){
                                //addNum++;
                                addYN = "Y";
                            }
                            
                            if( addYN != "Y" ){
                                if( chkInclprcpno != "0" ){  // && chkInclprcpno != inclprcpnoItem[k]
                                    if( isNull(selInclprcpno) ) selInclprcpno = model.getValue("/root/main/prcp/prcplist["+ j +"]/inclprcpno");
                                    if( !isNull(selInclprcpno) && selInclprcpno == chkInclprcpno && isNull(printRow[chkNum]) ) printRow[printRow.length] = j;
                                    chkNum++;
                                }
                                else{
                                    if( printRow.length <= 0 ){
                                        if( isNull(printRow[chkNum]) ) printRow[printRow.length] = j;
                                        chkNum++;
                                    }
                                    break;
                                }
                            }
                            
                        }
                    }
                }
                
            }
            
            if( chngYN > 0 ){
                rowNum = i + printRow.length;
                moveCnt++;
                selRows[selRows.length] = rowNum;
                
                //임시처방은 순서변경 시 수정모드로 상태를 세팅해줌
                if( model.getValue(prcpNode + "[" + i + "]/status") == "-") model.setValue ( prcpNode + "[" + i + "]/status", "U" );
                
            }else{
                if( printRow.length > 0 ){
                    for( var p=0; p<printRow.length; p++ ){
                        if( printRow[p] == i ) addNum = moveCnt;
                    }
                }
                
                rowNum = i - addNum;
                
                if( printRow.length == 0 || (printRow.length > 0 && i == printRow[printRow.length-1]) ){
                    moveCnt = 0;
                    printRow = new Array();
                }
            }
            
            //검색 row는 rowseq 변동 없음
            if( model.getValue(prcpNode + "["+ i +"]/status") == "S" ) rowNum = i;
            
            model.makeValue(prcpNode + "[" + i + "]/rowseq", rowNum);
            printRow2[i-1] = rowNum;
        }

    }
    
    //alert( printRow2 );
    
    copyNodeListType ( "/root/tmp_moveprcp", "/root/main/prcp/prcplist" , "replace", model, model); 
    
    //처방 인스턴스로 이동 후 refresh
    model.removeNodeset(prcpNode);
    
    for( var i=1; i<grd_prcplist.rows; i++ ){
        copyNodeListType ( "/root/main/prcp", "/root/tmp_moveprcp/prcplist[rowseq='" + i + "']" , "after", model, model); 
        model.removenode(prcpNode + "[" + i + "]/rowseq");
    }
    
    model.removeNodeset("/root/tmp_moveprcp/prcplist");
    
    grd_prcplist.rebuild();
    //grd_prcplist.refresh();
    model.recalculate();
    fPrcpColor();
    
    //이동된 row를 select 처리함
    if( selRows.length > 0 ){
        for(var i=0; i<selRows.length; i++){
            grd_prcplist.AddListSelect(selRows[i]);
        }
    }
    
}

// 20100108 한재상 - 유전자검사 동의서 출력방식 변경 (OCR -> REX)
function fSaveOCRIF(ocrtag, pid, orddd, cretno, ordtype, orddeptcd, orddrid, formcd, formfromdt, diaghngnm, ophngnm, pagecnt){
    model.addlog("fSaveOCRIF: " + ocrtag + "," + pid + "," + orddd + "," + cretno + "," + ordtype + "," + orddeptcd + "," + orddrid + "," + formcd + "," + formfromdt + "," + diaghngnm + "," + ophngnm + "," + pagecnt);
    var savepath = "/root/hidden/atadocrdata/row/";
    model.makeValue(savepath + "ocrtag", ocrtag);
    model.makeValue(savepath + "pid", pid);
    model.makeValue(savepath + "ordtype", ordtype);
    model.makeValue(savepath + "orddd", orddd);
    model.makeValue(savepath + "cretno", cretno);
    model.makeValue(savepath + "orddrid", orddrid);
    model.makeValue(savepath + "orddeptcd", orddeptcd);
    model.makeValue(savepath + "formcd", formcd);
    model.makeValue(savepath + "formfromdt", formfromdt);
    model.makeValue(savepath + "fstprntdt", getCurrentDate()+getCurrentTime());
    model.makeValue(savepath + "fstprntdeptcd", getUserInfo("dutplcecd"));
    model.makeValue(savepath + "fstprntid", getUserInfo("userid"));
    model.makeValue(savepath + "updtdt", getCurrentDate()+getCurrentTime());
    model.makeValue(savepath + "updtdeptcd", getUserInfo("dutplcecd"));
    model.makeValue(savepath + "updtuserid", getUserInfo("userid"));
    model.makeValue(savepath + "diagnm", diaghngnm);
    model.makeValue(savepath + "opnm", ophngnm);
    model.makeValue(savepath + "pagecnt", pagecnt);

    if(submit("TXMRF03805")){
        model.removeNodeset("/root/hidden/atadocrdata");
        return true;
    } else {
        model.removeNodeset("/root/hidden/atadocrdata");
        return false;
    }
}

/**@desc   : 의료급여 정신과 차등수가제 도입관련 퇴원유형 입력 추가 [요청번호 : 8857]
 * @param  : void
 * @return : void
 * @authur : 손주연 (2010.01.14)
 * @---------------------------------------------------
 */
function fChkNPDschChk(){
    clearParameter ( "SPMMO21100_title1"); //정신과 의료급여 환자
    clearParameter ( "SPMMO21100_title2"); //정신과 의료급여 환자 
    clearParameter ( "SPMMO21100_resnflag"); //002  정신과 차등수가제도 퇴원유형
    clearParameter ( "SPMMO21100_hardcdno"); //퇴원유형사유 HARDCODE 번호 
    clearParameter ( "SPMMO21100_pid"); 
    clearParameter ( "SPMMO21100_orddd"); 
    clearParameter ( "SPMMO21100_cretno"); 
    clearParameter ( "SPMMO21100_orddeptcd"); 
    clearParameter ( "SPMMO21100_ordtype"); 

    var npdeptcd        = model.getValue ( "/root/initsrch/inhospappdeptcd/trgtcd" );
    var npresnyn        = getPatientInfoDetail("npresnyn");
    var prcpgenrflag    = model.getValue ( "/root/patflag/list/prcpgenrflag" ) ;
    var insukind        = model.getValue ( "/root/paminfo/list/insukind" );
    var dschprcpyn      = model.getValue ( "/root/hidden/dschprcpyn" ); //퇴원처방 발행 여부 
    
    //로그인한 의사의 근무지부서코드가 정신과이고 의료급여 정신과 환자의 퇴원처방 존재시 입퇴원 유형 사유 입력 
    if ( model.getValue ( "/root/addprcp" ) != "Y" &&  
         model.getValue ( "/root/paminfo/list/orddeptcd" ) == npdeptcd  &&  getUserInfo("dutplcecd") == npdeptcd && 
         prcpgenrflag == "I" && ( insukind == "21" ||  insukind == "22" ) && dschprcpyn == "Y"
       ) {  
            setParameter ( "SPMMO21100_pid"         , model.getValue("/root/paminfo/list/pid")); 
            setParameter ( "SPMMO21100_orddd"       , model.getValue("/root/paminfo/list/indd")); 
            setParameter ( "SPMMO21100_cretno"      , model.getValue("/root/paminfo/list/cretno")); 
            setParameter ( "SPMMO21100_orddeptcd"   , model.getValue("/root/paminfo/list/orddeptcd")); 
            setParameter ( "SPMMO21100_ordtype"     , prcpgenrflag); 
            
            if( npresnyn != "002" && npresnyn != "003" ) {          
                setParameter ( "SPMMO21100_title1"      , "퇴원유형입력");  
                setParameter ( "SPMMO21100_title2"      , "정신과 차등수가제도 특정내역"); //정신과 의료급여 환자 
                setParameter ( "SPMMO21100_resnflag"    , "002"); //002 정신과 차등수가제도 퇴원유형
                setParameter ( "SPMMO21100_hardcdno"    , "175"); //퇴원유형사유 HARDCODE 번호 
                modal("SPMMO21100", "", "510px", "427px", "SPMMO21100", "", "", "sysmenu:hidden; min:visible; max:visible; icon:visible", false); 
            }
            
            if( getPatientInfoDetail("npresnyn") == "002" ){
                setParameter ( "SPMMO21100_title1"      , "퇴원후거주시입력");  
                setParameter ( "SPMMO21100_title2"      , "정신과 차등수가제도 특정내역"); //정신과 의료급여 환자 
                setParameter ( "SPMMO21100_resnflag"    , "003"); //002 정신과 차등수가제도 퇴원유형
                setParameter ( "SPMMO21100_hardcdno"    , "176"); //퇴원유형사유 HARDCODE 번호 
                modal("SPMMO21100", "", "510px", "427px", "SPMMO21100", "", "", "sysmenu:hidden; min:visible; max:visible; icon:visible", false); 
            }
    }
}

/**@desc   : 자가보유약 조회 (submit 발생)
 * @param  :  
 * @return :
 * @author : 이윤정
 * @---------------------------------------------------
*/  
function fSelfHldPrcpSub() {

    if (model.getValue("/root/initsrch/selfholdchk/trgtcd") == "Y"){
        model.removeNodeSet ( "/root/hidden/selfhld" ); 
        model.removeNodeSet ( "/root/selfholdprcp" ); 
        var selfioflag = model.getValue ( "/root/paminfo/list/ioflag" );
        
        if (selfioflag =="I" || selfioflag=="E" || selfioflag=="D") {
              model.makeValue("/root/hidden/selfhld/cond99",    "getSelfHldPrcpInfo");
              model.makeValue("/root/hidden/selfhld/cond1",     model.getValue ( "/root/paminfo/list/pid") );
              model.makeValue("/root/hidden/selfhld/cond2",     selfioflag);
              model.makeValue("/root/hidden/selfhld/cond3",     model.getValue ( "/root/paminfo/list/indd" ));
              model.makeValue("/root/hidden/selfhld/selfopenyn","Y");
              var rere = submit( "TRMMO14903", false );   
        }
    }
}

/**@desc   : 자가보유약 조회 (modal 띄우기)
 * @param  :  
 * @return :
 * @author : 이윤정
 * @---------------------------------------------------
*/  
function fSelfHldPrcpModal() {
    if (model.getValue("/root/initsrch/selfholdchk/trgtcd") == "Y"){
        if (model.getValue("/root/selfholdprcp/prcplist/header") !=""){
            var selfyn = messageBox ("자가보유약이 등록되었습니다. 지금 확인 하시겠습니까?","Q");  
            if (selfyn == "6"){
                setParameter ( "SPMMO19300_prcp", "prcp");
                setParameter ( "SPMMO19300_selfholdchk", model.getValue("/root/initsrch/selfholdchk/trgtcd"));
                modal("SPMMO19300", "", "510px", "427px", "",  "/root/selfholdprcp", "/root/selfholdprcp","sysmenu:hidden; min:visible; max:visible; icon:visible", false);
                //focusMain ( grd_prcplist.row );
            }
        }
    }
}

/**@desc   : 메인의 우클릭 메뉴 하드코드 조회  
 * @
 * @param  : ref      - reference path
 *           rsltref  - result reference path
 *           hardcd   - 하드코드
 * @return :
 * @author : 박유진
 * @---------------------------------------------------
 */
function fGetRghtClickList(){
    
    var a = instance1.selectNodes("/root/initsrch/omrigtclicklist");
    if(a.length>0){
        model.removenode("/root/init/omsrght");
        model.makeNode("/root/init/omsrght");
        for(var i = 1 ; i <= a.length ; i ++){
            var hardcd = model.getValue("/root/initsrch/omrigtclicklist["+i+"]/trgtcd");
            var hardcdnm = model.getValue("/root/initsrch/omrigtclicklist["+i+"]/trgtcdnm");
            if(hardcd=="-"|| hardcd==" ") hardcd=""; 
            if(hardcdnm=="-"|| hardcdnm==" ") hardcdnm=""; 
            model.makeValue("/root/init/omsrght/mouserght["+i+"]/func",hardcd);
            model.makeValue("/root/init/omsrght/mouserght["+i+"]/label",hardcdnm);
        }
    }
    
    var b = instance1.selectNodes("/root/initsrch/imrigtclicklist");
    if(b.length>0){
        model.removenode("/root/init/imsrght");
        model.makeNode("/root/init/imsrght");
        for(var i = 1 ; i <= b.length ; i ++){
            var hardcd = model.getValue("/root/initsrch/imrigtclicklist["+i+"]/trgtcd");
            var hardcdnm = model.getValue("/root/initsrch/imrigtclicklist["+i+"]/trgtcdnm");
            if(hardcd=="-"|| hardcd==" ") hardcd=""; 
            if(hardcdnm=="-"|| hardcdnm==" ") hardcdnm=""; 
            model.makeValue("/root/init/imsrght/mouserght["+i+"]/func",hardcd);
            model.makeValue("/root/init/imsrght/mouserght["+i+"]/label",hardcdnm);
        }
    }
    
    var c = instance1.selectNodes("/root/initsrch/emrigtclicklist");
    if(c.length>0){
        model.removenode("/root/init/emsrght");
        model.makeNode("/root/init/emsrght");
        for(var i = 1 ; i <= c.length ; i ++){
            var hardcd = model.getValue("/root/initsrch/emrigtclicklist["+i+"]/trgtcd");
            var hardcdnm = model.getValue("/root/initsrch/emrigtclicklist["+i+"]/trgtcdnm");
            if(hardcd=="-"|| hardcd==" ") hardcd=""; 
            if(hardcdnm=="-"|| hardcdnm==" ") hardcdnm=""; 
            model.makeValue("/root/init/emsrght/mouserght["+i+"]/func",hardcd);
            model.makeValue("/root/init/emsrght/mouserght["+i+"]/label",hardcdnm);
        }
    }

    model.refresh();
}

/**@desc   : 외부 CD 재판독 의뢰 팝업 호출 여부 체크 (2010.02.19 JJE)
 * @
 * @param  : ref      - reference path
 *           rsltref  - result reference path
 *           hardcd   - 하드코드
 * @return :
 * @author : 전지은
 * @---------------------------------------------------
 */
function fChkOuterCdListPop(){
    if( instance1.selectSingleNode("/root/initsrch/outercdtypelist/trgtcd") != null ){
        if( model.getValue ( "/root/addprcp" ) != "Y" ){  //외래환자만 pop -> 입원/응급환자도 pop
        clearParameter("spmmo21200_rtnyn"); 
        clearParameter("spmmo21200_pid");
        clearParameter("spmmo21200_orddeptcd");
        clearParameter("spmmo21200_rtnprcpcd"); 
        clearParameter("spmmo21200_rtneqmtcd"); 
        clearParameter("spmmo21200_rtntrsmdd"); 
        clearParameter("spmmo21200_rtntrsmtm"); 
            var pid       = model.getValue("/root/paminfo/list/pid");
            var orddeptcd = model.getValue("/root/paminfo/list/orddeptcd");
            model.makeValue("/root/spmmo21200/send/pid"      , pid);
            model.makeValue("/root/spmmo21200/send/orddeptcd", orddeptcd);
            model.makeNode ("/root/spmmo21200/cdlist");
            if( submit("TRMMO21201", false) ){ //외부 등록 CD가 있고, 판독료 처방 미발행인 경우 외부 등록 CD 리스트 조회
                if( instance1.selectSingleNode("/root/spmmo21200/cdlist/info") != null ){
                    setParameter("spmmo21200_pid"      , pid);
                    setParameter("spmmo21200_orddeptcd", orddeptcd);
                fPrcpModal ( "SPMMO21200", 0, 0 );
            }
            }
            model.removenode("/root/spmmo21200");
        }
    }
}


/**@desc   : 처방시 미비기록 유무 확인(submit)
 * @param  : void
 * @return : void
 * @author : 김소정
 * @---------------------------------------------------
 */
function fChkValidRecInfo(){
    
    var prcpgenrflag = model.getValue("/root/patflag/list/prcpgenrflag");
    model.removeNodeset("/root/temprec/valid");
    
    if (prcpgenrflag != "O" && prcpgenrflag != "S"){ //외래가 아닐때 
        var pid = model.getValue ("/root/paminfo/list/pid");
        var orddd = model.getValue ("/root/paminfo/list/indd");
        var cretno = model.getValue ("/root/paminfo/list/cretno");
        var dschdd = model.getValue ("/root/paminfo/list/dschdd");  
//      model.alert("pid : "+pid+" |orddd : "+orddd+" | cretno : "+cretno);
        
        //1. 퇴원처방시점
        if (!isNull(model.getValue ("/root/main/prcp/prcplist[prcpkindcd='60']/prcpcd"))) { 
            model.makeValue("/root/temprec/valid/reqdata/eventflag", "DC_ORD");
            model.makeValue("/root/temprec/valid/reqdata/pid", pid);
            model.makeValue("/root/temprec/valid/reqdata/orddd", orddd);
            model.makeValue("/root/temprec/valid/reqdata/cretno", cretno);
            model.makeValue("/root/temprec/valid/reqdata/reqdd", dschdd);
        } 
        //2. 처방시점
        else {
            model.makeValue("/root/temprec/valid/reqdata/eventflag", "ORD");
            model.makeValue("/root/temprec/valid/reqdata/pid", pid);
            model.makeValue("/root/temprec/valid/reqdata/orddd", orddd);
            model.makeValue("/root/temprec/valid/reqdata/cretno", cretno);
            model.makeValue("/root/temprec/valid/reqdata/reqdd", "");
        }
        
        submit("TRMMR01303", false);
        
        // model.alert("DEBUG : " + model.getValue("/root/temp/valid/validrecinfo/resultCod") );
    } 
}

/**@desc   : 처방시 미비기록 유무 확인(message)
 * @param  : void
 * @return : true, false
 * @author : 김소정
 * @---------------------------------------------------
 */
function fValidRecInfoMsg(){

    var rstcod = model.getValue("/root/temprec/valid/validrecinfo/resultCod");

    if (  rstcod != "" && rstcod != null && rstcod != "0"  ) {
        var rstmsg = model.getValue("/root/temprec/valid/validrecinfo/resultMsg");
        messageBox (rstmsg, "E");
        return false;
    }
    
    //처방 속도개선을 위한 시간 체크 set 20101027  LYJ
    try {
        var SMMMO00100_E = new Date();
        var ordPatObj = getOpenWindow("SMMMO04100");    
        var SMMMO04100_chk = ordPatObj.javascript.getParameter("SMMMO04100_chk");
        if(ordPatObj != null && SMMMO04100_chk  == "Y"){
            ordPatObj.javascript.setParameter("SMMMO00100_E",SMMMO00100_E.getTime());
        }
    } catch(e) {
    }

    return true; 
}


function fPrintDyeFrm(srchRow, prcpcd){
    //*************************** 조영제 출력팝업 **********************************//
    var iFind = model.getValue ( "/root/initsrch/prcpetccnts/ocrprnt" ).search( "DYE"+ prcpcd );
    if ( iFind >= 0) {
        if( getParameter("SPAER01900_popupYN" ) != "Y" ){ //조영제 부작용관리 팝업 한번만 뜨도록 요청함에 따라 팝업호출여부 체크 (2010.07.16 JJE)
            var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
            if ( prcpgenrflag == "O" || prcpgenrflag == "S" )  {
                var orddd = model.getValue ( "/root/paminfo/list/orddd" );
            } else {
                var orddd = model.getValue ( "/root/paminfo/list/indd" );
            }
            
            model.setValue ( "/root/hidden/ocrprint/calcscor/pid",          model.getValue ( "/root/paminfo/list/pid" ));
            model.setValue ( "/root/hidden/ocrprint/calcscor/cretno",       model.getValue ( "/root/paminfo/list/cretno" ));
            model.setValue ( "/root/hidden/ocrprint/calcscor/orddd",        orddd );
            model.setValue ( "/root/hidden/ocrprint/calcscor/ordtype",      prcpgenrflag);
            model.setValue ( "/root/hidden/ocrprint/calcscor/calcscorcd",   prcpcd );
            model.makeValue ( "/root/hidden/ocrprint/calcscor/prcpyn",       "Y"); // 처방시 팝업 여부

            var xpt = window.screenleft + 300;
            var ypt = window.screenTop + 100;
            var coord = getRelativeCoordinate ( xpt, ypt );
            var mon = coord[0];
            xpt = coord[1];
            ypt = coord[2];
            modal ( "SPAER01900", mon,  xpt, ypt, "prcpdetl", "/root/hidden/ocrprint/calcscor", "/root/hidden/ocrprint/calcscor", "", false );
            setParameter("SPAER01900_popupYN", "Y" );
        }
        
        if ( !isNull(getParameter("SPAER01900_addprcpcd" ))) {
            var addprcpcd   = getParameter("SPAER01900_addprcpcd" );
            var addprcpdd   = model.getValue ( "/root/init/prcpdd" );
            var addinsukind = model.getValue ( "/root/paminfo/list/insukind");
            
            clearParameter("SPAER01900_addprcpcd" );
            //멀티 search 가능함
            if(addprcpcd == "LH1026") {    // 신기능 검사 
                model.makeValue("/root/send/addsetprcp/prcpcd",     "LH1026");
                model.makeValue("/root/send/addsetprcp/prcpdd",     addprcpdd);
                model.makeValue("/root/send/addsetprcp/insukind",   addinsukind);
                model.makeValue("/root/send/addsetprcp/prcpvol",    "1");
            } else if(addprcpcd == "B") {    // 항히스타민제 단독 전처치
                model.makeValue("/root/send/addsetprcp/prcpcd",     "DICHLOR");
                model.makeValue("/root/send/addsetprcp/prcpdd",     addprcpdd);
                model.makeValue("/root/send/addsetprcp/insukind",   addinsukind);
                model.makeValue("/root/send/addsetprcp/prcpvol",    "4");
            } else if(addprcpcd == "C" || addprcpcd == "D") {	 // 항히스타민제+스테로이드 복합 전처치, 감염내과 재진료 의뢰 하지 않고 전처치만 선택한경우
                model.makeValue("/root/send/addsetprcp[1]/prcpcd",     "DOSOLON");
                model.makeValue("/root/send/addsetprcp[1]/prcpdd",     addprcpdd);
                model.makeValue("/root/send/addsetprcp[1]/insukind",   addinsukind);
                model.makeValue("/root/send/addsetprcp[1]/prcpvol",    "30");
                
                model.makeValue("/root/send/addsetprcp[2]/prcpcd",     "DICHLOR");
                model.makeValue("/root/send/addsetprcp[2]/prcpdd",     addprcpdd);
                model.makeValue("/root/send/addsetprcp[2]/insukind",   addinsukind);
                model.makeValue("/root/send/addsetprcp[2]/prcpvol",    "4");
            } else if(addprcpcd == "E") {	// 지연성 반응 예방을 위한 스테로이드 처방
    			model.makeValue("/root/send/addsetprcp[1]/prcpcd",     "DOSOLON");
                model.makeValue("/root/send/addsetprcp[1]/prcpdd",     addprcpdd);
                model.makeValue("/root/send/addsetprcp[1]/insukind",   addinsukind);
                model.makeValue("/root/send/addsetprcp[1]/prcpvol",    "20");
		    }
            
            if ( submit("TRMMO00207",false)) {
                var addPrcpNode = model.instances(0).selectNodes("/root/addsetprcp/prcplist");
                var nAddRow = srchRow;
                
                for (var i=1; i<=addPrcpNode.length; i++) {
                    nAddRow = nAddRow +1
                    model.setValue ( "root/addsetprcp/prcplist["+ i +"]/testreqlnkno", "216" );
                    if(addprcpcd == "B") {    // 항히스타민제 단독 전처치
                        model.setValue ( "root/addsetprcp/prcplist["+ i +"]/prcpdelivefact", "검사 1시간 전 전처치 후 검사 진행" );
                    } else if(addprcpcd == "C" || addprcpcd == "D") {    // 항히스타민제+스테로이드 복합 전처치
                        
                        if(model.getValue ("root/addsetprcp/prcplist["+ i +"]/prcpcd") == "DOSOLON") {
                            var drprcpetc7 = model.getValue ("root/addsetprcp/prcplist["+ i +"]/drprcpetc7" );
                            var drprcpetc8 = model.getValue ("root/addsetprcp/prcplist["+ i +"]/drprcpetc8" );
                            
                            model.setValue ( "root/addsetprcp/prcplist["+ i +"]/prcpdelivefact", "검사 12시간전, 2시간 전 복용" );
                            model.setValue ( "root/addsetprcp/prcplist["+ i +"]/prcptims",       "2" );                     // 2회
                            model.setValue ( "root/addsetprcp/prcplist["+ i +"]/prcpvol",         drprcpetc7 * 2);          // 총용량 수정
                            model.setValue ( "root/addsetprcp/prcplist["+ i +"]/prcpqty",         drprcpetc8 * 2);          // 총수량 수정
                            model.setValue ( "root/addsetprcp/prcplist["+ i +"]/drugmthdspccd",   "A20DQ" );                // 용법 수정
                            model.setValue ( "root/addsetprcp/prcplist["+ i +"]/drugmthdspccdnm", "의사지시대로 2회복용" ); // 용법 수정
                        } else if(model.getValue ("root/addsetprcp/prcplist["+ i +"]/prcpcd") == "DICHLOR") {
                            model.setValue ( "root/addsetprcp/prcplist["+ i +"]/prcpdelivefact", "검사 1시간 전 주사" );
                        }
                    } else if(addprcpcd == "E") {	// 지연성 반응 예방을 위한 스테로이드 처방
                        model.setValue ( "root/addsetprcp/prcplist["+ i +"]/prcpdelivefact", "조영제 과민반응 예방적 투여" );
                    }
                    
                    serPrcpSrchRow = addPrcpDetl ( "main" , "/root/addsetprcp/prcplist" , "/root/main/prcp" , i , nAddRow, "00" );
                    if (serPrcpSrchRow == 0 ) srchRow = 0;
                }
            }
            model.removeNodeset("/root/send/addsetprcp");
            model.refresh();
        }
        
        if ( !isNull(getParameter("SPAER01900_prcpcd" ))) {
            var addprcpcd   = getParameter("SPAER01900_prcpcd" );
            var addprcpdd   = model.getValue ( "/root/init/prcpdd" );
            var addinsukind = model.getValue ( "/root/paminfo/list/insukind");
            
            model.removeNode ( prcpNode + "[" + srchRow + "]" );
            //clearParameter("SPAER01900_prcpcd" );
            //멀티 search 가능함
            model.makeValue("/root/send/addsetprcp/prcpcd",     addprcpcd);
            model.makeValue("/root/send/addsetprcp/prcpdd",     addprcpdd);
            model.makeValue("/root/send/addsetprcp/insukind",   addinsukind);
            
            if ( submit("TRMMO00207",false)) {
                model.setValue ( "root/addsetprcp/prcplist/testreqlnkno", "216" );
                serPrcpSrchRow = addPrcpDetl ( "main" , "/root/addsetprcp/prcplist" , "/root/main/prcp" , 1 , srchRow, "00" );
                if (serPrcpSrchRow == 0 ) srchRow = 0;
            }
            model.removeNodeset("/root/send/addsetprcp");
        }else if ( getParameter("SPAER01900_lnkno" ) == "216" ) {
            model.setValue ( prcpNode + "[" + srchRow + "]/testreqlnkno", "216" );
        } else {
            model.setValue ( prcpNode + "[" + srchRow + "]/testreqlnkno", "DYENO" );
        }
    }
}


/**@desc   : @@@ 중증/ 희귀난치 요율팝업 
 * @param  : void
 * @return : void
 * @author : 이윤정
 * @---------------------------------------------------
 */
function fEstmSpclFrm(){
    if ( model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmflag" ) == "Y"  ) {
        if ( model.getValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd" ) == "-" ) { // 기존 적용 산정특례 취소
            model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmyn", "Y" );
            messageBox(model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmmsg" ), "I" );
        } else { // 산정특례 적용
            if ( model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmmsg" ) == ""  ) {   //  msg없으면 띄우지 않고처리한다. (진료비 정액대상환자)
                model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmyn", "Y" );
            } else if (   model.getValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd" ) == 'V100'
                       || model.getValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd" ) == 'V252'
                       || model.getValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd" ) == 'V352' ) { // 경증 질환자
                model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmyn", "Y" );
                if (   model.getValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd" ) == 'V252'
                    || model.getValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd" ) == 'V352' ) { // // V100은 약제비 변경이 없으므로 메세지팝업 하지 않음.
                    messageBox(model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmmsg" ), "I" );
                }
            } else if ( model.getValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd" ) == 'V103' ) { // 2016.03.22 HIV 환자 메세지 팝업후 적용
                model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmyn", "Y" );
                messageBox(model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmmsg" ), "I" );
            } else if ( model.getValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd" ) == 'V161' && model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmkind") == "D0") { // 2017.02.21 정신과 의료급여 조현병 환자 메세지 팝업후 적용
                model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmyn", "Y" );
                messageBox(model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmmsg" ), "I" );
            } else if(model.getValue("/root/prcpetcinfo/saveestmspclcs/estmexistyn") != "Y") {
                model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmyn", "Y" );
                model.setValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd", "-" ); 
                if(   model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmkind") == "11" 
                   || model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmkind") == "51" 
                   || model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmkind") == "62" ) {
                    model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmkind", "10" );  // 가정간호
                } else if( model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmkind") == "56" ) {
                    model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmkind", "56" );  // 호스피스 가정간호
                } else if( model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmkind") == "57" ) {
                    model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmkind", "57" );  // 호스피스 가정간호
                } else {
                    model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmkind", "00" );  // 정상
                }
            } else {
                if (messageBox(model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmmsg" ), "Q" ) == "6" ) {
                    model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmyn", "Y" );
                }else {
                    model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmyn", "N" );
                    model.setValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd", "-" ); //by sonjy 추가. 아니오 선택시 산정특례기호 update되는 문제 때문. 
                    messageBox ( "이번 진료는 산정특례와 관계가 없다고 선택하셨습니다. 관련 진단명을 삭제하여 주시기 바랍니다.", "E" ); //수정중
                }
            }
        }
    } else if( model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmflag" ) == "F"  ) {  // 중증화상 대상이 T31.x상병이 필요한 경우에 메세지만 보여준다.
         model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmflag", "Y" );
         model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmyn", "Y" );
         messageBox(model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmmsg" ), "I" ) ;
    } else if( model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmflag" ) == "T"  ) { 
        model.setValue ( "/root/prcpetcinfo/saveestmspclcs/estmyn", "N" );
        model.setValue ( "/root/prcpetcinfo/saveestmspclcs/spclcd", "-" ); //by sonjy 추가. 아니오 선택시 산정특례기호 update되는 문제 때문. 
    } else if( model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmflag" ) == "M"  ) {  // 메세지만 팝업 후 리턴함.
        messageBox(model.getValue ( "/root/prcpetcinfo/saveestmspclcs/estmmsg" ), "I" );
        return;
    } else { // 그외의 경우 estmflag값이 처리 할수 없는 값
        return;
    }

    var saveestmspclcs = model.instances(0).selectNodes( "/root/prcpetcinfo/saveestmspclcs" );
    model.setValue ( "/root/send/cond1", getNodeListCSV(saveestmspclcs));
        
    if( !submit ( "TXMMO00105", false ) ){
        return false;
    }
}

/**@desc   : @@@ 레진상 완전틀니 / 임플란트 관련 요율 팝업
 * @param  : void
 * @return : void
 * @author : 엄영만 2012.07.04
 * @---------------------------------------------------
 */
function fResinDentureFrm(){
    var sCheckResin = "";  // (01:노인틀니 신청서 작성, 02:노인틀니 신규 적용, 03:노인틀니 기존 적용 취소, 11:임플란트 신청서 작성, 12:임플란트 신규 적용, 13:임플란트 기존 적용 취소)
    var sEstmMsg    = "";  // 적용메세지 
    var srcNodeList = model.instances(0).selectNodes ( "/root/prcpetcinfo/saveresindenture" );
	for ( var i=1; i <= srcNodeList.length; i++ ) {
        sCheckResin = model.getValue("/root/prcpetcinfo/saveresindenture["+i+"]/checkresin"); 
        sEstmMsg    = model.getValue("/root/prcpetcinfo/saveresindenture["+i+"]/estmmsg");
        
        if (sCheckResin == "01") { // 01:노인틀니 신청서 작성
            fPrcpModal ( "SPMMO25000", 400, 100 ); 
        }else if (sCheckResin == "11") { // 01:임플란트 신청서 작성
            fPrcpModal ( "SPMMO25100", 400, 100 ); 
        } else if(sCheckResin == "02" || sCheckResin == "03" || sCheckResin == "12" || sCheckResin == "13") { // 02:노인틀니 신규 적용, 03:노인틀니 기존 적용 취소, 12:임플란트 신규 적용, 13:임플란트 기존 적용 취소
            messageBox(sEstmMsg, "I" ); // 알림 메세지 팝업.
             
            var saveresindenture = model.instances(0).selectNodes( "/root/prcpetcinfo/saveresindenture["+i+"]" );
            model.setValue ( "/root/send/cond1", getNodeListCSV(saveresindenture));
                
            if( !submit ( "TXMMO00105", false ) ){
                return false;
            }
        } else { // 처리할수 없는 유형
            return true;
        }	    
	}
}

/**@desc   : @@@ 우클릭시 검사정보안내 화면 호출
 * @param  : void
 * @return : void
 * @author : 이윤정
 * @---------------------------------------------------
 */
function fReqInfoPop(){
    //병리 -> D2  진검 -> B2
    if (model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpclscd" ) == "B2"){
        modal("SMLLF90100" ,"","","","", prcpNode + "[" + grd_prcplist.row + "]/prcpcd" , "/root/hidden/tclscd");
    }else if (model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpclscd" ) == "D2"){
        modal("SMLPC02000" ,"","","","", prcpNode + "[" + grd_prcplist.row + "]/prcpcd" , "/root/hidden/tclscd");
    }
}

/**@desc   : 환자의 가야할 곳을 출력한다.
 * @return : void
 * @authur : 김영학 2011. 01. 05
 */
function fPrltPatTogoPlceList(sInstCd, sPid, sOrdDd, sCretNo, sPrintYn) {
    var sNewLogYn = fGetHardCDList("Y", 332, 3); // 신규 가셔야 할곳 적용 여부 (비동기 방식 적용)
    var sAddPrcp  = "N"; // 시행부서 처방 여부
    var sScreenID = getScreenID();
    
    if ( sNewLogYn == "Y" && sScreenID == "SMMMO00100") { // 시행부서 처방일경우 상단정보가 없는경우도 있어서 기존 로직 사용
    	// 출력전용 팝업 화면에서 처리
    	// '처방'화면에 종속적으로 처리할 경우 - 처방화면이 닫히면 함께 닫힘.
    	//open("SPMMO00110", 1, 1, 1, "SPMMO00110", "", "", "width:1px; height:1px;", false);
    	
    	// '처방'화면에 독립적으로 처리할 경우 - 처방화면이 닫혀도 닫히지 않음.
    	var sysMsgObj = getViewer("sysMessage");
        if (sysMsgObj != null) {
    		sysMsgObj.window.javascript.open("SPMMO00110", 2, null, null, "SPMMO00110", "/root/paminfo/list", "/root/paminfo/list", "", false);
    	} else {
    		messageBox("[가셔야할 곳] 출력화면 오픈에 문제가 발생했습니다.","E000");
    	}
    } else {   // 기존 가야할곳 출력 (시행부서 처방에서 사용)
        if(sScreenID == "SMMMO00200") { // 시행부서 처방화면
            sAddPrcp      = "Y";
            sInstCd       = model.getValue("/root/paminfo/list/instcd");
            sPid          = model.getValue("/root/paminfo/list/pid");
            sOrdDd        = model.getValue("/root/paminfo/list/orddd");
            sCretNo       = model.getValue("/root/paminfo/list/cretno");
        }
        
        model.makeValue("/root/hidden/tempsend/instcd"          , sInstCd); 
    	model.makeValue("/root/hidden/tempsend/pid"             , sPid);
    	model.makeValue("/root/hidden/tempsend/orddd"           , sOrdDd);
    	model.makeValue("/root/hidden/tempsend/cretno"          , sCretNo);
    	model.makeValue("/root/hidden/tempsend/userinstcd"      , sInstCd); // 원무 무인수납 여부 체크 변수
    	model.makeValue("/root/hidden/tempsend/sessuserid"      , getUserInfo("userid"));
    	model.makeValue("/root/hidden/tempsend/sessinstcd"      , sInstCd);
    	model.makeValue("/root/hidden/tempsend/addprcp"         , sAddPrcp);
        
        if(fGetHardCDList("Y", 338, 3) == "N"){ // 수가 계산 여부 
            model.makeValue("/root/hidden/tempsend/checkyn", "Y");     // 수가계산하지 않음. 2012.02.10 이동식 요청
        } else {
            model.makeValue("/root/hidden/tempsend/checkyn", "N");     // 수가계산 함. 2012.02.10 이동식 요청
        }
        
        if (submit("TRMMO00141") == true) {    	// 가셔야할 곳 출력위한 리스트 조회
           	if(sPrintYn == "N") {
           	    return model.getValue("/root/hidden/pattoplace/patinfo/rcptpossynmsg");
            } else {
                exeReportPreview("RPMMO00103", "XMLSTR", "/root/hidden/pattoplace", "", "true", "", "", "", "", "true", "", "", "", "", "", "", "", "", "", "", "");
            }
        }
    }
}

/**@desc   : 부분선택진료 동의서를 출력한다.
 * @return : void
 * @authur : 김영학 2011. 01. 05
 * 2011.10.01 고시적용으로 수정함
 */
function fPrltPartSpclDrList() {
    if (model.instance1.selectNodes("/root/result/specconsent").length > 0 ) {
        model.resetInstanceNode("/root/hidden/specorderlist");
        
        var sFormCd = model.getValue("/root/result/specconsent[1]/formcd"); // 선택진료 동의서 서식코드
        if (model.getValue("/root/result/specconsent[1]/printcnt") > "0") { // 칠곡만 확인 메세지 팝업 하도록 수정. 2012.10.17 엄영만
            messageBox ("제출확인 되지 않은 선택진료신청서가 존재합니다.\n\n선택진료신청서를 출력 합니다.\n\n ☎ 원무팀(2066)", "I" );
        }
        
        copyNodeset("/root/hidden/specorderlist/specorderlist", "/root/result/specconsent", "replace", model, model)
        model.makeNode("/root/temp/specocrinfo");
        
        var sCurrentDate = getCurrentDate();
        var sCurrentTm   = getCurrentTime();  
        var sOrdDrId    = ""; 
        var sOrddd   = "";
        var sIoFlag  = "";
        var sOrdtype =  model.getValue ( "/root/patflag/list/prcpgenrflag" );
        if (sOrdtype == "O" || sOrdtype == "S") {
            sOrdDrId = model.getValue("/root/paminfo/list/orddrid"); 
            sOrddd   = model.getValue("/root/paminfo/list/orddd");  
            sIoFlag  = "O"
        } else {
            sOrdDrId = model.getValue("/root/paminfo/list/medispclid"); 
            sOrddd   = model.getValue("/root/paminfo/list/indd"); 
            sIoFlag  = "I"
        }
        var sCretno      = model.getValue("/root/paminfo/list/cretno"); 
        var sOrdDeptCd   = model.getValue("/root/paminfo/list/orddeptcd"); 
        var sDeptHngNm   = model.getValue("/root/paminfo/list/orddeptnm");
        var sOrdDrNm     = model.getValue("/root/paminfo/list/orddrnm");
        var sSpecOrdYn   = model.getValue("/root/paminfo/list/specordyn")
        var sPid         = model.getValue("/root/paminfo/list/pid");  
        var sHngNm       = model.getValue("/root/paminfo/list/hngnm");  
        var sRrgstNo     = model.getValue("/root/paminfo/list/rrgstno1") + "-" + model.getValue("/root/paminfo/list/rrgstno2") ;
        
        var CheckList1ChoiFlagNode = model.instance1.selectNodes( "/root/hidden/specorderlist/specorderlist[orddeptkind='01']" );
        var CheckList2ChoiFlagNode = model.instance1.selectNodes( "/root/hidden/specorderlist/specorderlist[orddeptkind='02']" );
        var CheckList3ChoiFlagNode = model.instance1.selectNodes( "/root/hidden/specorderlist/specorderlist[orddeptkind='03']" );
        var CheckList4ChoiFlagNode = model.instance1.selectNodes( "/root/hidden/specorderlist/specorderlist[orddeptkind='04']" );
        var CheckList5ChoiFlagNode = model.instance1.selectNodes( "/root/hidden/specorderlist/specorderlist[orddeptkind='05']" );
        var CheckList6ChoiFlagNode = model.instance1.selectNodes( "/root/hidden/specorderlist/specorderlist[orddeptkind='06']" );
        var CheckList7ChoiFlagNode = model.instance1.selectNodes( "/root/hidden/specorderlist/specorderlist[orddeptkind='07']" );
        var CheckList8ChoiFlagNode = model.instance1.selectNodes( "/root/hidden/specorderlist/specorderlist[orddeptkind='08']" );
        var CheckList9ChoiFlagNode = model.instance1.selectNodes( "/root/hidden/specorderlist/specorderlist[orddeptkind='09']" );

        model.makeValue("/root/hidden/specorderlist/rrgstno"    , sRrgstNo);
        model.makeValue("/root/hidden/specorderlist/pid"        , sPid);
        model.makeValue("/root/hidden/specorderlist/hngnm"      , sHngNm);
        model.makeValue("/root/hidden/specorderlist/orddd"      , sOrddd);
        model.makeValue("/root/hidden/specorderlist/cretno"     , sCretno);
        model.makeValue("/root/hidden/specorderlist/ioflag"     , sIoFlag );
        model.makeValue("/root/hidden/specorderlist/ordtype"    , sOrdtype );
        model.makeValue("/root/hidden/specorderlist/depthngnm"  , sDeptHngNm);
        model.makeValue("/root/hidden/specorderlist/orddrid"    , sOrdDrId);
        model.makeValue("/root/hidden/specorderlist/orddrnm"    , sOrdDrNm);
        model.makeValue("/root/hidden/specorderlist/specordyn"  , sSpecOrdYn);
        model.makeValue("/root/hidden/specorderlist/formcd"     , sFormCd);
        model.makeValue("/root/hidden/specorderlist/usernm"     , getUserInfo("usernm"));
        model.makeValue("/root/hidden/specorderlist/currentdate", sCurrentDate);
        model.makeValue("/root/hidden/specorderlist/currenttm"  , sCurrentTm);
        model.makeValue("/root/hidden/specorderlist/appdd"      , sCurrentDate);
        model.makeValue("/root/hidden/specorderlist/fromdd"     , sCurrentDate);
        model.makeValue("/root/hidden/specorderlist/todd"       , "99991231");
        model.makeValue("/root/hidden/specorderlist/specdeptcd" , "-");
        model.makeValue("/root/hidden/specorderlist/signflag"   , "O");     // 서명구분(O:OCR, E:전자서명, B:변경신청(OCR))
        model.makeValue("/root/hidden/specorderlist/returnyn"   , "N");
        
        if (CheckList1ChoiFlagNode.length > 0 ){ model.makeValue("/root/hidden/specorderlist/list1choiflag", "B"); }
        if (CheckList2ChoiFlagNode.length > 0 ){ model.makeValue("/root/hidden/specorderlist/list2choiflag", "B"); }
        if (CheckList3ChoiFlagNode.length > 0 ){ model.makeValue("/root/hidden/specorderlist/list3choiflag", "B"); }
        if (CheckList4ChoiFlagNode.length > 0 ){ model.makeValue("/root/hidden/specorderlist/list4choiflag", "B"); }
        if (CheckList5ChoiFlagNode.length > 0 ){ model.makeValue("/root/hidden/specorderlist/list5choiflag", "B"); }
        if (CheckList6ChoiFlagNode.length > 0 ){ model.makeValue("/root/hidden/specorderlist/list6choiflag", "B"); }
        if (CheckList7ChoiFlagNode.length > 0 ){ model.makeValue("/root/hidden/specorderlist/list7choiflag", "B"); }
        if (CheckList8ChoiFlagNode.length > 0 ){ model.makeValue("/root/hidden/specorderlist/list8choiflag", "B"); }
        if (CheckList9ChoiFlagNode.length > 0 ){ model.makeValue("/root/hidden/specorderlist/list9choiflag", "B"); }
        
        if(submit("TXMMO00123")){
            var sSeq         = model.getValue("/root/temp/specocrinfo/specocrlist[1]/ocrtag");
            var sDeptEngAbbr = model.getValue("/root/initsrch/dscdeptinfo[deptcd = '"+sOrdDeptCd+"']/deptengabbr");
            var sMppHonTel   = model.getValue("/root/temp/specocrinfo/ptbs/ptbs_mpphontel");
            var sHomeTel     = model.getValue("/root/temp/specocrinfo/ptbs/ptbs_hometel");
            var sAddr        = model.getValue("/root/temp/specocrinfo/ptbs/ptbs_zipcdaddr");
            var sRgstno1     = model.getValue("/root/temp/specocrinfo/ptbs/ptbs_rrgstno1");
            var sRgstno2     = model.getValue("/root/temp/specocrinfo/ptbs/ptbs_rrgstno2");
            var sRgstno      = sRgstno1 +"-"+ sRgstno2.substring(0,1) +"XXXXXX";
            
            model.makeValue("/root/hidden/specorderlist/seq"                , sSeq );
            model.makeValue("/root/hidden/specorderlist/deptengabbr"        , sDeptEngAbbr);
            model.makeValue("/root/hidden/specorderlist/rgstno"             , sRgstno);
            model.makeValue("/root/hidden/specorderlist/mpphontel"          , sMppHonTel);
            model.makeValue("/root/hidden/specorderlist/hometel"            , sHomeTel);
            model.makeValue("/root/hidden/specorderlist/addr"               , sAddr);
            model.makeValue("/root/hidden/specorderlist/userip"             , getUserInfo("ipaddr"));
            
            exeReportPreview("RPMMO00104", "XMLSTR", "/root/hidden/specorderlist", "", "true", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "");
        }
    }
}

/**@desc   : 진료과, 진료의변경
*  @param  : qestcd : 질문값
*  @return :  Answcnt ( 답안값)
*/
function fChgOrdDr() {

    var pid    = model.getValue ( "/root/paminfo/list/pid" );
  var ordtype =  model.getValue ( "/root/patflag/list/prcpgenrflag" );
  var cretno =  model.getValue ( "/root/paminfo/list/cretno" );       

    var xpt = window.screenLeft + 400;
    var ypt = window.screenTop + 60;
    var coord = getRelativeCoordinate(xpt, ypt);
    var mon = coord[0];
    xpt = coord[1];
    ypt = coord[2];                 
    
    clearParameter ( "SPMMB08300_flag");
  clearParameter ( "SPMMB08300_useyn" );
  clearParameter ( "SPMMB08300_userid" );
  clearParameter ( "SPMMB08300_orddeptcd" );
  clearParameter ( "SPMMB08300_userinfo" );
            
    if(ordtype != ""){
            if(ordtype == "O" || ordtype == "S"){
                var orddeptcd = model.getValue("/root/paminfo/list/orddeptcd");
                var orddrid = model.getValue("/root/paminfo/list/orddrid");
                var indd = model.getValue ( "/root/paminfo/list/orddd" );   
            }else{
                var orddeptcd = model.getValue("/root/paminfo/list/orddeptcd");
                var orddrid = model.getValue("/root/paminfo/list/medispclid");
                var indd = model.getValue ( "/root/paminfo/list/indd" );
            }
        setParameter("SPMMB08300_orddeptcd", orddeptcd);
        setParameter("SPMMB08300_orddrid", orddrid);
        setParameter("SPMMB08300_ioflag", ordtype);
    }   
    
  grd_prcplist.select( 1, 1, grd_prcplist.rows-2, 1) = true;
    
    setParameter( "SPMMB08300_flag", "chgdr" );
    
    modal("SPMMB08300", mon, xpt, ypt, null, null, null, null, false);
    
    var useyn = getParameter("SPMMB08300_useyn");
    var userid = getParameter("SPMMB08300_userid");
    var orddeptcd = getParameter("SPMMB08300_orddeptcd");
    var userinfo = getParameter("SPMMB08300_userinfo");
    if(useyn == "Y"){
        orddrid = userid;
        var selectedRows = grd_prcplist.selectedRows;
      for(var i = 0;  i < selectedRows; i++){
          if( model.getValue ("/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(i) + "]/status") != "S"){                    
              model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(i) + "]/pampkspec", pid + "|" + indd + "|" + cretno + "|" + orddeptcd + "|" + orddrid ); //pampkspec : 등록번호|진료일자|생성번호|진료과|담당의 // 원무PK내역         
              model.setValue ( "/root/main/prcp/prcplist[" + grd_prcplist.selectedrow(i) + "]/tempcol20", userinfo );
          }
      }             
    }
    model.refresh();                
       
}

/**@desc   : KNUH, 사전심사 대상 처방의 상태가 변경요청인 경우, 심사팀의 메세지를 보여준다.
 * @return : void
 * @authur : 전지은 2011. 03. 17
 */
function fOpenBfJudgInfoPop(){
    //var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    if( model.getValue("/root/patflag/list/prcpgenrflag") == "O" ){
        
        var judgStat = getPatientInfoDetail("bfjudgvalue"); //WXY (W:심사대기, X:변경요청, Y:심사완료 혹은 해당없음)
        //alert( judgStat.substr(1, 1) );
        if( judgStat.substr(1, 1) == "X" ){
            
            clearParameter("SPMMO21500_rntValue"); //parameter 초기화(2011.01.31 JJE)
            
            var xpt = window.screenleft + 180;
            var ypt = window.screenTop + 50;                    
            var coord = getRelativeCoordinate ( xpt, ypt );
            var mon = coord[0];
            var xpt = coord[1];
            var ypt = coord[2];
            modal ( "SPMMO21500", mon,  xpt, ypt, "prcpdetl", "", "", "", false ); //오류팝업
            
            var bfRtnValue = getParameter("SPMMO21500_rntValue");
            if (bfRtnValue == "REQ") {
                model.removeNodeset("/root/result/prcperrlist");
                if ( isNull ( model.getValue ( "/root/main/prcp/prcplist[status='I' or status='D' or status='U']/prcpcd" ))) { 
                    if (isNull(model.getValue ( "/root/main/diaginfo/diagcdlist[status='I' or status='D' or status='U']/diagcd" ))) {
                        messageBox ( "사전심사할 처방 및 진단이 없습니다.", "E" );
                        fClearSaveInstance();
                        model.removeNodeset("/root/result/prcperrlist");
                        return false;
                    }
                }
            }
        } //end if( judgStat == "W" )
        
    } //end if( prcpgenrflag == "O" )
}

/**@desc   : 처방 저장시 화면에서 처장 가능 한지 체크 한다.
 * @return : void
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : true, false
 * @authur : 엄영만 2011. 10. 21
 */
function fCheckBeforePrcpSave( prcpflag, savekindflag, saveNode, prcpchkflag ){
    var sIoFlag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    
    //인증저장 가능여부체크.
    if(!fCheckCertificatSave( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;

    //임시저장 가능여부체크.
    if(!fCheckTempSave( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;

    //기증자유형 환자여부체크.
    if(!fCheckPreWorkUp( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;
    
    if( sIoFlag == "O" || sIoFlag == "S" ) { // 외래에 대한 체크
        //사전심사 관련 처방 Blocking은 임시저장 인증저장 모두 막는다. 서버에서 체크 하는것으로 이동
        //if(!fCheckBfJudg( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;
        
        // 임상연구 환자 체크
        if(!fCheckClincStdy( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;
    
    		// 외래 스텝사인 체크
    		if(!fCheckEssRec( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;
    
    } else { // 입원, 응급, DSC 에 대한 체크
        // 퇴원예고 후 퇴원처방 날짜체크: 퇴원예고 다음날로는 처방 불가
        if(!fCheckDsch( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;
        
        // 입원환자에 대해서 수술료 입력여부를 체크한다. 20110226 김영학
        if(!fCheckOpFee( prcpflag, savekindflag, saveNode, prcpchkflag, "prcp" )) return false;
        
        //필수 기록 체크(수술기록,OpstOpNote,경과기록)
        if(!fCheckEssRec( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;

        // 뇌졸증 평가 관련 기록 여부를 체크한다. 20110823 엄영만  
        if(!fCheckApoplexyRec( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;
    
        // 급성심근경색 평가 관련 기록 여부를 체크한다. 20111101 엄영만  
        if(!fCheckAmiRec( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;
        
        // 제왕절개 안정성 평가 관련 기록 여부를 체크한다. 20120104 엄영만  
        if(!fCheckChildbirthRec( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;
        
        //응급실 체류관련 처방제한
        //if(!fCheckErStay( prcpflag, savekindflag, saveNode, prcpchkflag )) return false;
    }
    
    return true;
}

/**@desc   : 입원환자에 대해서 수술료 입력여부를 체크한다.
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
             callby: prcp : 처방 저장, dsch:퇴원예고
 * @return : true, false
 * @authur : 엄영만 2011. 10. 21
 */
function fCheckOpFee( prcpflag, savekindflag, saveNode, prcpchkflag, callby ){
    var bRtn = true;
    
    if (   prcpflag == "0"
        && savekindflag == "0"
        && model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "I" 
        && model.getValue ( "/root/addprcp" ) != "Y") {
        
        var returnVal = fGetHardCDList("Y", 280, 3); // 처방저장시 수술료 입력안되어 있으면 Blocking 여부
        var pid    = model.getValue("/root/paminfo/list/pid");
        var indd   = model.getValue("/root/paminfo/list/indd");
        var dschdd = model.getValue("/root/paminfo/list/dschdd");
        
        if(returnVal == "Y") {

            // 수술탭에서 선택시 수술료 처방이 있는지 확인한다. 
            var opFeePrcp = "N";
            var operationFlagCvs = getGlobalVariable("operation");  
            if(callby == "prcp" && operationFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
                var sPrcpNodeList = model.instances(0).selectNodes( "/root/main/prcp/prcplist" );
                for (i = 0; i < sPrcpNodeList.length; i++ ) {
                    var sTempcol2 = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/tempcol2" )
                    if ( sTempcol2.substr(0, 5) == "08|02" || sTempcol2.substr(0, 5) == "15|02" || sTempcol2.substr(0, 5) == "17|02") {
                        opFeePrcp = "Y";
                        break;
                    }
                }
            }
            
            if( opFeePrcp != "Y" ) { // 화면에서 수술료 처방이 없는 경우
                model.makeValue("/root/tempchkopfee/reqdata/pid",    pid);
                model.makeValue("/root/tempchkopfee/reqdata/indd",   indd);
                model.makeValue("/root/tempchkopfee/reqdata/dschdd", dschdd);
                
                submit("TRMMO00147", false);
                
                var sMsg = "";
                if (!isNull(model.getValue ( "/root/tempchkopfee/rtndata[checkcode ='ERROR']/oprsrvno" ))) { // 수술 72시간 경과, 수술료 처방이 없는경우
                    if (callby == "prcp") {
                        sMsg = "72시간 이내에 수술료가 입력되지 않아 진행이 불가능 합니다.\n수술료는 수술탭에서 내셔야 합니다. \n 확인하시겠습니까?";
                    } else {
                        sMsg = "수술료가 입력되지 않아 진행이 불가능 합니다.\n수술료는 수술탭에서 내셔야 합니다. \n 확인하시겠습니까?";
                    }
                    
                    if ("6" == messageBox(sMsg , "Q")) {
                        setParameter("SPMMO21600_param", pid + "|" + indd + "|" + dschdd);
                        modal("SPMMO21600");
                        clearParameter("SPMMO21600_param");
                    }
                    
                    bRtn = false;
                } else if (!isNull(model.getValue ( "/root/tempchkopfee/rtndata[checkcode ='ALERT']/oprsrvno" ))) { // 수술료 처방이 없는경우
                    if (callby == "prcp") {
                        sMsg = "수술료가 입력되지 않았습니다.\n수술료는 수술탭에서 내셔야 합니다. \n 확인하시겠습니까?";
                    } else {
                        sMsg = "수술료가 입력되지 않아 진행이 불가능 합니다.\n수술료는 수술탭에서 내셔야 합니다. \n 확인하시겠습니까?";
                    }
                    
                    if ("6" == messageBox(sMsg, "Q")) {
                        setParameter("SPMMO21600_param", pid + "|" + indd + "|" + dschdd);
                        modal("SPMMO21600");
                        clearParameter("SPMMO21600_param");
                        bRtn = false;
                    } else {
                        if (callby == "prcp") {  // 처방입력은 메세지 팝업 후 처방 가능
                            bRtn = true;
                        } else {
                            bRtn = false;  // 퇴원예고시에는 블러킹 처리
                        }
                    }
                } else { // 수술료 처방 또는 사유가 존재 할경우
                    bRtn = true;
                }
            } else { // 수술탭에서 선택 하여 수술 처방이 있을경우
                bRtn = true;
            }
        } else { // 기존 로직
            var sOpFeeChkYn = model.getValue("/root/paminfo/list/opfeechkyn");
            if (sOpFeeChkYn == "N") {
                var opFeePrcp = "N";
                var opFeePrcpCnt = 0;
                // 수술료 처방이 있는지 확인한다. 
                var sPrcpNodeList = model.instances(0).selectNodes( "/root/main/prcp/prcplist" );
                for (i = 0; i < sPrcpNodeList.length; i++ ) {
                    var sTempcol2 = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/tempcol2" )
                    if ( sTempcol2.substr(0, 5) == "08|02" || sTempcol2.substr(0, 5) == "15|02" || sTempcol2.substr(0, 5) == "17|02") {
                        opFeePrcpCnt++ ;
                    }
                }
                if ( opFeePrcpCnt > 0 ) {
                    opFeePrcp = "Y";
                }
                // 수술료 처방이 입력되지 않았다면 경고 메시지를 띄운다. 
                if (opFeePrcp != "Y") {
                    var rtnValue = messageBox("수술료가 입력되지 않았습니다.\n수술료는 수술탭에서 내셔야 합니다. \n 확인하시겠습니까?" , "Q");
                    if (rtnValue == "6") {
                        setParameter("SPMMO21600_param", pid + "|" + indd + "|" + dschdd);
                        modal("SPMMO21600");
                        clearParameter("SPMMO21600_param");
                        bRtn = false;
                    }
                }
            }
        }
    }
    return bRtn;
}

/**@desc   : 사전심사 관련 처방 Blocking은 임시저장 인증저장 모두 막는다.
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : true, false
 * @authur : 엄영만 2011. 10. 21
 */
function fCheckBfJudg( prcpflag, savekindflag, saveNode, prcpchkflag ){
    // 사전심사 관련 처방 Blocking은 임시저장 인증저장 모두 막는다.
    if( (prcpflag == "0" || prcpflag == "undefined" || prcpflag == "" || prcpflag == null) &&  model.getValue ( "/root/usge" ) == "prcp" && model.getValue ( "/root/addprcp" ) != "Y" ){
        if( model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "O" || model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "S"){    
            var judgStat = getPatientInfoDetail("bfjudgvalue");
            if( !isNull(judgStat) && judgStat.substr(0, 1) == "W" ){
                messageBox("심사요구 처방이 심사대기상태이므로 임시저장/인증저장이 불가합니다.\n심사실(본원.T5076, 칠곡.T2182)로 문의 바랍니다.\n심사 완료된 환자는 진료대상자에서 환자를 다시 선택해주시기 바랍니다.", "I");
                return false ;
            }
       }
    }
    return true;
}

/**@desc   : 인증저장 가능여부체크.
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : true, false
 * @authur : 엄영만 2011. 10. 21
 */
function fCheckCertificatSave( prcpflag, savekindflag, saveNode, prcpchkflag ){
    var sIoFlag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    
    if( sIoFlag == "O" || sIoFlag == "S"){ // 외래 체크
        //20081014 by sonjy 간호확인 후에만 처방인증저장 가능. 조범준 과장님 요청  start=================================================================
        //의사처방 화면의 인증저장 버튼을 누를 때에만...
        //if( prcpflag == "0" && savekindflag == "0" &&  model.getValue ( "/root/usge" ) == "prcp" && model.getValue ( "/root/addprcp" ) != "Y" ){
        //    if( model.getValue("/root/paminfo/list/elbulbodstat") == "0" ){
        //        messageBox("간호접수가 되지 않은 환자입니다. 간호접수전에는 임시저장만", "I006");
        //        return false ;
        //    }           
        //}
    } else { // 입원, 응급, DSC 체크
        if ( model.getValue ( "/root/paminfo/list/indd" ) > model.getValue("/root/init/prcpdd")) {
            messageBox( "처방일이 입원일[" + fDateFormat ( model.getValue ( "/root/paminfo/list/indd" )) + "] 전입니다. 처방일을 수정하여 주십시오.", "E");
            return false ;
        }
         
        if (sIoFlag == "D" && model.getValue ( "/root/paminfo/list/indd" ) == model.getValue("/root/init/prcpdd") && model.getValue("/root/init/prcpdd") > getCurrentDate() && savekindflag != 1 ) {
            if(model.getValue ("/root/paminfo/list/orddeptcd" ) == "2120000000") {
                // 2016.05.26 안과 DSC 환자에 대해서 수술일 이전에 처방 가능 하도록 수정 엄영만
            } else {
                messageBox( "DSC 환자는 수술일 이전 처방은 인증저장이 불가합니다. 임시저장만 가능합니다.", "E");
                return false ;
            }
        } else if( sIoFlag == "E" ){
            //20091015 by JJE 응급간호에서 삭제처리한 환자 선택 시 blocking 메세지 처리 추가 (변경요청:8106)
            var pid    = model.getValue("/root/paminfo/list/pid");
            var orddd  = model.getValue("/root/paminfo/list/indd");
            var cretno = model.getValue("/root/paminfo/list/cretno");
            if(fChkInCnclYN(pid, orddd, cretno, "B")==false){
                return false;
            }
            
            //응급실 Visit Time을 등록 하지 않으면 기록과 처방은 임시저장만 가능  20100527 by LYJ
            if (savekindflag == "0" && prcpflag == "0" ){
                var mainObj = getMainViewer();     
                var ordPatObj = mainObj.javascript.getOpenWindow("SMMMO04100");    
                
                if(ordPatObj != null){ //두 객체값이 다른 경우 새로운 진료대상자 화면을 open함
                    var callvisityn = model.getValue("/root/tmp/callvisityn");
                    if (callvisityn == "N")  {
                        messageBox("응급실 Visit Time을 등록 하지 않으면 기록과 처방은 임시저장만 가능 합니다.", "E");     
                        return false; 
                    }
                } 
            }
        }
    }

    return true;
}

/**@desc   : 응급실 체류관련 처방제한
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : true, false
 * @authur : 엄영만 2011. 10. 21
 *           본원 및 칠곡에서 사용 하지 않음 주석 처리 2012.10.31 엄영만
 */
function fCheckErStay( prcpflag, savekindflag, saveNode, prcpchkflag ){
    //응급실 24시간이상 체류환자 응급의학과 인턴의사가 처방시 처방제한 사용여부 체크
    reqHardCodeInfo("/root/hidden/erstayblock", "/root/hidden/erstayblock", "219");
    model.makeValue("/root/temp/erstay/erstayhardcd", model.getValue("/root/hidden/erstayblock/hardcd/hardcd") );

    //20100519 kimsj 응급의학과 소속 인턴이 응급 진료대상자리스트에서 24시간이상 체류한 환자에게 처방 발행 시 처방 블러킹
    //20100525 LYJ 임상각과의 전문의 조건 추가 
    if ( model.getValue("/root/temp/erstay/erstayhardcd") == "Y" && model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "E" ) {
        if(((getUserInfo("dutplcecd") == "2280000000") && (getUserInfo("jobkindcd") == "0330") && (getUserInfo("jobposcd") == "1799")) || ((getUserInfo("jobkindcd") == "0330") &&  (getUserInfo("medispclno") == "") && (getUserInfo("dutplcecd") != "2280000000"))){  // 2280000000 : 응급의학과 , 0330 : 의사, 1799 : 인턴
            model.removeNodeset("/root/temp/erstay");
            model.makeValue( "/root/temp/erstay/reqdata/pid", model.getValue ( "/root/paminfo/list/pid" ) );
            model.makeValue( "/root/temp/erstay/reqdata/orddd", model.getValue ( "/root/paminfo/list/indd" ));
            model.makeValue( "/root/temp/erstay/reqdata/cretno", model.getValue ( "/root/paminfo/list/cretno" ));
            model.makeValue( "/root/temp/erstay/reqdata/cretno", model.getValue ( "/root/paminfo/list/cretno" ));
            submit("TRMMO00133");
            
            if ( model.getValue("/root/temp/erstay/stayinfo/stayinfo/stayyn") == "Y" ) {
                messageBox ( "응급실 체류시간 24시간 이상인 환자는 응급의학과 의사와 임상각과 전문의만 처방 가능합니다.", "E" );
                return false;
            } 
        }
    }

    return true;
}

/**@desc   : 임시저장가능 여부
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : true, false
 * @authur : 엄영만 2011. 10. 21
 */
function fCheckTempSave( prcpflag, savekindflag, saveNode, prcpchkflag ){
    if ( savekindflag == "1" ) {
        if (!isNull(model.getValue ( "/root/main/diaginfo/diagcdlist[status !='I' and status !='-' and diaghistcd='O']/diagcd" ))) {
                messageBox ( "인증저장된 진단을 임시저장으로 수정할 수 없습니다.\n\n진단리스트에서 우클릭 '취소(삭제, 수정)' 기능을 이용하여 초기화 후 임시저장 하십시오", "E" );
                return false;           
        } else if ( isNull ( model.getValue ( "/root/main/prcp/prcplist[status='I' or status='D' or status='U']/prcpcd" ))) { 
            if (isNull(model.getValue ( "/root/main/diaginfo/diagcdlist[status='I' or status='D' or status='U']/diagcd" ))) {
                messageBox ( "임시저장할 처방 및 진단이 없습니다.", "E" );
                return false;           
            }           
        }
    }

    return true;
}

/**@desc   : 처방시 미비기록 유무 확인(submit)
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : true, false
 * @authur : 엄영만 2011. 10. 21
 */
function fCheckEssRec( prcpflag, savekindflag, saveNode, prcpchkflag ){

    
    var bRtn = true;
    var wardcd = model.getValue ("/root/paminfo/list/wardcd");
    
    if (prcpchkflag == "drugdc" || model.getValue ( "/root/addprcp" ) == "Y") {
        bRtn = true;
        return bRtn;
    }
    else {
     	fChkValidRecInfo(); 
      if ( !fValidRecInfoMsg() ) { 
      	bRtn = true;
      }
    }
    
    
    // 기록누락을 통한 처방제어 시스템:미비기록 여부를 체크한다. 20110421 엄영만  288 기록누락  관련 처방 제한 사용 여부
    var sChkValidRecYn = fGetHardCDList("Y", 288, 3);
    if (sChkValidRecYn == "Y" 
        && prcpflag == "0"
        && savekindflag == "0"
        && model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "I" 
        && model.getValue ( "/root/addprcp" ) != "Y") {
        
        var sCheckCode = "";
        var sCheckAlertMsg  = "";
        var sCheckErrorMsg  = "";
        var sCheckInfoMsg  = "";
        

        var pid    = model.getValue ("/root/paminfo/list/pid");
        var indd   = model.getValue ("/root/paminfo/list/indd");
        var cretno = model.getValue ("/root/paminfo/list/cretno");
        
        model.makeValue("/root/tempchkrec/reqdata/pid",    pid);
        model.makeValue("/root/tempchkrec/reqdata/indd",   indd);
        model.makeValue("/root/tempchkrec/reqdata/cretno", cretno);
        
        submit("TRMMO00124", false);
        
        var sChkRecList = model.instances(0).selectNodes( "/root/tempchkrec/rtndata" );

        for ( var i=1; i <= sChkRecList.length; i++ ) {
            var sCheckCode = model.getValue ( "/root/tempchkrec/rtndata[" + i + "]/checkcode" );
            if(sCheckCode == "ALERT"){
                if(sCheckAlertMsg == "") {
                    sCheckAlertMsg = model.getValue ( "/root/tempchkrec/rtndata[" + i + "]/checkmsg");
                } else {
                    sCheckAlertMsg = sCheckAlertMsg + "\n" + model.getValue ( "/root/tempchkrec/rtndata[" + i + "]/checkmsg");
                }
            } else if (sCheckCode == "ERROR"){
                if(sCheckErrorMsg == "") {
                    sCheckErrorMsg = model.getValue ( "/root/tempchkrec/rtndata[" + i + "]/checkmsg");
                } else {
                    sCheckErrorMsg = sCheckErrorMsg + "\n" + model.getValue ( "/root/tempchkrec/rtndata[" + i + "]/checkmsg");
                }
            } else if (sCheckCode == "INFO"){
                if(sCheckInfoMsg == "") {
                    sCheckInfoMsg = model.getValue ( "/root/tempchkrec/rtndata[" + i + "]/checkmsg");
                } else {
                    sCheckInfoMsg = sCheckInfoMsg + "\n" + model.getValue ( "/root/tempchkrec/rtndata[" + i + "]/checkmsg");
                }
            }
            
        }

        if (sCheckErrorMsg != ""){
            sCheckErrorMsg = sCheckErrorMsg + "\n\n" + "해당 기록 작성 후 처방 가능 합니다.";
            
            if(getUserInfo("dutplceinstcd") == "031") {
                sCheckErrorMsg = sCheckErrorMsg + "\n" + "문의처: 의무기록실(5231~3,5324)";
            } else if(getUserInfo("dutplceinstcd") == "032") {
                sCheckErrorMsg = sCheckErrorMsg + "\n" + "문의처: 의무기록실(2401, 2402)";
            }
            
            messageBox("[기록누락]"+ "\n"+sCheckErrorMsg, 'E000');
            bRtn = false;
            return bRtn;
        } else if (sCheckAlertMsg != ""){
            sCheckAlertMsg = sCheckAlertMsg + "\n\n" + "해당 기록이 작성 되지 않으면 처방불가 합니다.";

            if(getUserInfo("dutplceinstcd") == "031") {
                sCheckAlertMsg = sCheckAlertMsg + "\n" + "문의처: 의무기록실(5231~3,5324)";
            } else if(getUserInfo("dutplceinstcd") == "032") {
                sCheckAlertMsg = sCheckAlertMsg + "\n" + "문의처: 의무기록실(2401, 2402)"
            }

            messageBox(sCheckAlertMsg, 'E000');
        } else if (sCheckInfoMsg != ""){
            
            if(getUserInfo("dutplceinstcd") == "031") {
                sCheckInfoMsg = sCheckInfoMsg + "\n" + "문의처: 의무기록실(5231~3,5324)";
            } else if(getUserInfo("dutplceinstcd") == "032") {
                sCheckInfoMsg = sCheckInfoMsg + "\n" + "문의처: 의무기록실(2401, 2402)"
            }
            messageBox(sCheckInfoMsg, 'E000');
        }  
    }
    
    // 미비기록을 통한 처방제어 시스템:미비기록 여부를 체크한다. 20140722 이윤주 388 미비기록 관련 처방 제한 사용 여부
    var sChkValidRecYn = fGetHardCDList("Y", 388, 3);
    if (sChkValidRecYn == "Y" 
    		&& !fContainsHardCD("788", wardcd)
        && prcpflag == "0"
        && savekindflag == "0"
        && model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "I" 
        && model.getValue ( "/root/addprcp" ) != "Y") {
        
        //staffsign 미비
        var cosigncnt = 0;
        var gijuncosigncnt = 0;
        
        //defetcnt 퇴원미비
        var defetcnt  = 0;
        //admpatcnt 재원미비
        var admpatcnt  = 0;
        
        

        var orddeptcd    = getUserInfo("dutplcecd");
        var orddrid   = getUserInfo("userid");
        
        model.makeValue("/root/tempchkrec/reqdata/orddeptcd",    orddeptcd);
        model.makeValue("/root/tempchkrec/reqdata/orddrid",   orddrid);
        model.makeValue("/root/tempchkrec/reqdata/chk24mibi",   "Y");
                
        submit("TRMMO00154", false);
        
        cosigncnt = model.getValue("/root/unprepinfo/unprepcnt/cosigncnt");
        defetcnt = model.getValue("/root/unprepinfo/unprepcnt/defetcnt");
        admpatcnt = model.getValue("/root/unprepinfo/unprepcnt/admpatcnt");
        
        gijuncosigncnt = fGetHardCDList("Y", 5965, 3);
        
        if (parseInt(cosigncnt) >= parseInt(gijuncosigncnt)) {
        	if (6 == messageBox("[기록미비]기록사 확인 후 24시간이내 정리되지 않은 스텝sign미비(본원:5개이상,칠곡:1개이상)가 존재하여"+"\n"+
        	"진행 불가합니다 미비리스트창을 오픈하시겠습니까?"+"\n"+
        	"문의처:의무기록실[본원(5231~3,5324),칠곡(2401~2)]","Q999")) {
        		setParameter("SMMMO04900", "Y");
						setParameter("SMMRI01800_Indschflag", "A");	//2010.01.20 이남익 추가 : 미비구분					
						setParameter("SMMRI01800_Orddrid", orddrid);
						setParameter("SMMRI01800_Orddeptcd", orddeptcd);
						setParameter("SMMRI01800_StaffYn", "Y");
						setParameter("SMMRI01800_xsignmibi", "N");
						open("SMMRI01800");
        	} 
        	return false;
        }
        
        if (admpatcnt > 0) {
        	if (6 == messageBox("[기록미비]기록사 확인 후 24시간이내 정리되지 않은 재원미비가 존재하여"+"\n"+
        	"진행 불가합니다 미비리스트창을 오픈하시겠습니까?"+"\n"+
        	"문의처:의무기록파트[본원(5231~3,5324),칠곡(2401~2)]","Q999")) {
        		setParameter("SMMMO04900", "Y");
						setParameter("SMMRI01800_Indschflag", "I");	
						setParameter("SMMRI01800_Orddrid", orddrid);
						setParameter("SMMRI01800_Orddeptcd", orddeptcd);
						setParameter("SMMRI01800_StaffYn", "N");
						setParameter("SMMRI01800_xsignmibi", "Y");
						
						open("SMMRI01800");
        	}
        	return false;
        }
        
        if (defetcnt > 0) {
        	if (6 == messageBox("[기록미비]기록사 확인 후 24시간이내 정리되지 않은 퇴원미비가 존재하여"+"\n"+
        	"진행 불가합니다 미비리스트창을 오픈하시겠습니까?"+"\n"+
        	"문의처:의무기록파트[본원(5231~3,5324),칠곡(2401~2)]","Q999")) {
        		setParameter("SMMMO04900", "Y");
						setParameter("SMMRI01800_Indschflag", "D");	//2010.01.20 이남익 추가 : 미비구분					
						setParameter("SMMRI01800_Orddrid", orddrid);
						setParameter("SMMRI01800_Orddeptcd", orddeptcd);
						setParameter("SMMRI01800_StaffYn", "N");
						setParameter("SMMRI01800_xsignmibi", "Y");
						open("SMMRI01800");
        	}
        	return false;
        }
    }
  
    //staff-sign 미비(20개 이상)를 통한 외래 처방제어
    var sChkValidRecYn = fGetHardCDList("Y", 488, 3);
    if (sChkValidRecYn == "Y" 
        && prcpflag == "0"
        && savekindflag == "0"
        && model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "O" 
        && model.getValue ( "/root/addprcp" ) != "Y") {
        	
        //스텝싸인 예외사용자처리
        fGetHardCDList("N", 5951, 0 , "/root/staffhidden/xptlist");
        var staffid = getUserInfo("userid");
        var xptCnt = getNodesetCount("/root/staffhidden/xptlist/hardcd[hardcd = '" + staffid + "']");  
        if (xptCnt > 0) {
        	return true;
        }	
        	
        //staffsign 미비
        var cosigncnt = 0;
        
        var orddeptcd    = getUserInfo("dutplcecd");
        var orddrid   = getUserInfo("userid");
        
        model.makeValue("/root/tempchkrec/reqdata/orddeptcd",    orddeptcd);
        model.makeValue("/root/tempchkrec/reqdata/orddrid",   orddrid);
                
        submit("TRMMO04906", false);
        
        cosigncnt = parseInt(model.getValue("/root/unprepinfo/unprepcnt/cosigncnt"));
        staffmibigijun = parseInt(fGetHardCDList("Y", 488, 4));
        
        if (cosigncnt >= staffmibigijun) {
        	if (6 == messageBox("[기록미비]정리되지 않은 스텝sign미비가 "+ staffmibigijun+"개 이상 존재하여"+"\n"+
        	"진행 불가합니다 미비리스트창을 오픈하시겠습니까?"+"\n"+
        	"문의처:의무기록실[본원(5231~3,5324),칠곡(2401~2)]","Q999")) {
        		setParameter("SMMMO04900", "Y");
						setParameter("SMMRI01800_Indschflag", "A");						
						setParameter("SMMRI01800_Orddrid", orddrid);
						setParameter("SMMRI01800_Orddeptcd", orddeptcd);
						setParameter("SMMRI01800_StaffYn", "Y");
						open("SMMRI01800");
        	} 
        	return false;
        }
        	
    }
    
    // 분과미비기록을 통한 처방제어 시스템 : 분과미비기록 여부를 체크한다. 20150414 임지원 
    // 588 미비기록 관련 처방 제한 사용 여부
    var sChkValidRecYn = fGetHardCDList("Y", 588, 3);
    if (sChkValidRecYn == "Y" 
        && prcpflag == "0"
        && savekindflag == "0"
        && model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "I" 
        && model.getValue ( "/root/addprcp" ) != "Y") {
        
        var orddeptcd    = getUserInfo("dutplcecd");
        var orddrid   = getUserInfo("userid");
        
        model.makeValue("/root/tempchkrec/reqdata/orddeptcd",    orddeptcd);
        model.makeValue("/root/tempchkrec/reqdata/orddrid",   orddrid);
        model.makeValue("/root/tempchkrec/reqdata/chk24mibi",   "Y");
                
        submit("TRMMO00156", false);
        
        cosigncnt = model.getValue("/root/unprepinfo/unprepcnt/cosigncnt");
        defetcnt = model.getValue("/root/unprepinfo/unprepcnt/defetcnt");
        admpatcnt = model.getValue("/root/unprepinfo/unprepcnt/admpatcnt");
        deptnm = model.getValue("/root/unprepinfo/unprepcnt/deptnm");
        
        if (cosigncnt > 0 || defetcnt > 0 || admpatcnt > 0) {
        	if (6 == messageBox("[타과미비] 기록사 확인 후 24시간이내 정리되지 않은 타과미비가 존재"+"\n"+ 
        	"하여 진행 불가합니다. (스텝sign미비:"+cosigncnt+"건, 재원미비:"+defetcnt+"건, 퇴원미비:"+admpatcnt+"건)"+"\n"+
        	"미비과("+deptnm+")로 로그인 하시어 정리하시기 바랍니다."+"\n"+ 
        	"문의처:의무기록실[본원(5231~6,5324),칠곡(2401~2)]","E")) {
        	} 
        	return false;
        }
    }   
    
    // 파견미비 처방제어 시스템 : 파견의의 미비기록 여부를 체크한다. 20150420 임지원 
    // 688 미비기록 관련 처방 제한 사용 여부
    var sChkValidRecYn = fGetHardCDList("Y", 688, 3);
    if (sChkValidRecYn == "Y" 
        && prcpflag == "0"
        && savekindflag == "0"
        && model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "I" 
        && model.getValue ( "/root/addprcp" ) != "Y") {
        
        var orddeptcd = getUserInfo("dutplcecd");
        var orddrid = getUserInfo("userid");
        
        model.makeValue("/root/tempchkrec/reqdata/orddeptcd", "");
        model.makeValue("/root/tempchkrec/reqdata/orddrid", orddrid);
        model.makeValue("/root/tempchkrec/reqdata/chk24mibi", "Y");
                
        submit("TRMMO00157", false);
        
        cosigncnt = model.getValue("/root/unprepinfo/unprepcnt/cosigncnt");
        defetcnt = model.getValue("/root/unprepinfo/unprepcnt/defetcnt");
        admpatcnt = model.getValue("/root/unprepinfo/unprepcnt/admpatcnt");
        deptnm = model.getValue("/root/unprepinfo/unprepcnt/deptnm");
        
        if (cosigncnt > 0 || defetcnt > 0 || admpatcnt > 0) {
        	
        	if(getUserInfo("dutplceinstcd") == "031")
                Difinstcd = "칠곡";
            else if(getUserInfo("dutplceinstcd") == "032")
            	Difinstcd = "본원";
                
        	if (6 == messageBox("[타병원미비]기록사 확인 후 24시간이내 정리되지 않은 "+Difinstcd+"미비가 존재"+"\n"+ 
        	"하여 진행 불가합니다. (스텝sign미비:"+cosigncnt+"건, 재원미비:"+defetcnt+"건, 퇴원미비:"+admpatcnt+"건)"+"\n"+
        	"미비과("+deptnm+")로 로그인 하시어 정리하시기 바랍니다."+"\n"+ 
        	"문의처:의무기록실[본원(5231~6,5324),칠곡(2401~2)]","E")) {
        	} 
        	return false;
        }
    }   
    return bRtn;
}

/**@desc   : 뇌졸중 평가관련 기록 유무 확인(submit)
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : true, false
 * @authur : 엄영만 2011. 10. 21
 */
function fCheckApoplexyRec( prcpflag, savekindflag, saveNode, prcpchkflag ){
    var bRtn = true;
    
    // 뇌졸증 평가 관련 기록 여부를 체크한다. 20110823 엄영만  
    var sChkApoplexyRecYn = fGetHardCDList("Y", 300, 3); // 300 뇌졸증 평가 관련 기록 체크여부 처방 제한 사용 여부
    var sOrddeptcd = model.getValue("/root/paminfo/list/orddeptcd");
    var sDiagCd    = model.getValue("/root/main/diaginfo/diagcdlist[diagkindcdflag='M' and (status='-' or status='I' or status='U')]/icd10cd" );
    if(sDiagCd.length > 3) {
        sDiagCd        = sDiagCd.substring( 0,3);
    }

    fGetHardCDList("N", 301, 0 , "/root/hidden/apoplexydeptlist"); // 301 뇌졸증 평가 관련 기록 체크 주진료과
    fGetHardCDList("N", 302, 0 , "/root/hidden/apoplexydiaglist"); // 302 뇌졸증 평가 관련 기록 체크 주진단(ICD10코드)
    
    if (sChkApoplexyRecYn == "Y" 
        && prcpflag == "0"
        && savekindflag == "0"
        && model.getValue ("/root/addprcp" ) != "Y"
        && (model.getValue("/root/patflag/list/prcpgenrflag" ) == "I" || model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "E" )
        && (model.getValue("/root/paminfo/list/atdoctid" ) == getUserInfo("userid") || model.getValue("/root/paminfo/list/medispclid" ) == getUserInfo("userid") ) // 2013.04.10 주치교수도 체크 하도록 수정. 심사팀 윤순길 팀장님 요청 엄영만
        && !isNull(model.getValue("/root/hidden/apoplexydeptlist/hardcd[hardcd='"+sOrddeptcd+"']/hardcd" ))
        && !isNull(model.getValue("/root/hidden/apoplexydiaglist/hardcd[hardcd='"+sDiagCd+"']/hardcd" )) ) {

        var sCheckCode = "";
        var sCheckAlertMsg  = "";
        var sCheckErrorMsg  = "";

        var pid      = model.getValue ("/root/paminfo/list/pid");
        var indd     = model.getValue ("/root/paminfo/list/indd");
        var cretno   = model.getValue ("/root/paminfo/list/cretno");
        var dietprcp = "N";
        
        var sPrcpNodeList = model.instances(0).selectNodes( "/root/main/prcp/prcplist" );
        var sStatus = "";
        var sPrcpcd = "";
        for (i = 0; i < sPrcpNodeList.length; i++ ) {
            sStatus = model.getValue("/root/main/prcp/prcplist[" + i + "]/status");
            sPrcpcd = model.getValue("/root/main/prcp/prcplist[" + i + "]/prcpcd");
            if ( "I" == sStatus && fContainsHardCD("427", sPrcpcd) ) { // 연하장애 서식 팝업 조건 변경 - 신규입력 처방중 식사 지시처방이 있는지 확인 한다. 2013.04.09 엄영만
                dietprcp = "Y";
                break;
            }
        }
        
        model.makeValue("/root/apoplexychkrec/reqdata/pid",      pid);
        model.makeValue("/root/apoplexychkrec/reqdata/indd",     indd);
        model.makeValue("/root/apoplexychkrec/reqdata/cretno",   cretno);
        model.makeValue("/root/apoplexychkrec/reqdata/dietprcp", dietprcp);
        
        model.makeValue("/root/apoplexychkrec/reqdata/pid", pid);
        model.makeValue("/root/apoplexychkrec/reqdata/indd", indd);
        model.makeValue("/root/apoplexychkrec/reqdata/cretno", cretno);
        
        submit("TRMMO00136", false);

        var sChkRecList = model.instances(0).selectNodes( "/root/apoplexychkrec/rtndata" );

        for ( var i=1; i <= sChkRecList.length; i++ ) {
            var sCheckCode = model.getValue ( "/root/apoplexychkrec/rtndata[" + i + "]/checkcode" );
            if(sCheckCode == "ALERT"){
                if(sCheckAlertMsg == "")
                    sCheckAlertMsg = model.getValue ( "/root/apoplexychkrec/rtndata[" + i + "]/checkmsg");
                else
                    sCheckAlertMsg = sCheckAlertMsg + "\n" + model.getValue ( "/root/apoplexychkrec/rtndata[" + i + "]/checkmsg");
            }
            else if (sCheckCode == "ERROR"){
                if(sCheckErrorMsg == "")
                    sCheckErrorMsg = model.getValue ( "/root/apoplexychkrec/rtndata[" + i + "]/checkmsg");
                else
                    sCheckErrorMsg = sCheckErrorMsg + "\n" + model.getValue ( "/root/apoplexychkrec/rtndata[" + i + "]/checkmsg");
            }
        }

        if (sCheckErrorMsg != ""){
            sCheckErrorMsg = "※ 급성 뇌졸중 평가 관련 사항 ※\n\n주 진단코드가 I60-I63인 신경과, 신경외과 환자에 대해\n\n" + sCheckErrorMsg + "\n\n" + "해당 기록 작성 후 처방이 저장이 가능 합니다."
            
            if(getUserInfo("dutplceinstcd") == "031")
                sCheckErrorMsg = sCheckErrorMsg + "\n" + "문의처: 심사실(6131)"
            else if(getUserInfo("dutplceinstcd") == "032")
                sCheckErrorMsg = sCheckErrorMsg + "\n" + "문의처: 심사실(6131)"
            
            messageBox(sCheckErrorMsg, 'E000');

            var formcd = model.getValue("/root/apoplexychkrec/rtndata[1]/checkformcd"); // 첫 행의 서식 팝업
            
            var ioflag     = model.getValue("/root/paminfo/list/ioflag");
            var orddeptcd  = model.getValue ("/root/paminfo/list/orddeptcd");
            var medispclid = model.getValue ("/root/paminfo/list/medispclid");
            var orddeptnm  = model.getValue ("/root/paminfo/list/orddeptnm");
            var hngnm      = model.getValue ("/root/paminfo/list/hngnm");
            var sa         = model.getValue ("/root/paminfo/list/sex") +"/"+ model.getValue ("/root/paminfo/list/age");
            var roomcd     = model.getValue ("/root/paminfo/list/roomcd");
            var disparam = pid +"▦" + hngnm +"▦" + sa+"▦" + orddeptnm +"▦" + roomcd + "▦";

            setParameter("pid",         pid);
            setParameter("orddd",       indd);
            setParameter("cretno",      cretno);
            setParameter("ioflag",      ioflag);
            setParameter("orddeptcd",   orddeptcd);
            setParameter("orddrid",     medispclid);
            setParameter("disppatinfo", disparam);  //등록번호▦환자명▦성별/나이▦진료과▦병실▦
            setParameter("openmode",    "newform"); //오픈모드는 “recform”
            setParameter("formcd",      formcd);

            modal("SSMMR01100", 1, 0, 0 ,"", "", "");   
                
            bRtn = false;
        } else if (sCheckAlertMsg != ""){
            sCheckAlertMsg = "※ 급성 뇌졸중 평가 관련 사항 ※\n\n주 진단코드가 I60-I63인 신경과, 신경외과 환자에 대해\n\n"  + sCheckAlertMsg + "\n\n" + "해당 기록이 작성 되지 않으면 처방이 저장 되지 않습니다."

            if(getUserInfo("dutplceinstcd") == "031")
                sCheckAlertMsg = sCheckAlertMsg + "\n" + "문의처: 심사실(6131)"
            else if(getUserInfo("dutplceinstcd") == "032")
                sCheckAlertMsg = sCheckAlertMsg + "\n" + "문의처: 심사실(6131)"

            messageBox(sCheckAlertMsg, 'E000');
            bRtn = true;
        } else {
            bRtn = true;
        }
    }

    return bRtn;
}

/**@desc   : 급성심근경색 평가관련 기록 유무 확인(submit)
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : true, false
 * @authur : 엄영만 2011. 11. 01
 */
function fCheckAmiRec( prcpflag, savekindflag, saveNode, prcpchkflag ){
    var bRtn = true;
    
    // 급성심근경색 평가 관련 기록 여부를 체크한다. 2011.1101 엄영만  
    var sChkAmiRecYn = fGetHardCDList("Y", 316, 3); // 316 급성심근경색 평가 관련 기록 체크여부 처방 제한 사용 여부
    var sOrddeptcd = model.getValue("/root/paminfo/list/orddeptcd");
    var sDiagCd    = model.getValue("/root/main/diaginfo/diagcdlist[diagkindcdflag='M' and (status='-' or status='I' or status='U')]/icd10cd" );
    if(sDiagCd.length > 3) {
        sDiagCd        = sDiagCd.substring( 0,3);
    }

    fGetHardCDList("N", 317, 0 , "/root/hidden/amideptlist"); // 317 급성심근경색 평가 관련 기록 체크 주진료과
    fGetHardCDList("N", 318, 0 , "/root/hidden/amidiaglist"); // 318 급성심근경색 평가 관련 기록 체크 주진단(ICD10코드)
    
    if (sChkAmiRecYn == "Y" 
        && prcpflag == "0"
        && savekindflag == "0"
        && model.getValue ("/root/addprcp" ) != "Y"
        && (model.getValue("/root/patflag/list/prcpgenrflag" ) == "I" || model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "E" )
        && model.getValue("/root/paminfo/list/atdoctid" ) == getUserInfo("userid")
        && !isNull(model.getValue("/root/hidden/amideptlist/hardcd[hardcd='"+sOrddeptcd+"']/hardcd" ))
        && !isNull(model.getValue("/root/hidden/amidiaglist/hardcd[hardcd='"+sDiagCd+"']/hardcd" )) ) {

        var sCheckCode = "";
        var sCheckAlertMsg  = "";
        var sCheckErrorMsg  = "";

        var pid    = model.getValue ("/root/paminfo/list/pid");
        var indd   = model.getValue ("/root/paminfo/list/indd");
        var cretno = model.getValue ("/root/paminfo/list/cretno");
        
        model.makeValue("/root/amichkrec/reqdata/pid", pid);
        model.makeValue("/root/amichkrec/reqdata/indd", indd);
        model.makeValue("/root/amichkrec/reqdata/cretno", cretno);
        
        submit("TRMMO00137", false);

        var sChkRecList = model.instances(0).selectNodes( "/root/amichkrec/rtndata" );

        for ( var i=1; i <= sChkRecList.length; i++ ) {
            var sCheckCode = model.getValue ( "/root/amichkrec/rtndata[" + i + "]/checkcode" );
            if(sCheckCode == "ALERT"){
                if(sCheckAlertMsg == "") {
                    sCheckAlertMsg = model.getValue ( "/root/amichkrec/rtndata[" + i + "]/checkmsg");
                } else {
                    sCheckAlertMsg = sCheckAlertMsg + "\n" + model.getValue ( "/root/amichkrec/rtndata[" + i + "]/checkmsg");
                }
            }
            else if (sCheckCode == "ERROR"){
                if(sCheckErrorMsg == "") {
                    sCheckErrorMsg = model.getValue ( "/root/amichkrec/rtndata[" + i + "]/checkmsg");
                } else {
                    sCheckErrorMsg = sCheckErrorMsg + "\n" + model.getValue ( "/root/amichkrec/rtndata[" + i + "]/checkmsg");
                }
            }
        }

        if (sCheckErrorMsg != ""){
            sCheckErrorMsg = "※ 급성 심근경색 평가 관련 사항 ※\n\n주 진단코드가 I21인 순환기내과 환자에 대해\n\n" + sCheckErrorMsg + "\n\n" + "해당 기록 작성 후 처방이 저장이 가능 합니다.";
            
            if(getUserInfo("dutplceinstcd") == "031") {
                sCheckErrorMsg = sCheckErrorMsg + "\n" + "문의처: 심사실(6131)";
            } else if(getUserInfo("dutplceinstcd") == "032") {
                sCheckErrorMsg = sCheckErrorMsg + "\n" + "문의처: 심사실(6131)";
            }
            
            messageBox(sCheckErrorMsg, 'E000');

            var formcd = model.getValue("/root/amichkrec/rtndata[1]/checkformcd"); // 첫 행의 서식 팝업
            
            var ioflag     = model.getValue("/root/paminfo/list/ioflag");
            var orddeptcd  = model.getValue ("/root/paminfo/list/orddeptcd");
            var medispclid = model.getValue ("/root/paminfo/list/medispclid");
            var orddeptnm  = model.getValue ("/root/paminfo/list/orddeptnm");
            var hngnm      = model.getValue ("/root/paminfo/list/hngnm");
            var sa         = model.getValue ("/root/paminfo/list/sex") +"/"+ model.getValue ("/root/paminfo/list/age");
            var roomcd     = model.getValue ("/root/paminfo/list/roomcd");
            var disparam = pid +"▦" + hngnm +"▦" + sa+"▦" + orddeptnm +"▦" + roomcd + "▦";

            setParameter("pid",         pid);
            setParameter("orddd",       indd);
            setParameter("cretno",      cretno);
            setParameter("ioflag",      ioflag);
            setParameter("orddeptcd",   orddeptcd);
            setParameter("orddrid",     medispclid);
            setParameter("disppatinfo", disparam);  //등록번호▦환자명▦성별/나이▦진료과▦병실▦
            setParameter("openmode",    "newform"); //오픈모드는 “recform”
            setParameter("formcd",      formcd);

            modal("SSMMR01100", 1, 0, 0 ,"", "", "");   
                
            bRtn = false;
        } else if (sCheckAlertMsg != ""){
            sCheckAlertMsg = "※ 급성 심근경색 평가 관련 사항 ※\n\n주 진단코드가 I21인 순환기내과 환자에 대해\n\n"  + sCheckAlertMsg + "\n\n" + "해당 기록이 작성 되지 않으면 처방이 저장 되지 않습니다.";

            if(getUserInfo("dutplceinstcd") == "031") {
                sCheckAlertMsg = sCheckAlertMsg + "\n" + "문의처: 심사실(6131)";
            } else if(getUserInfo("dutplceinstcd") == "032") {
                sCheckAlertMsg = sCheckAlertMsg + "\n" + "문의처: 심사실(6131)";
            }

            messageBox(sCheckAlertMsg, 'E000');
            bRtn = true;
        } else {
            bRtn = true;
        }
    }

    return bRtn;
}

/**@desc   : 제왕절개분만 적정성평가 위험도 보정요인 서식 기록 유무 확인(submit)
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
             심사실 김현주(6127) 요청 2012.01.05일 정규 배포 본원만 적용하고 칠곡은 적용하지 않음.
 * @return : true, false
 * @authur : 엄영만 2011. 11. 01
 */
function fCheckChildbirthRec( prcpflag, savekindflag, saveNode, prcpchkflag ){
    var bRtn = true;
    
    // 제왕절개분만 적정성평가 관련 기록 여부를 체크한다. 2012.0103 엄영만  
    var sChkChildbirthRecYn = fGetHardCDList("Y", 321, 3); // 321 제왕절개분만 적정성평가 관련 기록 체크여부 처방 제한 사용 여부
    var sOrddeptcd = model.getValue("/root/paminfo/list/orddeptcd");
    
    fGetHardCDList("N", 322, 0 , "/root/hidden/childbirthdeptlist"); // 322 제왕절개분만 적정성평가 관련 기록 체크 주진료과
    
    if (sChkChildbirthRecYn == "Y" 
        && prcpflag == "0"
        && savekindflag == "0"
        && model.getValue ("/root/addprcp" ) != "Y"
        && (model.getValue("/root/patflag/list/prcpgenrflag" ) == "I" || model.getValue ( "/root/patflag/list/prcpgenrflag" ) == "E" )
        && model.getValue("/root/paminfo/list/atdoctid" ) == getUserInfo("userid")
        && !isNull(model.getValue("/root/hidden/childbirthdeptlist/hardcd[hardcd='"+sOrddeptcd+"']/hardcd" )) ) {

        var sCheckCode = "";
        var sCheckAlertMsg  = "";
        var sCheckErrorMsg  = "";
        var sCheckPrcpExist = "N";  // 제왕절개 관련 처방 존재 여부 디폴트 N 없음.
        
        var pid    = model.getValue ("/root/paminfo/list/pid");
        var indd   = model.getValue ("/root/paminfo/list/indd");
        var cretno = model.getValue ("/root/paminfo/list/cretno");
        
        if (isNull(saveNode)) saveNode = "/root/main/prcp/prcplist";
        var savePrcpCnt     = model.instances(0).selectNodes( saveNode ).length;
        var savePrcpCd      = "";
        var savePrcpStatus  = "";

        fGetHardCDList("N", 323, 0 , "/root/hidden/childbirthprcplist"); // 323 제왕절개분만 적정성평가 관련 기록 체크 처방코드
        
        for (var i = 1;  i <= savePrcpCnt; i++) {  // 저장 하는 화면에서 제왕절개분만 적정성평가 관련 처방 코드가 있는지 조회 한다.
            savePrcpCd      = model.getValue (saveNode +"["+ i + "]/prcpcd" );
            savePrcpStatus  = model.getValue (saveNode +"["+ i + "]/status" );
            
            if (   !isNull(model.getValue("/root/hidden/childbirthprcplist/hardcd[hardcd='"+savePrcpCd+"']/hardcd" )) 
                && savePrcpStatus != "S"  && savePrcpStatus != "-") {
                sCheckPrcpExist = "Y";
                break;
            }
        }
        
        model.makeValue("/root/childbirthchkrec/reqdata/pid", pid);
        model.makeValue("/root/childbirthchkrec/reqdata/indd", indd);
        model.makeValue("/root/childbirthchkrec/reqdata/cretno", cretno);
        model.makeValue("/root/childbirthchkrec/reqdata/prcpexist", sCheckPrcpExist);
        
        submit("TRMMO00138", false);

        var sChkRecList = model.instances(0).selectNodes( "/root/childbirthchkrec/rtndata" );

        for ( var i=1; i <= sChkRecList.length; i++ ) {
            var sCheckCode = model.getValue ( "/root/childbirthchkrec/rtndata[" + i + "]/checkcode" );
            if(sCheckCode == "ALERT"){
                if(sCheckAlertMsg == "") {
                    sCheckAlertMsg = model.getValue ( "/root/childbirthchkrec/rtndata[" + i + "]/checkmsg");
                } else {
                    sCheckAlertMsg = sCheckAlertMsg + "\n" + model.getValue ( "/root/childbirthchkrec/rtndata[" + i + "]/checkmsg");
                }
            }
            else if (sCheckCode == "ERROR"){
                if(sCheckErrorMsg == "") {
                    sCheckErrorMsg = model.getValue ( "/root/childbirthchkrec/rtndata[" + i + "]/checkmsg");
                } else {
                    sCheckErrorMsg = sCheckErrorMsg + "\n" + model.getValue ( "/root/childbirthchkrec/rtndata[" + i + "]/checkmsg");
                }
            }
        }

        if (sCheckAlertMsg != ""){
            sCheckAlertMsg = "※ 제왕절개 분만 적정성 평가 관련 사항 ※\n\n분만수술 처방이 있는 산부인과 환자에 대해\n\n" 
                            + sCheckAlertMsg + "\n\n" + "해당 기록 작성 되지 않으면 퇴원 예고가 불가능 합니다.";
            
            if(getUserInfo("dutplceinstcd") == "031") {
                sCheckAlertMsg = sCheckAlertMsg + "\n" + "문의처: 심사실(6127)";
            } else if(getUserInfo("dutplceinstcd") == "032") {
                sCheckAlertMsg = sCheckAlertMsg + "\n" + "문의처: 심사실(2180)";
            }
                
            sCheckAlertMsg = sCheckAlertMsg + "\n\n지금 작성";
            var selectedval = messageBox(sCheckAlertMsg, 'S001');
            
            if(selectedval == "6") { // 지금 작성 하면 서식을 팝업으로 뛰우고 "아니오" 선택 하면 그대로 처방 저장 진행
                var formcd = model.getValue("/root/childbirthchkrec/rtndata[1]/checkformcd"); // 첫 행의 서식 팝업
                
                var ioflag     = model.getValue("/root/paminfo/list/ioflag");
                var orddeptcd  = model.getValue ("/root/paminfo/list/orddeptcd");
                var medispclid = model.getValue ("/root/paminfo/list/medispclid");
                var orddeptnm  = model.getValue ("/root/paminfo/list/orddeptnm");
                var hngnm      = model.getValue ("/root/paminfo/list/hngnm");
                var sa         = model.getValue ("/root/paminfo/list/sex") +"/"+ model.getValue ("/root/paminfo/list/age");
                var roomcd     = model.getValue ("/root/paminfo/list/roomcd");
                var disparam = pid +"▦" + hngnm +"▦" + sa+"▦" + orddeptnm +"▦" + roomcd + "▦";
    
                setParameter("pid",         pid);
                setParameter("orddd",       indd);
                setParameter("cretno",      cretno);
                setParameter("ioflag",      ioflag);
                setParameter("orddeptcd",   orddeptcd);
                setParameter("orddrid",     medispclid);
                setParameter("disppatinfo", disparam);  //등록번호▦환자명▦성별/나이▦진료과▦병실▦
                setParameter("openmode",    "newform"); //오픈모드는 “recform”
                setParameter("formcd",      formcd);
    
                modal("SSMMR01100", 1, 0, 0 ,"", "", "");   
                bRtn = false;
            }else if(selectedval == "2") { // 취소 선택
                bRtn = false;
            }else { // 아니오 선택
                bRtn = true;
            }
        } else {
            bRtn = true;
        }
    }

    return bRtn;
}

/**@desc   : 임상연구 환자 체크
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : true, false
 * @authur : 엄영만 2011. 10. 21
 */
function fCheckClincStdy( prcpflag, savekindflag, saveNode, prcpchkflag ){
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    if (prcpgenrflag == 'O') {
        if(model.getValue("/root/paminfo/list/insukind") == "71") {
            if(!isNull(model.getValue ( "/root/main/prcp/prcplist[status='I' and clincstdyflag!='Y' and prcpclscd!='09']/prcpcd" ))) {
                messageBox ( "임상연구 보험유형입니다. 전체 처방에 상세/일괄팝업을 통하여 '임상연구' 체크를 해주시기 바랍니다.", "I");
                return false;
            }
        } else {
            if(!isNull(model.getValue ( "/root/main/prcp/prcplist[status='I' and clincstdyflag='Y']/prcpcd" ))) {
                messageBox ( "보험유형이 임상연구가 아닙니다. 임상연구 처방을 입력 할수 없습니다.", "I");
                return false;
            }
        }
    }

    return true;
}

/**@desc   : 퇴원예고 후 퇴원처방 날짜체크: 퇴원예고 다음날로는 처방 불가
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : true, false
 * @authur : 엄영만 2012. 11. 01
 */
function fCheckDsch( prcpflag, savekindflag, saveNode, prcpchkflag ){
    var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
    
    //퇴원예고 후 퇴원처방 날짜체크: 퇴원예고 다음날로는 처방 불가
    if ( prcpgenrflag != "O"  &&  prcpgenrflag != "E" ){ //응급일 경우 퇴원예정일 check부분 제외처리 .by sonjy 2008-09-10 조범준과장님 요청.
        if (    model.getValue ( "/root/paminfo/list/dschdclrtyn" ) == "Y" 
             && !isNull(model.getValue ( "/root/main/prcp/prcplist[status='I']/prcpcd" ))) {
            if ( model.getValue ( "/root/paminfo/list/dschdclrdt" ).length >= 8 ) {
                var dschdclrdd = model.getValue ( "/root/paminfo/list/dschdclrdt" ).substring(0,8);
                var sIprcAddYn = model.getValue ( "/root/paminfo/list/iprcaddyn" ); // 추가처방 발행여부(심사실 가퇴원 환자)는 처방저장 가능 체크 제외 2012.04.16
                if ( sIprcAddYn != "Y" && eval(model.getValue ( "/root/init/prcpdd" )) > eval( dschdclrdd ) ) {
                    if ( model.getValue ( "/root/addprcp" ) != "Y" ) {
                        messageBox ( "퇴원예정일[" + dschdclrdd + "] 이후 날짜로는 처방을 내리실 수", "I004" );
                        return false;
                    }
                } 
            }
        }       
    }
    
    return true;
}

/**@desc   : 이식전 검사(Pre Work Up) 환자 여부 체크
 * @param  : prcpflag: 처방구분 0: ( 의사처방, CP,  항암프로토콜, 임시), 2:간호, 4:지원부서
             savekindflag: 0:인증저장, 1:임시저장
             saveNode: 저장노드
 * @return : 대상 여부(Y/N)
 * @authur : 엄영만 2012. 11. 07
 */
function fCheckPreWorkUp ( prcpflag, savekindflag, saveNode, prcpchkflag ){
    var bRtn = false;
    var sIoFlag     = model.getValue( "/root/patflag/list/prcpgenrflag" );
    model.makeValue ( "/root/save/saveflaginfo/preworkup",   "N"); // 디폴트값
    
    if(   sIoFlag == "O"
       && prcpflag == "0"
       && savekindflag == "0"
       && model.getValue ("/root/addprcp" ) != "Y") { // 외래, 의사처방 일때만 체크
        model.setValue ( "/root/save/saveflaginfo/preworkup",   "N"); // 디폴트값
        
        var sIcd10Cd    = model.getValue("/root/main/diaginfo/diagcdlist[diagkindcdflag='M' and (status='-' or status='I' or status='U' or status='T')]/icd10cd" );
        fGetHardCDList("N", 337, 0 , "/root/hidden/chkworkupicd10list"); // 337 장기이식 관련 체크 주상병

        if(!isNull(model.getValue("/root/hidden/chkworkupicd10list/hardcd[hardcd='"+sIcd10Cd+"']/hardcd" )) ) { // 적용가능한 진단.
            var pid    = model.getValue ("/root/paminfo/list/pid");
            var orddd  = model.getValue ("/root/paminfo/list/orddd");
            
            model.makeValue("/root/chkworkupreg/reqdata/pid",   pid);
            model.makeValue("/root/chkworkupreg/reqdata/orddd", orddd);
            
            submit("TRMMO00139", false);

            var sWorkUpRegYn = model.getValue ( "/root/chkworkupreg/rtndata/regyn" );
            
            if("Y" == sWorkUpRegYn) { // 수혜자 등록 여부 체크
                bRtn = true;
            } else {
                if("6" == messageBox("주진단이 장기이식 기증자 진단으로 입력된  모든 처방은 [donor w/u]으로 적용 됩니다.\n\n계속 진행하실 경우 [Y]를 적용을 원하지 않을경우 [N] 선택 후 주진단을 변경 하십시요.", "Q")) {
                    model.setValue ( "/root/save/saveflaginfo/preworkup", "Y");
                    bRtn = true;
                } else {
                    bRtn = false;
                }
            }
        } else { // 장기기증과 관련 없는 일반적인 환자 
            var sDnorAcptYn = model.getValue("root/paminfo/list/dnoracptyn" );
            if("Y" == sDnorAcptYn) {
                messageBox("주진단의 변경으로 장기이식 기증자 [donor w/u] 유형이 취소 됩니다.", "I999");
            }
            
            bRtn = true;
        }
    } else {
        model.setValue ( "/root/save/saveflaginfo/preworkup",   "N"); // 디폴트값
        bRtn = true;
    }
    
    return bRtn;
}

function fCompareNonPrgDiag () {
    var icd10cd = model.getValue("/root/main/diaginfo/diagcdlist[diagkindcdflag='M' and (status='-' or status='I' or status='U')]/icd10cd" );
    var hardcd1 = model.getValue ( "/root/initsrch/hardcdlist/hardcd[hardcdno='409' and cdseqno ='1']/hardcd");
    var hardcd2 = model.getValue ( "/root/initsrch/hardcdlist/hardcd[hardcdno='409' and cdseqno ='2']/hardcd");
    var hardcd3 = model.getValue ( "/root/initsrch/hardcdlist/hardcd[hardcdno='409' and cdseqno ='3']/hardcd");
    var hardcd4 = model.getValue ( "/root/initsrch/hardcdlist/hardcd[hardcdno='409' and cdseqno ='4']/hardcd");
  
    if ( icd10cd.length < 3 ) return "N";
    if ( hardcd1.length < 3 ) return "N";
    if ( hardcd2.length < 3 ) return "N";
    if ( hardcd3.length < 3 ) return "N";
    if ( hardcd4.length < 3 ) return "N";
  
    var icd10cdSub = icd10cd.substr(0, 3);
    var hardcd1Sub = hardcd1.substr(0, 3);
    var hardcd2Sub = hardcd2.substr(0, 3);
    var hardcd3Sub = hardcd3.substr(0, 3);
    var hardcd4Sub = hardcd4.substr(0, 3);
 
    if (hardcd1Sub <= icd10cdSub && icd10cdSub <= hardcd2Sub ){
        return "Y";
    } else if (hardcd3Sub <= icd10cdSub && icd10cdSub <= hardcd4Sub ){
        return "Y";
    } else {
        return "N";
    }
}

/**@-----------------------------------------------------------------------------------
 * @desc   : 스크린 중앙 포인트 조회  
 * @param  : nAxis : X축Y축구분(0:X축, 1:Y축), nPadding : 공백(px), nMonitorNumber : 모니터번호
 * @return : 센터 포인트값
 * @-----------------------------------------------------------------------------------
 */
function getScreenCenterPoint(nAxis, nPadding, nMonitorNumber) {
    var nRtn = 0;

    var monitorResolutions;
    var monitorResolutionsArr;
    var resolution;
    var resolution_pixel;
    
    if(parseInt(nAxis) != 0 && parseInt(nAxis) != 1){
        nAxis = 0; // 디폴트 X축
    }

    if(isNull(nMonitorNumber) || parseInt(nMonitorNumber) < 0 || parseInt(nMonitorNumber) > app.monitorNumber) { // 모니터값이 없거나 잘못된 값일 경우
        nMonitorNumber = getCurrentMonitorNumber(); // 화면이 로딩된 모니터 번호를 반환한다.
    }
    
    monitorResolutions = app.monitorResolution;
    monitorResolutionsArr = monitorResolutions.split('|');
    resolution = monitorResolutionsArr[nMonitorNumber-1];
    
    if(isNull(resolution)) {
        resolution = "1280,1024";   // 디폴트로 1280,1024로 한다.
    }

    resolution_pixel = parseInt(resolution.split(',')[nAxis]);
    if(isNull(nPadding) || nPadding < 0 || nPadding > resolution_pixel) { // 값이 없거나 음수, 화면크기보다 크면
        nPadding = 0;
    }

    nRtn = Math.round((resolution_pixel - parseInt(nPadding)) / 2);
    return nRtn;
}

function fSetAutoPrcpInfo(pPid, pCretno, pOrddd, pContent){
    
    if(!fCheckedAutoPrcpInfo(pPid, pCretno, pOrddd)){
    	return;
    }
    
    var insrow = 1;
                    
    if ( grd_prcplist.row == grd_prcplist.rows-1 ) {
        insrow = grd_prcplist.rows - 1;
    } else {
        insrow = grd_prcplist.row+1;                            
    }

    model.setValue("/root/directprcp/prcplist/prcpnm", pContent);

    model.copyNode ( "/root/prcpsrch", "/root/directprcp" );
    var srchRow = addPrcpDetl ( "import" , "/root/prcpsrch/prcplist" , "/root/main/prcp" , 1 , insrow, "00" );
    //model.duplicate( model.instances(0).selectSingleNode( "/root/main/prcp" ), "/root/directprcp/prcplist", "*[" + insrow + "]"); 
    model.recalculate();
    grd_prcplist.refresh();

    grd_prcplist.row =  insrow;
    grd_prcplist.col = grd_prcplist.colRef ( "prcpnm" );                        

    model.setfocus( "grd_prcplist" );                       
    
    grd_prcplist.editCell();
}

function fCheckedAutoPrcpInfo(pPid, pCretno, pOrddd){
    var result = false;
    var pamInfoNode = "/root/paminfo/list";

    var orddd = model.getValue ( pamInfoNode + "/orddd" );

    if(isNull(orddd)){
        orddd = model.getValue ( pamInfoNode + "/indd" );
    }

    if(pPid != model.getValue ( pamInfoNode + "/pid" )){
        result = false;
    }else{
        if(pCretno != model.getValue ( pamInfoNode + "/cretno" )){
            result = false;
        }else{
            if(pOrddd != orddd){
                result = false;
            }else{
                result = true;
            }
        }
    }

    return result;
}