YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SPADC61800_약품식별의뢰.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADC61800" position="absolute 0 0 480 366" titletext="의약품식별의뢰" oninit="SPADC61800_oninit" onload="SPADC61800_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 470 333" id="group1">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 135 470 141" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="default"/>
              <Static text="의뢰관련정보" position="absolute 2 119 107 140" id="caption1" class="tit_2" anchor="default"/>
              <Static text="식별약 반송" position="absolute 0 307 100 330" id="caption8" class="cell_1" anchor="default"/>
              <Shape position="absolute 0 160 470 166" linetype="horizontal" id="line2" class="line_2" anchor="default"/>
              <Shape position="absolute 0 185 470 191" linetype="horizontal" id="line3" class="line_2" anchor="default"/>
              <Shape position="absolute 0 210 470 216" linetype="horizontal" id="line4" class="line_2" anchor="default"/>
              <Shape position="absolute 0 301 470 307" linetype="horizontal" id="line5" class="line_2" anchor="default"/>
              <Shape position="absolute 0 327 470 333" linetype="horizontal" id="line6" class="line_6" anchor="default"/>
              <Edit position="absolute 105 141 245 160" id="ipt_cnstcnts1" anchor="default" maxlength="33"/>
              <Edit position="absolute 355 141 470 160" id="ipt_cnstcnts2" anchor="default" maxlength="33"/>
              <Edit position="absolute 105 166 245 185" id="ipt_cnstcnts3" anchor="default" maxlength="33"/>
              <Edit position="absolute 355 166 470 185" id="ipt_cnstcnts4" anchor="default" maxlength="33"/>
              <Edit position="absolute 105 191 470 210" id="ipt_cnstcnts5" anchor="default" maxlength="33"/>
              <Radio position="absolute 105 307 241 327" id="rdo_cnstcnts8" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">반송</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">반송안함</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static text="처방의원" position="absolute 0 140 100 163" id="caption2" class="cell_1" anchor="default"/>
              <Static text="조제약국" position="absolute 0 165 100 188" id="caption3" class="cell_1" anchor="default"/>
              <Static text="약 복용 이유" position="absolute 0 190 100 213" id="caption6" class="cell_1" anchor="default"/>
              <Static text="식별 의뢰 이유" position="absolute 0 215 100 238" id="caption7" class="cell_1" anchor="default"/>
              <Static text="처방의원 연락처" position="absolute 250 140 350 163" id="caption4" class="cell_1" anchor="default"/>
              <Static text="조제약국 연락처" position="absolute 250 165 350 188" id="caption5" class="cell_1" anchor="default"/>
              <cp_checkboxList id="chk_cnstcnts6" titletext="CheckBox List" taborder="1" scrollbars="none" position="absolute 105 215 470 300" style="background:transparent; " col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="100" itemHeight="20" overflow="visible" anchor="default"/>
              <Div id="case2" taborder="2" class="div_SA2" visible="false" position="absolute 0 0 470 115">
                <Layouts>
                  <Layout>
                    <Static id="caption19" text="의뢰부서 :" class="search_name" position="absolute 10 12 100 29"/>
                    <Edit id="output9" taborder="7" readonly="true" class="output_search" position="absolute 105 10 215 29"/>
                    <Static id="caption20" text="등록번호 :" class="search_name" position="absolute 250 12 340 29"/>
                    <Edit id="output12" taborder="8" readonly="true" class="output_search" position="absolute 350 10 460 29"/>
                    <Edit id="output13" taborder="9" readonly="true" class="output_search" position="absolute 350 35 460 54"/>
                    <Static id="caption21" text="이름 :" class="search_name" position="absolute 250 37 345 54"/>
                    <Edit id="output10" taborder="10" readonly="true" class="output_search" position="absolute 105 35 215 54"/>
                    <Static id="caption13" text="의뢰자 :" class="search_name" position="absolute 10 37 100 54"/>
                    <Static id="caption14" text="수신부서 :" class="search_name" position="absolute 10 62 100 79"/>
                    <Edit id="output8" taborder="11" readonly="true" class="output_search" position="absolute 105 60 215 79"/>
                    <Edit id="output11" taborder="12" readonly="true" class="output_search" position="absolute 105 85 215 104"/>
                    <Static id="caption15" text="수신자 :" class="search_name" position="absolute 10 87 100 104"/>
                  </Layout>
                </Layouts>
              </Div>
              <Edit position="absolute 156 282 470 301" id="ipt_cnstcnts7" anchor="default" maxlength="33"/>
              <Div id="case1" taborder="3" 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"/>
                    <Edit id="output6" taborder="8" readonly="true" class="output_search" position="absolute 117 10 227 29" anchor="default"/>
                    <Static id="caption16" text="등록번호 :" class="search_name" position="absolute 250 39 340 56" anchor="default"/>
                    <Edit id="output4" taborder="9" readonly="true" class="output_search" position="absolute 350 37 460 56" anchor="default"/>
                    <Edit id="output1" taborder="10" readonly="true" class="output_search" position="absolute 350 62 460 81" anchor="default"/>
                    <Edit id="output3" taborder="11" readonly="true" class="output_search" position="absolute 350 87 460 106" anchor="default"/>
                    <Static id="caption17" text="성별/나이 :" class="search_name" position="absolute 250 64 345 81" anchor="default"/>
                    <Static id="caption18" text="이름 :" class="search_name" position="absolute 250 89 340 106" anchor="default"/>
                    <Edit id="output7" taborder="12" readonly="true" class="output_search" position="absolute 117 35 227 54" 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 122 79" anchor="default" onclick="group1_case1_caption10_onclick"/>
                    <Edit id="output5" taborder="13" readonly="true" class="output_search" position="absolute 350 12 460 31" anchor="default"/>
                    <Edit id="output2" taborder="14" readonly="true" class="output_search" position="absolute 117 85 227 104" anchor="default"/>
                    <Static id="caption11" text="의뢰자 :" class="search_name" position="absolute 10 87 100 104" anchor="default"/>
                    <Static id="caption00" text="진료과 :" class="search_name" position="absolute 251 12 341 29" anchor="default"/>
                    <Edit id="output00" taborder="15" readonly="true" class="output_search" position="absolute 118 61 228 80" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 330 470 363" id="group2">
          <Layouts>
            <Layout>
              <Div id="case4" taborder="1" position="absolute 0 0 470 71" visible="false">
                <Layouts>
                  <Layout>
                    <Button id="btn_cnstcancel" taborder="2" text="의뢰취소" class="btn4" position="absolute 327 5 407 27" anchor="default" onclick="group2_case4_btn_cnstcancel_onclick"/>
                    <Button id="btn_cancel1" taborder="3" text="닫기" class="btn4" position="absolute 410 5 466 27" anchor="default" onclick="group2_case4_btn_cancel1_onclick"/>
                    <Button id="btn_reprt" taborder="4" text="의뢰지 출력" class="btn4" position="absolute 226 5 324 27" anchor="default" onclick="group2_case4_btn_reprt_onclick"/>
                  </Layout>
                </Layouts>
              </Div>
              <Div id="case3" taborder="2" position="absolute 0 0 470 30">
                <Layouts>
                  <Layout width="470" height="31">
                    <Button id="button6" taborder="8" text="저장" class="btn4" visible="false" position="absolute 110 5 166 27" anchor="default"/>
                    <Button id="btn_cnst" taborder="9" text="의뢰" onclick="group2_case3_btn_cnst_onclick" class="btn4" position="absolute 350 5 406 27" anchor="default"/>
                    <Button id="btn_cancel" taborder="10" text="닫기" class="btn4" position="absolute 410 5 466 27" anchor="default" onclick="group2_case3_btn_cancel_onclick"/>
                    <Button id="btn_prt" taborder="11" text="의뢰지 출력" onclick="group2_case3_btn_prt_onclick" class="btn4" position="absolute 248 5 346 27" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_chk_cnstcnts6" 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>
        </Rows>
      </Dataset>
      <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"/>
          <Column id="piddeptcd" type="STRING" size="256"/>
          <Column id="piddeptnm" 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="cnstcnts4" type="STRING" size="256"/>
          <Column id="cnstcnts5" type="STRING" size="256"/>
          <Column id="cnstcnts6" type="STRING" size="256"/>
          <Column id="cnstcnts7" type="STRING" size="256"/>
          <Column id="cnstcnts18" type="STRING" size="256"/>
          <Column id="cnstflag" type="STRING" size="256"/>
          <Column id="recvdeptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cnstkind">5</Col>
            <Col id="cnstseqno"/>
            <Col id="cretno"/>
            <Col id="formrecseq"/>
            <Col id="formcd">0000000768</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="cnstcnts4"/>
            <Col id="cnstcnts5"/>
            <Col id="cnstcnts6"/>
            <Col id="cnstcnts7">1</Col>
            <Col id="cnstcnts18"/>
            <Col id="cnstflag">3</Col>
            <Col id="recvdeptcd">3240000000</Col>
          </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="count" 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_cnstinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_prtdata" 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="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="wardnm" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
          <Column id="tittel" 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.output7" propid="value" datasetid="ds_main_patinfo" columnid="roomcd"/>
      <BindItem id="item2" compid="group1.case1.output5" propid="value" datasetid="ds_main_patinfo" columnid="piddeptnm"/>
      <BindItem id="item3" compid="group1.case1.output2" propid="value" datasetid="ds_main_patinfo" columnid="requsernm"/>
      <BindItem id="item4" compid="group1.case1.output3" propid="value" datasetid="ds_main_patinfo" columnid="hngnm"/>
      <BindItem id="item5" compid="group1.case1.output1" propid="value" datasetid="ds_main_patinfo" columnid="sna"/>
      <BindItem id="item6" compid="group1.case1.output4" propid="value" datasetid="ds_main_patinfo" columnid="pid"/>
      <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.ipt_cnstcnts2" propid="value" datasetid="ds_main_cnstinfo" columnid="cnstcnts2"/>
      <BindItem id="item15" compid="group1.ipt_cnstcnts3" propid="value" datasetid="ds_main_cnstinfo" columnid="cnstcnts3"/>
      <BindItem id="item16" compid="group1.ipt_cnstcnts4" propid="value" datasetid="ds_main_cnstinfo" columnid="cnstcnts4"/>
      <BindItem id="item17" compid="group1.ipt_cnstcnts5" propid="value" datasetid="ds_main_cnstinfo" columnid="cnstcnts5"/>
      <BindItem id="item18" compid="group1.ipt_cnstcnts7" propid="value" datasetid="ds_main_cnstinfo" columnid="cnstcnts18"/>
      <BindItem id="item19" compid="group1.rdo_cnstcnts8" propid="value" datasetid="ds_main_cnstinfo" columnid="cnstcnts7"/>
      <BindItem id="item20" compid="group1.case1.output00" propid="value" datasetid="ds_main_patinfo" columnid="reqdeptnm"/>
    </Bind>
    <InitValue titletext="의약품식별의뢰"/>
    <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_cnstcnts6() {
	ds_main_cnstinfo.setColumn(0,"cnstcnts6",String(group1.chk_cnstcnts6.getData()).replace(","," "));
	
// 	// 기타 체크되었을때
// 	if(isSearchString(chk_cnstcnts6.getData(), 5)){
// 		ipt_cnstcnts7.attribute("editable") = "true";
// 	}	
	
	// 기타 체크 해제했을때
	if(utlf_isSearchString(group1.chk_cnstcnts6.getData(), 5)){
		group1.ipt_cnstcnts7.readonly = false;
	}else{
		group1.ipt_cnstcnts7.value = "";
		group1.ipt_cnstcnts7.readonly = true;
	}	
}

/****************************************************************************************
 * 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();
		var pamInfoCvs = sysf_getGlobalVariable("paminfo");  	
        if(!utlf_isNull(pamInfoCvs)){ //cvs가 null이 아닌 경우에만 처리함.
			dsf_setCSVToDs("ds_paminfo",pamInfoCvs);
		}			
		//btn_cnst.disabled = true;
	}else{
		group1.case1.visible = true;
		group1.case2.visible = false;
		
		group2.case3.visible = true;
		group2.case4.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());
			ds_main_patinfo.setColumn(0,"piddeptcd"	, ds_paminfo.getColumn(0,"orddeptcd"));			
			ds_main_patinfo.setColumn(0,"piddeptnm"	, ds_paminfo.getColumn(0,"orddeptnm"));						
			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"));
		}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,"cnstcnts6")))  group1.chk_cnstcnts6.setData(ds_main_cnstinfo.getColumn(0,"cnstcnts6").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	: SPADC61800
 * Event			: oninit
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SPADC61800_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  		// 폼 초기화 
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SPADC61800
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SPADC61800_onload(obj:Form, e:LoadEventInfo)
{
	ds_temp_cnstinfo.copyData(arg_ds_temp_cnstinfo);
	
	var sProp_1_5 = "col=1,row=5,cellspacing=4,vcellspacing=0,itemWidth=-1,itemHeight=17,overflow='visible'";
	group1.chk_cnstcnts6.setInitComp(sProp_1_5, ds_chk_cnstcnts6, "value","label","fn_chk_cnstcnts6");
	
	finit();
}

/****************************************************************************************
 * 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)
{
	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());
		
		fSaveCnst();			
		
		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)
{
		ds_main_cnstinfo.setColumn(0,"cnststat","12");
		
	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");
			
			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();
}

function group2_case3_btn_prt_onclick(obj:Button,  e:ClickEventInfo)
{
	var dutplceinstcd = sysf_getUserInfo("dutplceinstcd");
	ds_prtdata.setColumn(0, "pid", ds_main_patinfo.getColumn(0, "pid"));
	ds_prtdata.setColumn(0, "hngnm", ds_main_patinfo.getColumn(0, "hngnm"));
	ds_prtdata.setColumn(0, "roomcd", ds_main_patinfo.getColumn(0, "roomcd"));
	ds_prtdata.setColumn(0, "reqdeptnm", ds_paminfo.getColumn(0,"orddeptnm"));
	ds_prtdata.setColumn(0, "requsernm", ds_main_patinfo.getColumn(0, "requsernm"));
	ds_prtdata.setColumn(0, "rrgstno1", ds_paminfo.getColumn(0, "rrgstno1"));
	if ( dutplceinstcd == '031') {
	     ds_prtdata.setColumn(0, "tittel", '약제부 약무정보팀 (T:5190)');	
	} else {
	     ds_prtdata.setColumn(0, "tittel", '약제부 약무팀 (T:2442)');	
	}
	var Vrrgstno2  =  ds_paminfo.getColumn(0, "rrgstno2");
	Vrrgstno2  = Vrrgstno2.substr(0,1) + '******';
	ds_prtdata.setColumn(0, "rrgstno2", Vrrgstno2);
	var Vwardnm =   ds_paminfo.getColumn(0, "wardnm");
	var Vroomcd =   ds_paminfo.getColumn(0, "roomcd");	
	var Vwardroom  = Vwardnm + '/'+Vroomcd;
	ds_prtdata.setColumn(0, "wardnm", Vwardroom);			
	var objDOM = rptf_createDOM();
		rptf_setNodeListToDOM(objDOM, "root/main/patinfo", ds_prtdata);
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source; 
	var option = ""; 
	rptf_exeReportPreview30(["RPADC01601"],[objParam], option);
}


function group2_case4_btn_reprt_onclick(obj:Button,  e:ClickEventInfo)
{
	var dutplceinstcd = sysf_getUserInfo("dutplceinstcd");
	ds_prtdata.setColumn(0, "pid", ds_main_patinfo.getColumn(0, "pid"));
	ds_prtdata.setColumn(0, "hngnm", ds_main_patinfo.getColumn(0, "hngnm"));
	ds_prtdata.setColumn(0, "roomcd", ds_main_patinfo.getColumn(0, "roomcd"));
	ds_prtdata.setColumn(0, "reqdeptnm", ds_paminfo.getColumn(0,"orddeptnm"));
	ds_prtdata.setColumn(0, "requsernm", ds_main_patinfo.getColumn(0, "requsernm"));
	ds_prtdata.setColumn(0, "rrgstno1", ds_paminfo.getColumn(0, "rrgstno1"));
	if ( dutplceinstcd == '031') {
	     ds_prtdata.setColumn(0, "tittel", '약제부 약무정보팀 (T:5190)');	
	} else {
	     ds_prtdata.setColumn(0, "tittel", '약제부 약무팀 (T:2442)');	
	}
	var Vrrgstno2  =  ds_paminfo.getColumn(0, "rrgstno2");
	Vrrgstno2  = Vrrgstno2.substr(0,1) + '******';
	ds_prtdata.setColumn(0, "rrgstno2", Vrrgstno2);
	var Vwardnm =   ds_paminfo.getColumn(0, "wardnm");
	var Vroomcd =   ds_paminfo.getColumn(0, "roomcd");	
	var Vwardroom  = Vwardnm + '/'+Vroomcd;
	ds_prtdata.setColumn(0, "wardnm", ds_paminfo.getColumn(0, "wardnm"));			
		
	var objDOM = rptf_createDOM();
		rptf_setNodeListToDOM(objDOM, "root/main/patinfo", ds_prtdata);
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source; 
	var option = ""; 
	rptf_exeReportPreview30(["RPADC01601"],[objParam], option);
	
}

function group2_case3_btn_cancel_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();	
}
]]></Script>
  </Form>
</FDL>