YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO16800_누락처방입력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO16800" position="absolute 0 0 608 336" titletext="누락처방입력 정보" oninit="SPMMO16800_oninit" onload="SPMMO16800_onload" onclose="SPMMO16800_onclose">
    <Layouts>
      <Layout>
        <Button position="absolute 492 314 548 336" id="button1" class="btn4" text="확인" onclick="button1_onclick"/>
        <Button position="absolute 552 314 608 336" id="button2" class="btn4" text="취소" onclick="button2_onclick"/>
        <Grid position="absolute 0 24 608 306" id="grd_resnlist" binddataset="ds_hardcd" onenteredit="grd_resnlist_onenteredit" onkeydown="grd_resnlist_onkeydown" cellclickbound="cell" cellsizingtype="col" autofittype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="35"/>
                <Column size="0"/>
                <Column size="35"/>
                <Column size="535"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="선택"/>
                <Cell col="1" text="선택"/>
                <Cell col="2" text="코드"/>
                <Cell col="3" text="상세사유"/>
              </Band>
              <Band id="body">
                <Cell displaytype="image" style="align:center middle;" expr="expr:(status == &quot;Y&quot;) ? &quot;theme://images\\bg_radio_select_N.png&quot; : &quot;theme://images\\bg_radio_N.png&quot;"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:status"/>
                <Cell col="2" text="bind:hardcd"/>
                <Cell col="3" displaytype="text" edittype="text" style="padding:0 0 0 3;" text="bind:hardcdnm" editautoselect="true"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static text="누락처방 사유선택 :" position="absolute 0 3 171 23" id="caption3" class="tit_2"/>
        <Calendar position="absolute 407 0 507 20" align="align:center middle;" id="cmb_prcpdd" visible="true" dateformat="yyyy-MM-dd" value="null" style="align:center middle;" class="input_essential" autoselect="true"/>
        <Static text="누락처방 적용일 :" position="absolute 281 3 407 23" id="caption1" class="tit_2"/>
        <Static text="시간 :" position="absolute 512 1 549 21" id="caption2" style="font:Dotum,9,bold;"/>
        <MaskEdit position="absolute 551 0 608 20" id="input1" mask="##:##" type="string" style="align:center middle;" displaynulltext=" " autoselect="true" value="1200" class="input_essential" onkeydown="input1_onkeydown"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_hardcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" onrowposchanged="ds_hardcd_onrowposchanged">
        <ColumnInfo>
          <Column id="status" type="STRING"/>
          <Column id="hardcd" type="STRING"/>
          <Column id="hardcdnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="selcond1" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="prcptime" type="STRING" size="256"/>
          <Column id="passflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="selcond1">1</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="hardcd" type="STRING" size="256" sumtext="하드코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="cmb_prcpdd" propid="value" datasetid="ds_init" columnid="prcpdd"/>
      <BindItem id="item1" compid="input1" propid="value" datasetid="ds_init" columnid="prcptime"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-08-29
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-08-29      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
 
include "com_commonxp::comm_main.xjs";

function SPMMO16800_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	
	ds_send.setColumn(0, "hardcd", "60" );
	
	var oParam = {};
		oParam.id       = "TRMMB16401";
		oParam.service  = "prcpbaseapp.EnvInfoMngt";
		oParam.method   = "reqGetHardCodeCD";
		oParam.inds     = "req=ds_send";
		oParam.outds    = "ds_hardcd=hardcd";
		oParam.async    = true;
	    oParam.callback = "cf_TRMMB16401";

	tranf_submit(oParam);
}

function cf_TRMMB16401(sSvcId, nErrorCode, sErrorMsg) {
	dsf_setDefaultVal(ds_hardcd, "status:N");
	ds_hardcd.rowposition = -1;
}

function SPMMO16800_onload(obj:Form, e:LoadEventInfo)
{
	if (opener !=null) {
		var sOpenerID = opener.frmf_getScreenID();
		
		if (sOpenerID == "SMMMO00200") { // 시행부서처방화면
			ds_init.setColumn(0, "prcpdd", opener.ds_init.getColumn(0, "prcpdd")); 
			cmb_prcpdd.enable = false;
		}
	}
}

function SPMMO16800_onclose(obj:Form, e:CloseEventInfo)
{
	var mainObj = frmf_getMainViewer(); 
	var passflag = ds_init.getColumn(0, "passflag"); 
	
	if ( passflag == "Y" ) {
		sysf_setGlobalVariable("SPMMO16800_rtn1", "Y");
	} else {						
		sysf_setGlobalVariable("SPMMO16800_rtn1", "N");
	}
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var currow              = ""; 
	var pid         	        = "";
	var prcpgenrflag	    = "";
	var orddd                = ""; 
	var cretno		        = "";
	var orddeptcd	        = "";				
	
	
	var mainObj = frmf_getMainViewer(); 
	curBfObj     = mainObj.frmf_findPopup("SMMMO00200"); 
	
	var sOpenerID = "";
	if (!utlf_isNull(opener)) {
		sOpenerID = opener.frmf_getScreenID();
	}
	
	if (sOpenerID == "SMMMO00200") { // 시행부서처방화면
		pid          = opener.ds_paminfo.getColumn(0, "pid");
		prcpgenrflag = opener.ds_paminfo.getColumn(0, "ioflag");
		if(prcpgenrflag == "O" || prcpgenrflag == "S") {
			orddd    = opener.ds_paminfo.getColumn(0, "orddd"); 
		} else {
			orddd    = opener.ds_paminfo.getColumn(0, "indd"); 
		}
		cretno		 = opener.ds_paminfo.getColumn(0, "cretno");
		orddeptcd	 = opener.ds_paminfo.getColumn(0, "orddeptcd");
	} else {
		var prtgrid  = opener.ds_patordinfolist.rowposition; 
		pid          = opener.ds_patordinfolist.getColumn(prtgrid, "pid");
		prcpgenrflag = opener.ds_patordinfolist.getColumn(prtgrid, "ioflag");
		orddd        = opener.ds_patordinfolist.getColumn(prtgrid, "orddd"); 
		cretno		 = opener.ds_patordinfolist.getColumn(prtgrid, "cretno");
		orddeptcd	 = opener.ds_patordinfolist.getColumn(prtgrid, "orddeptcd");				
	}
	
	
	var prcpdd = ds_init.getColumn(0, "prcpdd"); 
	if (utlf_isNull(prcpdd)){ 
		alert("누락처방 적용일이 없습니다. 누락처방일자를 입력해 주세요. "); 
		return ; 
	} 
	
	var prcptime = utlf_trim(utlf_transNullToEmpty(ds_init.getColumn(0, "prcptime"))).substr(0,4); 
	if (prcptime.length < 4 || utlf_isValidDateTime(prcptime, "hhmm") == false) {
		alert("시간을 HH:MM 형식으로 입력해 주세요. ") ; 
		return ; 
	} else {
		prcptime = prcptime+"00";
		ds_init.setColumn(0, "prcptime", prcptime); 
	}	
				

	var srchLength = ds_hardcd.rowcount;
	var chkflag = false ; 
	for ( var i = 0; i < srchLength; i++ ) { 
		var status = ds_hardcd.getColumn(i, "status" ); 
		if ( status == "Y" ) { 
			chkflag = true ;
			var hardcdnm = ds_hardcd.getColumn(i, "hardcdnm" ); 
			if ( utlf_isNull(hardcdnm)) { 
				alert("상세 사유가 없습니다. 상세 사유를 넣어주세요."); 
				return ; 
			}	
		}	
	}	
	
	if ( chkflag == false ) {
		alert("선택된 사유가 없습니다. 사유를 선택하세요. ");
		return ; 
	}
	
	var resncnts 	= "instcd|pid|orddd|cretno|ordtype|orddeptcd|prcpdd|prcpno|prcphistno|resnflag|resncd|resncnts^" ;
	var chkresncnts = '-'; 
	var chkresncd   = ds_hardcd.getColumn(currow, "hardcd" );
	var chkresnname = ds_hardcd.getColumn(currow, "hardcdnm" );
	var instcd 		= sysf_getUserInfo("dutplceinstcd");
	resncnts =  resncnts +  instcd + "|"  + pid + "|" + orddd + "|" + cretno + "|" +  prcpgenrflag +  "|" + orddeptcd  + "|-|0|0|C|" + chkresncd + "|" + chkresnname + "^";
	
	if ( curBfObj == null ) {
		curBfObj     = mainObj.frmf_findPopup("SMLPJ01000"); 
		curBfObj.ds_prcpresn.setColumn(0, "prcpdd", prcpdd); 
		curBfObj.ds_prcpresn.setColumn(0, "resncnt", resncnts); 
		curBfObj.ds_prcpresn.setColumn(0, "prcptime", prcpdd + prcptime); 
		
		ds_init.setColumn(0, "passflag", "Y");
	} else {
		if(curBfObj.ds_prcpresn.rowcount == 0 )
			curBfObj.ds_prcpresn.addRow();
			
		curBfObj.ds_prcpresn.setColumn(0, "prcpdd", prcpdd); 
		curBfObj.ds_prcpresn.setColumn(0, "resncnt", resncnts); 
		curBfObj.ds_prcpresn.setColumn(0, "prcptime", prcpdd + prcptime); 

		ds_init.setColumn(0, "passflag", "Y"); 
	}
	close(); 
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_init.setColumn(0, "passflag", "N");

	close();
}

function ds_hardcd_onrowposchanged(obj:Dataset, e:DSRowPosChangeEventInfo)
{	
	fSelectResn(obj, e);
}

function grd_resnlist_onenteredit(obj:Grid, e:GridEditEventInfo)
{
	var oDataset = eval(obj.binddataset);
	var currow = oDataset.rowposition;

	if ( ds_hardcd.getColumn(currow, "hardcd") == "Z" && e.col == obj.getBindCellIndex("body", "hardcdnm")) {
	} else {
		obj.showEditor(false);
	}
}

function grd_resnlist_onkeydown(obj:Grid, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.showEditor(false);
	}
}

function fSelectResn(obj:Dataset, e:DSRowPosChangeEventInfo) {
	if(e.newrow > -1) {
		for(var i = 0; i < obj.rowcount; i++) {
			if(utlf_isNull(obj.getColumnInfo("status"))) return;
			
			obj.setColumn(i, "status", "N");	// 기존의 것은 모두 체크 해제
		}
			
		obj.setColumn(e.newrow, "status", "Y");	// 현재 선택한 것을 체크
		
	 	if (obj.getColumn(e.newrow, "hardcd") == "Z" && grd_resnlist.getCellPos() == grd_resnlist.getBindCellIndex("body", "hardcdnm")) {
	 		grd_resnlist.showEditor(true);
	 	}
	}
}
function input1_onkeydown(obj:MaskEdit, e:KeyEventInfo)
{
	if (e.keycode == 13){
		obj.updateToDataset();
		button1.click();
	}
}
]]></Script>
  </Form>
</FDL>