YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO10400_일괄입력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.4">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO10400" position="absolute 0 0 302 204" titletext="처방상세내역 일괄입력" oninit="SPMMO10400_oninit" onload="SPMMO10400_onload">
    <Layouts>
      <Layout>
        <Static position="absolute 0 161 100 184" id="caption9" class="cell_1"/>
        <Static position="absolute 204 57 302 80" id="caption22" class="cell_1"/>
        <Static position="absolute 0 31 100 54" id="caption6" class="cell_1"/>
        <Button position="absolute 186 184 242 204" id="button1" class="btn4" text="확인" onclick="button1_onclick"/>
        <Button position="absolute 246 184 302 204" id="button2" class="btn3" text="취소" onclick="button2_onclick"/>
        <Static position="absolute 0 5 100 28" id="caption1" class="cell_1"/>
        <CheckBox position="absolute 5 6 97 26" id="checkbox1" onclick="checkbox1_onclick" truevalue="Y" text="응급" falsevalue="N"/>
        <Static position="absolute 0 57 100 80" id="caption2" class="cell_1"/>
        <Static position="absolute 0 83 100 158" id="caption3" class="cell_1"/>
        <CheckBox position="absolute 5 58 97 78" id="checkbox2" falsevalue="N" truevalue="Y" text="급여구분" onclick="checkbox2_onclick"/>
        <CheckBox position="absolute 5 84 77 104" id="checkbox3" falsevalue="N" truevalue="Y" text="전달사항" onclick="checkbox3_onclick"/>
        <Combo position="absolute 102 58 201 78" id="combo3" innerdataset="@ds_M0029" datacolumn="cdnm" codecolumn="cdid"/>
        <CheckBox position="absolute 104 6 204 26" id="checkbox4" falsevalue="N" truevalue="Y" text="응급"/>
        <Shape position="absolute 0 27 302 33" linetype="horizontal" id="line15" style="strokepen:1 solid #dedcdcff;"/>
        <Shape position="absolute 0 79 302 85" linetype="horizontal" id="line1"/>
        <Shape position="absolute 0 157 302 163" id="line6" class="line_3"/>
        <TextArea position="absolute 102 83 302 158" id="textarea1" wordwrap="word" autoselect="true"/>
        <Shape position="absolute 0 0 302 3" linetype="horizontal" id="line7" type="rectangle" style="strokepen:0 solid #33bbbbff;fillbrush:solid #33bbbbff true;"/>
        <Button position="absolute 78 83 98 103" id="button4" class="icon_search" text="" onclick="button4_onclick"/>
        <CheckBox position="absolute 104 32 204 52" id="checkbox15" falsevalue="N" truevalue="Y" text="임상연구"/>
        <CheckBox position="absolute 5 32 97 52" id="checkbox7" falsevalue="N" text="임상연구" truevalue="Y" value="N" onclick="checkbox7_onclick"/>
        <Shape position="absolute 0 53 302 59" linetype="horizontal" id="line2" class="line_2" style="strokepen:1 solid #dedcdcff;"/>
        <CheckBox position="absolute 209 58 301 78" id="bool2" text="기왕증" onclick="bool2_onclick" falsevalue="N" truevalue="Y"/>
        <CheckBox position="absolute 4 162 96 182" id="checkbox9" falsevalue="N" truevalue="Y" text="시행부서" onclick="checkbox9_onclick"/>
        <Combo position="absolute 102 162 202 182" id="combo2" innerdataset="@ds_orddept" datacolumn="depthngnm" codecolumn="deptcd"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_M0029" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_orddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256" sumtext="입력,수정,삭제,d/c"/>
          <Column id="prcpstatcd" type="STRING" size="256" sumtext="처방상태코드"/>
          <Column id="prcpclscd" type="STRING" size="256" sumtext="처방분류코드"/>
          <Column id="prcpkindcd" type="STRING" size="256" sumtext="처방종류코드"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="prcpvol" type="STRING" size="256" sumtext="처방용량"/>
          <Column id="prcpvolunitnm" type="STRING" size="256" sumtext="처방용량단위명"/>
          <Column id="prcpqty" type="STRING" size="256" sumtext="처방수량"/>
          <Column id="prcpqtyunitnm" type="STRING" size="256" sumtext="처방수량단위명"/>
          <Column id="prcptims" type="STRING" size="256" sumtext="처방횟수"/>
          <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
          <Column id="drugmthdspccdnm" type="STRING" size="256" sumtext="투여방법검체코드명"/>
          <Column id="prcpmixno" type="STRING" size="256" sumtext="처방mix번호"/>
          <Column id="payflagcd" type="STRING" size="256" sumtext="급여구분코드"/>
          <Column id="prcpdelivefact" type="STRING" size="256" sumtext="전달사항"/>
          <Column id="hosinhosoutflag" type="STRING" size="256" sumtext="원내/원외구분"/>
          <Column id="prcpexecdeptcd" type="STRING" size="256" sumtext="처방실시부서코드"/>
          <Column id="prcphopedd" type="STRING" size="256" sumtext="처방희망일시"/>
          <Column id="choiordflag" type="STRING" size="256" sumtext="선택진료구분"/>
          <Column id="rgstdt" type="STRING" size="256" sumtext="등록일시"/>
          <Column id="rgstridnm" type="STRING" size="256" sumtext="등록자명"/>
          <Column id="testrsltunit" type="STRING" size="256" sumtext="검사결과단위"/>
          <Column id="testrsltcnts" type="STRING" size="256" sumtext="검사결과"/>
          <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방발생구분"/>
          <Column id="prcphistcd" type="STRING" size="256" sumtext="처방이력코드"/>
          <Column id="tempprcpflag" type="STRING" size="256" sumtext="임시처방구분"/>
          <Column id="prcpsetcd" type="STRING" size="256" sumtext="처방set코드"/>
          <Column id="prcpvolunitflag" type="STRING" size="256" sumtext="처방용량단위구분"/>
          <Column id="prcpqtyunitflag" type="STRING" size="256" sumtext="처방수량단위구분"/>
          <Column id="orgprcpqty" type="STRING" size="256" sumtext="실제처방수량"/>
          <Column id="drugspd" type="STRING" size="256" sumtext="투여속도"/>
          <Column id="drugspdunitflag" type="STRING" size="256" sumtext="투여속도단위구분"/>
          <Column id="powdflag" type="STRING" size="256" sumtext="파우더구분"/>
          <Column id="prnprcpflag" type="STRING" size="256" sumtext="prn처방구분"/>
          <Column id="prepprcpflag" type="STRING" size="256" sumtext="prep처방구분"/>
          <Column id="selfprcpflag" type="STRING" size="256" sumtext="자가처방구분"/>
          <Column id="selfdrugflag" type="STRING" size="256" sumtext="self약구분"/>
          <Column id="drugpackflag" type="STRING" size="256" sumtext="투약포장구분"/>
          <Column id="erprcpflag" type="STRING" size="256" sumtext="응급처방구분"/>
          <Column id="precureprcpflag" type="STRING" size="256" sumtext="선처치처방구분"/>
          <Column id="nigtprcpflag" type="STRING" size="256" sumtext="야간처방구분"/>
          <Column id="portprcpflag" type="STRING" size="256" sumtext="포터블처방구분"/>
          <Column id="fixprcpflag" type="STRING" size="256" sumtext="정액처방구분"/>
          <Column id="anamneflag" type="STRING" size="256" sumtext="기왕증(력)구분"/>
          <Column id="fastprcpflag" type="STRING" size="256" sumtext="금식처방구분"/>
          <Column id="erreadflag" type="STRING" size="256" sumtext="응급판독구분"/>
          <Column id="prcpdirecflag" type="STRING" size="256" sumtext="처방방향구분"/>
          <Column id="tnsuseflag" type="STRING" size="256" sumtext="수혈사용구분"/>
          <Column id="tnsfiltflag" type="STRING" size="256" sumtext="수혈필터구분"/>
          <Column id="trnptbftestflag" type="STRING" size="256" sumtext="이식전검사구분"/>
          <Column id="offictourhealexamflag" type="STRING" size="256" sumtext="출장건진구분"/>
          <Column id="stemcellflag" type="STRING" size="256" sumtext="조혈모(줄기)세포구분"/>
          <Column id="angioflagcd" type="STRING" size="256" sumtext="angio구분"/>
          <Column id="opansflagcd" type="STRING" size="256" sumtext="수술마취구분"/>
          <Column id="ansttm" type="STRING" size="256" sumtext="마취시간"/>
          <Column id="mealcalrcnts" type="STRING" size="256" sumtext="식이열량함량"/>
          <Column id="mealprotcnts" type="STRING" size="256" sumtext="식이단백질함량"/>
          <Column id="mealupdtflag" type="STRING" size="256" sumtext="식이수정구분"/>
          <Column id="hosinprcpresncd" type="STRING" size="256" sumtext="원내처방사유코드"/>
          <Column id="etcprcpresncd" type="STRING" size="256" sumtext="기타처방사유코드"/>
          <Column id="drugmthdspccd" type="STRING" size="256" sumtext="투여방법검체코드"/>
          <Column id="issdeptcd" type="STRING" size="256" sumtext="발행부서코드"/>
          <Column id="prcpauthflag" type="STRING" size="256" sumtext="처방권한구분"/>
          <Column id="prcpinptflag" type="STRING" size="256" sumtext="처방입력구분"/>
          <Column id="prcpsignflag" type="STRING" size="256" sumtext="처방서명구분"/>
          <Column id="rateprcpflag" type="STRING" size="256" sumtext="비율처방구분"/>
          <Column id="prcprefseq" type="STRING" size="256" sumtext="처방조회순서"/>
          <Column id="ordreqlnkno" type="STRING" size="256" sumtext="진료의뢰연결번호"/>
          <Column id="testreqlnkno" type="STRING" size="256" sumtext="검사의뢰연결번호"/>
          <Column id="prcplnkdd" type="STRING" size="256" sumtext="처방연계일자"/>
          <Column id="prcplnkno" type="STRING" size="256" sumtext="처방연계번호"/>
          <Column id="oprsrvno" type="STRING" size="256" sumtext="수술예약번호"/>
          <Column id="tootfact" type="STRING" size="256" sumtext="치식사항"/>
          <Column id="clinccmtcnts" type="STRING" size="256" sumtext="임상소견내용"/>
          <Column id="prcpessninptflag" type="STRING" size="256" sumtext="처방필수입력구분"/>
          <Column id="grupsnglflag" type="STRING" size="256" sumtext="그룹싱글구분"/>
          <Column id="drugrateqty" type="STRING" size="256" sumtext="투약비율수랑"/>
          <Column id="asttestflag" type="STRING" size="256" sumtext="ast검사구분"/>
          <Column id="clincstdyflag" type="STRING" size="256" sumtext="임상연구구분"/>
          <Column id="prtlno" type="STRING" size="256" sumtext="프로토콜번호"/>
          <Column id="clincstdycd" type="STRING" size="256" sumtext="임상연구코드"/>
          <Column id="optermcd" type="STRING" size="256" sumtext="수술용어"/>
          <Column id="prcpflag" type="STRING" size="256" sumtext="처방구분"/>
          <Column id="hscttempprcpflag" type="STRING" size="256" sumtext="hsct임시처방구분"/>
          <Column id="inclprcpcd" type="STRING" size="256" sumtext="종속처방코드"/>
          <Column id="inclprcpno" type="STRING" size="256" sumtext="종속처방번호"/>
          <Column id="pampkspec" type="STRING" size="256" sumtext="원무pk내역"/>
          <Column id="prcppkspec" type="STRING" size="256" sumtext="처방pk내역"/>
          <Column id="calcscormastspec" type="STRING" size="256" sumtext="수가마스터내역"/>
          <Column id="drugmastspec" type="STRING" size="256" sumtext="약품마스터내역"/>
          <Column id="rateprcpspec" type="STRING" size="256" sumtext="비율처방내역"/>
          <Column id="matrsetprcpspec" type="STRING" size="256" sumtext="재료set처방내역"/>
          <Column id="suppdeptspec" type="STRING" size="256" sumtext="지원부서내역"/>
          <Column id="contprcpspec" type="STRING" size="256" sumtext="연속처방내역"/>
          <Column id="etclnkspec" type="STRING" size="256" sumtext="기타연계내역"/>
          <Column id="srchcondcnts" type="STRING" size="256" sumtext="검색조건내용"/>
          <Column id="orgprcpnm" type="STRING" size="256" sumtext="수가처방명"/>
          <Column id="chkcol" type="STRING" size="256" sumtext="전처방check표시"/>
          <Column id="hsctdelivepos" type="STRING" size="256" sumtext="hsct전달위치"/>
          <Column id="hsctlnkno" type="STRING" size="256" sumtext="hsct연계번호"/>
          <Column id="etcprcpflag" type="STRING" size="256" sumtext="기타처방구분"/>
          <Column id="aftcertflag" type="STRING" size="256" sumtext="후인증구분"/>
          <Column id="aftcertdrid" type="STRING" size="256" sumtext="후인증대상의사id"/>
          <Column id="prcpvalidd" type="STRING" size="256" sumtext="처방유효일자"/>
          <Column id="spynpy1" type="STRING" size="256" sumtext="환자급비유형"/>
          <Column id="specdrid" type="STRING" size="256" sumtext="선택진료의id"/>
          <Column id="specdrnm" type="STRING" size="256" sumtext="선택진료의명"/>
          <Column id="anticncrprtlno" type="STRING" size="256" sumtext="항암프로토콜에대한코드로일련번호형태로관리"/>
          <Column id="anticncrdayno" type="STRING" size="256" sumtext="항암프로토콜의실시차수"/>
          <Column id="druglnkno" type="STRING" size="256" sumtext="항암프로토콜,tpn처방의처방번호"/>
          <Column id="rehbprcpcurefreqflag" type="STRING" size="256" sumtext="재활처방치료빈도"/>
          <Column id="dietprcpgenrflag" type="STRING" size="256" sumtext="식이처방발생구분"/>
          <Column id="irpayflag" type="STRING" size="256" sumtext="irradiation급비구분"/>
          <Column id="irflag" type="STRING" size="256" sumtext="irradiation구분"/>
          <Column id="procerdietflag" type="STRING" size="256" sumtext="보호자식이구분"/>
          <Column id="diagtestconttestintvlflag" type="STRING" size="256" sumtext="진단검사연속검사기본시간"/>
          <Column id="drugindependpackflag" type="STRING" size="256" sumtext="따로포장구분"/>
          <Column id="diagtestconttestbasetm" type="STRING" size="256" sumtext="진단검사연속검사기본시간"/>
          <Column id="diagtestconttestorgtims" type="STRING" size="256" sumtext="진단검사연속검사원횟수"/>
          <Column id="ermediscmngtresncd" type="STRING" size="256" sumtext="응급의학관리료사유코드"/>
          <Column id="rehbprcpenddd" type="STRING" size="256" sumtext="재활처방마감일자"/>
          <Column id="matrallsizespecid" type="STRING" size="256" sumtext="재료allsize규격id"/>
          <Column id="rehbprcpcurepartcd" type="STRING" size="256" sumtext="재활처방치료부위"/>
          <Column id="lowdrugresncd" type="STRING" size="256" sumtext="저함량배수사유코드"/>
          <Column id="tfdtlcd" type="STRING" size="256" sumtext="경장영양식세부코드"/>
          <Column id="dnorreqlnkno" type="STRING" size="256" sumtext="hla검사의뢰지"/>
          <Column id="subcretno" type="STRING" size="256" sumtext="기왕증,임상연구보조유형"/>
          <Column id="exptmthdfact" type="STRING" size="256" sumtext="예외용법설명"/>
          <Column id="lowdrugresnetcfact" type="STRING" size="256" sumtext="기타저함량배수상세사유"/>
          <Column id="diagtestconttestcdspec" type="STRING" size="256" sumtext="진단검사연속검사코드내역"/>
          <Column id="drgacptflag" type="STRING" size="256" sumtext="drg인정flag"/>
          <Column id="drprcpetc1" type="STRING" size="256" sumtext="의사처방기타1"/>
          <Column id="drprcpetc2" type="STRING" size="256" sumtext="의사처방기타2"/>
          <Column id="drprcpetc3" type="STRING" size="256" sumtext="의사처방기타3"/>
          <Column id="drprcpetc4" type="STRING" size="256" sumtext="의사처방기타4"/>
          <Column id="drprcpetc5" type="STRING" size="256" sumtext="의사처방기타5"/>
          <Column id="drprcpetc6" type="STRING" size="256" sumtext="의사처방기타6"/>
          <Column id="drprcpetc7" type="STRING" size="256" sumtext="의사처방기타7"/>
          <Column id="drprcpetc8" type="STRING" size="256" sumtext="의사처방기타8"/>
          <Column id="drprcpetc9" type="STRING" size="256" sumtext="의사처방기타9"/>
          <Column id="drprcpetc10" type="STRING" size="256" sumtext="의사처방기타10"/>
          <Column id="tempcol1" type="STRING" size="256" sumtext="임시컬럼1"/>
          <Column id="tempcol2" type="STRING" size="256" sumtext="임시컬럼2"/>
          <Column id="tempcol3" type="STRING" size="256" sumtext="임시컬럼3"/>
          <Column id="tempcol4" type="STRING" size="256" sumtext="임시컬럼4"/>
          <Column id="tempcol5" type="STRING" size="256" sumtext="임시컬럼5"/>
          <Column id="tempcol6" type="STRING" size="256" sumtext="임시컬럼6"/>
          <Column id="tempcol7" type="STRING" size="256" sumtext="임시컬럼7"/>
          <Column id="tempcol8" type="STRING" size="256" sumtext="임시컬럼8"/>
          <Column id="tempcol9" type="STRING" size="256" sumtext="임시컬럼9"/>
          <Column id="tempcol10" type="STRING" size="256" sumtext="임시컬럼10"/>
          <Column id="tempcol11" type="STRING" size="256" sumtext="임시컬럼11"/>
          <Column id="tempcol12" type="STRING" size="256" sumtext="임시컬럼12"/>
          <Column id="tempcol13" type="STRING" size="256" sumtext="임시컬럼13"/>
          <Column id="tempcol14" type="STRING" size="256" sumtext="임시컬럼14"/>
          <Column id="tempcol15" type="STRING" size="256" sumtext="임시컬럼15"/>
          <Column id="tempcol16" type="STRING" size="256" sumtext="임시컬럼16"/>
          <Column id="tempcol17" type="STRING" size="256" sumtext="임시컬럼17"/>
          <Column id="tempcol18" type="STRING" size="256" sumtext="임시컬럼18"/>
          <Column id="tempcol19" type="STRING" size="256" sumtext="임시컬럼19"/>
          <Column id="tempcol20" type="STRING" size="256" sumtext="임시컬럼20"/>
          <Column id="tempcol21" type="STRING" size="256" sumtext="임시컬럼21"/>
          <Column id="tempcol22" type="STRING" size="256" sumtext="임시컬럼22"/>
          <Column id="tempcol23" type="STRING" size="256" sumtext="임시컬럼23"/>
          <Column id="tempcol24" type="STRING" size="256" sumtext="임시컬럼24"/>
          <Column id="tempcol25" type="STRING" size="256" sumtext="임시컬럼25"/>
          <Column id="rgstdeptcd" type="STRING" size="256" sumtext="최초등록부서(insert)"/>
          <Column id="prcpclassnm" type="STRING" size="256" sumtext="처방분류명"/>
          <Column id="rowkey" type="STRING" size="256" sumtext="rowid"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_chkflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="erprcpflag" type="STRING" size="256"/>
          <Column id="payflagcd" type="STRING" size="256"/>
          <Column id="prcpdelivefact" type="STRING" size="256"/>
          <Column id="clincstdyflag" type="STRING" size="256"/>
          <Column id="anamneflag" type="STRING" size="256"/>
          <Column id="prcpexecdeptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="checkbox1" propid="value" datasetid="ds_chkflag" columnid="erprcpflag"/>
      <BindItem id="item1" compid="checkbox7" propid="value" datasetid="ds_chkflag" columnid="clincstdyflag"/>
      <BindItem id="item2" compid="checkbox2" propid="value" datasetid="ds_chkflag" columnid="payflagcd"/>
      <BindItem id="item3" compid="checkbox3" propid="value" datasetid="ds_chkflag" columnid="prcpdelivefact"/>
      <BindItem id="item4" compid="checkbox9" propid="value" datasetid="ds_chkflag" columnid="prcpexecdeptcd"/>
      <BindItem id="item5" compid="bool2" propid="value" datasetid="ds_chkflag" columnid="anamneflag"/>
      <BindItem id="item6" compid="checkbox4" propid="value" datasetid="ds_main_prcplist" columnid="erprcpflag"/>
      <BindItem id="item7" compid="checkbox15" propid="value" datasetid="ds_main_prcplist" columnid="clincstdyflag"/>
      <BindItem id="item8" compid="combo3" propid="value" datasetid="ds_main_prcplist" columnid="payflagcd"/>
      <BindItem id="item9" compid="textarea1" propid="value" datasetid="ds_main_prcplist" columnid="prcpdelivefact"/>
      <BindItem id="item10" compid="combo2" propid="value" datasetid="ds_main_prcplist" columnid="prcpexecdeptcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-12-10
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-12-10      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";
include "emr_prcpmngtxp::SMMMO00100.xjs";


function SPMMO10400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPMMO10400_onload(obj:Form, e:LoadEventInfo)
{
	appf_getCodeList([{dsNm: "ds_M0029", cdGrpId: "M0029"}], true);
	lf_prcpExecDeptSrch("all");

	checkbox4.enable  = false;
	checkbox15.enable = false;
																																														
	combo3.enable     = false;
	textarea1.enable  = false;
	combo2.enable     = false;
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var erprcpflag = "";
	var erprcpflag_useyn = "";				
	
	var clincstdyflag = "";						
	var clincstdyflag_useyn = "";
	
	var payflagcd = "";
	var payflagcd_useyn = "";				
		
	var prcpexecdeptcd = "";
	var prcpexecdeptcd_useyn = ""; 				
	
	var anamneflag = "";
	var anamneflag_useyn = ""

	var prcpdelivefact = "";
	var prcpdelivefact_useyn = ""

	var subcretno = 0;				
	var subcretno_useyn = "";
					
	var header = "erprcpflag|clincstdyflag|payflagcd|prcpexecdeptcd|anamneflag|prcpdelivefact|subcretno^";
	var useyn = "";
	var value = "";
					
	if ( ds_chkflag.getColumn(0, "erprcpflag") == "Y" ) {					
		if ( ds_main_prcplist.getColumn(0, "erprcpflag") == "Y" ) {
			erprcpflag_useyn =  "Y" + "|";
			erprcpflag = "Y" + "|";
		} else {
			erprcpflag_useyn =  "Y" + "|";
			erprcpflag = "N" + "|";
		}
	} else {
		erprcpflag_useyn =  "N" + "|";
		erprcpflag = "" + "|";
	}
	useyn = useyn + erprcpflag_useyn;
	value = value + erprcpflag;	
	
	if ( ds_chkflag.getColumn(0, "clincstdyflag") == "Y" ) {
		clincstdyflag_useyn = "Y" + "|";
		clincstdyflag = ds_main_prcplist.getColumn(0, "clincstdyflag") + "|";
		if ( utlf_isNull(ds_main_prcplist.getColumn(0, "clincstdyflag")) ) {
			clincstdyflag = "N" + "|";
		}	
	} else {
		clincstdyflag_useyn = "N" + "|";
		clincstdyflag = "" + "|";
	}			 				 	
	 useyn = useyn + clincstdyflag_useyn;									
	 value = value + clincstdyflag;	
					
	if ( ds_chkflag.getColumn(0, "payflagcd") == "Y" ) {		
		payflagcd_useyn = "Y" + "|";						
		payflagcd = ds_main_prcplist.getColumn(0, "payflagcd") + "|";
		if ( utlf_isNull(ds_main_prcplist.getColumn(0, "payflagcd")) ) {
			alert ( "입력된 급여구분 값이 없습니다." ) ;
			return;
		}							 	
	} else {
		payflagcd_useyn = "N" + "|";				
		payflagcd = "" + "|";
	}				
	 useyn = useyn + payflagcd_useyn;									
	 value = value + payflagcd;			 	 
					
	if ( ds_chkflag.getColumn(0, "prcpexecdeptcd" ) == "Y" ) {		
		prcpexecdeptcd_useyn = "Y" + "|";						
		prcpexecdeptcd = ds_main_prcplist.getColumn(0, "prcpexecdeptcd") + "|";
		if ( utlf_isNull(ds_main_prcplist.getColumn(0, "prcpexecdeptcd"))) {
			alert ( "입력된 시행부서 값이 없습니다." ) ;
			return;
		}							 	
	} else {
		prcpexecdeptcd_useyn = "N" + "|";				
		prcpexecdeptcd = "" + "|";
	}				
	 useyn = useyn + prcpexecdeptcd_useyn;									
	 value = value + prcpexecdeptcd;		
	 
	if( ds_chkflag.getColumn(0, "anamneflag") == "Y" ) {
		useyn = useyn + "Y" + "|";
		value  = value  + "Y" + "|";
	} else {
		useyn = useyn + "N" + "|";
		value  = value  + "N" + "|";
	}				
	 useyn = useyn + anamneflag_useyn;
	 value = value + anamneflag;
	
	if ( ds_chkflag.getColumn(0, "prcpdelivefact") == "Y" ) {
		prcpdelivefact_useyn = "Y" + "|";						
		prcpdelivefact = ds_main_prcplist.getColumn(0, "prcpdelivefact") + "|";
		if ( utlf_isNull(ds_main_prcplist.getColumn(0, "prcpdelivefact")) ) {
			lert ( "입력된 전달사항 값이 없습니다." );
			return;
		}							 	
	} else {
		prcpdelivefact_useyn = "N" + "|";				
		prcpdelivefact = "" + "|";
	}				
	useyn = useyn + prcpdelivefact_useyn ;									
	value = value + prcpdelivefact;
	
	//2008. 07. 01 기왕증 입력에 따른 subcretno설정, 오지훈
	if ( bool2.value == "Y" || ds_chkflag.getColumn(0, "clincstdyflag") == "Y" ) {
		subcretno_useyn = "Y";
		subcretno = ds_main_prcplist.getColumn(0, "subcretno");
	}else{
		subcretno_useyn = "N";
	}
	useyn = useyn + subcretno_useyn + "^";
	value = value + subcretno + "^";

	var SPMMO10400_rtn1 = header + useyn + value;

	opener.frmf_setParameter ( "batipt_rtn1", SPMMO10400_rtn1 );
	opener.frmf_setParameter ( "batipt_rtn1_useyn", "Y" );		

	close();
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	opener.frmf_setParameter ( "SPMMO10400_rtn1_useyn", "N" );						
	close();
}

function checkbox1_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	lf_setCheckboxProperty(obj, checkbox4);
}

function checkbox7_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if( bool2.value == "Y" ){
		sysf_messageBox ( "임상연구는 기왕증과 동시에 선택 할 수", "I004" );
		obj.value = "N";
		return;
	}
					
	if (obj.value == "Y" ) {
		if ( lf_subcretnoSet("1", null) == -1 ) {
			obj.value      = "N";
			obj.style.font = "Dotum,9";
			obj.enable     = false;
			
			checkbox15.enable = false;
			checkbox15.value  = "N";
			return;
		}
		obj.style.font    = "Dotum,9,bold";
		obj.enable        = true;
		checkbox15.enable = true;		
		checkbox15.value  = "Y";
	} else {
		lf_subcretnoSet("1", null);
		obj.style.font    = "Dotum,9";
		checkbox15.enable = false;
		checkbox15.value  = "N";
	}
}

function checkbox2_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	lf_setCheckboxProperty(obj, combo3, false);
}

function bool2_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if( ds_chkflag.getColumn(0, "clincstdyflag") == "Y" ){
		sysf_messageBox ( "기왕증은 임상연구와 동시에 선택 할 수", "I004" );
		obj.value = "N";
		return;
	}
					
	if(obj.value == "Y"){
		var prcpgenrflag = opener.ds_patflag.getColumn(0, "prcpgenrflag");
		var pid          = opener.ds_paminfo.getColumn(0, "pid");
		var indd         = lf_getDsValue(opener.ds_paminfo, 0, "indd");

		if(prcpgenrflag == "I" || prcpgenrflag == "D" || prcpgenrflag == "E"){
			var subcretno = lf_getSubcretno(pid, indd, "anamneflag");
			
			ds_main_prcplist.setColumn(0, "subcretno", subcretno);
			
			if(subcretno == "0"){
				sysf_messageBox ( "환자의 부유형이 없거나 또는 선택되지 않았습니다.", "I999" );
				obj.value = "N";
			}
		} else {
			sysf_messageBox ( "외래 환자는 기왕증을 선택 할 수", "I004" );
			obj.value = "N";
		}
	}else{ //기왕증이 N로 처리된 경우에는 subcretno 0로 처리
		ds_main_prcplist.setColumn(0, "subcretno", "0");
	}
}

function checkbox3_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	lf_setCheckboxProperty(obj, textarea1, false);
}

function button4_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_setParameter ( "SPMMB02200_cond2", "3" );
	lf_prcpModal ( "SPMMB02200", 50, 50 );
	
	var SPMMB02200_clinccmt = frmf_getParameter ( "SPMMB02200_clinccmt" );
	if(!utlf_isNull(SPMMB02200_clinccmt)) {
		ds_main_prcplist.setColumn(0, "prcpdelivefact", SPMMB02200_clinccmt);
		
		checkbox3.value = "Y";
		checkbox3.onclick.fireEvent(checkbox3, new ClickEventInfo());
	}
}

function checkbox9_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	lf_setCheckboxProperty(obj, combo2, false);
}]]></Script>
  </Form>
</FDL>