YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SPADC62000_TDM자문의뢰.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADC62000" position="absolute 0 0 475 365" titletext="임상약동학의뢰" oninit="SPADC62000_oninit" onload="SPADC62000_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 470 330" id="group1">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 135 470 141" linetype="horizontal" id="line1" class="line_1"/>
              <Static text="의뢰요청 내용" position="absolute 3 119 108 135" id="caption1" class="tit_2"/>
              <Static text="약동학 자문의뢰 이유" position="absolute 0 165 130 188" id="caption7" class="cell_1"/>
              <Static text="전달사항" position="absolute 0 222 130 245" id="caption8" class="cell_1"/>
              <Shape position="absolute 0 160 470 166" linetype="horizontal" id="line2" class="line_2"/>
              <Shape position="absolute 0 217 470 223" linetype="horizontal" id="line5" class="line_2"/>
              <Shape position="absolute 0 324 470 330" linetype="horizontal" id="line6" class="line_6"/>
              <Button position="absolute 449 143 465 159" id="button1" class="icon_search" text="" onclick="group1_button1_onclick"/>
              <Edit position="absolute 133 142 445 161" id="ipt_cnstcnts1" class="input_essential" maxlength="33" readonly="false" oneditclick="group1_ipt_cnstcnts1_oneditclick"/>
              <TextArea position="absolute 133 222 470 325" id="tar_cnstcnts3" maxlength="33"/>
              <Edit position="absolute 40 195 115 210" id="input1" visible="false"/>
              <Static text="의뢰약물" position="absolute 0 140 130 163" id="caption2" class="cell_1"/>
              <cp_checkboxList id="chk_cnstcnts2" titletext="CheckBox List" taborder="3" scrollbars="none" position="absolute 133 164 470 219" style="background:transparent; " col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="100" itemHeight="20" overflow="visible" class="input_essential"/>
              <Div id="case2" taborder="1" class="div_SA2" position="absolute 0 0 470 115">
                <Layouts>
                  <Layout>
                    <Static id="caption12" text="의뢰부서 :" class="search_name" position="absolute 10 12 100 29" anchor="default"/>
                    <Static id="caption9" text="의뢰자 :" class="search_name" position="absolute 10 37 100 54" anchor="default"/>
                    <Static id="caption10" text="수신부서 :" class="search_name" position="absolute 10 62 100 79" anchor="default"/>
                    <Static id="caption11" text="수신자 :" class="search_name" position="absolute 10 87 100 104" anchor="default"/>
                    <Edit id="output11" taborder="7" readonly="true" class="output_search" position="absolute 105 85 215 104" anchor="default"/>
                    <Edit id="output8" taborder="8" readonly="true" class="output_search" position="absolute 105 60 215 79" anchor="default"/>
                    <Edit id="output10" taborder="9" readonly="true" class="output_search" position="absolute 105 35 215 54" anchor="default"/>
                    <Edit id="output9" taborder="10" readonly="true" class="output_search" position="absolute 105 10 215 29" anchor="default"/>
                    <Static id="caption14" text="이름 :" class="search_name" position="absolute 250 37 345 54" anchor="default"/>
                    <Static id="caption13" text="등록번호 :" class="search_name" position="absolute 250 12 340 29" anchor="default"/>
                    <Edit id="output12" taborder="11" readonly="true" class="output_search" position="absolute 350 10 460 29" anchor="default"/>
                    <Edit id="output13" taborder="12" readonly="true" class="output_search" position="absolute 350 35 460 54" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Div id="case1" taborder="2" class="div_SA2" position="absolute 0 0 470 115">
                <Layouts>
                  <Layout>
                    <Static id="caption6" text="처방구분 :" class="search_name" position="absolute 10 12 100 29" anchor="default"/>
                    <Static id="caption3" text="병실 :" class="search_name" position="absolute 10 37 100 54" anchor="default"/>
                    <Static id="caption4" text="진료과 :" class="search_name" position="absolute 10 62 100 79" anchor="default"/>
                    <Static id="caption5" text="처방의사 :" class="search_name" position="absolute 10 87 100 104" anchor="default"/>
                    <Edit id="output2" taborder="8" readonly="true" class="output_search" position="absolute 105 85 215 104" anchor="default"/>
                    <Edit id="output5" taborder="9" readonly="true" class="output_search" position="absolute 105 60 215 79" anchor="default"/>
                    <Edit id="output7" taborder="10" readonly="true" class="output_search" position="absolute 105 35 215 54" anchor="default"/>
                    <Edit id="output6" taborder="11" readonly="true" class="output_search" position="absolute 105 10 215 29" anchor="default"/>
                    <Static id="caption16" text="등록번호 :" class="search_name" position="absolute 250 12 340 29" anchor="default"/>
                    <Static id="caption17" text="성별/나이 :" class="search_name" position="absolute 250 37 345 54" anchor="default"/>
                    <Static id="caption18" text="이름 :" class="search_name" position="absolute 250 62 340 79" anchor="default"/>
                    <Edit id="output3" taborder="12" readonly="true" class="output_search" position="absolute 350 60 460 79" anchor="default"/>
                    <Edit id="output1" taborder="13" readonly="true" class="output_search" position="absolute 350 35 460 54" anchor="default"/>
                    <Edit id="output4" taborder="14" readonly="true" class="output_search" position="absolute 350 10 460 29" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Static id="btn_popup" position="absolute 133 142 445 161" onclick="group1_btn_popup_onclick"/>
              <Shape id="line00" class="line_1" position="absolute 0 134 470 140"/>
              <Shape id="line03" class="line_1" position="absolute 0 136 470 142"/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="group2" taborder="1" position="absolute 0 330 470 363">
          <Layouts>
            <Layout>
              <Div id="case4" taborder="1" visible="false" position="absolute 0 0 470 31">
                <Layouts>
                  <Layout>
                    <Button id="btn_cnstcancel" taborder="4" text="의뢰취소" onclick="group2_case4_btn_cnstcancel_onclick" class="btn4" position="absolute 327 5 407 27"/>
                    <Button id="btn_cancel1" taborder="5" text="닫기" onclick="group2_case4_btn_cancel1_onclick" class="btn4" position="absolute 410 5 466 27"/>
                  </Layout>
                </Layouts>
              </Div>
              <Div id="case3" taborder="2" position="absolute 0 0 470 31">
                <Layouts>
                  <Layout>
                    <Button id="button6" taborder="6" text="저장" class="btn4" visible="false" position="absolute 110 5 166 27" anchor="default"/>
                    <Button id="btn_cnst" taborder="7" text="의뢰" onclick="group2_case3_btn_cnst_onclick" class="btn4" position="absolute 351 5 407 27" anchor="default"/>
                    <Button id="btn_cancel" taborder="8" text="닫기" onclick="group2_case3_btn_cancel_onclick" class="btn4" position="absolute 410 5 466 27" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_chk_cnstcnts2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">적정용량 확인</Col>
            <Col id="value">1</Col>
          </Row>
          <Row>
            <Col id="label">독성의심</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">기대이하의 약효</Col>
            <Col id="value">3</Col>
          </Row>
          <Row>
            <Col id="label">상호작용약물 추가/중단</Col>
            <Col id="value">4</Col>
          </Row>
          <Row>
            <Col id="label">입원시 초기 농도 확인</Col>
            <Col id="value">5</Col>
          </Row>
          <Row>
            <Col id="label">중단 후 감소된 농도확인</Col>
            <Col id="value">6</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_cnstinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="sna" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="roomcd" type="STRING" size="256"/>
          <Column id="reqdeptnm" type="STRING" size="256"/>
          <Column id="requsernm" type="STRING" size="256"/>
          <Column id="prcpflag" type="STRING" size="256"/>
          <Column id="recvdeptnm" type="STRING" size="256"/>
          <Column id="recvusernm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="sna"/>
            <Col id="hngnm"/>
            <Col id="roomcd"/>
            <Col id="reqdeptnm"/>
            <Col id="requsernm"/>
            <Col id="prcpflag"/>
            <Col id="recvdeptnm"/>
            <Col id="recvusernm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_cnstinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnstkind" type="STRING" size="256"/>
          <Column id="cnstseqno" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="formrecseq" type="STRING" size="256"/>
          <Column id="formcd" type="STRING" size="256"/>
          <Column id="cnststat" type="STRING" size="256"/>
          <Column id="reqdd" type="STRING" size="256"/>
          <Column id="reqhm" type="STRING" size="256"/>
          <Column id="chosflag" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="eryn" type="STRING" size="256"/>
          <Column id="reqdeptcd" type="STRING" size="256"/>
          <Column id="requserid" type="STRING" size="256"/>
          <Column id="cnstcnts1" type="STRING" size="256"/>
          <Column id="cnstcnts2" type="STRING" size="256"/>
          <Column id="cnstcnts3" type="STRING" size="256"/>
          <Column id="cnstflag" type="STRING" size="256"/>
          <Column id="recvdeptcd" type="STRING" size="256"/>
          <Column id="cnstcnts30" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="prcpno" type="STRING" size="256"/>
          <Column id="prcphistno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cnstkind">3</Col>
            <Col id="cnstseqno"/>
            <Col id="cretno"/>
            <Col id="formrecseq"/>
            <Col id="formcd">0000000769</Col>
            <Col id="cnststat"/>
            <Col id="reqdd"/>
            <Col id="reqhm"/>
            <Col id="chosflag"/>
            <Col id="orddd"/>
            <Col id="eryn">N</Col>
            <Col id="reqdeptcd"/>
            <Col id="requserid"/>
            <Col id="cnstcnts1"/>
            <Col id="cnstcnts2"/>
            <Col id="cnstcnts3"/>
            <Col id="cnstflag">3</Col>
            <Col id="recvdeptcd">3240000000</Col>
            <Col id="cnstcnts30"/>
            <Col id="prcpcd"/>
            <Col id="prcpdd"/>
            <Col id="prcpno"/>
            <Col id="prcphistno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_srchinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnstkind" type="STRING" size="256"/>
          <Column id="cnstseqno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_cnststatinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnststat" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_testinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="testcd" type="STRING" size="256"/>
          <Column id="testnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_popupdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ioflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.case1.output6" propid="value" datasetid="ds_main_patinfo" columnid="prcpflag"/>
      <BindItem id="item1" compid="group1.case1.output4" propid="value" datasetid="ds_main_patinfo" columnid="pid"/>
      <BindItem id="item2" compid="group1.case1.output7" propid="value" datasetid="ds_main_patinfo" columnid="roomcd"/>
      <BindItem id="item3" compid="group1.case1.output1" propid="value" datasetid="ds_main_patinfo" columnid="sna"/>
      <BindItem id="item4" compid="group1.case1.output5" propid="value" datasetid="ds_main_patinfo" columnid="reqdeptnm"/>
      <BindItem id="item5" compid="group1.case1.output3" propid="value" datasetid="ds_main_patinfo" columnid="hngnm"/>
      <BindItem id="item6" compid="group1.case1.output2" propid="value" datasetid="ds_main_patinfo" columnid="requsernm"/>
      <BindItem id="item7" compid="group1.case2.output9" propid="value" datasetid="ds_temp_cnstinfo" columnid="reqdeptnm"/>
      <BindItem id="item8" compid="group1.case2.output10" propid="value" datasetid="ds_temp_cnstinfo" columnid="requsernm"/>
      <BindItem id="item9" compid="group1.case2.output8" propid="value" datasetid="ds_temp_cnstinfo" columnid="recvdeptnm"/>
      <BindItem id="item10" compid="group1.case2.output11" propid="value" datasetid="ds_temp_cnstinfo" columnid="recvusernm"/>
      <BindItem id="item11" compid="group1.case2.output12" propid="value" datasetid="ds_temp_cnstinfo" columnid="pid"/>
      <BindItem id="item12" compid="group1.case2.output13" propid="value" datasetid="ds_temp_cnstinfo" columnid="pidnm"/>
      <BindItem id="item13" compid="group1.ipt_cnstcnts1" propid="value" datasetid="ds_main_cnstinfo" columnid="cnstcnts1"/>
      <BindItem id="item14" compid="group1.input1" propid="value" datasetid="ds_main_cnstinfo" columnid="cnstcnts30"/>
      <BindItem id="item15" compid="group1.tar_cnstcnts3" propid="value" datasetid="ds_main_cnstinfo" columnid="cnstcnts3"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-07-23
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-07-23      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"
 
//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var arErrorCode = new HashArray();

//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: N/A
 * Description		: 멀티체크박스 선택시 실행함수
 ****************************************************************************************/
function fn_chk_cnstcnts2() {
	ds_main_cnstinfo.setColumn(0,"cnstcnts2",String(group1.chk_cnstcnts2.getData()).replace(","," "));
}

/****************************************************************************************
 * Argument			: N/A
 * Description		: 화면 초기화
 ****************************************************************************************/
function finit(){
	if(fCnstType()){
		group1.case1.visible = false;
		group1.case2.visible = true;
		
		group2.case3.visible = false;
		group2.case4.visible = true;
		
		fSetPatinfo();
	}else{
		group1.case1.visible = true;
		group1.case2.visible = false;
		
		var pamInfoCvs = sysf_getGlobalVariable("paminfo");  
			
		if(!utlf_isNull(pamInfoCvs)){ //cvs가 null이 아닌 경우에만 처리함.
			dsf_setCSVToDs("ds_paminfo",pamInfoCvs);
		
			ds_main_patinfo.setColumn(0,"pid",ds_paminfo.getColumn(0,"pid"));
			var sna = ds_paminfo.getColumn(0,"sex") +"/"+ ds_paminfo.getColumn(0,"age");
			ds_main_patinfo.setColumn(0,"sna"		, sna);
			ds_main_patinfo.setColumn(0,"hngnm"		, ds_paminfo.getColumn(0,"hngnm"));
			ds_main_patinfo.setColumn(0,"roomcd"	, ds_paminfo.getColumn(0,"roomcd"));
			ds_main_patinfo.setColumn(0,"reqdeptnm"	, sysf_getUserInfo("dutplcenm"));
			ds_main_cnstinfo.setColumn(0,"reqdeptcd", sysf_getUserInfo("dutplcecd"));
			ds_main_patinfo.setColumn(0,"requsernm"	, sysf_getUserName());
			ds_main_cnstinfo.setColumn(0,"requserid", sysf_getUserId());
			
			var prcpflag = "";
			var ioflag 	 = ds_paminfo.getColumn(0,"ioflag");
			
			if(ioflag == "O" || ioflag == "S"){
				prcpflag = "외래";
				ds_main_cnstinfo.setColumn(0,"orddd", ds_paminfo.getColumn(0,"orddd"));
			}else {							
				prcpflag = "입원";
				ds_main_cnstinfo.setColumn(0,"orddd", ds_paminfo.getColumn(0,"indd"));
			}
			
			if(ds_paminfo.getColumn(0,"fsexamflag") == "F"){
				prcpflag += "/초진";
			}else if(ds_paminfo.getColumn(0,"fsexamflag") =="R"){
				prcpflag += "/재진";
			}
			
			ds_main_patinfo.setColumn(0 ,"prcpflag", prcpflag);
			ds_main_cnstinfo.setColumn(0,"chosflag", ds_paminfo.getColumn(0,"ioflag"));
			ds_main_cnstinfo.setColumn(0,"cretno"  , ds_paminfo.getColumn(0,"cretno"));
			
			//2008-11-01 진료와연동처리 추가 Start 
			if (!utlf_isNull(ds_temp_cnstinfo.getColumn(0,"prcpcd"))) {
				ds_main_cnstinfo.setColumn(0,"prcpcd", 		ds_temp_cnstinfo.getColumn(0,"prcpcd"));	//처방코드
				ds_main_cnstinfo.setColumn(0,"cnstcnts30", 	ds_temp_cnstinfo.getColumn(0,"prcpcd"));	//처방코드								
				if (!utlf_isNull(ds_temp_cnstinfo.getColumn(0,"prcpnm"))) {
					ds_main_cnstinfo.setColumn(0,"cnstcnts1", ds_temp_cnstinfo.getColumn(0,"prcpnm"));	//의뢰약물 - 처방명칭							
				}
			}
			if (!utlf_isNull(ds_temp_cnstinfo.getColumn(0,"prcpdd"))) {
				ds_main_cnstinfo.setColumn(0,"prcpdd", ds_temp_cnstinfo.getColumn(0,"prcpdd"));			//처방일자
			}
			//2008-11-01 진료와연동처리 추가 End	
								
		}else{
			var msg = sysf_messageBox("환자를 ", "C002");
			return false;
		}
	}					
//	model.refresh();
}
				
/****************************************************************************************
 * Argument			: N/A
 * Description		: 화면 설정 타입
 ****************************************************************************************/
function fCnstType(){
	if(utlf_isNull(ds_temp_cnstinfo.getColumn(0,"formrecseq"))){
		return false;
	}else return true;
}
				
/****************************************************************************************
 * Argument			: N/A
 * Description		: 환자정보 설정
 ****************************************************************************************/
function fSetPatinfo(){
	ds_main_patinfo.setColumn(0,"pid"		, ds_temp_cnstinfo.getColumn(0,"pid"));
	ds_main_patinfo.setColumn(0,"hngnm"		, ds_temp_cnstinfo.getColumn(0,"pidnm"));
	ds_main_patinfo.setColumn(0,"reqdeptnm"	, ds_temp_cnstinfo.getColumn(0,"reqdeptnm"));
	ds_main_patinfo.setColumn(0,"requsernm"	, ds_temp_cnstinfo.getColumn(0,"requsernm"));
	ds_main_patinfo.setColumn(0,"recvdeptnm", ds_temp_cnstinfo.getColumn(0,"recvdeptnm"));
	ds_main_patinfo.setColumn(0,"recvusernm", ds_temp_cnstinfo.getColumn(0,"recvusernm"));
	
	ds_send_srchinfo.copyData(ds_temp_cnstinfo);
	
	var oParam = {};
		oParam.id          = "TRADC61701";
		oParam.service     = "pharmacyconsultapp.ReqMngt";
		oParam.method      = "reqGetCnstInfo";
		oParam.inds        = "req=ds_send_srchinfo";
		oParam.outds       = "ds_main_cnstinfo=cnstinfo";
		oParam.async       = false;
		oParam.callback    = "cf_TRADC61701";

	tranf_submit(oParam);
	
	if(ds_main_cnstinfo.getColumn(0,"cnststat") >= 20) {
		group2.case4.btn_cnstcancel.visible = false;
//		btn_cnstcancel.refresh();
	}
}

function cf_TRADC61701(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
	// 멀티체크박스 세팅
    if(!utlf_isNull(ds_main_cnstinfo.getColumn(0,"cnstcnts2")))  group1.chk_cnstcnts2.setData(ds_main_cnstinfo.getColumn(0,"cnstcnts2").split(" "),null,false);
}
				
				// 현재시간 구하기 : 시간 분
/****************************************************************************************
 * Argument			: N/A
 * Description		: 현재시간 구하기 : 시간 분
 ****************************************************************************************/
function astgetCurrentTime()
{
	var sDate = utlf_getNewDate();

	rtnTime = (( sDate.getHours() > 9 ) ? sDate.getHours() : "0" + sDate.getHours());
	rtnTime = rtnTime.toString() + (( sDate.getMinutes() > 9 ) ? sDate.getMinutes() : "0" + sDate.getMinutes());
	
	return rtnTime;
}

/****************************************************************************************
 * Argument			: N/A
 * Description		: 의뢰 저장
 ****************************************************************************************/
function fSaveCnst(){
	if(!utlf_isNull(ds_main_patinfo.getColumn(0,"pid"))){
		dsf_makeValue(ds_main_cnstinfo,"pid","string",ds_main_patinfo.getColumn(0,"pid"));
		// 20110325 wify 경북대병원 유해증상 form 변경에 따른 구,신 버전 구분flag 추가				
//		submit("TXADC61701");
		var oParam = {};
			oParam.id          = "TXADC61701";
			oParam.service     = "pharmacyconsultapp.ReqMngt";
			oParam.method      = "reqExeCnstInfo";
			oParam.inds        = "req=ds_main_cnstinfo";
			oParam.outds       = "ds_hidden_item=item";
			oParam.async       = false;

		tranf_submit(oParam);
//		model.refresh();
	}
}
				
//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SPADC62000
 * Event			: oninit
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SPADC62000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  		// 폼 초기화 
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SPADC62000
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SPADC62000_onload(obj:Form, e:LoadEventInfo)
{
	ds_temp_cnstinfo.copyData(arg_ds_temp_cnstinfo);
	
	var sProp_2_3 = "col=2,row=3,cellspacing=4,vcellspacing=0,itemWidth=-1,itemHeight=17,overflow='visible'";
	group1.chk_cnstcnts2.setInitComp(sProp_2_3, ds_chk_cnstcnts2, "value","label","fn_chk_cnstcnts2");
	
	finit();
}

/****************************************************************************************
 * Components		: Edit
 * Components ID	: group1.ipt_cnstcnts1
 * Event			: oneditclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 의뢰약물 에디트 클릭시 팝업띄움
 ****************************************************************************************/
function group1_ipt_cnstcnts1_oneditclick(obj:Edit,  e:EditClickEventInfo)
{
// 	var ev = new ClickEventInfo;
// 	frmf_inputEnterKey("group1.button1", "onclick", ev );
}

function group1_btn_popup_onclick(obj:Static,  e:ClickEventInfo)
{
	var ev = new ClickEventInfo;
	frmf_inputEnterKey("group1.button1", "onclick", ev );
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: group1.button1
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 의뢰약물 기준정보팝업 띄움
 ****************************************************************************************/
function group1_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var ioflag = ds_main_cnstinfo.getColumn(0,"chosflag");
	if(!utlf_isNull(ioflag)){
		dsf_makeValue(ds_temp_popupdata,"ioflag","string", ioflag);
	}
//	modal("SPADB63000",0,200,200,"SPADB63000","/root/temp/popupdata","/root/hidden/receiveref");		
	var objArg = new Object();
	objArg.arg_ds_hidden_receiveref = ds_temp_popupdata; 
	frmf_modal("SPADB63000", "SPADB63000", objArg, null, 0, 100, 150, null, null, null, null, null, "M");
	
	testcd = ds_temp_testinfo.getColumn(0,"testcd");
	testnm = ds_temp_testinfo.getColumn(0,"testnm");
	ds_main_cnstinfo.setColumn(0,"cnstcnts30",testcd);	//TDM기준정보 코드	
	ds_main_cnstinfo.setColumn(0,"cnstcnts1", testnm);	//TDM기준정보 명칭
//	model.refresh();			
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: group2.case3.btn_cnst
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 의뢰버튼 클릭
 ****************************************************************************************/
function group2_case3_btn_cnst_onclick(obj:Button,  e:ClickEventInfo)
{
	var ioflag = ds_paminfo.getColumn(0,"ioflag");
	var orddd  = ds_paminfo.getColumn(0,"orddd");
	if(ioflag == "O" || ioflag == "S"){
		if(orddd != utlf_getCurrentDate()) {
			sysf_messageBox("당일 진료환자만 의뢰","I006");
			return;
		}
	}
	
	if(utlf_isNull(group1.ipt_cnstcnts1.value) && utlf_isNull(group1.ipt_cnstcnts1.value.getTrim())){ sysf_messageBox(group1.caption2.text+" 은(는)","I003"); return; }		//의뢰약물 필수 입력항목
	if(utlf_isNull(group1.chk_cnstcnts2.getData())){ sysf_messageBox(group1.caption7.text+" 은(는)","I003"); return; }		//2010-01-25 TDM자문의뢰- 의뢰이유 : 필수입력항목 입력후 다음단계로 넘어가도록 처리						
	
	if ( sysf_messageBox("의뢰내용을","Q002")==6 ){ 
		ds_main_cnstinfo.setColumn(0,"cnststat"	, "12");	
		ds_main_cnstinfo.setColumn(0,"reqdd"	, utlf_getCurrentDate());
		ds_main_cnstinfo.setColumn(0,"reqhm"	, astgetCurrentTime());
		
		//2008-11-01 진료창 연결시점에는 처방코드를 가져오나 Consult창으로 의뢰할경우는 처방코드가 안들어감. 선택된의뢰약물로 처방코드 대체 
		if (!utlf_isNull(ds_main_cnstinfo.getColumn(0,"cnstcnts30")) && utlf_isNull(ds_main_cnstinfo.getColumn(0,"prcpcd"))){
			ds_main_cnstinfo.setColumn(0,"prcpcd",ds_main_cnstinfo.getColumn(0,"cnstcnts30"));
		}
		
		fSaveCnst();		
			
		//2008-11-01 의뢰후 진료처방으로 Return Start  -- 진료오류발생되어 임시 막기.
// 		var tdm_tpn_key = ds_hidden_item.getColumn(0,"cnstkind") + ds_hidden_item.getColumn(0,"cnstseqno");
// 		opener.dsf_makeValue(ds_hidden_reqfrminfo,"reqno","string",tdm_tpn_key);
		//2008-11-01 의뢰후 진료처방으로 Return End

		this.close();
	}
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: group2.case4.btn_cancel
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 닫기
 ****************************************************************************************/
function group2_case3_btn_cancel_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: group2.case4.btn_cnstcancel
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 의뢰취소 저장
 ****************************************************************************************/
function group2_case4_btn_cnstcancel_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRADC62202";
		oParam.service     = "pharmacyconsultapp.ReqMngt";
		oParam.method      = "reqGetCnstStat";
		oParam.inds        = "req=ds_main_cnstinfo";
		oParam.outds       = "ds_hidden_cnststatinfo=cnststatinfo";
		oParam.async       = false;
		oParam.callback    = "cf_TRADC62202";

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TRADC62202") > -1){
		var cnststat = ds_hidden_cnststatinfo.getColumn(0,"cnststat");
		if(cnststat == "22"){
			sysf_messageBox("[회신] 의뢰를 취소할 수","I004");
		}else if(cnststat == "21"){
			sysf_messageBox("[임시회신] 의뢰를 취소할 수","I004");
		}else if(cnststat == "20"){
			sysf_messageBox("[의뢰확정] 의뢰를 취소할 수","I004");
		}else if(sysf_messageBox("의뢰를","Q007") == 6){
			ds_send_srchinfo.setColumn(0,"cnststat", "04");
			dsf_makeValue(ds_send_srchinfo,"cnstkind","string", "3");		//2009-12-21 의뢰취소는 컨설트 구분 추가
			
			var oParam = {};
				oParam.id          = "TXADC61702";
				oParam.service     = "pharmacyconsultapp.ReqMngt";
				oParam.method      = "reqSetCnstInfo";
				oParam.inds        = "req=ds_send_srchinfo";
//				oParam.outds       = "ds_hidden_item=item";
				oParam.async       = false;
				oParam.callback    = "cf_TXADC61702";

			tranf_submit(oParam);
			
			if(arErrorCode.pop("TXADC61702") > -1){
				sysf_messageBox("요청하신 작업이","I001");
				this.close();
			}
		}
	}
}

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

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

/****************************************************************************************
 * Components		: Button
 * Components ID	: group2.case4.btn_cancel1
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 닫기
 ****************************************************************************************/
function group2_case4_btn_cancel1_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}


]]></Script>
  </Form>
</FDL>