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

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[
/* ---------------------------------------------------------------------

      SPMNP01801_수술마취약속처방조회IMPORT.xrw (SMMNP01801.xfm - JScript )

      - Version :
          1)  : Ver.1.00.01
              : Create By  Francis Choi
              : 2015.05.02
   ----------------------------------------------------------------------  */
 var AloneFlag  = "Y";      // 단독실행여부
 var sOproomcd  = "";       // 환자의 수술방코드
 var sCartGubn  = "";       // Cart 구분
 var sInsuKind  = "";       // 보험유형
 var sPayflagcd = "N";       // 급비여부
// --------------------------------------------------
 // 화면 Loading시 처리하는 함수
 // 약속처방 Tree정보 가져오기
 // --------------------------------------------------
 function fInit1801() {
	// if (ProgramCls  == "P") {     // C:CCR MAIN, P:간호처방
	//     grp_stemain.attribute("height")  = "705";
	//     grd_setcode.attribute("height")  = "400";    //"552";
	// }

	//grd_setcode.explorerbar   = "sortshow";
	sOproomcd = opener.frmf_getParameter("SMMNP01801_oproomcd");
	opener.frmf_setParameter("SMMNP01801_oproomcd","");
	sCartGubn = opener.frmf_getParameter("SMMNP01801_cartgubn");
	frmf_setParameter("SMMNP01801_cartgubn", "");
	sInsuKind = opener.frmf_getParameter("SMMNP01801_insukindcd");
	frmf_setParameter("SMMNP01801_insukindcd", "");

	ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));    // 기관코드
	ds_send.setColumn(0, "cartgubn", sCartGubn);

	// Tree Data 정보를 가져온다.
	var oParam = {};
		oParam.id          = "TRMNP01804";
		oParam.service     = "opanstapp.OpAnstCCrtGoodMngt";
		oParam.method      = "reqGetTreeMmbhprms";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_MmbhprmsLists_settreelist=settreelist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNP01804";

	tranf_submit(oParam);
 }

 // --------------------------------------------------
 // 약속처방 Tree Click
 // --------------------------------------------------
 function fTreeClick(pIdx) {         	
	var Idx    =  ds_main_MmbhprmsLists_settreelist.rowposition;

	if( ds_main_MmbhprmsLists_settreelist.getColumn(Idx, "depth") != "3" ){
	   return;
	}

	fMmbhppdData_Read(Idx);
 }

 // --------------------------------------------------
 // 수술예약정보 가져오기
 // --------------------------------------------------
 function fMmbhppdData_Read(pIdx) {
	  ds_send.setColumn(0, "instcd", "");    // 기관코드
	  ds_send.setColumn(0, "setno", ds_main_MmbhprmsLists_settreelist.getColumn(pIdx, "setno"));    // 처방 Set Code
	  ds_send.setColumn(0, "oproomcd", sOproomcd);    // 수술방 코드
	  ds_send.setColumn(0, "cartgubn", sCartGubn);    // Cart 구분
	  ds_send.setColumn(0, "insukind", sInsuKind);    // 보험유형
	  ds_send.setColumn(0, "payflagcd", sPayflagcd);    // 급비여부

	  var oParam = {};
		oParam.id          = "TRMNP01805";
		oParam.service     = "opanstapp.OpAnstCCrtGoodMngt";
		oParam.method      = "reqGetMmbhppds";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_MmbhppdsLists_mmbhppdslist=mmbhppdslist";
		oParam.async       = false;
		oParam.callback    = "cf_TRMNP01805";

	tranf_submit(oParam);         // Tree Data 정보를 가져온다.
 }

 function cf_TRMNP01805(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;

    ds_main_MmbhppdsLists_mmbhppdslist.addColumn("fcheck", "string");
    ds_main_MmbhppdsLists_mmbhppdslist.addColumn("stocqty", "string");
    ds_main_MmbhppdsLists_mmbhppdslist.addColumn("erbgcd", "string");
    dsf_setDefaultVal(ds_main_MmbhppdsLists_mmbhppdslist, "grupcd:N,anamneflag:N,subcretno:0");
}

 // --------------------------------------------------
 // 현재 선택된 처방을 수술마취 간호처방으로 return
 // --------------------------------------------------
 function fCopyGood(){
    //var sCopyOrderXpath = "/root/main/MmbhppdsLists/mmbhppdslist";
    var nIdx   = ds_main_MmbhppdsLists_mmbhppdslist.rowcount;

    if  (nIdx < 1) {
       sysf_messageBox("Cart물품이 ", "I004");
       return;
    }

    var sSendData = "";
    for( var i=0 ; i<nIdx ; i++ ){
        if (ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "fcheck")=="1"){
            //2008-08-05 오후 4:36:34 taebum CCR에서 관리하지 않는 재료에 대해서  break
            var sCcrGoodcd     = ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "checkgoodcd");
            var sPrcpclscd     = ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "prcpclscd");
            var sGoodcd        = ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "goodcd");
            var sGoodengnm     = ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "goodengnm");
            var sAllsizespecid = ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "allsizespecid");
            var sInsuyn        = ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "insuyn");
            var sCalcscorcd    = ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "calcscorcd");
            var sTmpReqmthd    = ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "reqmthd");
/*
            if(sPrcpclscd == "M2" && (sCcrGoodcd == "" || sCcrGoodcd == null || sCcrGoodcd == "undefined")){
                model.alert(sGoodcd+" - "+sGoodengnm+" 는 등록되지 않은 재료처방입니다. CCR에 문의하시기 바랍니다. ");
                return;
            }else{
*/
            if( utlf_isNull(sAllsizespecid) ){
                sAllsizespecid = "-";
            }
            //처방불가 물품은 처방 안되게 막음, 삭제는 제외 2009.08.31 K.J.M
            //구매정보에 수가가 있어야 하는 경우만 체크 2010.03.15 K. J. M
            if( sTmpReqmthd == "X"&&sInsuyn == "Y" ) {
                sysf_messageBox(sGoodcd+"코드 처방불가이므로 처방 할 수 없습니다.!", "E000");
                return;
            }
            if( sInsuyn == "Y" && utlf_isNull(sCalcscorcd) ) {
                sysf_messageBox( sGoodcd+"코드 처방 할 수 없습니다.!", "E000" );
                return;
            //}else if( sTmpReqmthd == ""&&sCalcscorcd == ""&&sInsuyn == ""&&sPrcpclscd == "" ) {//구매, 처방 마스터에 살아있는데이터가 없을 때 막음 2010.01.04 K.J.M
            //           messageBox(sGoodcd+"코드 처방할 수 없습니다.!", "E000");
            //           return;
            }else {
                sSendData = sSendData                                                    +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "goodcd"       )) + "▥" +
                         utlf_transNullToEmpty(sAllsizespecid)                                           + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "goodcls"      )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "drprcpetc8"   )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "payflagcd"    )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "goodqty"      )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "goodengnm"    )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "goodspec"     )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "makernm"      )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "goodmodel"    )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "prcpunit"     )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "drugmthdspccd")) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "stocqty"      )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "acmlbaseqty"  )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "prcpclscd"    )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "reqmthd"      )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "purcflag"))      + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "calculyn"))      + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "insuyn"))        + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "calcscorcd"))    + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "grupcd"))        + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "anamneflag"   )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "subcretno"    )) + "▥" +
                         utlf_transNullToEmpty(ds_main_MmbhppdsLists_mmbhppdslist.getColumn(i, "erbgcd"    ))    + "▧" ;

            }
/*
                }

*/
        }
    }
    //선택된 내역이 있을 경우에는 수술마취간호처방으로 처방리스트를 전달함.
    if( !utlf_isNull(sSendData) ){
        if(frmf_checkOpener()){
            opener.fNurseOrderMake(sSendData);
            close();
        }
    }
 }

 /* -------------------------------------------------  */
 /* ------End Of List -------------------------------  */
 /* -------------------------------------------------- */
]]></Script>