YNU_JEUS/app_home/himed/webapps/ast/pharmacyprotocolweb/xrw/SMADB01000_항암프로토콜처방및조회.xrw

<?xml version="1.0" encoding="EUC-KR"?>
<?xml-stylesheet href="../../../com/commonweb/css/common.css" type="text/css" ?>
<xhtml:html xmlns:xhtml="http://www.w3.org/1999/xhtml" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="http://www.w3.org/2002/01/xforms" xmlns:ev="http://www.w3.org/2001/xml-events">
	<xhtml:head>
		<xhtml:title>항암프로토콜 처방</xhtml:title>
		<model id="model1">
			<instance id="instance1">
				<root xmlns="">
					<main>
						<sicklist>
							<item>
								<sickclscd/>
								<sickclsnm/>
							</item>
						</sicklist>
						<prtllist>
							<item>
								<prtlcd/>
								<prtlnm/>
								<drugprid/>
								<insuqualid/>
								<insuqualdt/>
								<ordqualid/>
								<ordqualdt/>
								<pharmqualid/>
								<pharmqualdt/>
								<remark/>
								<drugstage/>
								<drugcycle/>
								<fromday/>
								<prtlterm/>
								<usegoal/>
							</item>
						</prtllist>
						<prtllinklist>
							<item>
								<antimetprtlcd/>
								<antimetprtlnm/>
							</item>
						</prtllinklist>
						<prtlprcplist>
							<item1>
								<prcpmixno/>
								<prcpcd/>
								<prcpnm/>
								<prcpclscd/>
								<volkind/>
								<bsavol/>
								<prcpvol/>
								<prcpvolunitnm/>
								<prcptims/>
								<prcpqty/>
								<prcpqtyunitnm/>
								<prtlkind/>
								<ordseqno/>
								<volrate/>
								<drugmthdspccd/>
								<remark/>
								<nursrem/>
								<prcpexecdeptcd/>
								<drugseq/>
								<drugtt/>
								<payflagcd/>
								<kgvol/>
								<drugspd/>
								<drugspdunitflag/>
								<prcpvolunitflag/>
								<prcpqtyunitflag/>
								<prnprcpflag/>
								<prtldg/>
								<prnprcpdtl/>
								<drprcpetc7/>
								<drprcpetc8/>
								<drugmastspec/>
								<basetimevol/>
								<basetimeqty/>
							</item1>
							<item2>
								<prcpmixno/>
								<prcpcd/>
								<prcpnm/>
								<prcpclscd/>
								<volkind/>
								<bsavol/>
								<prcpvol/>
								<prcpvolunitnm/>
								<prcptims/>
								<prcpqty/>
								<prcpqtyunitnm/>
								<prtlkind/>
								<ordseqno/>
								<volrate/>
								<drugmthdspccd/>
								<remark/>
								<nursrem/>
								<prcpexecdeptcd/>
								<drugseq/>
								<drugtt/>
								<payflagcd/>
								<kgvol/>
								<drugspd/>
								<drugspdunitflag/>
								<prcpvolunitflag/>
								<prcpqtyunitflag/>
								<prnprcpflag/>
								<prtldg/>
								<prnprcpdtl/>
								<drprcpetc7/>
								<drprcpetc8/>
								<drugmastspec/>
								<basetimevol/>
								<basetimeqty/>
							</item2>
							<item3>
								<prcpmixno/>
								<prcpcd/>
								<prcpnm/>
								<prcpclscd/>
								<volkind/>
								<bsavol/>
								<prcpvol/>
								<prcpvolunitnm/>
								<prcptims/>
								<prcpqty/>
								<prcpqtyunitnm/>
								<prtlkind/>
								<ordseqno/>
								<volrate/>
								<drugmthdspccd/>
								<remark/>
								<nursrem/>
								<prcpexecdeptcd/>
								<drugseq/>
								<drugtt/>
								<payflagcd/>
								<kgvol/>
								<drugspd/>
								<drugspdunitflag/>
								<prcpvolunitflag/>
								<prcpqtyunitflag/>
								<prnprcpflag/>
								<prtldg/>
								<prnprcpdtl/>
								<drprcpetc7/>
								<drprcpetc8/>
								<drugmastspec/>
								<basetimevol/>
								<basetimeqty/>
							</item3>
							<item4>
								<prcpmixno/>
								<prcpcd/>
								<prcpnm/>
								<prcpclscd/>
								<volkind/>
								<bsavol/>
								<prcpvol/>
								<prcpvolunitnm/>
								<prcptims/>
								<prcpqty/>
								<prcpqtyunitnm/>
								<prtlkind/>
								<ordseqno/>
								<volrate/>
								<drugmthdspccd/>
								<remark/>
								<nursrem/>
								<prcpexecdeptcd/>
								<drugseq/>
								<drugtt/>
								<payflagcd/>
								<kgvol/>
								<drugspd/>
								<drugspdunitflag/>
								<prcpvolunitflag/>
								<prcpqtyunitflag/>
								<prnprcpflag/>
								<prtldg/>
								<prnprcpdtl/>
								<drprcpetc7/>
								<drprcpetc8/>
								<drugmastspec/>
								<basetimevol/>
								<basetimeqty/>
							</item4>
							<item5>
								<prcpmixno/>
								<prcpcd/>
								<prcpnm/>
								<prcpclscd/>
								<volkind/>
								<bsavol/>
								<prcpvol/>
								<prcpvolunitnm/>
								<prcptims/>
								<prcpqty/>
								<prcpqtyunitnm/>
								<prtlkind/>
								<ordseqno/>
								<volrate/>
								<drugmthdspccd/>
								<remark/>
								<nursrem/>
								<prcpexecdeptcd/>
								<drugseq/>
								<drugtt/>
								<payflagcd/>
								<kgvol/>
								<drugspd/>
								<drugspdunitflag/>
								<prcpvolunitflag/>
								<prcpqtyunitflag/>
								<prnprcpflag/>
								<prtldg/>
								<prnprcpdtl/>
								<drprcpetc7/>
								<drprcpetc8/>
								<drugmastspec/>
								<basetimevol/>
								<basetimeqty/>
							</item5>
						</prtlprcplist>
						<prtlinfo>
							<startdate/>
							<startterm/>
							<endterm/>
							<drugcycle/>
							<drugstage/>
							<d1nm/>
							<d2nm/>
							<d3nm/>
							<d4nm/>
							<d5nm/>
							<startdd/>
							<enddd/>
							<currentpg/>
							<totpg/>
							<ableprcp/>
							<prereqyn/>
							<ioflag/>
							<usegoal/>
						</prtlinfo>
						<data>
							<ht/>
							<wt/>
							<ibw/>
							<bsa/>
							<age/>
							<sc/>
							<urvol/>
							<urcr/>
							<auc/>
							<carbovol/>
							<gfrflag>1</gfrflag>
							<gfr/>
							<sexrate/>
							<wtflag>1</wtflag>
							<prtlnm/>
							<pid/>
							<hngnm/>
							<wardcd/>
							<roomcd/>
							<sex/>
							<rrgstno1/>
							<rrgstno2/>
							<drnm/>
						</data>
						<prtlprcpvollist>
							<item>
								<prcpcd/>
								<prcpnm/>
								<volkind/>
								<bsavol/>
								<kgvol/>
								<prcpvol/>
								<prcpvolunitnm/>
								<subtrvolrate/>
								<prcpqty/>
								<prcpqtyunitnm/>
								<subtrvolresn/>
								<ordseqno/>
								<prcpvolunitflag/>
								<prcpqtyunitflag/>
								<volrate/>
								<prcptims/>
							</item>
						</prtlprcpvollist>
						<prtlprcpprelist>
							<prcplist>
								<tempprcpflag/>
								<prtldgnm/>
								<drugseq/>
								<drugtt/>
								<prcpmixno/>
								<prcpcd/>
								<prcpnm/>
								<payflagcd/>
								<volkind/>
								<bsavol/>
								<kgvol/>
								<prcpvol/>
								<prcpvolunitnm/>
								<prcpqty/>
								<prcpqtyunitnm/>
								<drugspd/>
								<drugspdunitnm/>
								<prcptims/>
								<drugmthdspccd/>
								<drugmthdspccdnm/>
								<prnprcpflag/>
								<remark/>
								<nursrem/>
								<prcpexecdeptcd/>
								<ordseqno/>
								<volrate/>
								<prtlkind/>
								<prcpdd/>
								<prnprcpdtl/>
								<drprcpetc7/>
								<drprcpetc8/>
							</prcplist>
						</prtlprcpprelist>
						<prtlhislist>
							<item>
								<drugstage/>
								<drugcycle/>
								<orgprtlnm/>
								<prtlnm/>
								<appdd/>
								<appterm/>
								<acptno/>
								<ioflag/>
								<cpgappno/>
								<orddeptcd/>
								<sickclscd/>
								<prtlcd/>
								<antimetprtlcd/>
								<fromday/>
								<prtlterm/>
								<ht/>
								<wtflag/>
								<wt/>
								<ibw/>
								<bsa/>
								<gfrflag/>
								<gfr/>
								<age/>
								<sexrate/>
								<sc/>
								<urvol/>
								<urcr/>
								<auc/>
								<carbovol/>
								<appstat/>
								<prereqyn/>
							</item>
						</prtlhislist>
						<prcp/>
						<diaginfo>
							<diagcdlist>
								<status/>
								<diagdd/>
								<diagno/>
								<diaghistno/>
								<instcd/>
								<pid/>
								<orddd/>
								<cretno/>
								<orddeptcd/>
								<orddrid/>
								<genrflagcd/>
								<diaghistcd/>
								<diagtypecd/>
								<diagkindcd/>
								<diagkindcdflag/>
								<anamneflag/>
								<tootflagcd/>
								<diagsignflag/>
								<rgstdeptcd/>
								<rgstdd/>
								<rgsttm/>
								<rgstrid/>
								<updtdeptcd/>
								<updtdd/>
								<updttm/>
								<updtrid/>
								<tootfact/>
								<diagengnm/>
								<diaghngnm/>
								<icd10cd/>
								<spclinfo/>
								<diagcd/>
								<diagremfact/>
								<diagcmtcnts/>
							</diagcdlist>
						</diaginfo>
					</main>
					<main1>
						<prtlinfo>
							<startdate/>
							<startterm/>
							<endterm/>
							<drugcycle/>
							<drugstage/>
							<startdd/>
							<enddd/>
						</prtlinfo>
						<data>
							<ht/>
							<wt/>
							<ibw/>
							<bsa/>
							<age/>
							<sc/>
							<urvol/>
							<urcr/>
							<auc/>
							<carbovol/>
							<gfrflag>1</gfrflag>
							<gfr/>
							<sexrate/>
							<wtflag>1</wtflag>
							<prtlnm/>
							<pid/>
							<hngnm/>
							<wardcd/>
							<roomcd/>
							<sex/>
							<rrgstno1/>
							<rrgstno2/>
							<drnm/>
						</data>
						<prtlprcpprelist>
							<prcplist>
								<prtldgnm/>
								<prtldg/>
								<drugseq/>
								<drugtt/>
								<volkind/>
								<bsavol/>
								<kgvol/>
								<remark/>
								<nursrem/>
								<volrate/>
								<prtlkind/>
								<ordseqno/>
								<status/>
								<prcpstatcd/>
								<prcpclscd/>
								<prcpkindcd/>
								<prcpcd/>
								<prcpnm/>
								<prcpvol/>
								<prcpvolunitnm/>
								<prcpqty/>
								<prcpqtyunitnm/>
								<prcptims/>
								<prcpdayno/>
								<drugmthdspccdnm/>
								<prcpmixno/>
								<payflagcd/>
								<prcpdelivefact/>
								<hosinhosoutflag/>
								<prcpexecdeptcd/>
								<prcphopedd/>
								<choiordflag/>
								<rgstdt/>
								<rgstridnm/>
								<testrsltunit/>
								<testrsltcnts/>
								<prcpgenrflag/>
								<prcphistcd/>
								<tempprcpflag/>
								<prcpsetcd/>
								<prcpvolunitflag/>
								<prcpqtyunitflag/>
								<orgprcpqty/>
								<drugspd/>
								<drugspdunitflag/>
								<powdflag/>
								<prnprcpflag/>
								<prepprcpflag/>
								<selfprcpflag/>
								<selfdrugflag/>
								<drugpackflag/>
								<erprcpflag/>
								<precureprcpflag/>
								<nigtprcpflag/>
								<portprcpflag/>
								<fixprcpflag/>
								<anamneflag/>
								<fastprcpflag/>
								<erreadflag/>
								<prcpdirecflag/>
								<tnsuseflag/>
								<tnsfiltflag/>
								<trnptbftestflag/>
								<offictourhealexamflag/>
								<stemcellflag/>
								<angioflagcd/>
								<opansflagcd/>
								<ansttm/>
								<mealcalrcnts/>
								<mealprotcnts/>
								<mealupdtflag/>
								<hosinprcpresncd/>
								<etcprcpresncd/>
								<drugmthdspccd/>
								<issdeptcd/>
								<prcpauthflag/>
								<prcpinptflag/>
								<prcpsignflag/>
								<rateprcpflag/>
								<prcprefseq/>
								<ordreqlnkno/>
								<testreqlnkno/>
								<prcplnkdd/>
								<prcplnkno/>
								<oprsrvno/>
								<tootfact/>
								<clinccmtcnts/>
								<prcpessninptflag/>
								<grupsnglflag/>
								<drugrateqty/>
								<asttestflag/>
								<clincstdyflag/>
								<prtlno/>
								<clincstdycd/>
								<optermcd/>
								<prcpflag/>
								<hscttempprcpflag/>
								<inclprcpcd/>
								<inclprcpno/>
								<pampkspec/>
								<prcppkspec/>
								<calcscormastspec/>
								<drugmastspec/>
								<rateprcpspec/>
								<matrsetprcpspec/>
								<suppdeptspec/>
								<contprcpspec/>
								<etclnkspec/>
								<srchcondcnts/>
								<orgprcpnm/>
								<chkcol/>
								<stepno/>
								<prcpdd/>
								<hsctdelivepos/>
								<hsctlnkno/>
								<etcprcpflag/>
								<tempcol1/>
								<tempcol2/>
								<tempcol3/>
								<tempcol4/>
								<tempcol5/>
								<tempcol6/>
								<tempcol7/>
								<tempcol8/>
								<tempcol9/>
								<tempcol10/>
								<tempcol11/>
								<tempcol12/>
								<prcpclsorder/>
								<saveflag/>
								<listyn/>
								<lablist>
									<labinfo>
										<prtldgnm/>
										<prcpdd/>
										<labtitle/>
										<labname/>
									</labinfo>
								</lablist>
								<prnprcpdtl/>
								<drprcpetc7/>
								<drprcpetc8/>
							</prcplist>
						</prtlprcpprelist>
						<diaginfo>
							<diagcdlist>
								<diagkindcd/>
								<diagkindcdflag/>
								<icd10cd/>
								<diagengnm/>
								<spclinfo/>
							</diagcdlist>
						</diaginfo>
					</main1>
					<main2>
						<lablist>
							<labinfo>
								<prtldgnm/>
								<prcpdd/>
								<labtitle/>
								<labname/>
							</labinfo>
						</lablist>
					</main2>
					<main3>
						<prtlprcpprelist>
							<prcplist>
								<prtldgnm/>
								<prtldg/>
								<drugseq/>
								<drugtt/>
								<volkind/>
								<bsavol/>
								<kgvol/>
								<remark/>
								<nursrem/>
								<volrate/>
								<prtlkind/>
								<ordseqno/>
								<status/>
								<prcpstatcd/>
								<prcpclscd/>
								<prcpkindcd/>
								<prcpcd/>
								<prcpnm/>
								<prcpvol/>
								<prcpvolunitnm/>
								<prcpqty/>
								<prcpqtyunitnm/>
								<prcptims/>
								<prcpdayno/>
								<drugmthdspccdnm/>
								<prcpmixno/>
								<payflagcd/>
								<prcpdelivefact/>
								<hosinhosoutflag/>
								<prcpexecdeptcd/>
								<prcphopedd/>
								<choiordflag/>
								<rgstdt/>
								<rgstridnm/>
								<testrsltunit/>
								<testrsltcnts/>
								<prcpgenrflag/>
								<prcphistcd/>
								<tempprcpflag/>
								<prcpsetcd/>
								<prcpvolunitflag/>
								<prcpqtyunitflag/>
								<orgprcpqty/>
								<drugspd/>
								<drugspdunitflag/>
								<powdflag/>
								<prnprcpflag/>
								<prepprcpflag/>
								<selfprcpflag/>
								<selfdrugflag/>
								<drugpackflag/>
								<erprcpflag/>
								<precureprcpflag/>
								<nigtprcpflag/>
								<portprcpflag/>
								<fixprcpflag/>
								<anamneflag/>
								<fastprcpflag/>
								<erreadflag/>
								<prcpdirecflag/>
								<tnsuseflag/>
								<tnsfiltflag/>
								<trnptbftestflag/>
								<offictourhealexamflag/>
								<stemcellflag/>
								<angioflagcd/>
								<opansflagcd/>
								<ansttm/>
								<mealcalrcnts/>
								<mealprotcnts/>
								<mealupdtflag/>
								<hosinprcpresncd/>
								<etcprcpresncd/>
								<drugmthdspccd/>
								<issdeptcd/>
								<prcpauthflag/>
								<prcpinptflag/>
								<prcpsignflag/>
								<rateprcpflag/>
								<prcprefseq/>
								<ordreqlnkno/>
								<testreqlnkno/>
								<prcplnkdd/>
								<prcplnkno/>
								<oprsrvno/>
								<tootfact/>
								<clinccmtcnts/>
								<prcpessninptflag/>
								<grupsnglflag/>
								<drugrateqty/>
								<asttestflag/>
								<clincstdyflag/>
								<prtlno/>
								<clincstdycd/>
								<optermcd/>
								<prcpflag/>
								<hscttempprcpflag/>
								<inclprcpcd/>
								<inclprcpno/>
								<pampkspec/>
								<prcppkspec/>
								<calcscormastspec/>
								<drugmastspec/>
								<rateprcpspec/>
								<matrsetprcpspec/>
								<suppdeptspec/>
								<contprcpspec/>
								<etclnkspec/>
								<srchcondcnts/>
								<orgprcpnm/>
								<chkcol/>
								<stepno/>
								<prcpdd/>
								<hsctdelivepos/>
								<hsctlnkno/>
								<etcprcpflag/>
								<tempcol1/>
								<tempcol2/>
								<tempcol3/>
								<tempcol4/>
								<tempcol5/>
								<tempcol6/>
								<tempcol7/>
								<tempcol8/>
								<tempcol9/>
								<tempcol10/>
								<tempcol11/>
								<tempcol12/>
								<prcpclsorder/>
								<saveflag/>
								<listyn/>
								<prnprcpdtl/>
								<drprcpetc7/>
								<drprcpetc8/>
							</prcplist>
						</prtlprcpprelist>
					</main3>
					<send>
						<srchdata>
							<sickclscd/>
							<prtlcd/>
							<antimetprtlcd/>
							<fromday/>
							<receivedata>
								<orddeptcd>2010800000</orddeptcd>
								<icd10cd/>
								<ioflag>I</ioflag>
								<pid>1</pid>
								<age>64</age>
								<sex>M</sex>
								<orddd>20070828</orddd>
								<cretno>0</cretno>
							</receivedata>
							<sickclsflag>1</sickclsflag>
							<startdate/>
							<startterm/>
							<endterm/>
						</srchdata>
						<req/>
						<data>
							<orderdata>
								<sendpid/>
								<sendorddd/>
								<sendcretno/>
								<appdd/>
								<starttimes/>
								<endtimes/>
								<sendorddeptcd/>
								<sendsickclscd/>
								<sendioflag/>
								<sendprtlcd/>
								<sendantimetprtlcd/>
								<drugstage/>
								<drugcycle/>
								<cpgappno/>
								<ht/>
								<wtflag/>
								<wt/>
								<ibw/>
								<bsa/>
								<gfrflag/>
								<gfr/>
								<sendage/>
								<sexrate/>
								<urvol>
								</urvol>
								<urcr/>
								<auc/>
								<carbovol/>
								<prereqyn/>
								<sc/>
								<usegoal/>
							</orderdata>
							<orderprcpdata/>
							<acpttermfrom/>
							<acpttermto/>
							<prcplist/>
							<diaglist/>
							<patinfolist/>
							<signdata>
								<signbfcnts/>
								<signaftcnts/>
							</signdata>
						</data>
						<cond1/>
						<cond2/>
						<cond3/>
						<cond4/>
						<cond5/>
						<cond6/>
						<cond7/>
						<cond8/>
						<cond9/>
						<cond10/>
						<cond11/>
						<cond12/>
						<cond13/>
						<prtlprcpprelist/>
						<clincstdy>
							<instcd/>
							<pid/>
							<prcpdd/>
						</clincstdy>
					</send>
					<init>
						<comboitem>
							<payflagcd>
								<P0104>
									<cdid/>
									<cdnm/>
								</P0104>
							</payflagcd>
						</comboitem>
						<rem/>
						<patinfo/>
						<hosinprcpresncd/>
						<prcpdd/>
						<prcpkindcd/>
						<termcdlist>
							<termcdinfo>
								<cdid/>
								<cdnm/>
							</termcdinfo>
						</termcdlist>
						<diagsrchcond1/>
						<diagmsrght>
							<mouserght>
								<label>삭제</label>
								<func>fDiagDeleteRow</func>
							</mouserght>
							<mouserght>
								<label>취소(삭제,수정)</label>
								<func>fDiagCnclRow</func>
							</mouserght>
							<mouserght>
								<label/>
								<func/>
							</mouserght>
							<mouserght>
								<label>즐겨찾기</label>
								<func>fOpenEnjoySet</func>
							</mouserght>
							<mouserght>
								<label/>
								<func/>
							</mouserght>
							<mouserght>
								<label>즐겨찾기 추가</label>
								<func>fAddEnjoyPrivate</func>
							</mouserght>
						</diagmsrght>
						<phmenu>
							<item>
								<name>이력상세보기</name>
								<func>fOpenProtocolHist</func>
							</item>
						</phmenu>
						<payflagcd/>
					</init>
					<hidden>
						<calcdata/>
						<subtrvol>
							<subtrvolresn/>
							<subtrvolrate/>
							<subtrvolrateetc/>
						</subtrvol>
						<receivesubtrvolrate>/root/hidden/subtrvol</receivesubtrvolrate>
						<receivelab>/root/main/data/sc</receivelab>
						<receivevs>/root/main/data</receivevs>
						<calcyn/>
						<antisch>
							<pid/>
							<cpgappno/>
						</antisch>
						<subtrvolyn/>
						<dupcheck>
							<cnt/>
						</dupcheck>
						<saveyn/>
						<editcheck>
							<cnt/>
						</editcheck>
						<calappyn/>
					</hidden>
					<temp>
						<ret/>
						<ret1/>
					</temp>
					<issdept/>
					<orddept/>
					<patflag/>
					<paminfo/>
					<save>
						<saveflaginfo>
							<savedataflag/>
							<saveflag/>
							<prcpflag/>
							<inptflag/>
							<deptcd/>
							<deptnm/>
							<userid/>
							<usernm/>
							<signyn/>
							<prcpdd/>
							<cncrsaveflag/>
						</saveflaginfo>
					</save>
					<result/>
					<temp1>
						<saveprcprslt/>
					</temp1>
					<diagorg/>
					<reset>
						<prcplist>
							<status>S</status>
							<prcpstatcd/>
							<prcpclscd/>
							<prcpkindcd/>
							<prcpcd/>
							<prcpnm/>
							<prcpvol/>
							<prcpvolunitnm/>
							<prcpqty/>
							<prcpqtyunitnm/>
							<prcptims/>
							<prcpdayno/>
							<drugmthdspccdnm/>
							<prcpmixno/>
							<payflagcd/>
							<prcpdelivefact/>
							<hosinhosoutflag/>
							<prcpexecdeptcd/>
							<prcphopedd/>
							<choiordflag/>
							<rgstdt/>
							<rgstridnm/>
							<testrsltunit/>
							<testrsltcnts/>
							<prcpgenrflag/>
							<prcphistcd/>
							<tempprcpflag/>
							<prcpsetcd/>
							<prcpvolunitflag/>
							<prcpqtyunitflag/>
							<orgprcpqty/>
							<drugspd/>
							<drugspdunitflag/>
							<powdflag/>
							<prnprcpflag/>
							<prepprcpflag/>
							<selfprcpflag/>
							<selfdrugflag/>
							<drugpackflag/>
							<erprcpflag/>
							<precureprcpflag/>
							<nigtprcpflag/>
							<portprcpflag/>
							<fixprcpflag/>
							<anamneflag/>
							<fastprcpflag/>
							<erreadflag/>
							<prcpdirecflag/>
							<tnsuseflag/>
							<tnsfiltflag/>
							<trnptbftestflag/>
							<offictourhealexamflag/>
							<stemcellflag/>
							<angioflagcd/>
							<opansflagcd/>
							<ansttm/>
							<mealcalrcnts/>
							<mealprotcnts/>
							<mealupdtflag/>
							<hosinprcpresncd/>
							<etcprcpresncd/>
							<drugmthdspccd/>
							<issdeptcd/>
							<prcpauthflag/>
							<prcpinptflag/>
							<prcpsignflag/>
							<rateprcpflag/>
							<prcprefseq/>
							<ordreqlnkno/>
							<testreqlnkno/>
							<prcplnkdd/>
							<prcplnkno/>
							<oprsrvno/>
							<tootfact/>
							<clinccmtcnts/>
							<prcpessninptflag/>
							<grupsnglflag/>
							<drugrateqty/>
							<asttestflag/>
							<clincstdyflag/>
							<prtlno/>
							<clincstdycd/>
							<optermcd/>
							<prcpflag/>
							<hscttempprcpflag/>
							<inclprcpcd/>
							<inclprcpno/>
							<pampkspec/>
							<prcppkspec/>
							<calcscormastspec/>
							<drugmastspec/>
							<rateprcpspec/>
							<matrsetprcpspec/>
							<suppdeptspec/>
							<contprcpspec/>
							<etclnkspec/>
							<srchcondcnts/>
							<orgprcpnm/>
							<chkcol/>
							<hsctdelivepos/>
							<hsctlnkno/>
							<etcprcpflag/>
							<aftcertflag/>
							<aftcertdrid/>
							<prcpvalidd/>
							<spynpy1/>
							<specdrid/>
							<anticncrprtlno/>
							<anticncrdayno/>
							<druglnkno/>
							<rehbprcpcurefreqflag/>
							<dietprcpgenrflag/>
							<irpayflag/>
							<irflag/>
							<procerdietflag/>
							<diagtestconttestintvlflag/>
							<drugindependpackflag/>
							<diagtestconttestbasetm/>
							<diagtestconttestorgtims/>
							<ermediscmngtresncd/>
							<rehbprcpenddd/>
							<matrallsizespecid/>
							<rehbprcpcurepartcd/>
							<lowdrugresncd/>
							<tfdtlcd/>
							<dnorreqlnkno/>
							<subcretno/>
							<exptmthdfact/>
							<lowdrugresnetcfact/>
							<diagtestconttestcdspec/>
							<drprcpetc1/>
							<drprcpetc2/>
							<drprcpetc3/>
							<drprcpetc4/>
							<drprcpetc5/>
							<drprcpetc6/>
							<drprcpetc7/>
							<drprcpetc8/>
							<drprcpetc9/>
							<drprcpetc10/>
							<tempcol1/>
							<tempcol2/>
							<tempcol3/>
							<tempcol4/>
							<tempcol5/>
							<tempcol6/>
							<tempcol7/>
							<tempcol8/>
							<tempcol9/>
							<tempcol10/>
							<tempcol11/>
							<tempcol12/>
							<tempcol13/>
							<tempcol14/>
							<tempcol15/>
							<tempcol16/>
							<tempcol17/>
							<tempcol18/>
							<tempcol19/>
							<tempcol20/>
							<tempcol21/>
							<tempcol22/>
							<tempcol23/>
							<tempcol24/>
							<tempcol25/>
						</prcplist>
						<diagcdlist>
							<status>S</status>
							<diagdd/>
							<diagno/>
							<diaghistno/>
							<instcd/>
							<pid/>
							<orddd/>
							<cretno/>
							<orddeptcd/>
							<orddrid/>
							<genrflagcd/>
							<diaghistcd/>
							<diagcd/>
							<diagtypecd/>
							<diagkindcd/>
							<diagkindcdflag/>
							<anamneflag/>
							<tootflagcd/>
							<diagsignflag/>
							<tootfact/>
							<diagengnm/>
							<diaghngnm/>
							<icd10cd/>
							<spclinfo/>
							<diagremfact/>
							<diagcmtcnts/>
						</diagcdlist>
						<anstprcplist>
							<prcpcd/>
							<prcpvol/>
							<drugmthdcd/>
							<mthdcnts/>
							<prcpdd/>
							<insukind/>
							<temp/>
						</anstprcplist>
					</reset>
				</root>
			</instance>
			<submission id="TRADB01021" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/srchdata" replace="instance" resultref="/root/main/sicklist"/>
			<script type="javascript" ev:event="xforms-ready">
				<![CDATA[
					fInit();
				]]>
			</script>
			<script type="javascript">
				<![CDATA[
				    function callLoadingWindow(msg){
						//환자정보 조회 중 상태 표시
						body.createChild("xforms:iviewer", "id:ivr_progress; src:../../../com/commonweb/xrw/SPZZZ00400_로딩중화면.xrw; left:435px; top:339px; width:330px; height:120px;");
						var ivrObjt = document.all("ivr_progress");	
						if( msg == '' || msg == '-' ){
							msg = "프로토콜 저장중 입니다...";
						}
						ivrObjt.model.setValue("/root/main/msg", msg);
						ivrObjt.model.refresh();	
					}

					function removeLoadingWindow(){
						//환자정보 조회 중 상태 표시 지우기
						body.removeChild("ivr_progress");
					}
					
					function fInit(){
						submit("TRADB01038");
						if ( model.getValue("/root/hidden/dupcheck/item/cnt") != "0" ){ //중복가능 진료과 체크
							btn_add.visible=true;							
						}
						submit("TRADB01039");
						if ( model.getValue("/root/hidden/editcheck/item/cnt") != "0" ){ //중복가능 진료과 체크							
							grd_prtlprcpprelist.colDisabled(grd_prtlprcpprelist.colRef("prcpqty") ) = false;
							grd_prtlprcpprelist.colDisabled(grd_prtlprcpprelist.colRef("prcpvol") ) = false;
						}
						
						makeReportPreview(0,10,1100,690, "case4");
						zbcfGetCodeList( new Array("P0104", "M0029"),  new Array("/root/init/comboitem/payflagcd", "/root/init/payflagcd") );
						
						// 컬럼고정
						var nFrozenCols = grd_prtlprcp1.colRef("prcpnm") + 1;
						if(nFrozenCols>0) {
							grd_prtlprcp1.frozenCols = nFrozenCols;
							grd_prtlprcp2.frozenCols = nFrozenCols;
							grd_prtlprcp3.frozenCols = nFrozenCols;
							grd_prtlprcp4.frozenCols = nFrozenCols;
							grd_prtlprcp5.frozenCols = nFrozenCols;
						} else {
							grd_prtlprcp1.frozenCols = 0;
							grd_prtlprcp2.frozenCols = 0;
							grd_prtlprcp3.frozenCols = 0;
							grd_prtlprcp4.frozenCols = 0;
							grd_prtlprcp5.frozenCols = 0;
						}
						
						
						if( fInitializePamInfo() ){
							 //fBaseCdInit();			//처방 func 호출(기초코드 셋팅)
							 //fTranInddChk();		//처방 func 호출(외래에서 입원전환된 환자인지 check)
							// fGetCodeList();		//부서코드 셋팅
							 zesfInitSign();			//인증저장 셋팅..
							 //fInitialize();										//cp 마스터 정보 및 스텝 정보를 셋팅					 
							
							//fInitializeReady()
							
							var patFlagCvs = getGlobalVariable("patflag");    
							if(patFlagCvs.length == 0 ) { 
								messageBox ( "환자정보가", "I004" );
								//window.close();
								//return;
							}
							fPatDiagSrchAnti();		//진단검색 호출
							
							var nodeList = instance1.selectNodes("main/diaginfo/diagcdlist");
							if( nodeList.length > 0 ){
								//fBatSaveAntiMeticPrtlPrcp();
							}else{
								messageBox("환자의 진단을 ", "C001");
								//window.close();
								return;
							}
						}
						model.setValue("/root/main/data/age", model.getValue("/root/send/srchdata/receivedata/age"));
						model.setValue("/root/main/prtlinfo/startdate", getCurrentDate());
						submit("TRADB01021");
						submit("TRADB01027");
						if ( model.getValue("/root/main/prtlhislist/item[1]/ht") != ""){
							model.setValue("/root/main/data/ht", model.getValue("/root/main/prtlhislist/item[1]/ht") );
						}
						
						model.refresh();
					}
					/**
					 * @group  :
					 * @ver    : 2007.08
					 * @by     : 전지은
					 * @---------------------------------------------------
					 * @type   : function
					 * @access : public
					 * @desc   : 부서코드 셋팅
					 * @param  : 
					 * @return :
					 * @---------------------------------------------------
					 */
					function fGetCodeList() {
						var instcd = getUserInfo("dutplceinstcd");
						var standard_yn = "orduseyn";
						var ord_deptflag = 'D';
						var rslt_ref  = "/root/init/orddeptlist";
						zbcfGetDeptCodeList(instcd, standard_yn, ord_deptflag, rslt_ref, "depthngnm", "asc");
					}
					
					/**
					 * @group  :
					 * @ver    : 2007.09
					 * @by     : 전지은
					 * @---------------------------------------------------
					 * @type   : function
					 * @access : public
					 * @desc   : 환자의 세션 정보를 setting
					 * @param  : 
					 * @return : true, false
					 * @---------------------------------------------------
					 */
					function fInitializePamInfo(){
						var pamInfoCvs = getGlobalVariable("paminfo");  
						
						if(!isNull(pamInfoCvs)){ //cvs가 null이 아닌 경우에만 처리함.
							model.removeNodeSet ( "/root/paminfo/list" ); //상단화면 정보 초기화
							setCSVToNode ( "/root/paminfo", pamInfoCvs );
							var vopt_patinfo  = model.getValue ( "/root/paminfo/list/pid" );
							vopt_patinfo  = vopt_patinfo + "  " + model.getValue ( "/root/paminfo/list/hngnm" );
							vopt_patinfo  = vopt_patinfo + "  " + model.getValue ( "/root/paminfo/list/sex" ) + "/" + model.getValue ( "/root/paminfo/list/age" );
							if ( model.getValue ( "/root/paminfo/list/roomcd" ) != "" ){
								vopt_patinfo = vopt_patinfo + "  " + model.getValue ( "/root/paminfo/list/wardnm") + "/" + model.getValue ( "/root/paminfo/list/roomcd" );
							}
							model.setValue ( "/root/init/patinfo", vopt_patinfo );
					      
							var patFlagCvs = getGlobalVariable("patflag");
						
							if(patFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
								model.removeNodeSet ( "/root/patflag/list" ); //상단화면 정보 초기화
								setCSVToNode ( "/root/patflag", patFlagCvs );
								prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
							}
						
							var operationFlagCvs = getGlobalVariable("operation");  
						
							if(operationFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
								model.removeNodeSet ( "/root/operation/list" ); //상단화면 정보 초기화
								setCSVToNode ( "/root/operation", operationFlagCvs );
							} 
							prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
							if ( prcpgenrflag == "O" ){ //외래일때
								model.setValue ( "/root/init/hosinprcpresncd", model.getValue ( "/root/paminfo/list/hosoutexptresncd" ));	  
								model.setValue ( "/root/init/prcpkindcd", "20" ); //처방종류(추가)
								model.setValue ( "/root/init/prcpdd", model.getValue ( "/root/paminfo/list/orddd" ));
						
							} else { //입원, 응급일때           
								model.setValue ( "/root/init/hosinprcpresncd", "00");	  
								model.setValue ( "/root/init/prcpdd", getCurrentDate());
						
								if ( model.getValue( "/root/paminfo/list/indd" ) == getCurrentDate()) {
									model.setValue ( "/root/init/prcpkindcd", "00" );
								} else if ( eval (getCurrentTime().substr (0,2)) <= 4 ) { //처방종류: 4시전이면 정규
									model.setValue ( "/root/init/prcpkindcd", "10" );
								} else if ( eval (getCurrentTime().substr (0,2)) >= 21 ) { //9시 이후면 정규, 날짜는 다음날짜
									model.setValue ( "/root/init/prcpkindcd", "10" );
									var nextDay = getCurrentDate().toDate().getAddDate(1,"D").getDateFormat(); //다음날을 찾는다.  
									model.setValue ( "/root/init/prcpdd", nextDay );
								} else { //추가처방
								model.setValue ( "/root/init/prcpkindcd", "20" );
							}
							
							//if ( prcpgenrflag == "E" ) {}
							rgstno = model.getValue("/root/paminfo/list/rrgstno1");
							rgstno2 = getPatientInfo("regstno");
						}
						return true;
							
						} else{
							var msg = messageBox("환자를 ", "C002");
							return false;
						}
					}
	
					/* 진토제 일때 색깔 변경 */	
					function fSetAntimetColor(){
						setRowStyle("grd_prtlprcp1" , "1" , "M" , "prtlkind", "equal");
						setRowStyle("grd_prtlprcp2" , "1" , "M" , "prtlkind", "equal");
						setRowStyle("grd_prtlprcp3" , "1" , "M" , "prtlkind", "equal");
						setRowStyle("grd_prtlprcp4" , "1" , "M" , "prtlkind", "equal");
						setRowStyle("grd_prtlprcp5" , "1" , "M" , "prtlkind", "equal");
						setRowStyle("grd_prtlprcpprelist" , "1" , "M" , "prtlkind", "equal");
					}
					
					function fGrdRefresh(){
						grd_prtlprcp1.refresh();
						grd_prtlprcp2.refresh();
						grd_prtlprcp3.refresh();
						grd_prtlprcp4.refresh();
						grd_prtlprcp5.refresh();
						grd_prtlprcpprelist.refresh();
						return;
					}
					
					function fGrdRebuildStyle(){
						grd_prtlprcpprelist.rebuildStyle();
						grd_prtlprcp1.rebuildStyle();
						grd_prtlprcp2.rebuildStyle();
						grd_prtlprcp3.rebuildStyle();
						grd_prtlprcp4.rebuildStyle();
						grd_prtlprcp5.rebuildStyle();
					}
					
					function fCalcVol(){
						var bsa;
						var kg;
						var prcpvol;
						var gfr;
						var sexrate;
						var sc;
						if ( model.getValue("/root/paminfo/list/sex") =="M" ) {
							sexrate =1;
						} else {
							sexrate = 0.85;
						}
						model.setValue("/root/main/data/sexrate", sexrate );
						if ( model.getValue("/root/main/data/wtflag") == "1" ){
							kg = model.getValue("/root/main/data/wt");
						} else {
							kg = model.getValue("/root/main/data/ibw");
						}
						bsa = Math.pow( (parseFloat( model.getValue("/root/main/data/ht") ) *parseFloat( kg ) /3600), 0.5);
						bsa= Math.round( bsa * 100) /100;
						model.setValue("/root/main/data/bsa", bsa);						
						
						for ( var i =0; i<grd_prtlprcplist.rows-1 ;i++){
							/* BSA당 용량 계산*/
							
							
							if ( model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/volkind") =="1" ) {
								prcpvol=0;
								prcpvol = bsa * parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/bsavol") );
								if ( model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/bsavol") =="0" ) {
									button5.disabled = true;
									messageBox("마스터내 BSA당 용량이 0인 코드가 존재합니다.\n특수조제실로 문의하십시오.", "I");
								}
							}						
							
							/* KG당 용량 계산*/
							if ( model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/volkind") =="2" ) {
								prcpvol=0;
								prcpvol =  parseFloat(kg) * parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/kgvol") );
								if ( model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/kgvol") =="0" ) {
									button5.disabled = true;
									messageBox("마스터내 KG당 용량이 0인 코드가 존재합니다.\n특수조제실로 문의하십시오.", "I");
								}
							}
							
							/* AUC 용량 계산*/
							if ( model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/volkind") =="3" ) {
								prcpvol=0;
								if (model.getValue("/root/main/data/auc")=="") {
									messageBox("적용방법 AUC인 경우는 AUC를 입력하십시오.", "C010");
									model.refresh();
									return;
								}
								if ( model.getValue("/root/main/data/gfrflag") =="1" ) {
									if (model.getValue("/root/main/data/sc")=="") {
										messageBox("적용방법 AUC인 경우는 Serum Creatinine을 입력하십시오.", "C010");
										model.refresh();
										return;
									}
									gfr =( ( 140 -  parseFloat( model.getValue("/root/main/data/age") ) ) * kg )  / (parseFloat( model.getValue("/root/main/data/sc") ) * 72) * sexrate;								
								} else {
									if (model.getValue("/root/main/data/sc")=="") {
										messageBox("적용방법 AUC인 경우는 Serum Creatinine을 입력하십시오.", "C010");
										model.refresh();
										return;
									}
									if (model.getValue("/root/main/data/urcr")=="") {
										messageBox("적용방법 AUC인 경우는 Urine Creatinine을 입력하십시오.", "C010");
										model.refresh();
										return;
									}
									if (model.getValue("/root/main/data/urvol")=="") {
										messageBox("적용방법 AUC인 경우는 Urine Volume을 입력하십시오.", "C010");
										model.refresh();
										return;
									}
									gfr = ( parseFloat( model.getValue("/root/main/data/urvol") )  * parseFloat( model.getValue("/root/main/data/urcr") ) )  / (1440 * parseFloat( model.getValue("/root/main/data/sc") ));
								}
								
								gfr= Math.round( gfr * 100) /100;
								if(gfr > 125) {
									messageBox("계산된 GFR 값이 " +gfr+ " 으로  허용 최대값(125) 초과 하였습니다.\n최대값으로 설정하여 진행 합니다.", "I999");
									gfr = 125;
								}
								
								model.setValue("/root/main/data/gfr",gfr);
								
								prcpvol  = parseFloat( model.getValue("/root/main/data/auc") ) * (25 + gfr);
								model.setValue("/root/main/data/carbovol",prcpvol);
							}
							
							/*감량계산*/
							model.setValue( "/root/main/prtlprcpvollist/item[" + (i+1) + "]/basevol", prcpvol ); //100% 용량
							prcpvol = prcpvol * ( parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/subtrvolrate") )/100);
							prcpvol= Math.round( prcpvol * 100) /100;
							model.setValue( "/root/main/prtlprcpvollist/item[" + (i+1) + "]/prcpvol", prcpvol );
							
							/* 수량재계산 */
							var volrate = model.getValue("/root/main/prtlprcpvollist/item["+ (i+1)+"]/volrate");
							var prcpvol = model.getValue("/root/main/prtlprcpvollist/item["+ (i+1)+"]/prcpvol");
							var prcpqty = model.getValue("/root/main/prtlprcpvollist/item["+ (i+1)+"]/prcpqty");

							model.setValue("/root/main/prtlprcpvollist/item["+ (i+1)+"]/prcpqty", Math.round(  parseFloat(prcpvol)/parseFloat(volrate) * 1000) /1000);

							prcpqty = model.getValue("/root/main/prtlprcpvollist/item["+ (i+1)+"]/prcpqty");
							prcptims = model.getValue("/root/main/prtlprcpvollist/item["+ (i+1)+"]/prcptims");							
							
							model.setValue("/root/main/prtlprcpvollist/item["+ (i+1)+"]/drprcpetc7", parseFloat(prcpvol) / parseFloat(prcptims));
							model.setValue("/root/main/prtlprcpvollist/item["+ (i+1)+"]/drprcpetc8", parseFloat(prcpqty) / parseFloat(prcptims));
						}
						model.refresh();	
					}
					
					function fSetIBW(){
						var ht = model.getValue( "/root/main/data/ht")/100;
						if (model.getValue( "/root/send/srchdata/receivedata/sex") =="M"){
							model.setValue ( "/root/main/data/ibw", 22* ht * ht );
						} else {
							model.setValue ( "/root/main/data/ibw", 21* ht * ht );
						}
						model.refresh();
					}
					
					function 	fSetPrtlInfo(){
						var endterm=0;
					    var startterm=0;

						if ( model.getValue("/root/main/prtllist/item["+grd_prtllist.row+"]/fromday") =="" ) {
							button5.disabled = true;
							messageBox("프로토콜 시작일이 지정되지 않았습니다.\n특수조제실로 문의하십시오. ", "C999");
							return;
						}
						if ( model.getValue("/root/main/prtllist/item["+grd_prtllist.row+"]/prtlterm") =="" ) {
							button5.disabled = true;
							messageBox("프로토콜 기간이 지정되지 않았습니다.\n특수조제실로 문의하십시오. ", "C999");
							return;
						}
						
					    endterm  = parseFloat(model.getValue("/root/main/prtllist/item["+grd_prtllist.row+"]/fromday"))+parseFloat(model.getValue("/root/main/prtllist/item["+grd_prtllist.row+"]/prtlterm"))-1;
					    startterm = parseFloat(model.getValue("/root/main/prtllist/item["+grd_prtllist.row+"]/fromday"));
					    
					    //이선경 2008-08-13 start (적용선택 콤보셋팅)
					    model.removeNodeset("/root/init/termcdlist/termcdinfo");
					    model.makeNode("/root/init/termcdlist/termcdinfo");
					    var irow = 0;
			    		    var val = 0;
			    			
					    for(var i = startterm ; i <= endterm; i++) {
							val = i;
							irow ++;
							
							model.makeValue("/root/init/termcdlist/termcdinfo[" + irow + "]/cdid",  val);
							model.makeValue("/root/init/termcdlist/termcdinfo[" + irow + "]/cdnm", val);
					    }					    
					    //이선경 2008-08-13 end (적용선택 콤보셋팅)
					    
						model.setValue("/root/send/srchdata/prtlcd",     		model.getValue("/root/main/prtllist/item["+grd_prtllist.row+"]/prtlcd"));	
						model.setValue("/root/send/srchdata/fromday", 		model.getValue("/root/main/prtllist/item["+grd_prtllist.row+"]/fromday"));	
						model.setValue("/root/send/srchdata/antimetprtlcd",	"");	
						
						model.setValue("/root/main/prtlinfo/startterm",  	startterm);	
						model.setValue("/root/main/prtlinfo/endterm",  	endterm);	
						model.setValue("/root/main/prtlinfo/ableprcp",	"Y");	// 처방가능여부 설정(프로토콜 변경여부)
						model.setValue("/root/main/prtlinfo/ioflag",     		model.getValue("/root/send/srchdata/receivedata/ioflag"));	// 처방가능여부 설정(입원/외래)
						
						if ( grd_prtlhislist.rows >1){
							model.setValue("/root/main/prtlinfo/drugcycle",	parseInt(model.getValue("/root/main/prtlhislist/item[1]/drugcycle"))+1);	
							model.setValue("/root/main/prtlinfo/drugstage",	model.getValue("/root/main/prtlhislist/item[1]/drugstage"));	
							
						} else {
							model.setValue("/root/main/prtlinfo/drugcycle","1");	
							model.setValue("/root/main/prtlinfo/drugstage","1");	
						}
						if (model.getValue("/root/main/prtlinfo/startdate") == "" ){
							model.setValue("/root/main/prtlinfo/startdate", getCurrentDate());
						}
						model.setValue("/root/send/srchdata/startdate", model.getValue("/root/main/prtlinfo/startdate"));
						model.setValue("/root/send/srchdata/startterm", model.getValue("/root/main/prtlinfo/startterm"));
						model.setValue("/root/send/srchdata/endterm", model.getValue("/root/main/prtlinfo/endterm"));
						submit("TRADB01023",false);
						if ( grd_antimetlist.rows>1){
							model.setValue("/root/send/srchdata/antimetprtlcd", model.getValue("/root/main/prtllinklist/item[1]/antimetprtlcd"));
						}
						
						submit("TRADB01024", false);
						submit("TRADB01025");
						
						var chkAUC    = "N";
						var chkAUCvol = "";
						for (  i =0; i<grd_prtlprcplist.rows-1 ;i++){
							if ( model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/volkind") =="3" ) {
								chkAUC     = "Y";
								chkAUCvol = model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/bsavol");
							}
						}
						if ( chkAUC =="N"){
							model.setValue("/root/main/data/auc", "");
						} else {
							model.setValue("/root/main/data/auc",chkAUCvol);
						}
						submit("TRADB01026", false);	
						
						model.setValue("/root/main/prtlinfo/d1nm", "D"+  parseInt(startterm));
						model.setValue("/root/main/prtlinfo/d2nm", "D"+ (parseInt(startterm)+1));
						model.setValue("/root/main/prtlinfo/d3nm", "D"+ (parseInt(startterm)+2));
						model.setValue("/root/main/prtlinfo/d4nm", "D"+ (parseInt(startterm)+3));
						model.setValue("/root/main/prtlinfo/d5nm", "D"+ (parseInt(startterm)+4));
						
						fGrdRebuildStyle(); // 색깔 초기화
						
						model.setValue("/root/hidden/calcyn","N");     // 용량계산여부
						model.setValue("/root/hidden/calappyn","N"); // 계산된 용량 적용여부
						model.setValue("/root/hidden/subtrvolyn","N");
						model.setValue("/root/main/data/age", model.getValue("/root/send/srchdata/receivedata/age"));
						
						model.setValue("/root/send/data/orderdata/cpgappno", "");
						
						model.setValue("/root/main/prtlinfo/currentpg","1");
						model.setValue("/root/main/prtlinfo/totpg",Math.ceil((parseInt(endterm)-parseInt(startterm)+1)/5));
						
						// 20101015_laboru_경북대병원_투여시점 시간 단위로 보이게 수정(소수점 셋째 자리에서 반올림)
						model.removeNodeset("/root/tempprcp/prtlprcpprelist/prcplist");
						model.makeNode("root/tempprcp/prtlprcpprelist/prcplist");
						copyNodesetType("root/tempprcp/prtlprcpprelist/prcplist", "root/main/prtlprcpprelist/prcplist", "replace");
						
						for(var i=1 ; i <= getNodesetCount("/root/main/prtlprcpprelist/prcplist") ; i++) {
							var drugseq = model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq");
							var drugseqhr = Math.round( (parseInt(drugseq)/60) * 100 ) / 100;
																
							model.setValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq", drugseqhr);									
						}
								
						model.refresh();
					}
					
					function fSetVol(){
						//by sonjy 20100209 여의도 성모 리허설 오류사항 수정.
						//프로토콜 선택 없이 시작일 변경시 이상 오류 메세지  
						//선택한 사항이 없거나 선택한 프로토콜의 처방이 없을 경우 하위 로직으로 갈 필요 없음. return 처리  
						if( grd_prtlprcpprelist.rows < 2 ) return ;
						
						for ( var i =0; i<grd_prtlprcplist.rows-1 ;i++){
							var ordseqno   	 = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/ordseqno");  //처방코드별로 변경
							var prcpcd       	 = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/prcpcd");   //같은 코드는 같은 용량으로 됨. (요청사항)							
							var prcpvol       	 = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/prcpvol");
							var prcpqty      	 = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/prcpqty");
							var drprcpetc7 	 = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/drprcpetc7");
							var drprcpetc8 	 = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/drprcpetc8");
							var bsavol        	 = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/bsavol");
							var kgvol          	 = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/kgvol");
							var prcpvolunitnm = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/prcpvolunitnm");
							
							if ( prcpvol == 0 || prcpqty == 0 ){
								messageBox("계산총량을 0으로 지정할 수 없습니다.\n해당 약품 미처방시는 저장후 해당건 반환하십시오.", "C010");
								return false;
							}
							
							if( prcpcd == "DIVINCA" || prcpcd == "DIVINCB") { // Vincristine 1일 최대 2mg 체크 2016.11.02 엄영만
								if(parseFloat(drprcpetc7) > 2 && prcpvolunitnm == "mg") { 
									//messageBox("Vincristine 처방이 한계용량 2mg 를 초과 하였습니다.\n2mg으로 설정하여 진행 합니다.", "I999");  // 2017.02.08 채의수교수님 메세지 삭제 요청
									prcpvol 	  = 2;
									drprcpetc7 = 2;
										
									if( prcpcd == "DIVINCA" ) {
										prcpqty 	  = 2;
										drprcpetc8 = 2;
									} else if( prcpcd == "DIVINCB" ) {
										prcpqty 	  = 1;
										drprcpetc8 = 1;
									}
								}
							}
							
							//이선경 2008-08-12 (처방%와 감량사유추가)
							var subtrvolrate = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/subtrvolrate");
							var subtrvolresn = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/subtrvolresn");

							for ( var j =0; j<grd_prtlprcp1.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcplist/item1["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcplist/item1["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcplist/item1["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/drprcpetc8", drprcpetc8);
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcp1.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("prcpvol"))="#FFF000";
									grd_prtlprcp1.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("prcpqty"))="#FFF000";
									grd_prtlprcp1.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcp1.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc8"))="#FFF000";
										}
									}
								}
							}	
							
							for ( var j =0; j<grd_prtlprcp2.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcplist/item2["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcplist/item2["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcplist/item2["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/drprcpetc8", drprcpetc8);
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcp2.cellstyle("background-color", (j+1), grd_prtlprcp2.colRef("prcpvol"))="#FFF000";
									grd_prtlprcp2.cellstyle("background-color", (j+1), grd_prtlprcp2.colRef("prcpqty"))="#FFF000";
									grd_prtlprcp2.cellstyle("background-color", (j+1), grd_prtlprcp2.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcp2.cellstyle("background-color", (j+1), grd_prtlprcp2.colRef("drprcpetc8"))="#FFF000";
										}
									}
								}
							}	
							
							for ( var j =0; j<grd_prtlprcp3.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcplist/item3["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcplist/item3["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcplist/item3["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/drprcpetc8", drprcpetc8);
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcp3.cellstyle("background-color", (j+1), grd_prtlprcp3.colRef("prcpvol"))="#FFF000";
									grd_prtlprcp3.cellstyle("background-color", (j+1), grd_prtlprcp3.colRef("prcpqty"))="#FFF000";
									grd_prtlprcp3.cellstyle("background-color", (j+1), grd_prtlprcp3.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcp3.cellstyle("background-color", (j+1), grd_prtlprcp3.colRef("drprcpetc8"))="#FFF000";
										}
									}
								}
							}	
							
							for ( var j =0; j<grd_prtlprcp4.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcplist/item4["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcplist/item4["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcplist/item4["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/drprcpetc8", drprcpetc8);
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcp4.cellstyle("background-color", (j+1), grd_prtlprcp4.colRef("prcpvol"))="#FFF000";
									grd_prtlprcp4.cellstyle("background-color", (j+1), grd_prtlprcp4.colRef("prcpqty"))="#FFF000";
									grd_prtlprcp4.cellstyle("background-color", (j+1), grd_prtlprcp4.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcp4.cellstyle("background-color", (j+1), grd_prtlprcp4.colRef("drprcpetc8"))="#FFF000";
										}
									}
								}
							}	
							
							for ( var j =0; j<grd_prtlprcp5.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcplist/item5["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcplist/item5["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcplist/item5["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/drprcpetc8", drprcpetc8);
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcp5.cellstyle("background-color", (j+1), grd_prtlprcp5.colRef("prcpvol"))="#FFF000";
									grd_prtlprcp5.cellstyle("background-color", (j+1), grd_prtlprcp5.colRef("prcpqty"))="#FFF000";
									grd_prtlprcp5.cellstyle("background-color", (j+1), grd_prtlprcp5.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcp5.cellstyle("background-color", (j+1), grd_prtlprcp5.colRef("drprcpetc8"))="#FFF000";
										}
									}
								}
							}	
							
							for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc8", drprcpetc8);									
									model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("prcpvol"))="#FFF000";
									grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("prcpqty"))="#FFF000";
									grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("drprcpetc8"))="#FFF000";
										}
									}
								}
							}	

						}		
						return true;
					}
					
					function fSetVol2(){
						// 앞뒤 이동 버튼 클릭시는 미리보기는 용량적용을 다시 하지 않음.
						for ( var i =0; i<grd_prtlprcplist.rows-1 ;i++){
							var ordseqno = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/ordseqno");  //처방코드별로 변경
							var prcpcd = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/prcpcd");   //같은 코드는 같은 용량으로 됨. (요청사항)							
							var prcpvol = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/prcpvol");
							var prcpqty = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/prcpqty");
							var drprcpetc7 = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/drprcpetc7");
							var drprcpetc8 = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/drprcpetc8");							
							var bsavol = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/bsavol");
							var kgvol = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/kgvol");
							//이선경 2008-08-12 (처방%와 감량사유추가)
							var subtrvolrate = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/subtrvolrate");
							var subtrvolresn = model.getValue("/root/main/prtlprcpvollist/item["+(i+1)+"]/subtrvolresn");

							for ( var j =0; j<grd_prtlprcp1.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcplist/item1["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcplist/item1["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcplist/item1["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/drprcpetc8", drprcpetc8);									
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcplist/item1["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcp1.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("prcpvol"))="#FFF000";
									grd_prtlprcp1.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("prcpqty"))="#FFF000";
									grd_prtlprcp1.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcp1.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc8"))="#FFF000";
										}
									}
								}
							}	
							
							for ( var j =0; j<grd_prtlprcp2.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcplist/item2["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcplist/item2["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcplist/item2["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/drprcpetc8", drprcpetc8);									
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcplist/item2["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcp2.cellstyle("background-color", (j+1), grd_prtlprcp2.colRef("prcpvol"))="#FFF000";
									grd_prtlprcp2.cellstyle("background-color", (j+1), grd_prtlprcp2.colRef("prcpqty"))="#FFF000";
									grd_prtlprcp2.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcp2.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc8"))="#FFF000";
										}
									}
								}
							}	
							
							for ( var j =0; j<grd_prtlprcp3.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcplist/item3["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcplist/item3["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcplist/item3["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/drprcpetc8", drprcpetc8);
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcplist/item3["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcp3.cellstyle("background-color", (j+1), grd_prtlprcp3.colRef("prcpvol"))="#FFF000";
									grd_prtlprcp3.cellstyle("background-color", (j+1), grd_prtlprcp3.colRef("prcpqty"))="#FFF000";
									grd_prtlprcp3.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcp3.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc8"))="#FFF000";
										}
									}

								}
							}	
							
							for ( var j =0; j<grd_prtlprcp4.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcplist/item4["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcplist/item4["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcplist/item4["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/drprcpetc8", drprcpetc8);
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcplist/item4["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcp4.cellstyle("background-color", (j+1), grd_prtlprcp4.colRef("prcpvol"))="#FFF000";
									grd_prtlprcp4.cellstyle("background-color", (j+1), grd_prtlprcp4.colRef("prcpqty"))="#FFF000";
									grd_prtlprcp4.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcp4.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc8"))="#FFF000";
										}
									}
								}
							}	
							
							for ( var j =0; j<grd_prtlprcp5.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcplist/item5["+(j+1)+"]/prcpcd")== prcpcd) {
									if (model.getValue("/root/main/prtlprcplist/item5["+(j+1)+"]/bsavol")== bsavol) {
										if (model.getValue("/root/main/prtlprcplist/item5["+(j+1)+"]/kgvol")== kgvol) {
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/prcpvol", prcpvol);
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/prcpqty", prcpqty);
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/drprcpetc7", drprcpetc7);
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/drprcpetc8", drprcpetc8);									
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/subtrvolrate", subtrvolrate);
									model.setValue("/root/main/prtlprcplist/item5["+(j+1)+"]/subtrvolresn", subtrvolresn);
									grd_prtlprcp5.cellstyle("background-color", (j+1), grd_prtlprcp5.colRef("prcpvol"))="#FFF000";
									grd_prtlprcp5.cellstyle("background-color", (j+1), grd_prtlprcp5.colRef("prcpqty"))="#FFF000";
									grd_prtlprcp5.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcp5.cellstyle("background-color", (j+1), grd_prtlprcp1.colRef("drprcpetc8"))="#FFF000";
										}
									}
								}
							}	
							
						}						
					}
					
					function PrintFunc(){
						model.removeNodeset("/root/main2/lablist/labinfo");
						datagrid1.refresh();
						//model.removeNodeset("/root/main1/prtlprcpprelist/prcplist");
						copyNodesetType("/root/main1/data", "/root/main/data", "replace", model, model);
						copyNodesetType("/root/main1/diaginfo", "/root/main/diaginfo", "replace", model, model);
						
						var kk = 0;
						var k1 = 0;
						var k2 = 0;
						var irow = 0;
						var sprtldgnm = "";
						for (var i = 1; i < grd_prtlprcpprelist.rows; i ++){
							var sprcpcd = model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpcd");
							var sprcpgb = sprcpcd.substr(0, 1);
							
							kk = kk + 1;
							if (kk == 1){
								sprtldgnm = model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prtldgnm");
								model.setValue("/root/main/prtlinfo/startdd", model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpdd"));
								model.setValue("/root/main/prtlinfo/enddd", model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpdd"));
							}
							if (model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpdd") < model.getValue("/root/main/prtlinfo/startdd")){
								model.setValue("/root/main/prtlinfo/startdd", model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpdd"));
							}
							if (model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpdd") > model.getValue("/root/main/prtlinfo/enddd")){
								model.setValue("/root/main/prtlinfo/enddd", model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpdd"));
							}
							if (sprtldgnm == model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prtldgnm")){
								if (sprcpgb != "D"){
									var aa = 0;
									for (var x1 = 1; x1 < datagrid1.rows; x1 ++){
										if (model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugmthdspccdnm") == model.getValue("/root/main2/lablist/labinfo[" + x1 + "]/labtitle")){
											aa = x1;
										}
									}
									if (aa == 0){
										datagrid1.addRow();
										model.setValue("/root/main2/lablist/labinfo[" + datagrid1.row + "]/labtitle", model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugmthdspccdnm"))
										model.setValue("/root/main2/lablist/labinfo[" + datagrid1.row + "]/prtldgnm", model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prtldgnm"))
										model.setValue("/root/main2/lablist/labinfo[" + datagrid1.row + "]/prcpdd", model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpdd"))
										var sdrugseq = model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq");
										if (sdrugseq == "99"){
											sdrugseq = "            ";
										}else{
											sdrugseq = "(" + sdrugseq + ")          ";
										}
										var slabname = sdrugseq + model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpnm");
										model.setValue("/root/main2/lablist/labinfo[" + datagrid1.row + "]/labname", slabname)
									}else{
										var slabname = model.getValue("/root/main2/lablist/labinfo[" + aa + "]/labname");
										var slabname = slabname + " / "  + model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpnm");
										model.setValue("/root/main2/lablist/labinfo[" + aa + "]/labname", slabname);
									}
								}else{
									k2 = k2 + 1;
								}
							}else{
								//copyNodesetType("/root/main1/prtlprcpprelist/prcplist/lablist", "/root/main2/lablist", "replace", model, model);
								if (k2 == 0){
									k1 = k1 + 1;
									irow = irow + 1;
									if (k1 == 1){
										copyNodesetType("/root/main1/prtlprcpprelist/prcplist", "/root/main3/prtlprcpprelist/prcplist", "replace", model, model);
										model.setValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/prtldgnm", sprtldgnm);
										model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/listyn", "N");
									}else{
										copyNodesetType("/root/main1/prtlprcpprelist/prcplist", "/root/main3/prtlprcpprelist/prcplist", "after", model, model);
										model.setValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/prtldgnm", sprtldgnm);
										model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/listyn", "N");
									}
								}

								if (datagrid1.rows > 1){
									model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/listyn", "Y");
									var x3 = 0;
									for (var x2 = 1; x2 < datagrid1.rows; x2 ++){
										x3 = x3 + 1;
										model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/lablist/labinfo[" + x3 + "]/prtldgnm", model.getValue("/root/main2/lablist/labinfo[" + x2 + "]/prtldgnm"));
										model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/lablist/labinfo[" + x3 + "]/prcpdd", model.getValue("/root/main2/lablist/labinfo[" + x2 + "]/prcpdd"));
										model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/lablist/labinfo[" + x3 + "]/labtitle", model.getValue("/root/main2/lablist/labinfo[" + x2 + "]/labtitle"));
										model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/lablist/labinfo[" + x3 + "]/labname", model.getValue("/root/main2/lablist/labinfo[" + x2 + "]/labname"));
									}
								}
								model.removeNodeset("/root/main2/lablist/labinfo");
								datagrid1.refresh();
								sprtldgnm = model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prtldgnm");
								if (sprcpgb == "D"){
									k2 = k2 + 1;
								}
							}
							if (sprcpgb == "D"){
								k1 = k1 + 1;
								irow = irow + 1;
								if (k1 == 1){
									copyNodesetType("/root/main1/prtlprcpprelist/prcplist", "/root/main/prtlprcpprelist/prcplist[" + i + "]", "replace", model, model);
									model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/listyn", "N");
								}else{
									copyNodesetType("/root/main1/prtlprcpprelist/prcplist", "/root/main/prtlprcpprelist/prcplist[" + i + "]", "after", model, model);
									model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/listyn", "N");
								}
							}
						}
						//copyNodesetType("/root/main1/prtlprcpprelist/prcplist/lablist", "/root/main2/lablist", "replace", model, model);
						if (k2 == 0){
							k1 = k1 + 1;
							irow = irow + 1;
							if (k1 == 1){
								copyNodesetType("/root/main1/prtlprcpprelist/prcplist", "/root/main3/prtlprcpprelist/prcplist", "replace", model, model);
								model.setValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/prtldgnm", sprtldgnm);
								model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/listyn", "N");
							}else{
								copyNodesetType("/root/main1/prtlprcpprelist/prcplist", "/root/main3/prtlprcpprelist/prcplist", "after", model, model);
								model.setValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/prtldgnm", sprtldgnm);
								model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/listyn", "N");
							}
						}
						if (datagrid1.rows > 1){
							model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/listyn", "Y");
							var x3 = 0;
							for (var x2 = 1; x2 < datagrid1.rows; x2 ++){
								x3 = x3 + 1;
								model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/lablist/labinfo[" + x3 + "]/prtldgnm", model.getValue("/root/main2/lablist/labinfo[" + x2 + "]/prtldgnm"));
								model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/lablist/labinfo[" + x3 + "]/prcpdd", model.getValue("/root/main2/lablist/labinfo[" + x2 + "]/prcpdd"));
								model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/lablist/labinfo[" + x3 + "]/labtitle", model.getValue("/root/main2/lablist/labinfo[" + x2 + "]/labtitle"));
								model.makeValue("/root/main1/prtlprcpprelist/prcplist[" + irow + "]/lablist/labinfo[" + x3 + "]/labname", model.getValue("/root/main2/lablist/labinfo[" + x2 + "]/labname"));
							}
						}

						model.refresh();
						copyNodesetType("/root/main1/prtlinfo", "/root/main/prtlinfo", "replace", model, model);
						
						// 20101015_laboru_경북대병원_경북대병원 용 출력물로 수정
						// CMC 출력물 버전 : RPADB01012
						for(var i = 1; i <= getNodesetCount("/root/main1/prtlprcpprelist/prcplist") ; i++) {
							model.setValue("root/main1/prtlprcpprelist/prcplist[" + i + "]/drugseq" , model.getValue("root/tempprcp/prtlprcpprelist/prcplist[" + i + "]/drugseq"));
							//model.setValue("root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq" , model.getValue("root/tempprcp/prtlprcpprelist/prcplist[" + i + "]/drugseq"));
						}
						exeReportPreview("RPADB01013", "XMLSTR", "", "", "false","false","","","","false", "","case4");
						//exeReportPreview("RPADB01011", "XMLSTR", "", "", "false","false","","","","false", "","case4");
					}
					
					function fOpenProtocolHist() {
						   /*질병정보 Set*/
						   model.setValue("/root/hidden/antisch/pid", model.getValue("/root/paminfo/list/pid"));
						   model.setValue("/root/hidden/antisch/cpgappno", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/cpgappno"));
						   if ( model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/cpgappno") !="0" ){
								setParameter("issave","N");   
								modal("SMADB01020",0,0,0,"SMADB01020","/root/hidden/antisch","/root/hidden/antisch");
								submit("TRADB01027");
							}
						   return;
						model.setValue("/root/send/srchdata/sickclscd",model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/sickclscd"));
						submit("TRADB01022");
						
						/*프로토콜정보 Set*/
						var endterm;
						var startterm;
						endterm = parseInt(model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/fromday"))+parseInt(model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/prtlterm"))-1;
						startterm =parseInt( model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/fromday"));
						model.setValue("/root/send/srchdata/prtlcd",model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/prtlcd"));	
						model.setValue("/root/main/prtlinfo/startterm",startterm);	
						model.setValue("/root/send/srchdata/fromday",model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/fromday"));	
						model.setValue("/root/main/prtlinfo/endterm",endterm);	
						model.setValue("/root/send/srchdata/antimetprtlcd","");	
						
						model.setValue("/root/send/srchdata/startdate", model.getValue("/root/main/prtlinfo/startdate"));
						model.setValue("/root/send/srchdata/startterm", model.getValue("/root/main/prtlinfo/startterm"));
						model.setValue("/root/send/srchdata/endterm", model.getValue("/root/main/prtlinfo/endterm"));
			
						submit("TRADB01023");
						if ( grd_antimetlist.rows>1){
							//alert(model.getValue("/root/main/prtllinklist/item[1]/antimetprtlcd"));
							model.setValue("/root/send/srchdata/antimetprtlcd", model.getValue("/root/main/prtllinklist/item[1]/antimetprtlcd"));
						}
						
						submit("TRADB01024");
						submit("TRADB01025");
						submit("TRADB01026");	
						grd_prtlprcp1.caption="D"+startterm+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
						grd_prtlprcp2.caption="D"+(parseInt(startterm)+1)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
						grd_prtlprcp3.caption="D"+(parseInt(startterm)+2)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
						grd_prtlprcp4.caption="D"+(parseInt(startterm)+3)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
						grd_prtlprcp5.caption="D"+(parseInt(startterm)+4)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
						
						//grd_prtlprcp1.fixedcellcheckbox(0,0)=true;
						fGrdRebuildStyle();
						fSetAntimetColor();
						
						
						model.setValue("/root/main/prtlinfo/startdate", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/appdd"));
						model.setValue("/root/send/data/orderdata/cpgappno", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/cpgappno"));
						model.setValue("/root/main/prtlinfo/drugstage", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/drugstage"));
						model.setValue("/root/main/prtlinfo/drugcycle", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/drugcycle"));
						model.setValue("/root/main/data/ht", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/ht"));
						model.setValue("/root/main/data/wtflag", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/wtflag"));
						model.setValue("/root/main/data/wt", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/wt"));
						model.setValue("/root/main/data/ibw", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/ibw"));
						model.setValue("/root/main/data/bsa", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/bsa"));
						model.setValue("/root/main/data/gfrflag", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/gfrflag"));
						model.setValue("/root/main/data/gfr", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/gfr"));
						model.setValue("/root/main/data/sendage", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/age"));
						model.setValue("/root/main/data/sexrate", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/sexrate"));
						model.setValue("/root/main/data/sc", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/sc"));
						model.setValue("/root/main/data/urvol", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/urvol"));
						model.setValue("/root/main/data/urcr", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/urcr"));
						model.setValue("/root/main/data/auc", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/auc"));
						model.setValue("/root/main/data/carbovol", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/carbovol"));
						fSetIBW();
						//model.refresh();
						
						/*계산*/
						fCalcVol();
						
						/*적용*/
						
						fSetVol();
						model.refresh();						
					}
					
					function fSetGrdColor() {
						for (i = 0; i < grd_prtlprcpprelist.rows; i++) {						
							if (model.getValue("/root/main/prtlprcpprelist/prcplist["+ i+"]/absnyn") == "Y") { // 품절표시
								grd_prtlprcpprelist.cellstyle("background-color", i, grd_prtlprcpprelist.colRef("prcpnm"))="#ff4848";
								//grd_prtlprcpprelist.rowStyle(i, "data", "background-color") = "#ff4848" ;
							} else if (model.getValue("/root/main/prtlprcpprelist/prcplist["+ i+"]/clincstdyflag") == "Y") { // 임상표시
								grd_prtlprcpprelist.cellstyle("background-color", i, grd_prtlprcpprelist.colRef("prcpnm"))="#ffbb00";
								//grd_prtlprcpprelist.rowStyle(i, "data", "background-color") = "#ffbb00" ;
							}
						}

						for (i = 0; i < grd_prtlprcp1.rows; i++) {						
							if (model.getValue("/root/main/prtlprcplist/item1["+ i +"]/absnyn") == "Y") { // 품절표시
								grd_prtlprcp1.cellstyle("background-color", i, grd_prtlprcp1.colRef("prcpnm"))="#ff4848";
								//grd_prtlprcp1.rowStyle(i, "data", "background-color") = "#ff4848" ;
							} else if (model.getValue("/root/main/prtlprcplist/item1["+ i +"]/clincstdyflag") == "Y") { // 임상표시
								grd_prtlprcp1.cellstyle("background-color", i, grd_prtlprcp1.colRef("prcpnm"))="#ffbb00";
								//grd_prtlprcp1.rowStyle(i, "data", "background-color") = "#ffbb00" ;
							}
						}

						for (i = 0; i < grd_prtlprcp2.rows; i++) {						
							if (model.getValue("/root/main/prtlprcplist/item2["+ i +"]/absnyn") == "Y") { // 품절표시
								grd_prtlprcp2.cellstyle("background-color", i, grd_prtlprcp2.colRef("prcpnm"))="#ff4848";
								//grd_prtlprcp2.rowStyle(i, "data", "background-color") = "#ff4848" ;
							} else if (model.getValue("/root/main/prtlprcplist/item2["+ i +"]/clincstdyflag") == "Y") { // 임상표시
								grd_prtlprcp2.cellstyle("background-color", i, grd_prtlprcp2.colRef("prcpnm"))="#ffbb00";
								//grd_prtlprcp2.rowStyle(i, "data", "background-color") = "#ffbb00" ;
							}
						}

						for (i = 0; i < grd_prtlprcp3.rows; i++) {						
							if (model.getValue("/root/main/prtlprcplist/item3["+ i +"]/absnyn") == "Y") { // 품절표시
								grd_prtlprcp3.cellstyle("background-color", i, grd_prtlprcp3.colRef("prcpnm"))="#ff4848";
								//grd_prtlprcp3.rowStyle(i, "data", "background-color") = "#ff4848" ;
							} else if (model.getValue("/root/main/prtlprcplist/item3["+ i +"]/clincstdyflag") == "Y") { // 임상표시
								grd_prtlprcp3.cellstyle("background-color", i, grd_prtlprcp3.colRef("prcpnm"))="#ffbb00";
								//grd_prtlprcp3.rowStyle(i, "data", "background-color") = "#ffbb00" ;
							}
						}

						for (i = 0; i < grd_prtlprcp4.rows; i++) {						
							if (model.getValue("/root/main/prtlprcplist/item4["+ i +"]/absnyn") == "Y") { // 품절표시
								grd_prtlprcp4.cellstyle("background-color", i, grd_prtlprcp4.colRef("prcpnm"))="#ff4848";
								//grd_prtlprcp4.rowStyle(i, "data", "background-color") = "#ff4848" ;
							} else if (model.getValue("/root/main/prtlprcplist/item4["+ i +"]/clincstdyflag") == "Y") { // 임상표시
								grd_prtlprcp4.cellstyle("background-color", i, grd_prtlprcp4.colRef("prcpnm"))="#ffbb00";
								//grd_prtlprcp4.rowStyle(i, "data", "background-color") = "#ffbb00" ;
							}
						}

						for (i = 0; i < grd_prtlprcp5.rows; i++) {						
							if (model.getValue("/root/main/prtlprcplist/item5["+ i +"]/absnyn") == "Y") { // 품절표시
								grd_prtlprcp5.cellstyle("background-color", i, grd_prtlprcp5.colRef("prcpnm"))="#ff4848";
								//grd_prtlprcp5.rowStyle(i, "data", "background-color") = "#ff4848" ;
							} else if (model.getValue("/root/main/prtlprcplist/item5["+ i +"]/clincstdyflag") == "Y") { // 임상표시
								grd_prtlprcp5.cellstyle("background-color", i, grd_prtlprcp5.colRef("prcpnm"))="#ffbb00";
								//grd_prtlprcp5.rowStyle(i, "data", "background-color") = "#ffbb00" ;
							}
						}	
						model.refresh();
					}
				]]>
			</script>
			<submission id="TRZBC00101" method="post"/>
			<submission id="TRZSD00109" mediatype="application/x-www-form-urlencoded" method="post" replace="instance"/>
			<submission id="TRADB01022" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/srchdata" replace="instance" resultref="/root/main/prtllist"/>
			<submission id="TRADB01023" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/srchdata" replace="instance" resultref="/root/main/prtllinklist"/>
			<submission id="TRADB01024" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/srchdata" replace="instance" resultref="/root/main/prtlprcplist"/>
			<submission id="TRADB01025" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/srchdata" replace="instance" resultref="/root/main/prtlprcpvollist"/>
			<submission id="TRADB01026" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/srchdata" replace="instance" resultref="/root/main/prtlprcpprelist"/>
			<submission id="TRADB01027" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/srchdata" replace="instance" resultref="/root/main/prtlhislist"/>
			<submission id="TRADB01029" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/data" replace="instance" resultref="/root/temp/ret"/>
			<submission id="TRADB01030" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/data" replace="instance" resultref="/root/main/prtlprcpprelist"/>
			<submission id="TRMMO00116" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/orddept"/>
			<submission id="TXADB01021" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/data" replace="instance" resultref="/root/temp/ret"/>
			<submission id="TXADB01022" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/data" replace="instance" resultref="/root/temp/ret"/>
			<submission id="TXADB01023" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/temp/ret1"/>
			<submission id="TRMMB04101" mediatype="application/x-www-form-urlencoded" method="post"/>
			<submission id="TRADB01031" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/result"/>
			<submission id="TXADB01025" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/temp1/saveprcprslt"/>
			<submission id="TXADB01027" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/temp1/saveprcprslt"/>
			<submission id="TRMMO00105" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/main/diaginfo"/>
			<submission id="TRADB01038" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/srchdata" replace="instance" resultref="/root/hidden/dupcheck"/>
			<submission id="TRADB01039" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/srchdata" replace="instance" resultref="/root/hidden/editcheck"/>
			<submission id="TRADB01041" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/clincstdy" replace="instance" resultref="/root/hidden/clincstdycheck"/>
			<submission id="TRMMO15701" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/temp/send" resultref="/root/temp/patsupkind"/>
			<bind id="bind1" ref="/root/main/prtlprcplist/item1/drprcpetc8" readonly="../prcpclscd != &quot;A2&quot;"/>
			<bind id="bind2" ref="/root/main/prtlprcplist/item2/drprcpetc8" readonly="../prcpclscd != &quot;A2&quot;"/>
			<bind id="bind3" ref="/root/main/prtlprcplist/item3/drprcpetc8" readonly="../prcpclscd != &quot;A2&quot;"/>
			<bind id="bind4" ref="/root/main/prtlprcplist/item4/drprcpetc8" readonly="../prcpclscd != &quot;A2&quot;"/>
			<bind id="bind5" ref="/root/main/prtlprcplist/item5/drprcpetc8" readonly="../prcpclscd != &quot;A2&quot;"/>
			<script type="javascript" ev:event="xforms-model-construct-done">
				<![CDATA[
					var colHidnValue = grdBaseColHidn("D");
					grdBaseColHidn(colHidnValue, "grd_prtlprcplist", 40, "prcpvol", "prcpqty", "drprcpetc7", "drprcpetc8", 42) ;
					grdBaseColHidn(colHidnValue, "grd_prtlprcp1", 47, "prcpvol", "prcpqty", "drprcpetc7", "drprcpetc8", 39); 
					grdBaseColHidn(colHidnValue, "grd_prtlprcp2", 47, "prcpvol", "prcpqty", "drprcpetc7", "drprcpetc8", 39); 
					grdBaseColHidn(colHidnValue, "grd_prtlprcp3", 47, "prcpvol", "prcpqty", "drprcpetc7", "drprcpetc8", 39); 
					grdBaseColHidn(colHidnValue, "grd_prtlprcp4", 47, "prcpvol", "prcpqty", "drprcpetc7", "drprcpetc8", 39); 
					grdBaseColHidn(colHidnValue, "grd_prtlprcp5", 47, "prcpvol", "prcpqty", "drprcpetc7", "drprcpetc8", 39); 
					grdBaseColHidn(colHidnValue, "grd_prtlprcpprelist", 51, "prcpvol", "prcpqty", "drprcpetc7", "drprcpetc8", 56); 
				]]>
			</script>
			<script type="javascript" ev:event="xforms-close">
				<![CDATA[
					if (model.getValue("/root/hidden/saveyn") =="Y") {
						var sSickclscd         = model.getValue("/root/main/prtlhislist/item/sickclscd");
						var sPrtlcd               = model.getValue("/root/main/prtlhislist/item/prtlcd");
						var sMinsubtrvolRate = model.getValue("/root/main/prtlhislist/item/minsubtrvolrate");

						opener.javascript.setParameter("SMADB01000_saveyn", "Y");
						opener.javascript.setParameter("SMADB01000_prcpnm", "(" + sSickclscd + ")" + sPrtlcd + "[" + sMinsubtrvolRate + "]");
					}
				]]>
			</script>
		</model>
		<script type="javascript" src="../../../com/commonweb/js/common.js"/>
		<script type="javascript" src="../../../com/commonweb/js/tfHelper.js"/>
		<script type="javascript" src="../../../com/commonweb/js/dateHelper.js"/>
		<script type="javascript" src="../../../com/basiccodeweb/js/ZBC001.js"/>
		<script type="javascript" src="../../../com/departmentcodeweb/js/ZSD001.js"/>
		<script type="javascript" src="../../../emr/prcpmngtweb/js/MMO001.js"/>
		<script type="javascript" src="../../../emr/prcpmngtweb/js/SMMMO00100.js"/>
		<script type="javascript" src="../../../ast/pharmacyprotocolweb/js/SMADB01000.js"/>
		<script type="javascript" src="../../../emr/commonweb/js/EMRCommon.js"/>
		<script type="javascript" src="../../../com/signweb/js/ZES001.js"/>
	</xhtml:head>
	<xhtml:body visibility="visible" pagewidth="1212" pageheight="784" guideline="1,1198;1,1196;2,781;" style="margin-left:8; margin-top:0; margin-right:8; margin-bottom:0; ">
		<group id="group1" style="left:0px; top:0px; width:1194px; height:13px; ">
			<caption id="caption19" class="tit_1" style="left:0px; top:0px; width:178px; height:14px; ">항암프로토콜 처방</caption>
		</group>
		<group id="group3" scroll="auto" style="left:0px; top:40px; width:1195px; height:744px; ">
			<button id="button1" class="btn_sw" group="tab" selected="true" style="left:5px; top:10px; width:90px; height:22px; ">
				<caption>항암프로토콜</caption>
				<toggle case="case2" ev:event="onclick"/>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						//removeReportPreview();
					]]>
				</script>
			</button>
			<switch id="switch1" style="left:5px; top:31px; width:1190px; height:708px; border-color:#c7a3cf; border-style:solid; ">
				<case id="case1">
					<shape id="roundrect1" appearance="roundrect" ellipsewidth="10" ellipseheight="10" style="left:1072px; top:8px; width:105px; height:20px; background-color:#ffffff; border-color:#3366ff; "/>
					<shape id="rectangle1" appearance="rectangle" style="left:1079px; top:12px; width:13px; height:13px; background-color:#ff4848; border-color:#000000; "/>
					<caption id="caption20" style="left:1095px; top:10px; width:27px; height:19px; ">
						<![CDATA[품절]]>
						<hint>
							<![CDATA[약품 품절]]>
						</hint>
					</caption>
					<shape id="rectangle2" appearance="rectangle" style="left:1129px; top:12px; width:13px; height:13px; background-color:#ffbb00; border-color:#000000; "/>
					<caption id="caption21" style="left:1145px; top:10px; width:30px; height:19px; ">
						<![CDATA[임상]]>
						<hint>
							<![CDATA[임상연구]]>
						</hint>
					</caption>
					<datagrid id="grd_prtlprcpprelist" nodeset="/root/main/prtlprcpprelist/prcplist" class="datagrid2" caption="^D^투여&#xA;시점^투약시간^MIX^코드^처방명^급여^적용&#xA;방법^BSA/&#xA;AUC^KG당&#xA;용량^1일용량^1회용량^1회용량^1일수량^1회수량^1회수량^투여&#xA;속도^단위^횟수^복용법/검체^복용법/검체명^PRN^전달사항^투여기간^실행부서^caption1^caption2^caption3^처방일^처방%^감량사유^종류^항암제&#xA;여부^품절여부^임상&#xA;연구" colsep="^" colwidth="3, 27, 32, 37, 33, 80, 190, 45, 45, 40, 40, 40, 45, 35, 45, 30, 35, 35, 35, 35, 75, 90, 34, 55, 70, 80, 100, 100, 100, 0, 45, 100, 0, 0, 0, 30" mergecells="byrestriccol" mergecellsfixedrows="bycolrec" rowsep="|" style="left:0px; top:30px; width:1187px; height:660px; ">
						<col ref="tempprcpflag"/>
						<col ref="prtldgnm"/>
						<col ref="drugseq"/>
						<col ref="drugtt" visibility="hidden"/>
						<col ref="prcpmixno"/>
						<col ref="prcpcd"/>
						<col ref="prcpnm" style="left:212px; top:32px; width:200px; height:23px; "/>
						<col disabled="false" ref="payflagcd" type="combo">
							<choices>
								<itemset nodeset="/root/init/comboitem/payflagcd/P0104">
									<label ref="cdnm"/>
									<value ref="cdid"/>
								</itemset>
							</choices>
						</col>
						<col disabled="true" ref="volkind" type="combo">
							<choices>
								<item>
									<label>-</label>
									<value>0</value>
								</item>
								<item>
									<label>BSA</label>
									<value>1</value>
								</item>
								<item>
									<label>KG</label>
									<value>2</value>
								</item>
								<item>
									<label>AUC</label>
									<value>3</value>
								</item>
							</choices>
						</col>
						<col ref="bsavol" style="text-align:right; "/>
						<col ref="kgvol" style="text-align:right; "/>
						<col disabled="true" ref="prcpvol" type="input" style="text-align:right; "/>
						<col disabled="true" ref="drprcpetc7" type="input" style="text-align:right; "/>
						<col ref="prcpvolunitnm"/>
						<col disabled="true" ref="prcpqty" type="input" style="text-align:right; "/>
						<col disabled="true" ref="drprcpetc8" type="input" style="text-align:right; "/>
						<col ref="prcpqtyunitnm"/>
						<col ref="drugspd" style="text-align:center; "/>
						<col ref="drugspdunitnm" style="text-align:center; "/>
						<col ref="prcptims" style="text-align:center; "/>
						<col ref="drugmthdspccd" visibility="hidden"/>
						<col ref="drugmthdspccdnm"/>
						<col checkvalue="Y,N" disabled="true" ref="prnprcpflag" type="checkbox"/>
						<col ref="remark"/>
						<col ref="nursrem"/>
						<col ref="prcpexecdeptcd" visibility="hidden"/>
						<col ref="ordseqno" visibility="hidden"/>
						<col ref="volrate" visibility="hidden"/>
						<col ref="prtlkind" visibility="hidden"/>
						<col ref="prcpdd" format="yyyy-mm-dd" style="text-align:center; "/>
						<col ref="subtrvolrate" style="text-align:center; "/>
						<col disabled="true" ref="subtrvolresn" type="combo">
							<choices>
								<item>
									<label>간장기능저하</label>
									<value>1</value>
								</item>
								<item>
									<label>신장기능저하</label>
									<value>2</value>
								</item>
								<item>
									<label>PS 저하</label>
									<value>3</value>
								</item>
								<item>
									<label>BoneMarrow Suppression</label>
									<value>4</value>
								</item>
								<item>
									<label>기타</label>
									<value>9</value>
								</item>
							</choices>
						</col>
						<col ref="prnprcpdtl" visibility="hidden"/>
						<col ref="spcldrugyn" visibility="hidden"/>
						<col ref="absnyn" visibility="hidden"/>
						<col ref="clincstdyflag" style="text-align:center; "/>
						<script type="javascript" ev:event="onclick">
							<![CDATA[
								if ( grd_prtlprcpprelist.col == grd_prtlprcpprelist.colRef("remark") ){
									model.setValue("/root/init/rem", model.getValue( "/root/main/prtlprcpprelist/prcplist["+grd_prtlprcpprelist.row+"]/remark") );
									model.refresh();
									group6.visible= true;
								} else if ( grd_prtlprcpprelist.col == grd_prtlprcpprelist.colRef("nursrem") ){
									model.setValue("/root/init/rem", model.getValue( "/root/main/prtlprcpprelist/prcplist["+grd_prtlprcpprelist.row+"]/nursrem") );
									model.refresh();
									group6.visible= true;
								} else {
									group6.visible= false;
								}
							]]>
						</script>
						<script type="javascript" ev:event="onendedit">
							<![CDATA[
								if ( grd_prtlprcpprelist.col== grd_prtlprcpprelist.colRef("prcpqty") ){
									/* 용량재계산 */
									var volrate = model.getValue("/root/main/prtlprcpprelist/prcplist["+grd_prtlprcpprelist.row+"]/volrate");
									var prcpvol = model.getValue("/root/main/prtlprcpprelist/prcplist["+grd_prtlprcpprelist.row+"]/prcpvol");
									var prcpqty = model.getValue("/root/main/prtlprcpprelist/prcplist["+grd_prtlprcpprelist.row+"]/prcpqty");
									model.setValue("/root/main/prtlprcpprelist/prcplist["+grd_prtlprcpprelist.row+"]/prcpvol", Math.round(  parseFloat(prcpqty)*parseFloat(volrate) * 1000) /1000);
									model.refresh();
									return;
								}
								
								if ( grd_prtlprcpprelist.col== grd_prtlprcpprelist.colRef("prcpvol") ){
									/* 수량재계산 */
									
									var volrate = model.getValue("/root/main/prtlprcpprelist/prcplist["+grd_prtlprcpprelist.row+"]/volrate");
									var prcpvol = model.getValue("/root/main/prtlprcpprelist/prcplist["+grd_prtlprcpprelist.row+"]/prcpvol");
									var prcpqty = model.getValue("/root/main/prtlprcpprelist/prcplist["+grd_prtlprcpprelist.row+"]/prcpqty");
									model.setValue("/root/main/prtlprcpprelist/prcplist["+grd_prtlprcpprelist.row+"]/prcpqty", Math.round(  parseFloat(prcpvol)/parseFloat(volrate)* 1000) /1000);
									model.refresh();						
									return;
								}
							]]>
						</script>
					</datagrid>
					<group id="group6" visibility="hidden" style="left:770px; top:55px; width:240px; height:230px; border-color:#000080; border-width:2; border-style:solid; ">
						<textarea id="tar_rem" ref="/root/init/rem" style="left:3px; top:3px; width:230px; height:200px; "/>
						<button id="button90" class="btn2_letter2" style="left:191px; top:205px; width:42px; height:19px; ">
							<caption>닫기</caption>
							<script type="javascript" ev:event="DOMActivate">
								<![CDATA[
									group6.visible= false;
								]]>
							</script>
						</button>
					</group>
				</case>
				<case id="case2" selected="true">
					<switch id="switch2" style="left:265px; top:55px; width:915px; height:650px; border-color:#c7a3cf; border-style:solid; ">
						<case id="case3">
							<group id="group5" style="left:0px; top:0px; width:455px; height:215px; ">
								<shape id="roundrect2" appearance="roundrect" ellipsewidth="10" ellipseheight="10" style="left:0px; top:0px; width:455px; height:215px; background-color:#fffbf2; border-color:#ffd799; "/>
								<caption id="caption4" class="search_name" style="left:5px; top:5px; width:260px; height:17px; ">프로토콜 이력</caption>
								<datagrid id="grd_prtlhislist" nodeset="/root/main/prtlhislist/item" autoresize="false" caption="차수^차수^프로토콜^시작일자^적용기간^진행^입외^체중^감량률^Cr^목적^사전신청항암제" colsep="^" colwidth="20, 20, 110, 69, 55, 32, 35, 30, 56, 35, 100, 100" ellipsis="true" mergecellsfixedrows="bycolrec" rowsep="|" tooltip="true" style="left:5px; top:25px; width:445px; height:185px; ">
									<col ref="drugstage" style="text-align:center; "/>
									<col ref="drugcycle" style="text-align:center; "/>
									<col ref="prtlnm"/>
									<col ref="appdd" format="yyyy-mm-dd" style="text-align:right; "/>
									<col ref="appterm" style="text-align:center; "/>
									<col ref="acptno" format="yyyy-mm-dd" style="text-align:center; "/>
									<col disabled="true" ref="ioflag" type="combo">
										<choices>
											<item>
												<label>입원</label>
												<value>I</value>
											</item>
											<item>
												<label>외래</label>
												<value>O</value>
											</item>
										</choices>
									</col>
									<col ref="wt" style="text-align:center; "/>
									<col ref="minsubtrvolrate"/>
									<col ref="sc" style="text-align:center; "/>
									<col ref="usegoalnm" style="text-align:center; "/>
									<col ref="prereqyn"/>
									<col ref="prtlcd" visibility="hidden"/>
									<script type="javascript" ev:event="onmousedown">
										<![CDATA[
											setPopupMenu("grd_prtlhislist", false, "/root/init/phmenu/item", "name", "func");
										]]>
									</script>
									<script type="javascript" ev:event="ondblclick">
										<![CDATA[
											if(group2.visible == true) return; // 용량계산창이 열려 있으면 다른 프로토콜로 변경 불가능 하도록 처리(이전 프로토콜 복사 처방시 프로토콜 변경여부를 체크하기위해) 엄영만 2011.12.08
											if ( ! isDataCell() ) return;  
											var row = grd_prtlhislist.row;
											
											var sPreIOFlag  = model.getValue("/root/main/prtlhislist/item[" + row + "]/ioflag");   // 복사 처방시 입원, 외래 체크
											var sNewOFlag = model.getValue("root/paminfo/list/ioflag");  								     // 복사 처방시 입원, 외래 체크
											if (sPreIOFlag == "O" || sPreIOFlag == "S") {
												sPreIOFlag = "O";
											} else {
												sPreIOFlag = "I";
											}
											
											if (sNewOFlag == "O" || sNewOFlag == "S") {
												sNewOFlag = "O";
											} else {
												sNewOFlag = "I";
											}
											
											if (sPreIOFlag != sNewOFlag) { // 기존 프로토콜과 현재 프로토콜의 입원/외래 구분 체크
												if( sPreIOFlag == "I") {
													alert("이전 [입원] 항암 프로토콜을 외래 환자에게 발행 할수 없습니다.\n\n좌측 질병정보에서 항암 프로토콜을 다시 선택 후 진행 가능합니다.\n\n문의사항 : 약제부 본원(5202) 칠곡(2441)");
												} else {
													alert("이전 [외래] 항암 프로토콜을 입원 환자에게 발행 할수 없습니다.\n\n좌측 질병정보에서 항암 프로토콜을 다시 선택 후 진행 가능합니다.\n\n문의사항 : 약제부 본원(5202) 칠곡(2441)");
												}
												return;
											}
											
											if(isNull(model.getValue("/root/main/prtlhislist/item[" + row + "]/orgprtlnm"))) {
												alert("종료된  항암 프로토콜입니다.\n질병정보를 선택후 항암 프로토콜을 다시 선택 하세요.\n\n문의사항 : 약제부 본원(5202) 칠곡(2441)");
												return;
											}
											
											model.removeNodeset("/root/init/termcdlist/termcdinfo");
											model.makeNode("/root/init/termcdlist/termcdinfo");
											var irow = 0;
											var val = 0;
												
											model.setValue("/root/send/srchdata/prtlcd",           	model.getValue("/root/main/prtlhislist/item[" + row + "]/prtlcd"));	
											model.setValue("/root/send/srchdata/fromday",       	model.getValue("/root/main/prtlhislist/item[" + row + "]/fromday"));
											model.setValue("/root/send/srchdata/antimetprtlcd",	"");	
											model.setValue("/root/main/prtlinfo/startterm",         	model.getValue("/root/main/prtlhislist/item[" + row + "]/fromday"));
											model.setValue("/root/main/prtlinfo/endterm",          	model.getValue("/root/main/prtlhislist/item[" + row + "]/prtlterm"));
											model.setValue("/root/main/prtlinfo/ableprcp",         	model.getValue("/root/main/prtlhislist/item[" + row + "]/ableprcp")); // 복사처방 가능여부 설정(프로토콜 변경여부) 엄영만 2011.12.08
											model.setValue("/root/main/prtlinfo/ioflag",              	model.getValue("/root/main/prtlhislist/item[" + row + "]/ioflag"));      // 복사처방 가능여부 설정(입원/외래구분) 엄영만 2012.11.06
											
											var startterm = model.getValue("/root/main/prtlinfo/startterm");
											var endterm  = model.getValue("/root/main/prtlinfo/endterm");
											
											for(var i = startterm ; i <= endterm; i++) {
												val = i;
												irow ++;
												
												model.makeValue("/root/init/termcdlist/termcdinfo[" + irow + "]/cdid", val);
												model.makeValue("/root/init/termcdlist/termcdinfo[" + irow + "]/cdnm", val);
											}	
											
											model.setValue("/root/main/prtlinfo/drugcycle",		model.getValue("/root/main/prtlhislist/item[" + row + "]/drugcycle"));
											model.setValue("/root/main/prtlinfo/drugstage",		model.getValue("/root/main/prtlhislist/item[" + row + "]/drugstage"));
											model.setValue("/root/main/prtlinfo/prereqyn",		model.getValue("/root/main/prtlhislist/item[" + row + "]/prereqyn"));
											model.setValue("/root/main/prtlinfo/usegoal",         model.getValue("/root/main/prtlhislist/item[" + row + "]/usegoal"));  // 사용목적 복사 2017.04.25 채의수교수님 요청
												
											if (model.getValue("/root/main/prtlinfo/startdate") == "" ){
												model.setValue("/root/main/prtlinfo/startdate", getCurrentDate());
											}
											
											model.setValue("/root/send/srchdata/startdate", 			model.getValue("/root/main/prtlinfo/startdate"));
											model.setValue("/root/send/srchdata/startterm", 			model.getValue("/root/main/prtlinfo/startterm"));
											model.setValue("/root/send/srchdata/endterm", 			model.getValue("/root/main/prtlinfo/endterm"));
											model.setValue("/root/send/srchdata/sickclscd", 			model.getValue("/root/main/prtlhislist/item[" + row + "]/sickclscd"));
											model.makeValue("/root/send/srchdata/ioflag", 				model.getValue("root/paminfo/list/ioflag"));
											submit("TRADB01023",false);

											submit("TRADB01024", false);
											submit("TRADB01025");
											
											var chkAUC     = "N";
											var chkAUCvol = "";
											for (  i =0; i<grd_prtlprcplist.rows-1 ;i++){
												if ( model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/volkind") =="3" ) {
													chkAUC     = "Y";
													chkAUCvol = model.getValue("/root/main/prtlprcpvollist/item[" + (i+1) + "]/bsavol");
												}
											}
											if ( chkAUC =="N"){
												model.setValue("/root/main/data/auc", "");
											} else {
												model.setValue("/root/main/data/auc", chkAUCvol);  // 2014.08.07 프로토콜의 AUC 값으로 설정 하도록 수정. 엄영만
											}
											submit("TRADB01026", false);	

											model.setValue("/root/main/prtlinfo/d1nm", "D"+startterm);
											model.setValue("/root/main/prtlinfo/d2nm", "D"+ (parseInt(startterm)+1));
											model.setValue("/root/main/prtlinfo/d3nm", "D"+ (parseInt(startterm)+2));
											model.setValue("/root/main/prtlinfo/d4nm", "D"+ (parseInt(startterm)+3));
											model.setValue("/root/main/prtlinfo/d5nm", "D"+ (parseInt(startterm)+4));
											
											fGrdRebuildStyle(); // 색깔 초기화

											model.setValue("/root/hidden/calcyn","N");
											model.setValue("/root/hidden/calappyn","N"); // 계산된 용량 적용여부
						
											model.setValue("/root/hidden/subtrvolyn","N");
											model.setValue("/root/main/data/age", model.getValue("/root/send/srchdata/receivedata/age"));
											
											model.setValue("/root/send/data/orderdata/cpgappno", "");
											
											model.setValue("/root/main/prtlinfo/currentpg","1");
											model.setValue("/root/main/prtlinfo/totpg",Math.ceil((parseInt(endterm)-parseInt(startterm)+1)/5));
											
											// 20101015_laboru_경북대병원_투여시점 시간 단위로 보이게 수정(소수점 셋째 자리에서 반올림)
											model.removeNodeset("/root/tempprcp/prtlprcpprelist/prcplist");
											model.makeNode("root/tempprcp/prtlprcpprelist/prcplist");
											copyNodesetType("root/tempprcp/prtlprcpprelist/prcplist", "root/main/prtlprcpprelist/prcplist", "replace");
											
											for(var i=1 ; i <= getNodesetCount("/root/main/prtlprcpprelist/prcplist") ; i++) {
												var drugseq = model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq");
												var drugseqhr = Math.round( (parseInt(drugseq)/60) * 100 ) / 100;
																					
												model.setValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq", drugseqhr);									
											}
											
											// 2017.04.17 항암프로토콜 복사시 로직 추가
											if(fContainsHardCD("562", "Y")) {
												model.setValue("/root/main/data/ht", model.getValue("/root/main/prtlhislist/item[" + row + "]/ht"));      // 신장
												model.setValue("/root/main/data/wt", model.getValue("/root/main/prtlhislist/item[" + row + "]/wt"));     // 체중
												model.setValue("/root/main/data/sc", model.getValue("/root/main/prtlhislist/item[" + row + "]/sc"));    // Serum Creatinine
												
												model.setValue("/root/hidden/subtrvol/subtrvolrate",  model.getValue("/root/main/prtlhislist/item[" + row + "]/maxsubtrvolrate"));    // 감량률
												model.setValue("/root/hidden/subtrvol/subtrvolresn", model.getValue("/root/main/prtlhislist/item[" + row + "]/minsubtrvolresn"));    // 감량사유
												
												group2.visible= true;                      // 용량계산화면 활성화
												btn_calc.dispatch("DOMActivate");  // 계산버튼
												
												if(model.getValue("/root/hidden/subtrvol/subtrvolrate") != "100") {
													button11.dispatch("DOMActivate");  // 일괄적용
												}
											}
											
											model.refresh();
											
											fSetGrdColor();
										]]>
									</script>
									<script type="javascript" ev:event="DOMFocusOut">
										<![CDATA[
											initPopupMenu();
										]]>
									</script>
								</datagrid>
							</group>
							<datagrid id="grd_prtlprcp1" nodeset="/root/main/prtlprcplist/item1" caption="^코드^처방명^BSA용량^용량^용량^단위^횟수^수량^수량^단위^급여구분^종류^처방%^감량사유^^^" colsep="^" colwidth="31, 73, 100, 54, 47, 47, 37, 31, 39, 38, 39, 60, 36, 42, 100, 1, 0, 100" ellipsis="true" mergecellsfixedrows="bycolrec" rowsep="|" tooltip="true" style="left:455px; top:0px; width:455px; height:215px; ">
								<col ref="prcpmixno"/>
								<col ref="prcpcd"/>
								<col ref="prcpnm"/>
								<col ref="bsavol" style="text-align:right; "/>
								<col ref="prcpvol" style="text-align:right; "/>
								<col ref="drprcpetc7" format="##.##" style="text-align:right; "/>
								<col ref="prcpvolunitnm"/>
								<col ref="prcptims" style="text-align:right; "/>
								<col ref="prcpqty"/>
								<col ref="drprcpetc8" type="input" format="##.##" style="text-align:right; "/>
								<col ref="prcpqtyunitnm"/>
								<col ref="payflagcd" type="combo" style="text-align:center; ">
									<choices>
										<itemset nodeset="/root/init/payflagcd/M0029">
											<label ref="cdnm"/>
											<value ref="cdid"/>
										</itemset>
									</choices>
								</col>
								<col ref="prtlkind" visibility="hidden"/>
								<col ref="subtrvolrate"/>
								<col disabled="true" ref="subtrvolresn" type="combo">
									<choices>
										<item>
											<label>간장기능저하</label>
											<value>1</value>
										</item>
										<item>
											<label>신장기능저하</label>
											<value>2</value>
										</item>
										<item>
											<label>PS 저하</label>
											<value>3</value>
										</item>
										<item>
											<label>BoneMarrow Suppression</label>
											<value>4</value>
										</item>
										<item>
											<label>기타</label>
											<value>9</value>
										</item>
									</choices>
								</col>
								<col ref="ordseqno"/>
								<col ref="volrate"/>
								<col ref="prnprcpdtl" visibility="hidden"/>
								<script type="javascript" ev:event="xforms-value-changed">
									<![CDATA[
										if (grd_prtlprcp1.col== grd_prtlprcp1.colRef("payflagcd")){ // 급여구분
											var sPrcpCd 		= model.getValue("/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/prcpcd");
											var sOrdSeqNo 	= model.getValue("/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/ordseqno");
											var sPayFlagCd = model.getValue("/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/payflagcd");
											
											for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
												if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== sPrcpCd) {
													if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/ordseqno")== sOrdSeqNo) {
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/payflagcd", sPayFlagCd);
													}
												}
											}
										}
									]]>
								</script>
								<script type="javascript" ev:event="onendedit">
									<![CDATA[
										if (grd_prtlprcp1.col== grd_prtlprcp1.colRef("drprcpetc8")){ // 1회수량
											var calcPrcpVol = 0;
											var calcPrcpQty = 0;
											var calcPrcpTimeVol = 0;
											var calcPrcpTimeQty = 0;
											
											//20090820 마정민 수정. 약인 경우는 최초의 용량 수량 비율로 계산하는 것으로 수정
											var calcmthdcd  = getArrayData ( model.getValue ( "/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/drugmastspec" ) + "^", 0, 16, "^", "|" ); 
										    
											var drprcpetc8     = model.getValue ( "/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/drprcpetc8" );    // 1회 수량
											var PrcpTims      = model.getValue ( "/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/prcptims" );      // 횟수
											var baseTimeVol = model.getValue ( "/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/basetimevol" );
											var baseTimeQty = model.getValue ( "/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/basetimeqty" );
											
											var sPrcpCd 		  = model.getValue("/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/prcpcd");
											var sOrdSeqNo 	  = model.getValue("/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/ordseqno");
											
								            calcPrcpTimeVol = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseTimeVol)*1000; 
											calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 
															
											//계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
											if(calcmthdcd == "1"){
												calcPrcpQty = drprcpetc8 * PrcpTims;
												calcPrcpVol = calcPrcpTimeVol * PrcpTims;
											} else {
												calcPrcpQty = drprcpetc8;
											    calcPrcpVol = calcPrcpTimeVol;
											}

											model.setValue ( "/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/prcpvol",     calcPrcpVol );  
											model.setValue ( "/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/prcpqty",     calcPrcpQty );                                  
											model.setValue ( "/root/main/prtlprcplist/item1["+ (grd_prtlprcp1.row)+"]/drprcpetc7", calcPrcpTimeVol );  
											
											for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
												if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== sPrcpCd) {
													if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/ordseqno")== sOrdSeqNo) {
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpvol",     calcPrcpVol);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpqty", 	 calcPrcpQty);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc7", calcPrcpTimeVol);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc8", drprcpetc8);
													}
												}
											}
										}
										
										model.refresh();
									]]>
								</script>
							</datagrid>
							<datagrid id="grd_prtlprcp2" nodeset="/root/main/prtlprcplist/item2" caption="^코드^처방명^BSA용량^용량^용량^단위^횟수^수량^수량^단위^급여구분^종류^처방%^감량사유^^^" colsep="^" colwidth="31, 73, 100, 54, 47, 47, 37, 31, 39, 38, 39, 60, 36, 42, 100, 1, 0, 100" ellipsis="true" mergecellsfixedrows="bycolrec" rowsep="|" tooltip="true" style="left:0px; top:215px; width:455px; height:215px; ">
								<col ref="prcpmixno"/>
								<col ref="prcpcd"/>
								<col ref="prcpnm"/>
								<col ref="bsavol" style="text-align:right; "/>
								<col ref="prcpvol" style="text-align:right; "/>
								<col ref="drprcpetc7" format="##.##" style="text-align:right; "/>
								<col ref="prcpvolunitnm"/>
								<col ref="prcptims" style="text-align:right; "/>
								<col ref="prcpqty"/>
								<col ref="drprcpetc8" type="input" format="##.##" style="text-align:right; "/>
								<col ref="prcpqtyunitnm"/>
								<col ref="payflagcd" type="combo" style="text-align:center; ">
									<choices>
										<itemset nodeset="/root/init/payflagcd/M0029">
											<label ref="cdnm"/>
											<value ref="cdid"/>
										</itemset>
									</choices>
								</col>
								<col ref="prtlkind" visibility="hidden"/>
								<col ref="subtrvolrate"/>
								<col disabled="true" ref="subtrvolresn" type="combo">
									<choices>
										<item>
											<label>간장기능저하</label>
											<value>1</value>
										</item>
										<item>
											<label>신장기능저하</label>
											<value>2</value>
										</item>
										<item>
											<label>PS 저하</label>
											<value>3</value>
										</item>
										<item>
											<label>BoneMarrow Suppression</label>
											<value>4</value>
										</item>
										<item>
											<label>기타</label>
											<value>9</value>
										</item>
									</choices>
								</col>
								<col ref="ordseqno"/>
								<col ref="volrate"/>
								<col ref="prnprcpdtl" visibility="hidden"/>
								<script type="javascript" ev:event="xforms-value-changed">
									<![CDATA[
										if (grd_prtlprcp2.col== grd_prtlprcp2.colRef("payflagcd")){ // 급여구분
											var sPrcpCd 		= model.getValue("/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/prcpcd");
											var sOrdSeqNo 	= model.getValue("/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/ordseqno");
											var sPayFlagCd = model.getValue("/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/payflagcd");
											
											for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
												if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== sPrcpCd) {
													if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/ordseqno")== sOrdSeqNo) {
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/payflagcd", sPayFlagCd);
													}
												}
											}
										}
									]]>
								</script>
								<script type="javascript" ev:event="onendedit">
									<![CDATA[
										if (grd_prtlprcp2.col== grd_prtlprcp2.colRef("drprcpetc8")){ // 1회수량
											var calcPrcpVol = 0;
											var calcPrcpQty = 0;
											var calcPrcpTimeVol = 0;
											var calcPrcpTimeQty = 0;
											
											//20090820 마정민 수정. 약인 경우는 최초의 용량 수량 비율로 계산하는 것으로 수정
											var calcmthdcd  = getArrayData ( model.getValue ( "/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/drugmastspec" ) + "^", 0, 16, "^", "|" ); 
										    
											var drprcpetc8     = model.getValue ( "/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/drprcpetc8" );    // 1회 수량
											var PrcpTims      = model.getValue ( "/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/prcptims" );      // 횟수
											var baseTimeVol = model.getValue ( "/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/basetimevol" );
											var baseTimeQty = model.getValue ( "/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/basetimeqty" );
											
											var sPrcpCd 		  = model.getValue("/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/prcpcd");
											var sOrdSeqNo 	  = model.getValue("/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/ordseqno");
											
								            calcPrcpTimeVol = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseTimeVol)*1000; 
											calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 
															
											//계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
											if(calcmthdcd == "1"){
												calcPrcpQty = drprcpetc8 * PrcpTims;
												calcPrcpVol = calcPrcpTimeVol * PrcpTims;
											} else {
												calcPrcpQty = drprcpetc8;
											    calcPrcpVol = calcPrcpTimeVol;
											}

											model.setValue ( "/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/prcpvol",     calcPrcpVol );  
											model.setValue ( "/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/prcpqty",     calcPrcpQty );                                  
											model.setValue ( "/root/main/prtlprcplist/item2["+ (grd_prtlprcp2.row)+"]/drprcpetc7", calcPrcpTimeVol );  
											
											for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
												if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== sPrcpCd) {
													if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/ordseqno")== sOrdSeqNo) {
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpvol",     calcPrcpVol);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpqty", 	 calcPrcpQty);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc7", calcPrcpTimeVol);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc8", drprcpetc8);
													}
												}
											}
										}
										
										model.refresh();
									]]>
								</script>
							</datagrid>
							<datagrid id="grd_prtlprcp3" nodeset="/root/main/prtlprcplist/item3" caption="^코드^처방명^BSA용량^용량^용량^단위^횟수^수량^수량^단위^급여구분^종류^처방%^감량사유^^^" colsep="^" colwidth="31, 73, 100, 54, 47, 47, 37, 31, 39, 38, 39, 60, 36, 42, 100, 1, 0, 100" ellipsis="true" mergecellsfixedrows="bycolrec" rowsep="|" tooltip="true" style="left:455px; top:215px; width:455px; height:215px; ">
								<col ref="prcpmixno"/>
								<col ref="prcpcd"/>
								<col ref="prcpnm"/>
								<col ref="bsavol" style="text-align:right; "/>
								<col ref="prcpvol" style="text-align:right; "/>
								<col ref="drprcpetc7" format="##.##" style="text-align:right; "/>
								<col ref="prcpvolunitnm"/>
								<col ref="prcptims" style="text-align:right; "/>
								<col ref="prcpqty"/>
								<col ref="drprcpetc8" type="input" format="##.##" style="text-align:right; "/>
								<col ref="prcpqtyunitnm"/>
								<col ref="payflagcd" type="combo" style="text-align:center; ">
									<choices>
										<itemset nodeset="/root/init/payflagcd/M0029">
											<label ref="cdnm"/>
											<value ref="cdid"/>
										</itemset>
									</choices>
								</col>
								<col ref="prtlkind" visibility="hidden"/>
								<col ref="subtrvolrate"/>
								<col disabled="true" ref="subtrvolresn" type="combo">
									<choices>
										<item>
											<label>간장기능저하</label>
											<value>1</value>
										</item>
										<item>
											<label>신장기능저하</label>
											<value>2</value>
										</item>
										<item>
											<label>PS 저하</label>
											<value>3</value>
										</item>
										<item>
											<label>BoneMarrow Suppression</label>
											<value>4</value>
										</item>
										<item>
											<label>기타</label>
											<value>9</value>
										</item>
									</choices>
								</col>
								<col ref="ordseqno"/>
								<col ref="volrate"/>
								<col ref="prnprcpdtl" visibility="hidden"/>
								<script type="javascript" ev:event="xforms-value-changed">
									<![CDATA[
										if (grd_prtlprcp3.col== grd_prtlprcp3.colRef("payflagcd")){ // 급여구분
											var sPrcpCd 		= model.getValue("/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/prcpcd");
											var sOrdSeqNo 	= model.getValue("/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/ordseqno");
											var sPayFlagCd = model.getValue("/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/payflagcd");
											
											for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
												if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== sPrcpCd) {
													if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/ordseqno")== sOrdSeqNo) {
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/payflagcd", sPayFlagCd);
													}
												}
											}
										}
									]]>
								</script>
								<script type="javascript" ev:event="onendedit">
									<![CDATA[
										if (grd_prtlprcp3.col== grd_prtlprcp3.colRef("drprcpetc8")){ // 1회수량
											var calcPrcpVol = 0;
											var calcPrcpQty = 0;
											var calcPrcpTimeVol = 0;
											var calcPrcpTimeQty = 0;
											
											//20090820 마정민 수정. 약인 경우는 최초의 용량 수량 비율로 계산하는 것으로 수정
											var calcmthdcd  = getArrayData ( model.getValue ( "/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/drugmastspec" ) + "^", 0, 16, "^", "|" ); 
										    
											var drprcpetc8     = model.getValue ( "/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/drprcpetc8" );    // 1회 수량
											var PrcpTims      = model.getValue ( "/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/prcptims" );      // 횟수
											var baseTimeVol = model.getValue ( "/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/basetimevol" );
											var baseTimeQty = model.getValue ( "/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/basetimeqty" );
											
											var sPrcpCd 		  = model.getValue("/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/prcpcd");
											var sOrdSeqNo 	  = model.getValue("/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/ordseqno");
											
								            calcPrcpTimeVol = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseTimeVol)*1000; 
											calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 
															
											//계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
											if(calcmthdcd == "1"){
												calcPrcpQty = drprcpetc8 * PrcpTims;
												calcPrcpVol = calcPrcpTimeVol * PrcpTims;
											} else {
												calcPrcpQty = drprcpetc8;
											    calcPrcpVol = calcPrcpTimeVol;
											}

											model.setValue ( "/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/prcpvol",     calcPrcpVol );  
											model.setValue ( "/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/prcpqty",     calcPrcpQty );                                  
											model.setValue ( "/root/main/prtlprcplist/item3["+ (grd_prtlprcp3.row)+"]/drprcpetc7", calcPrcpTimeVol );  
											
											for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
												if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== sPrcpCd) {
													if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/ordseqno")== sOrdSeqNo) {
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpvol",     calcPrcpVol);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpqty", 	 calcPrcpQty);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc7", calcPrcpTimeVol);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc8", drprcpetc8);
													}
												}
											}
										}
										
										model.refresh();
									]]>
								</script>
							</datagrid>
							<datagrid id="grd_prtlprcp4" nodeset="/root/main/prtlprcplist/item4" caption="^코드^처방명^BSA용량^용량^용량^단위^횟수^수량^수량^단위^급여구분^종류^처방%^감량사유^^^" colsep="^" colwidth="31, 73, 100, 54, 47, 47, 37, 31, 39, 38, 39, 60, 36, 42, 100, 1, 0, 100" ellipsis="true" mergecellsfixedrows="bycolrec" rowsep="|" tooltip="true" style="left:0px; top:430px; width:455px; height:215px; ">
								<col ref="prcpmixno"/>
								<col ref="prcpcd"/>
								<col ref="prcpnm"/>
								<col ref="bsavol" style="text-align:right; "/>
								<col ref="prcpvol" style="text-align:right; "/>
								<col ref="drprcpetc7" format="##.##" style="text-align:right; "/>
								<col ref="prcpvolunitnm"/>
								<col ref="prcptims" style="text-align:right; "/>
								<col ref="prcpqty"/>
								<col ref="drprcpetc8" type="input" format="##.##" style="text-align:right; "/>
								<col ref="prcpqtyunitnm"/>
								<col ref="payflagcd" type="combo" style="text-align:center; ">
									<choices>
										<itemset nodeset="/root/init/payflagcd/M0029">
											<label ref="cdnm"/>
											<value ref="cdid"/>
										</itemset>
									</choices>
								</col>
								<col ref="prtlkind" visibility="hidden"/>
								<col ref="subtrvolrate"/>
								<col disabled="true" ref="subtrvolresn" type="combo">
									<choices>
										<item>
											<label>간장기능저하</label>
											<value>1</value>
										</item>
										<item>
											<label>신장기능저하</label>
											<value>2</value>
										</item>
										<item>
											<label>PS 저하</label>
											<value>3</value>
										</item>
										<item>
											<label>BoneMarrow Suppression</label>
											<value>4</value>
										</item>
										<item>
											<label>기타</label>
											<value>9</value>
										</item>
									</choices>
								</col>
								<col ref="ordseqno"/>
								<col ref="volrate"/>
								<col ref="prnprcpdtl" visibility="hidden"/>
								<script type="javascript" ev:event="xforms-value-changed">
									<![CDATA[
										if (grd_prtlprcp4.col== grd_prtlprcp4.colRef("payflagcd")){ // 급여구분
											var sPrcpCd 		= model.getValue("/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/prcpcd");
											var sOrdSeqNo 	= model.getValue("/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/ordseqno");
											var sPayFlagCd = model.getValue("/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/payflagcd");
											
											for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
												if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== sPrcpCd) {
													if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/ordseqno")== sOrdSeqNo) {
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/payflagcd", sPayFlagCd);
													}
												}
											}
										}
									]]>
								</script>
								<script type="javascript" ev:event="onendedit">
									<![CDATA[
										if (grd_prtlprcp4.col== grd_prtlprcp4.colRef("drprcpetc8")){ // 1회수량
											var calcPrcpVol = 0;
											var calcPrcpQty = 0;
											var calcPrcpTimeVol = 0;
											var calcPrcpTimeQty = 0;
											
											//20090820 마정민 수정. 약인 경우는 최초의 용량 수량 비율로 계산하는 것으로 수정
											var calcmthdcd  = getArrayData ( model.getValue ( "/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/drugmastspec" ) + "^", 0, 16, "^", "|" ); 
										    
											var drprcpetc8     = model.getValue ( "/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/drprcpetc8" );    // 1회 수량
											var PrcpTims      = model.getValue ( "/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/prcptims" );      // 횟수
											var baseTimeVol = model.getValue ( "/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/basetimevol" );
											var baseTimeQty = model.getValue ( "/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/basetimeqty" );
											
											var sPrcpCd 		  = model.getValue("/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/prcpcd");
											var sOrdSeqNo 	  = model.getValue("/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/ordseqno");
											
								            calcPrcpTimeVol = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseTimeVol)*1000; 
											calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 
															
											//계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
											if(calcmthdcd == "1"){
												calcPrcpQty = drprcpetc8 * PrcpTims;
												calcPrcpVol = calcPrcpTimeVol * PrcpTims;
											} else {
												calcPrcpQty = drprcpetc8;
											    calcPrcpVol = calcPrcpTimeVol;
											}

											model.setValue ( "/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/prcpvol",     calcPrcpVol );  
											model.setValue ( "/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/prcpqty",     calcPrcpQty );                                  
											model.setValue ( "/root/main/prtlprcplist/item4["+ (grd_prtlprcp4.row)+"]/drprcpetc7", calcPrcpTimeVol );  
											
											for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
												if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== sPrcpCd) {
													if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/ordseqno")== sOrdSeqNo) {
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpvol",     calcPrcpVol);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpqty", 	 calcPrcpQty);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc7", calcPrcpTimeVol);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc8", drprcpetc8);
													}
												}
											}
										}
										
										model.refresh();
									]]>
								</script>
							</datagrid>
							<datagrid id="grd_prtlprcp5" nodeset="/root/main/prtlprcplist/item5" caption="^코드^처방명^BSA용량^용량^용량^단위^횟수^수량^수량^단위^급여구분^종류^처방%^감량사유^^^" colsep="^" colwidth="31, 73, 100, 54, 47, 47, 37, 31, 39, 38, 39, 60, 36, 42, 100, 1, 0, 100" ellipsis="true" mergecellsfixedrows="bycolrec" rowsep="|" tooltip="true" style="left:455px; top:430px; width:455px; height:215px; ">
								<col ref="prcpmixno"/>
								<col ref="prcpcd"/>
								<col ref="prcpnm"/>
								<col ref="bsavol" style="text-align:right; "/>
								<col ref="prcpvol" style="text-align:right; "/>
								<col ref="drprcpetc7" format="##.##" style="text-align:right; "/>
								<col ref="prcpvolunitnm"/>
								<col ref="prcptims" style="text-align:right; "/>
								<col ref="prcpqty"/>
								<col ref="drprcpetc8" type="input" format="##.##" style="text-align:right; "/>
								<col ref="prcpqtyunitnm"/>
								<col ref="payflagcd" type="combo" style="text-align:center; ">
									<choices>
										<itemset nodeset="/root/init/payflagcd/M0029">
											<label ref="cdnm"/>
											<value ref="cdid"/>
										</itemset>
									</choices>
								</col>
								<col ref="prtlkind" visibility="hidden"/>
								<col ref="subtrvolrate"/>
								<col disabled="true" ref="subtrvolresn" type="combo">
									<choices>
										<item>
											<label>간장기능저하</label>
											<value>1</value>
										</item>
										<item>
											<label>신장기능저하</label>
											<value>2</value>
										</item>
										<item>
											<label>PS 저하</label>
											<value>3</value>
										</item>
										<item>
											<label>BoneMarrow Suppression</label>
											<value>4</value>
										</item>
										<item>
											<label>기타</label>
											<value>9</value>
										</item>
									</choices>
								</col>
								<col ref="ordseqno"/>
								<col ref="volrate"/>
								<col ref="prnprcpdtl" visibility="hidden"/>
								<script type="javascript" ev:event="xforms-value-changed">
									<![CDATA[
										if (grd_prtlprcp5.col== grd_prtlprcp5.colRef("payflagcd")){ // 급여구분
											var sPrcpCd 		= model.getValue("/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/prcpcd");
											var sOrdSeqNo 	= model.getValue("/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/ordseqno");
											var sPayFlagCd = model.getValue("/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/payflagcd");
											
											for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
												if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== sPrcpCd) {
													if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/ordseqno")== sOrdSeqNo) {
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/payflagcd", sPayFlagCd);
													}
												}
											}
										}
									]]>
								</script>
								<script type="javascript" ev:event="onendedit">
									<![CDATA[
										if (grd_prtlprcp5.col== grd_prtlprcp5.colRef("drprcpetc8")){ // 1회수량
											var calcPrcpVol = 0;
											var calcPrcpQty = 0;
											var calcPrcpTimeVol = 0;
											var calcPrcpTimeQty = 0;
											
											//20090820 마정민 수정. 약인 경우는 최초의 용량 수량 비율로 계산하는 것으로 수정
											var calcmthdcd  = getArrayData ( model.getValue ( "/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/drugmastspec" ) + "^", 0, 16, "^", "|" ); 
										    
											var drprcpetc8     = model.getValue ( "/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/drprcpetc8" );    // 1회 수량
											var PrcpTims      = model.getValue ( "/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/prcptims" );      // 횟수
											var baseTimeVol = model.getValue ( "/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/basetimevol" );
											var baseTimeQty = model.getValue ( "/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/basetimeqty" );
											
											var sPrcpCd 		  = model.getValue("/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/prcpcd");
											var sOrdSeqNo 	  = model.getValue("/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/ordseqno");
											
								            calcPrcpTimeVol = parseFloat(drprcpetc8) / parseFloat(baseTimeQty) * parseFloat(baseTimeVol)*1000; 
											calcPrcpTimeVol = Math.round(calcPrcpTimeVol)/1000; 
															
											//계산구분에 따라 횟수를 곱해주는 처리를 함 (경북대 2010.01.02 전지은)
											if(calcmthdcd == "1"){
												calcPrcpQty = drprcpetc8 * PrcpTims;
												calcPrcpVol = calcPrcpTimeVol * PrcpTims;
											} else {
												calcPrcpQty = drprcpetc8;
											    calcPrcpVol = calcPrcpTimeVol;
											}

											model.setValue ( "/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/prcpvol",     calcPrcpVol );  
											model.setValue ( "/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/prcpqty",     calcPrcpQty );                                  
											model.setValue ( "/root/main/prtlprcplist/item5["+ (grd_prtlprcp5.row)+"]/drprcpetc7", calcPrcpTimeVol );  
											
											for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
												if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpcd")== sPrcpCd) {
													if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/ordseqno")== sOrdSeqNo) {
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpvol",     calcPrcpVol);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/prcpqty", 	 calcPrcpQty);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc7", calcPrcpTimeVol);
														model.setValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/drprcpetc8", drprcpetc8);
													}
												}
											}
										}
										
										model.refresh();
									]]>
								</script>
							</datagrid>
							<output id="output7" ref="/root/main/prtlinfo/d1nm" style="left:456px; top:3px; width:30px; height:19px; text-align:center; "/>
							<output id="output8" ref="/root/main/prtlinfo/d2nm" style="left:1px; top:218px; width:30px; height:19px; text-align:center; "/>
							<output id="output9" ref="/root/main/prtlinfo/d3nm" style="left:456px; top:218px; width:30px; height:19px; text-align:center; "/>
							<output id="output10" ref="/root/main/prtlinfo/d4nm" style="left:1px; top:433px; width:30px; height:19px; text-align:center; "/>
							<output id="output11" ref="/root/main/prtlinfo/d5nm" style="left:456px; top:433px; width:30px; height:19px; text-align:center; "/>
						</case>
					</switch>
					<caption id="caption13" class="cell_1" style="left:420px; top:30px; width:60px; height:23px; vertical-align:middle; ">적용선택</caption>
					<caption id="caption1" style="left:532px; top:33px; width:16px; height:20px; vertical-align:middle; ">~</caption>
					<button id="btn_pre" class="icon_left" style="left:1076px; top:5px; width:26px; height:19px; ">
						<caption/>
						<script type="javascript" ev:event="DOMActivate">
							<![CDATA[
								var fromday=0;
								if ( model.getValue("/root/main/prtlinfo/currentpg") == "") return;
								if ( model.getValue("/root/main/prtlinfo/currentpg") ==1 ){
									messageBox("첫 페이지입니다.", "E999", "");
									return;
								}
								model.setValue("/root/main/prtlinfo/currentpg", parseInt(model.getValue("/root/main/prtlinfo/currentpg"))-1);
								
								fromday = parseInt(model.getValue("/root/send/srchdata/fromday"))-5;
								model.setValue("/root/send/srchdata/fromday",fromday);	
								
								//grd_prtlprcp1.caption="D"+fromday+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
								//grd_prtlprcp2.caption="D"+(fromday+1)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
								//grd_prtlprcp3.caption="D"+(fromday+2)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
								//grd_prtlprcp4.caption="D"+(fromday+3)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
								//grd_prtlprcp5.caption="D"+(fromday+4)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";	
								model.setValue("/root/main/prtlinfo/d1nm", "D"+fromday);
								model.setValue("/root/main/prtlinfo/d2nm", "D"+(fromday+1));
								model.setValue("/root/main/prtlinfo/d3nm", "D"+(fromday+2));
								model.setValue("/root/main/prtlinfo/d4nm", "D"+(fromday+3));
								model.setValue("/root/main/prtlinfo/d5nm", "D"+(fromday+4));
								
								submit("TRADB01024");
								
								fGrdRebuildStyle();
								
								/* 진토제 일때 색깔 변경 */	
								//fSetAntimetColor();
								fSetVol2();					
								model.refresh();
							]]>
						</script>
					</button>
					<button id="btn_nxt" class="icon_right" style="left:1156px; top:5px; width:26px; height:19px; ">
						<caption/>
						<script type="javascript" ev:event="DOMActivate">
							<![CDATA[
								var fromday=0;
								if ( model.getValue("/root/main/prtlinfo/currentpg") == "") return;
								if ( model.getValue("/root/main/prtlinfo/totpg") == model.getValue("/root/main/prtlinfo/currentpg") ){
									messageBox("마지막 페이지입니다.", "E999", "");
									return;
								}
								
								model.setValue("/root/main/prtlinfo/currentpg", parseInt(model.getValue("/root/main/prtlinfo/currentpg"))+1);
								fromday = parseInt(model.getValue("/root/send/srchdata/fromday"))+5;
								model.setValue("/root/send/srchdata/fromday",fromday);	
								
								//grd_prtlprcp1.caption="D"+fromday+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
								//grd_prtlprcp2.caption="D"+(fromday+1)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
								//grd_prtlprcp3.caption="D"+(fromday+2)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
								//grd_prtlprcp4.caption="D"+(fromday+3)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";
								//grd_prtlprcp5.caption="D"+(fromday+4)+"^코드^처방명^BSA용량^용량^단위^횟수^수량^단위^종류^^";	
								model.setValue("/root/main/prtlinfo/d1nm", "D"+fromday);
								model.setValue("/root/main/prtlinfo/d2nm", "D"+(fromday+1));
								model.setValue("/root/main/prtlinfo/d3nm", "D"+(fromday+2));
								model.setValue("/root/main/prtlinfo/d4nm", "D"+(fromday+3));
								model.setValue("/root/main/prtlinfo/d5nm", "D"+(fromday+4));

								submit("TRADB01024");
								
								fGrdRebuildStyle();
								
								/* 진토제 일때 색깔 변경 */	
								//fSetAntimetColor();
								fSetVol2();					
								model.refresh();
							]]>
						</script>
					</button>
					<caption id="caption3" class="cell_1" style="left:265px; top:30px; width:45px; height:23px; vertical-align:middle; ">시작일</caption>
					<caption id="caption2" class="cell_1" visibility="hidden" style="left:855px; top:0px; width:35px; height:23px; vertical-align:middle; ">신장</caption>
					<input id="input4" ref="/root/main/data/ht" class="input_default" visibility="hidden" style="left:893px; top:0px; width:45px; height:19px; "/>
					<caption id="caption6" visibility="hidden" style="left:940px; top:0px; width:20px; height:15px; ">cm</caption>
					<input id="input8" ref="/root/main/prtlinfo/startdate" class="input_essential" inputtype="date" style="left:315px; top:31px; width:100px; height:19px; ">
						<script type="javascript" ev:event="xforms-value-changed">
							<![CDATA[
								var startdate = model.getValue("/root/main/prtlinfo/startdate");
								if ( startdate <	getCurrentDate() ) {
									messageBox("시작일을 과거일자로 할 수 없습니다.", "I");
									model.setValue("/root/main/prtlinfo/startdate", getCurrentDate());
									model.refresh();
									return;
								}
								//model.setValue("/root/send/data/orderdata/cpgappno", model.getValue("/root/main/prtlhislist/item["+grd_prtlhislist.row+"]/cpgappno"));
								model.setValue("/root/send/srchdata/startdate", model.getValue("/root/main/prtlinfo/startdate"));
								model.setValue("/root/send/srchdata/startterm", model.getValue("/root/main/prtlinfo/startterm"));
								model.setValue("/root/send/srchdata/endterm", model.getValue("/root/main/prtlinfo/endterm")); 
								submit("TRADB01026");
								fGrdRebuildStyle();
								fSetVol();
								
							]]>
						</script>
					</input>
					<caption id="caption7" class="tit_2" style="left:265px; top:10px; width:135px; height:13px; ">프로토콜상세정보</caption>
					<line id="line1" class="line_1" style="x1:265px; y1:25px; x2:1180px; y2:25px; "/>
					<caption id="caption5" class="cell_1" style="left:718px; top:30px; width:55px; height:23px; vertical-align:middle; ">Cycle</caption>
					<caption id="caption8" class="cell_1" style="left:598px; top:30px; width:55px; height:23px; vertical-align:middle; ">Line</caption>
					<input id="input2" ref="/root/main/prtlinfo/drugcycle" class="input_essential" format="99" style="left:778px; top:31px; width:60px; height:19px; "/>
					<input id="input5" ref="/root/main/prtlinfo/drugstage" class="input_essential" format="99" style="left:656px; top:31px; width:52px; height:19px; ">
						<script type="javascript" ev:event="xforms-value-changed">
							<![CDATA[
								model.setValue("/root/main/prtlinfo/drugcycle","1");	
								model.refresh();						
							]]>
						</script>
					</input>
					<caption id="caption9" class="cell_1" visibility="hidden" style="left:965px; top:0px; width:35px; height:23px; vertical-align:middle; ">체중</caption>
					<caption id="caption10" visibility="hidden" style="left:1050px; top:0px; width:20px; height:15px; ">kg</caption>
					<input id="input6" ref="/root/main/data/wt" class="input_default" visibility="hidden" style="left:1003px; top:0px; width:45px; height:19px; "/>
					<line id="line14" class="line_1" style="x1:1px; y1:25px; x2:255px; y2:25px; "/>
					<caption id="caption11" class="tit_2" style="left:6px; top:10px; width:95px; height:13px; ">질병정보</caption>
					<line id="line2" class="line_1" style="x1:0px; y1:245px; x2:254px; y2:245px; "/>
					<caption id="caption12" class="tit_2" style="left:5px; top:230px; width:185px; height:13px; ">항암프로토콜정보</caption>
					<caption id="caption14" class="tit_2" style="left:5px; top:590px; width:185px; height:13px; ">진토제정보</caption>
					<line id="line3" class="line_1" style="x1:0px; y1:605px; x2:254px; y2:605px; "/>
					<datagrid id="grd_sicklist" nodeset="/root/main/sicklist/item" caption="코드^질병명" colsep="^" colwidth="62, 173" ellipsis="true" explorerbar="sortshow" extendlastcol="scroll" mergecellsfixedrows="bycolrec" rowsep="|" tooltip="true" style="left:0px; top:30px; width:255px; height:195px; ">
						<col ref="sickclscd"/>
						<col ref="sickclsnm"/>
						<script type="javascript" ev:event="onclick">
							<![CDATA[
							if ( ! isDataCell() ) return;
							model.setValue("/root/hidden/calcyn","N");
							model.setValue("/root/hidden/calappyn","N"); // 계산된 용량 적용여부
						
							model.setValue("/root/hidden/subtrvolyn","N");
							model.refresh();
							if ( grd_sicklist.row>0){
								model.setValue("/root/send/srchdata/sickclscd",model.getValue("/root/main/sicklist/item["+grd_sicklist.row+"]/sickclscd"));
								submit("TRADB01022");
								grd_prtllist.rebuildStyle();
								var rowcnt = grd_prtllist.rows;
								for(var i=0 ; i < rowcnt ; i++)
								{
									
									if( model.getValue("/root/main/prtllist/item[" + i + "]/cnfmyn") =="N")
									{
										grd_prtllist.cellStyle("background-color", i, 0, i, 1) = "#FF00FF";
									}
									
									if(parseInt(model.getValue("/root/main/prtllist/item[" + i + "]/drugmthdvalid")) > 0)
									{
										grd_prtllist.cellStyle("background-color", i, 0, i, 1) = "#00FFFF";
									}
									if(parseInt(model.getValue("/root/main/prtllist/item[" + i + "]/codevalid")) > 0)
									{
										grd_prtllist.cellStyle("background-color", i, 0, i, 1) = "#00FFFF";
									}
									
								}
							}
						]]>
						</script>
						<script type="javascript" ev:event="onaftersort">
							<![CDATA[
								grd_sicklist.gridToInstance();
							]]>
						</script>
					</datagrid>
					<datagrid id="grd_antimetlist" nodeset="/root/main/prtllinklist/item" caption="코드^진토제명" colsep="^" colwidth="63, 173" ellipsis="true" explorerbar="sortshow" extendlastcol="scroll" mergecellsfixedrows="bycolrec" rowsep="|" tooltip="true" style="left:0px; top:610px; width:255px; height:95px; ">
						<col ref="antimetprtlcd"/>
						<col ref="antimetprtlnm"/>
						<script type="javascript" ev:event="onclick">
							<![CDATA[
								//alert( grd_antimetlist.colAttribute( grd_antimetlist.col,"ref"));
								model.setValue("/root/send/srchdata/antimetprtlcd",model.getValue("/root/main/prtllinklist/item["+grd_antimetlist.row+"]/antimetprtlcd"));	
								submit("TRADB01024");	
								submit("TRADB01026");	
								/* 진토제 일때 색깔 변경 */	
								fGrdRebuildStyle();
								fSetAntimetColor();
								model.refresh();
								
							]]>
						</script>
						<script type="javascript" ev:event="onaftersort">
							<![CDATA[
								grd_antimetlist.gridToInstance();
							]]>
						</script>
					</datagrid>
					<datagrid id="grd_prtllist" nodeset="/root/main/prtllist/item" caption="코드^프로토콜명" colsep="^" colwidth="63, 173, 0" ellipsis="true" explorerbar="sortshow" extendlastcol="scroll" mergecellsfixedrows="bycolrec" rowsep="|" tooltip="true" style="left:0px; top:250px; width:255px; height:335px; ">
						<col ref="prtlcd"/>
						<col ref="prtlnm"/>
						<col ref="drugmthdvalid" visibility="hidden"/>
						<script type="javascript" ev:event="onclick">
							<![CDATA[
								if ( ! isDataCell() ) return;								
								
								model.setValue("/root/hidden/calcyn","N");
								model.setValue("/root/hidden/calappyn","N"); // 계산된 용량 적용여부
						
								model.setValue("/root/hidden/subtrvolyn","N");
								model.refresh();
								if(model.getValue("/root/main/prtllist/item[" + grd_prtllist.row + "]/drugmthdvalid") > 0) {
									button5.disabled = true;
									messageBox("마스터가 완성되지 않았으므로 처방불가입니다.\n특수조제실로 문의하십시오.", "I");
								} else if(model.getValue("/root/main/prtllist/item[" + grd_prtllist.row + "]/codevalid") > 0) {
									button5.disabled = true;
									messageBox("마스터내 중지된 코드가 존재합니다.\n특수조제실로 문의하십시오.", "I");
								}
								else if(model.getValue("/root/main/prtllist/item[" + grd_prtllist.row + "]/cnfmyn") =="N") {
									button5.disabled = true;
									messageBox("마스터를 확인 완료후, 사용가능합니다.", "I");
								} else {
									if ( model.getValue("/root/hidden/saveyn") != "Y" ) { //저장후에는 신규버튼 눌러야 저장버튼 활성화
										button5.disabled = false;
									} else {
										button5.disabled = true;
									}
								}   
								fSetPrtlInfo();
								// 그리드의 색깔을 바꾼다.
								fSetGrdColor() ;
							]]>
						</script>
						<script type="javascript" ev:event="onaftersort">
							<![CDATA[
								grd_prtllist.gridToInstance();
							]]>
						</script>
					</datagrid>
					<select1 id="radio4" ref="/root/send/srchdata/sickclsflag" visibility="hidden" appearance="full" cols="2" rows="1" vcellspacing="7" overflow="visible" style="left:170px; top:5px; width:95px; height:21px; border-style:none; ">
						<choices>
							<item>
								<label>전체</label>
								<value>1</value>
							</item>
							<item>
								<label>질병</label>
								<value>2</value>
							</item>
						</choices>
					</select1>
					<button id="button3" class="btn5_letter6" visibility="hidden" style="left:984px; top:33px; width:86px; height:19px; ">
						<caption>용량분할확인</caption>
						<script type="javascript" ev:event="DOMActivate">
							<![CDATA[
						
							nodeList = instance1.selectNodes("/root/main/prtlprcpprelist/prcplist");
							rCSV = getNodeListCSV(nodeList);
  								
							model.setValue("/root/send/data/prcplist",rCSV);
							fSetVol();
							submit("TRADB01030");
							
							grd_prtlprcpprelist.rebuildStyle();
							for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
								if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/volkind")!= "") {
									grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("prcpvol"))="#FFF000";
									grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("prcpqty"))="#FFF000";
									grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("drprcpetc7"))="#FFF000";
									grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("drprcpetc8"))="#FFF000";
								}
								if (model.getValue("/root/main/prtlprcpprelist/prcplist["+ (j+1)+"]/absnyn") == "Y") { // 품절표시
									grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("prcpnm"))="#ff4848";
								} else if (model.getValue("/root/main/prtlprcpprelist/prcplist["+ (j+1)+"]/clincstdyflag") == "Y") { // 임상표시
									grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("prcpnm"))="#ffbb00";
								}
							}	
							setRowStyle("grd_prtlprcpprelist" , "8" , "Y" 	 , "tempprcpflag", "equal" );
						]]>
						</script>
					</button>
					<caption id="caption44" ref="/root/main/prtlinfo/totpg" style="left:1133px; top:5px; width:20px; height:20px; "/>
					<caption id="caption45" ref="/root/main/prtlinfo/currentpg" style="left:1106px; top:5px; width:20px; height:20px; "/>
					<caption id="caption46" autoresize="true" style="left:1122px; top:6px; width:10px; height:20px; ">/</caption>
					<select1 id="combo1" ref="/root/main/prtlinfo/startterm" appearance="minimal" style="left:485px; top:32px; width:45px; height:19px; ">
						<choices>
							<itemset nodeset="/root/init/termcdlist/termcdinfo">
								<label ref="cdnm"/>
								<value ref="cdid"/>
							</itemset>
						</choices>
						<script type="javascript" ev:event="xforms-value-changed">
							<![CDATA[
								if(parseFloat(combo1.value )>parseFloat( combo2.value)) {
									messageBox("종료차수보다 클 수 없습니다.", "C");
									model.setValue("/root/main/prtlinfo/startterm", model.getValue("/root/main/prtlinfo/endterm"));
									model.refresh();
								}
								model.setValue("/root/send/srchdata/startdate", model.getValue("/root/main/prtlinfo/startdate"));
								model.setValue("/root/send/srchdata/startterm", model.getValue("/root/main/prtlinfo/startterm"));
								model.setValue("/root/send/srchdata/endterm", model.getValue("/root/main/prtlinfo/endterm"));
								submit("TRADB01026");		
								
								// 20110824_laboru_경북대병원_투여시점 시간 단위로 보이게 수정(소수점 셋째 자리에서 반올림)
								model.removeNodeset("/root/tempprcp/prtlprcpprelist/prcplist");
								model.makeNode("root/tempprcp/prtlprcpprelist/prcplist");
								copyNodesetType("root/tempprcp/prtlprcpprelist/prcplist", "root/main/prtlprcpprelist/prcplist", "replace");
								
								for(var i=1 ; i <= getNodesetCount("/root/main/prtlprcpprelist/prcplist") ; i++) {
									var drugseq = model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq");
									var drugseqhr = Math.round( (parseInt(drugseq)/60) * 100 ) / 100;
																		
									model.setValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq", drugseqhr);									
								}
								
								fGrdRebuildStyle();
								fSetVol();
								fSetGrdColor();

							]]>
						</script>
					</select1>
					<select1 id="combo2" ref="/root/main/prtlinfo/endterm" appearance="minimal" style="left:548px; top:32px; width:45px; height:19px; ">
						<choices>
							<itemset nodeset="/root/init/termcdlist/termcdinfo">
								<label ref="cdnm"/>
								<value ref="cdid"/>
							</itemset>
						</choices>
						<script type="javascript" ev:event="xforms-value-changed">
							<![CDATA[
								if( parseFloat(combo1.value )>parseFloat( combo2.value)) {
									messageBox("시작차수보다 작을 수 없습니다.", "C");
									model.setValue("/root/main/prtlinfo/endterm", model.getValue("/root/main/prtlinfo/startterm"));
									model.refresh();
									
								}
								
									model.setValue("/root/send/srchdata/startdate", model.getValue("/root/main/prtlinfo/startdate"));
									model.setValue("/root/send/srchdata/startterm", model.getValue("/root/main/prtlinfo/startterm"));
									model.setValue("/root/send/srchdata/endterm", model.getValue("/root/main/prtlinfo/endterm"));
									submit("TRADB01026");	
									
									// 20110824_laboru_경북대병원_투여시점 시간 단위로 보이게 수정(소수점 셋째 자리에서 반올림)
									model.removeNodeset("/root/tempprcp/prtlprcpprelist/prcplist");
									model.makeNode("root/tempprcp/prtlprcpprelist/prcplist");
									copyNodesetType("root/tempprcp/prtlprcpprelist/prcplist", "root/main/prtlprcpprelist/prcplist", "replace");
									
									for(var i=1 ; i <= getNodesetCount("/root/main/prtlprcpprelist/prcplist") ; i++) {
										var drugseq = model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq");
										var drugseqhr = Math.round( (parseInt(drugseq)/60) * 100 ) / 100;
																			
										model.setValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq", drugseqhr);									
									}
									
									fGrdRebuildStyle();
									fSetVol();
									fSetGrdColor();
							]]>
						</script>
					</select1>
					<bool id="bool1" checkvalue="Y,N" ref="/root/main/prtlinfo/prereqyn" style="left:942px; top:31px; width:26px; height:20px; font-weight:bold; "/>
					<caption id="caption47" class="cell_1" style="left:843px; top:30px; width:97px; height:23px; vertical-align:middle; ">사전신청항암제</caption>
					<shape id="roundrect3" appearance="roundrect" ellipsewidth="10" ellipseheight="10" style="left:1072px; top:33px; width:105px; height:20px; background-color:#ffffff; border-color:#3366ff; "/>
					<shape id="rectangle3" appearance="rectangle" style="left:1079px; top:37px; width:13px; height:13px; background-color:#ff4848; border-color:#000000; "/>
					<caption id="caption15" style="left:1095px; top:35px; width:27px; height:19px; ">
						<![CDATA[품절]]>
						<hint>
							<![CDATA[약품 품절]]>
						</hint>
					</caption>
					<shape id="rectangle4" appearance="rectangle" style="left:1129px; top:37px; width:13px; height:13px; background-color:#ffbb00; border-color:#000000; "/>
					<caption id="caption16" style="left:1145px; top:35px; width:30px; height:19px; ">
						<![CDATA[임상]]>
						<hint>
							<![CDATA[임상연구]]>
						</hint>
					</caption>
				</case>
				<case id="case4"/>
			</switch>
			<button id="button66" class="btn_sw" group="tab" selected="false" style="left:95px; top:10px; width:60px; height:22px; ">
				<caption>미리보기</caption>
				<toggle case="case1" ev:event="onclick"/>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						//removeReportPreview();								
					]]>
				</script>
			</button>
			<button id="button12" class="btn_sw" group="tab" selected="false" style="left:155px; top:10px; width:60px; height:22px; ">
				<caption>차트보기</caption>
				<toggle case="case4" ev:event="onclick"/>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						PrintFunc();
					]]>
				</script>
			</button>
			<button id="button13" class="btn_sw" group="tab" selected="false" style="left:215px; top:10px; width:105px; height:22px; ">
				<caption>항암스케줄반환</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						setParameter("issave","Y");
						
						model.setValue("/root/hidden/antisch/pid", model.getValue("/root/paminfo/list/pid"));
						modal("SMADB01020",0,0,0,"SMADB01020","/root/hidden/antisch","/root/hidden/antisch");
						//removeReportPreview();		
						submit("TRADB01027");
						
					]]>
				</script>
			</button>
			<button id="button6" class="btn2_letter4" style="left:1127px; top:10px; width:64px; height:19px; ">
				<caption>용량계산</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
							var sIOFlag  = model.getValue("/root/main/prtlinfo/ioflag");   // 복사 처방시 입원, 외래 체크
							if(isNull(sIOFlag)) {
								alert("프로토콜이 선택 되지 않았습니다.");
								return;
							}
							
							group2.visible= true;
							model.setFocus("ipt_ht");
						]]>
				</script>
			</button>
			<button id="btn_add" class="btn2_letter2" visibility="hidden" style="left:1083px; top:10px; width:42px; height:19px; ">
				<caption>신규</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
							//중복처방 처리///////////////////////
							model.reset();
							fInit();
							//////////////////////////////////////////
						]]>
				</script>
			</button>
			<group id="group2" visibility="hidden" style="left:270px; top:215px; width:908px; height:495px; border-color:#000080; border-width:3px; border-style:solid; ">
				<line id="line6" class="line_2" style="x1:5px; y1:400px; x2:898px; y2:400px; "/>
				<input id="input7" ref="/root/main/data/ibw" class="input_default" maxlength="6" format="###.###" style="left:360px; top:325px; width:72px; height:19px; ">
					<script type="javascript" ev:event="xforms-value-changed">
						<![CDATA[
									model.setValue("/root/hidden/calcyn","N");
									model.setValue("/root/hidden/calappyn","N"); // 계산된 용량 적용여부
						
									model.setValue("/root/hidden/subtrvolyn","N");
									model.refresh();
								]]>
					</script>
					<script type="javascript" ev:event="onkeyup">
						<![CDATA[
									if ( event.keyCode == 13 ){
										setInputNodeCurText();
										model.setFocus("btn_calc");										
									}	
								]]>
					</script>
				</input>
				<button id="button7" class="btn2_letter4" visibility="visible" style="left:724px; top:325px; width:64px; height:19px; ">
					<caption>신체계측</caption>
					<script type="javascript" ev:event="DOMActivate">
						<![CDATA[
									//messageBox("2차 개발예정입니다.", "I999", "");
									//return;
									setParameter("pid",model.getValue("/root/paminfo/list/pid"));
									modal("SPADB61800",0,100,150,"SPADB61800","/root/hidden/receivevs","/root/hidden/receiveref");	
									fSetIBW();		
								]]>
					</script>
				</button>
				<button id="btn_cls" class="btn4_letter2" style="left:785px; top:462px; width:56px; height:22px; ">
					<caption>닫기</caption>
					<script type="javascript" ev:event="DOMActivate">
						<![CDATA[
							group2.visible= false;								
						]]>
					</script>
				</button>
				<caption id="caption17" style="left:435px; top:326px; width:20px; height:20px; vertical-align:middle; ">kg</caption>
				<button id="button8" class="btn2_letter4" visibility="visible" style="left:790px; top:325px; width:64px; height:19px; ">
					<caption>Lab결과</caption>
					<script type="javascript" ev:event="DOMActivate">
						<![CDATA[
									messageBox("2차 개발예정입니다.", "I999", "");
									return;
									modal("SPADB61900",0,100,150,"SPADB61900","/root/hidden/receivelab","/root/hidden/receiveref");								
								]]>
					</script>
				</button>
				<caption id="caption18" style="left:133px; top:326px; width:25px; height:20px; vertical-align:middle; ">cm</caption>
				<datagrid id="grd_prtlprcplist" nodeset="/root/main/prtlprcpvollist/item" class="datagrid2" caption="코드^처방명^적용방법^BSA당 용량^ KG당 용량^   1일용량^1회용량^1회용량^처방%^1일수량^1회수량^1회수량^감량사유^^^^" colsep="^" colwidth="79, 215, 56, 48, 41, 49, 40, 35, 46, 43, 42, 35, 218, 10, 10, 10, 10" mergecellsfixedrows="bycolrec" rowsep="|" style="left:5px; top:42px; width:893px; height:263px; ">
					<col ref="prcpcd"/>
					<col ref="prcpnm"/>
					<col ref="volkind" type="combo">
						<choices>
							<item>
								<label>-</label>
								<value>0</value>
							</item>
							<item>
								<label>BSA</label>
								<value>1</value>
							</item>
							<item>
								<label>KG</label>
								<value>2</value>
							</item>
							<item>
								<label>AUC</label>
								<value>3</value>
							</item>
						</choices>
					</col>
					<col ref="bsavol" style="text-align:right; "/>
					<col ref="kgvol"/>
					<col ref="prcpvol" type="input" format="##.##" style="text-align:right; "/>
					<col ref="drprcpetc7" type="input" format="##.##" style="text-align:right; "/>
					<col ref="prcpvolunitnm"/>
					<col ref="subtrvolrate" type="input" format="##.##"/>
					<col ref="prcpqty" type="input" format="##.##" style="text-align:right; "/>
					<col ref="drprcpetc8" type="input" format="##.##" style="text-align:right; "/>
					<col ref="prcpqtyunitnm"/>
					<col ref="subtrvolresn" type="combo">
						<choices>
							<item>
								<label>-</label>
								<value>-</value>
							</item>
							<item>
								<label>간장기능저하</label>
								<value>1</value>
							</item>
							<item>
								<label>신장기능저하</label>
								<value>2</value>
							</item>
							<item>
								<label>PS 저하</label>
								<value>3</value>
							</item>
							<item>
								<label>BoneMarrow Suppression</label>
								<value>4</value>
							</item>
							<item>
								<label>기타</label>
								<value>9</value>
							</item>
						</choices>
					</col>
					<col ref="ordseqno" visibility="hidden"/>
					<col ref="prcpvolunitflag" visibility="hidden"/>
					<col ref="prcpqtyunitflag" visibility="hidden"/>
					<col ref="volrate" visibility="hidden"/>
					<script type="javascript" ev:event="onendedit">
						<![CDATA[
									//fCalcVol();
									
									var volrate = 0;           //
									var subtrvolrate = 0;   //  처방%
									var basevol = 0;         // 기본 용량
									var prcpvol = 0;          // 1일 용량
									var prcpqty = 0;          // 1일 수량
									var drprcpetc7 = 0;     // 1회 용량
									var drprcpetc8 = 0;     // 1회 수량
									
									if (grd_prtlprcplist.col== grd_prtlprcplist.colRef("prcpvol")){ // 1일용량
										/* 총수량 재계산 */
										volrate  = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/volrate");
										prcpvol = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpvol");
										prcpqty = Math.round(  parseFloat(prcpvol)/parseFloat(volrate) * 1000) /1000;
										drprcpetc7 = prcpvol;
										drprcpetc8 = prcpqty;
										
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpqty",      prcpqty);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/drprcpetc7", drprcpetc7);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/drprcpetc8", drprcpetc8);
										
										/*처방%계산*/
										subtrvolrate =   Math.round(parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/prcpvol") )/ parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/basevol")) * 100 * 100) /100;
										model.setValue( "/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/subtrvolrate", subtrvolrate );
									
									} else if (grd_prtlprcplist.col== grd_prtlprcplist.colRef("prcpqty")){ // 1일수량
										/* 계산총량 재계산 */
										volrate   = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/volrate");
										prcpqty = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpqty");
										prcpvol = Math.round(  parseFloat(prcpqty)*parseFloat(volrate) * 1000) /1000;
										drprcpetc7 = prcpvol;
										drprcpetc8 = prcpqty;
										
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpvol",      prcpvol);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/drprcpetc7", drprcpetc7);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/drprcpetc8", drprcpetc8);
										
										/*처방%계산*/
										subtrvolrate =   Math.round(parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/prcpvol") )/ parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/basevol")) * 100 * 100) /100;
										model.setValue( "/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/subtrvolrate", subtrvolrate );
									
									} else if (grd_prtlprcplist.col== grd_prtlprcplist.colRef("drprcpetc7")){ // 1회용량
										/* 총수량 재계산 */
										volrate        = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/volrate");
										drprcpetc7 = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/drprcpetc7");
										drprcpetc8 = Math.round(parseFloat(drprcpetc7)/parseFloat(volrate) * 1000) /1000;
										prcpvol      = drprcpetc7;
										prcpqty      = drprcpetc8;
										
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpvol",      prcpvol);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpqty",      prcpqty);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/drprcpetc8", drprcpetc8);
										
										/*처방%계산*/
										subtrvolrate =   Math.round(parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/prcpvol") )/ parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/basevol")) * 100 * 100) /100;
										model.setValue( "/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/subtrvolrate", subtrvolrate );
									
									} else if (grd_prtlprcplist.col== grd_prtlprcplist.colRef("drprcpetc8")){ // 1회수량
										/* 계산총량 재계산 */
										volrate        = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/volrate");
										drprcpetc8 = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/drprcpetc8");
										drprcpetc7 = Math.round(parseFloat(drprcpetc8)*parseFloat(volrate) * 1000) /1000;
										prcpvol      = drprcpetc7;
										prcpqty      = drprcpetc8;
										
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpvol",      prcpvol);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpqty",      prcpqty);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/drprcpetc7", drprcpetc7);
										
										/*처방%계산*/
										subtrvolrate =   Math.round(parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/prcpvol") )/ parseFloat( model.getValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/basevol")) * 100 * 100) /100;
										model.setValue( "/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/subtrvolrate", subtrvolrate );
									
									} else if (grd_prtlprcplist.col== grd_prtlprcplist.colRef("subtrvolrate")) {
										/* 계산총량 재계산 */		
										subtrvolrate = model.getValue("/root/main/prtlprcpvollist/item[" +(grd_prtlprcplist.row)+"]/subtrvolrate");							
										volrate         = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/volrate");
										basevol       = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/basevol");
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpvol", Math.round(  parseFloat(basevol)*parseFloat(subtrvolrate) /100 *1000) /1000);														
										
										/* 총수량 재계산 */
										prcpvol = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpvol");
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpqty", Math.round(  parseFloat(prcpvol)/parseFloat(volrate) * 1000) /1000);							
										btn_calc.dispatch("DOMActivate");
										
									} else if (grd_prtlprcplist.col== grd_prtlprcplist.colRef("subtrvolresn")) {
										/* 계산총량 재계산 */		
										subtrvolrate = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/subtrvolrate");							
										volrate         = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/volrate");
										basevol       = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/basevol");
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpvol", Math.round(  parseFloat(basevol)*parseFloat(subtrvolrate) /100 *1000) /1000);														
										
										/* 총수량 재계산 */
										prcpvol = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpvol");
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpqty", Math.round(  parseFloat(prcpvol)/parseFloat(volrate) * 1000) /1000);							
										btn_calc.dispatch("DOMActivate");
									}									
									
									subtrvolrate = model.getValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/subtrvolrate");
									
									if(subtrvolrate > 100) {
										messageBox("증량은 할 수 없습니다.", "I");
										
										model.setValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/subtrvolrate", "100");
										
										/* 계산총량,  수량  재계산 */
										volrate    = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/volrate");
										prcpvol  = model.getValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/basevol");
										prcpqty  = Math.round(  parseFloat(prcpvol)/parseFloat(volrate) * 1000) /1000;
										drprcpetc7 = prcpvol;
										drprcpetc8 = prcpqty;
										
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpvol",      prcpvol);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/prcpqty",      prcpqty);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/drprcpetc7", drprcpetc7);
										model.setValue("/root/main/prtlprcpvollist/item["+ (grd_prtlprcplist.row)+"]/drprcpetc8", drprcpetc8);
									} else if(subtrvolrate < 100) {
										var subtrvolresn = model.getValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/subtrvolresn");
										
										if(subtrvolresn == "" || subtrvolresn == "-") {
											messageBox("감량사유를 입력하십시오." , "C010");
										}
									} else if(subtrvolrate == 100) {
										model.setValue("/root/main/prtlprcpvollist/item[" + grd_prtlprcplist.row + "]/subtrvolresn", "-");
									}
									
									model.refresh();
								]]>
					</script>
				</datagrid>
				<caption id="caption22" class="cell_1" style="left:8px; top:325px; width:44px; height:21px; ">신장</caption>
				<caption id="caption23" style="left:283px; top:326px; width:20px; height:20px; vertical-align:middle; ">kg</caption>
				<line id="line4" class="line_1" style="x1:5px; y1:35px; x2:898px; y2:35px; "/>
				<caption id="caption25" class="tit_2" style="left:10px; top:20px; width:177px; height:13px; ">용량계산 방법선택</caption>
				<line id="line5" class="line_3" style="x1:5px; y1:451px; x2:898px; y2:451px; "/>
				<line id="line8" class="line_1" style="x1:5px; y1:320px; x2:898px; y2:320px; "/>
				<line id="line9" class="line_3" style="x1:5px; y1:305px; x2:898px; y2:305px; "/>
				<caption id="caption39" class="tit_1" style="left:0px; top:-2px; width:185px; height:13px; ">용량 계산</caption>
				<caption id="caption40" class="cell_1" style="left:493px; top:6px; width:61px; height:23px; vertical-align:middle; ">감량사유</caption>
				<button id="button11" class="btn2_letter4" style="left:813px; top:8px; width:64px; height:19px; ">
					<caption>일괄적용</caption>
					<script type="javascript" ev:event="DOMActivate">
						<![CDATA[
							
							if (model.getValue("/root/hidden/subtrvol/subtrvolrate") ==""){
								messageBox("처방%를 입력하십시오.", "C010");
								return;
							}
							if (model.getValue("/root/hidden/calcyn") != "Y"){
								messageBox("계산후 적용가능합니다.", "C010");
								return;
							}  
							
							var subtrvolresn = model.getValue("/root/hidden/subtrvol/subtrvolresn");									  
							if(subtrvolresn == "" || subtrvolresn == "-") {
								messageBox("감량사유를 입력하십시오." , "C010");
								return;
							}
							
							for ( var i = 0; i<grd_prtlprcplist.rows-1;i++ ){
								if (fContainsHardCD("543", model.getValue( "/root/main/prtlprcpvollist/item["+(i+1)+"]/prcpcd"))) { // 감량 일괄 제외 약품 코드(하드코드 543) 2016.10.10 엄영만
									continue;
								}

								model.setValue( "/root/main/prtlprcpvollist/item["+(i+1)+"]/subtrvolrate", model.getValue("/root/hidden/subtrvol/subtrvolrate" ));
								model.setValue( "/root/main/prtlprcpvollist/item["+(i+1)+"]/subtrvolresn", model.getValue("/root/hidden/subtrvol/subtrvolresn" ));
							}
							model.refresh();
							fCalcVol();
						]]>
					</script>
				</button>
				<caption id="caption41" class="cell_1" style="left:383px; top:6px; width:45px; height:23px; vertical-align:middle; ">처방%</caption>
				<input id="input19" ref="/root/hidden/subtrvol/subtrvolrate" class="input_essential" format="999" style="left:433px; top:8px; width:50px; height:19px; "/>
				<select1 id="cmb_cntsunit" ref="/root/hidden/subtrvol/subtrvolresn" class="combo_default" disabled="false" appearance="minimal" style="left:558px; top:8px; width:250px; height:19px; ">
					<choices>
						<item>
							<label>-</label>
							<value>-</value>
						</item>
						<item>
							<label>간장기능저하</label>
							<value>1</value>
						</item>
						<item>
							<label>신장기능저하</label>
							<value>2</value>
						</item>
						<item>
							<label>PS 저하</label>
							<value>3</value>
						</item>
						<item>
							<label>BoneMarrow Suppression</label>
							<value>4</value>
						</item>
						<item>
							<label>기타</label>
							<value>9</value>
						</item>
					</choices>
				</select1>
				<caption id="caption30" style="left:158px; top:425px; width:43px; height:23px; vertical-align:middle; ">(AUC</caption>
				<caption id="caption31" style="left:248px; top:425px; width:90px; height:23px; vertical-align:middle; ">x ( 25 + GFR )</caption>
				<caption id="caption32" style="left:763px; top:402px; width:60px; height:23px; vertical-align:middle; ">(mg/dl))</caption>
				<input id="input11" ref="/root/main/data/age" class="input_default" format="###" style="left:248px; top:380px; width:55px; height:19px; "/>
				<caption id="caption33" style="left:308px; top:378px; width:200px; height:23px; vertical-align:middle; ">세) x 체중 kg) / (Serum Creatinine</caption>
				<input id="input12" ref="/root/main/data/urvol" class="input_default" format="###.###" style="left:248px; top:403px; width:55px; height:19px; "/>
				<caption id="caption34" style="left:33px; top:425px; width:103px; height:23px; vertical-align:middle; ">Carboplatin총량</caption>
				<input id="input13" ref="/root/main/data/sc" class="input_default" format="###.###" style="left:708px; top:403px; width:52px; height:19px; "/>
				<caption id="caption35" style="left:493px; top:402px; width:223px; height:23px; vertical-align:middle; ">(mg/dl))/(1440min * Serum Creatinine</caption>
				<input id="input14" ref="/root/main/data/urcr" class="input_default" format="###.###" style="left:438px; top:403px; width:52px; height:19px; "/>
				<input id="input15" ref="/root/main/data/sc" class="input_default" format="###.###" style="left:518px; top:380px; width:72px; height:19px; "/>
				<caption id="caption36" style="left:593px; top:378px; width:90px; height:23px; vertical-align:middle; ">(mg/dl)x 72) *</caption>
				<select1 id="radio1" ref="/root/main/data/gfrflag" appearance="full" cols="1" rows="2" vcellspacing="7" overflow="visible" style="left:8px; top:378px; width:60px; height:45px; border-style:none; ">
					<choices>
						<item>
							<label>GFR</label>
							<value>1</value>
						</item>
						<item>
							<label>GFR2</label>
							<value>2</value>
						</item>
					</choices>
				</select1>
				<input id="input16" ref="/root/main/data/carbovol" class="input_default" format="###.###" style="left:353px; top:427px; width:85px; height:19px; "/>
				<caption id="caption37" style="left:328px; top:425px; width:20px; height:23px; vertical-align:middle; ">=</caption>
				<caption id="caption38" style="left:148px; top:425px; width:20px; height:23px; vertical-align:middle; ">=</caption>
				<caption id="caption27" style="left:148px; top:402px; width:96px; height:23px; vertical-align:middle; ">= (Urine Volume</caption>
				<caption id="caption28" style="left:148px; top:378px; width:95px; height:23px; vertical-align:middle; ">= ((140 - 만나이</caption>
				<output id="output1" ref="/root/main/data/gfr" class="output_fix" appearance="output" style="left:68px; top:390px; width:55px; height:19px; "/>
				<caption id="caption29" style="left:308px; top:402px; width:135px; height:23px; vertical-align:middle; ">ml * Urine Creatinine</caption>
				<output id="output2" ref="/root/main/data/sexrate" class="output_fix" appearance="output" style="left:678px; top:380px; width:55px; height:19px; "/>
				<line id="line7" class="line_2" style="x1:5px; y1:424px; x2:898px; y2:424px; "/>
				<input id="input10" ref="/root/main/data/bsa" class="input_default" editable="false" format="###.###" style="left:518px; top:353px; width:87px; height:19px; "/>
				<caption id="caption24" style="left:499px; top:353px; width:20px; height:23px; vertical-align:middle; ">=</caption>
				<caption id="caption26" style="left:26px; top:353px; width:43px; height:23px; vertical-align:middle; ">BSA</caption>
				<caption id="caption42" style="left:149px; top:353px; width:20px; height:23px; vertical-align:middle; ">=</caption>
				<caption id="caption43" style="left:179px; top:353px; width:220px; height:23px; vertical-align:middle; ">((신장 cm x 체중 kg) / 3600)^(1/2)</caption>
				<line id="line11" class="line_2" style="x1:5px; y1:373px; x2:898px; y2:378px; "/>
				<select1 id="radio2" ref="/root/main/data/wtflag" class="cell_1" appearance="full" cols="1" rows="2" vcellspacing="7" overflow="visible" style="left:313px; top:324px; width:45px; height:21px; border-style:none; ">
					<choices>
						<item>
							<label>IBW</label>
							<value>2</value>
						</item>
					</choices>
					<script type="javascript" ev:event="onclick">
						<![CDATA[
									
									if (model.getValue("/root/main/data/ht") ==""){
										messageBox("신장을 입력하십시오.", "C010");
										return;
									}
									fSetIBW();
									if (model.getValue("/root/main/data/wt") =="" && model.getValue("/root/main/data/wtflag") =="1"){
										messageBox("체중을 입력하거나 IBW를 선택하십시오.", "C010");
										return;
									}
									fCalcVol();
									model.setValue("/root/hidden/calcyn","Y");
								       model.refresh();
									model.setFocus("btn_calccon");						
								]]>
					</script>
				</select1>
				<select1 id="radio3" ref="/root/main/data/wtflag" class="cell_1" appearance="full" cols="1" rows="2" vcellspacing="7" overflow="visible" style="left:163px; top:324px; width:45px; height:21px; border-style:none; ">
					<choices>
						<item>
							<label>체중</label>
							<value>1</value>
						</item>
					</choices>
					<script type="javascript" ev:event="onclick">
						<![CDATA[

									if (model.getValue("/root/main/data/ht") ==""){
										messageBox("신장을 입력하십시오.", "C010");
										return;
									}
									fSetIBW();
									if (model.getValue("/root/main/data/wt") =="" && model.getValue("/root/main/data/wtflag") =="1"){
										messageBox("체중을 입력하거나 IBW를 선택하십시오.", "C010");
										return;
									}
									fCalcVol();
									model.setValue("/root/hidden/calcyn","Y");
								       model.refresh();
									model.setFocus("btn_calccon");								
								]]>
					</script>
				</select1>
				<line id="line10" class="line_3" style="x1:5px; y1:346px; x2:898px; y2:346px; "/>
				<input id="ipt_wt" ref="/root/main/data/wt" class="input_default" navindex="11" maxlength="6" format="###.###" style="left:209px; top:325px; width:72px; height:19px; ">
					<script type="javascript" ev:event="onkeyup">
						<![CDATA[
									if ( event.keyCode == 13 ){
										setInputNodeCurText();
										model.setFocus("btn_calc");

									}	
								]]>
					</script>
					<script type="javascript" ev:event="xforms-value-changed">
						<![CDATA[
									//fSetIBW();
									model.setValue("/root/hidden/calcyn","N");
									model.setValue("/root/hidden/subtrvolyn","N");
									model.refresh();
								]]>
					</script>
				</input>
				<input id="ipt_ht" ref="/root/main/data/ht" class="input_default" navindex="10" maxlength="6" format="###.###" style="left:54px; top:325px; width:76px; height:19px; ">
					<script type="javascript" ev:event="onkeyup">
						<![CDATA[
							if ( event.keyCode == 13 ){
								setInputNodeCurText();
								model.setFocus("ipt_wt");
							}								
						]]>
					</script>
					<script type="javascript" ev:event="xforms-value-changed">
						<![CDATA[
									model.setValue("/root/hidden/calcyn","N");
									model.setValue("/root/hidden/subtrvolyn","N");
									model.refresh();
								]]>
					</script>
					<script type="javascript" ev:event="onkeypress">
						<![CDATA[
								
								]]>
					</script>
				</input>
				<button id="btn_calc" class="btn5_letter2" navindex="12" style="left:855px; top:325px; width:42px; height:19px; ">
					<caption>계산</caption>
					<script type="javascript" ev:event="DOMActivate">
						<![CDATA[
							if (model.getValue("/root/main/data/ht") ==""){
								messageBox("신장을 입력하십시오.", "C010");
								return;
							}
							fSetIBW();
							if (model.getValue("/root/main/data/wt") =="" && model.getValue("/root/main/data/wtflag") =="1"){
								messageBox("체중을 입력하거나 IBW를 선택하십시오.", "C010");
								return;
							}
							
							fCalcVol();
							model.setValue("/root/hidden/calcyn","Y");
							model.setValue("/root/hidden/calappyn","N");
						    model.setFocus("btn_calccon");
							model.refresh();
						]]>
					</script>
				</button>
				<button id="btn_calccon" class="btn4_letter2" navindex="13" style="left:842px; top:462px; width:56px; height:22px; ">
					<caption>적용</caption>
					<script type="javascript" ev:event="DOMActivate">
						<![CDATA[
							fGrdRebuildStyle();
 								       //fCalcVol();
							if (fSetVol() == false) { return; }
							if (model.getValue("/root/hidden/calcyn") != "Y"){
								messageBox("계산후 적용가능합니다.", "C010");
								return;
							}   
							
							model.setValue("/root/hidden/calappyn","Y"); // 계산된 용량 적용여부
				   
							fSetGrdColor();
							group2.visible= false;		
						]]>
					</script>
				</button>
				<input id="input9" ref="/root/main/data/auc" class="input_default" format="###.###" style="left:192px; top:427px; width:50px; height:20px; text-align:right; "/>
			</group>
			<button id="button2" class="btn2_letter8" style="left:973px; top:10px; width:108px; height:19px; ">
				<caption>부작용 관찰기록지</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
					var screenid=getOpenWindow("SPADB71000");
					if(screenid==null ){
						modal("SPADB71000");
					}						
					]]>
				</script>
			</button>
			<button id="button4" class="btn2_letter7" style="left:325px; top:10px; width:97px; height:19px; ">
				<caption>항암FlowSheet</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						open("SMMQI04000");
					]]>
				</script>
			</button>
		</group>
		<group id="group4" scroll="auto" style="left:0px; top:13px; width:1195px; height:27px; ">
			<button id="btn_cfm" class="btn4_letter2" visibility="hidden" style="left:995px; top:5px; width:56px; height:22px; ">
				<caption>Hold</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
					if (model.getValue("/root/send/data/orderdata/cpgappno")==""){
						messageBox("Hold할 프로토콜을 ", "C002");
						return;
					}
					
 					if (messageBox("해당 프로토콜 Hold를 ", "Q004")==6){
						submit("TXADB01022");
						//submit("TRADB01007");	
						
						model.setValue("/root/main/data/age", model.getValue("/root/send/srchdata/receivedata/age"));
						model.setValue("/root/main/prtlinfo/startdate", getCurrentDate());
						model.setValue("/root/send/data/orderdata/cpgappno", "");
						submit("TRADB01021");
						submit("TRADB01027");
						//fSetPrtlInfo();				
 					} 					
 					
					]]>
				</script>
			</button>
			<button id="button5" class="btn4_letter2" style="left:1139px; top:5px; width:56px; height:22px; ">
				<caption>저장</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						// 체중변화가 10% 이상 차이가 나면 경고 메시지를 보여준다.  // 20110808 김영학
						var cWt = model.getValue("/root/main/data/wt");
						var bWt = model.getValue("/root/main/prtlhislist/item/wt");
						if (Math.abs(parseInt(cWt) / parseInt(bWt) * 100 - 100) > 10 ) {
							var wRtnVal  = messageBox("환자의 몸무게가 직전 프로토콜보다 10%이상 차이납니다. 프로토콜을 계속 진행하시겠습니까? ", "Q");
							if (wRtnVal != "6") {
								return;
							}
						}
						
						// 이전 항암 프로토콜과 감량률이 달라질 경우에 경고 메시지를 띄워준다. 20110817 김영학
						cSubtrvolrate = 0;   // 현재 감량률
						minSubtrvolrate = 100;   // 최소 감량률
						for (i = 1; i <= grd_prtlprcplist.rows; i++ ) {
							var cSubtrvolrate = model.getValue("/root/main/prtlprcpvollist/item["  + i + "]/subtrvolrate");
							if (parseInt(cSubtrvolrate) < parseInt(minSubtrvolrate) ) {
								minSubtrvolrate = cSubtrvolrate;
							}
						}
						
						bfMinSubtrvolrate = model.getValue("/root/main/prtlhislist/item/minsubtrvolrate");
						if (!isNull(bfMinSubtrvolrate))  {
							if ( parseInt(minSubtrvolrate) != parseInt(bfMinSubtrvolrate)) {
								var rtnVal = messageBox("직전 처방과 감량률이 다릅니다. \n\n 항암프로토콜을 계속 진행하시겠습니까?", "Q");
								if (rtnVal != 6) {
									return;
								}
							}
						}
						// 이전 항암 프로토콜과 감량률이 달라질 경우에 경고 메시지를 띄워준다. END						

						// 약국 품절여부 체크  start - 20110817  김영학 
						var sAbsnCnts = 0;    // 품절약품 수
						var sSpclDrugCnts = 0;  //항암 약품 수
						var sSpclDrugNm = "";   //항암 약품명
						var sAbsDrugNm = "";   // 품절약품명
						var sAbsDrugCd = "";   // 품절약품명
						var sAbsDrugDelFlag = "";   // 삭제 구분자
						
						// 임상시험 과제번호 설정
						var sCheckDate = "";   // 임상시험 체크 처방적용일
						var sSubcretno = "0";  // 임상시험 유형 원무 접수번호
							
						for ( var i = 0; i < grd_prtlprcpprelist.rows-1 ; i++){
							if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/absnyn") =="Y") {
								// 항암제 품절은 따로 체크한다. 
								if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/spcldrugyn") =="Y") {
									if (isNull(sSpclDrugNm) ) {
										sSpclDrugNm = model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpnm");
									} else {
										sSpclDrugNm = sSpclDrugNm + "|" + model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpnm");
									}										
									sSpclDrugCnts++;
								} else {
									var prcpcd = model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpcd");
									var sAbsDrugCdArrayList = sAbsDrugCd.split("|");
									for (var k = 0; k <sAbsDrugCdArrayList.length ; k++ ) {  // 처방 코드가 이미 존재하면 추가하지 않는다. 
										if (sAbsDrugCdArrayList[k] != prcpcd) {
											if (isNull(sAbsDrugCd) ) {
												sAbsDrugNm = model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpnm");
											} else {
												sAbsDrugNm = sAbsDrugNm + "|" + model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpnm");
											}									
											if (isNull(sAbsDrugCd) ) {
												sAbsDrugCd = model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpcd");
											} else {
												sAbsDrugCd = sAbsDrugCd + "|" + model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpcd");
											}
											sAbsnCnts++;											
										}
									}
									// 처방 삭제를 위해서 구분자를 모든 처방에서 저장한다. 
									if (isNull(sAbsDrugDelFlag)) {
										sAbsDrugDelFlag = model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prtldgnm") + "^" + model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpmixno")  + "^" + model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/ordseqno");
									} else {
										sAbsDrugDelFlag = sAbsDrugDelFlag + "|" + model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prtldgnm") + "^" + model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpmixno") + "^" + model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/ordseqno");
									}
								}
							}

							// 임상시험 피험자 등록 체크 2013.05.15 엄영만
							if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/clincstdyflag") =="Y") {
								if(sCheckDate != model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpdd") ) {
									sCheckDate = model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpdd");
									model.setValue("/root/send/clincstdy/instcd", 			model.getValue("/root/paminfo/list/instcd"));
									model.setValue("/root/send/clincstdy/pid", 				model.getValue("/root/paminfo/list/pid"));
									model.setValue("/root/send/clincstdy/prcpdd", 			sCheckDate);
									
									submit("TRADB01041");
									
									if(model.getValue("/root/hidden/clincstdycheck/item/clincstdyno") == null || model.getValue("/root/hidden/clincstdycheck/item/clincstdyno") == "") {
										messageBox("임상시험 피험자로 등록 되지 않았거나, 등록 된 임상시험 과제가 종료 되었습니다.\n임상처방이 포함된 프로토콜은 피험자 등록 후 진행 가능 합니다.", "C010");
										button5.disabled=false;
										switch1.disabled=false;
										return;
									}
								}
								
								if (model.getValue("/root/send/srchdata/receivedata/ioflag") !="O"){ // 입원이면 입상 접수 체크
									if (sSubcretno == "0") {
										sSubcretno = fGetSubcretno(model.getValue("/root/paminfo/list/pid"), model.getValue("/root/paminfo/list/indd"), "clincstdyflag");
										
										if ( sSubcretno == "0" ) {
											messageBox ("임상시험 보험유형이 없습니다. 입상접수 후 진행하세요.", "C010");
											button5.disabled=false;
											switch1.disabled=false;
											return;
										}	
									}
									model.setValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/subcretno", sSubcretno);
								} else {
									model.setValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/subcretno", "0");
								}
							} else {
								model.setValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/subcretno", "0");
							}
						}

						if (sSpclDrugCnts > 0 ) {
							messageBox("항암제가 품절되었습니다. \n\n품절약품은 " + sSpclDrugNm + "입니다. \n\n특수조제실에 문의하세요", "C");
							return;
						} else if (sAbsnCnts > 0 ) {
							// 품절약과 같이 믹스된 약중에 항암제가 있을 경우에는 처방 Blocking 해야 한다.
							var sAbsDrugDelArrayList = sAbsDrugDelFlag.split("|");
							for (m = 0 ; m < sAbsDrugDelArrayList.length; m++ ) {
								var sAbsDrugArrayList = sAbsDrugDelArrayList[m].split("^");
								for ( var i = 1; i <= grd_prtlprcpprelist.rows-1 ; i++){
									if (model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/spcldrugyn") == "Y" &&
										model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prtldgnm") == sAbsDrugArrayList[0] &&
										model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpmixno") == sAbsDrugArrayList[1] && 
										model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpmixno") != "-") {
										messageBox("항암제와 믹스된 약품이 품절되었습니다. \n\n품절약품은 " + sAbsDrugNm + "입니다. \n\n특수조제실에 문의하세요", "C");
										return;
									}
								}
							}							
							var rtnVal = messageBox(sAbsDrugNm + "약품이 품절되었습니다. \n\n 항암프로토콜을 계속 진행하시겠습니까? \n\n계속 진행시에 품절약은 제외됩니다.", "Q");
							if (rtnVal == "6" ) { //품절된 약을 삭제처리한다. 그리고 믹스된 약을 동시에 삭제 처리한다.
								var sAbsDrugDelArrayList = sAbsDrugDelFlag.split("|");
								for (m = 0 ; m < sAbsDrugDelArrayList.length; m++ ) {
									var sAbsDrugArrayList = sAbsDrugDelArrayList[m].split("^");
									for ( var i = 1; i <= grd_prtlprcpprelist.rows-1 ; i++){
										if ( sAbsDrugArrayList[1] == "-") {
											if (model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prtldgnm") == sAbsDrugArrayList[0] &&
												model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpmixno") == sAbsDrugArrayList[1] &&
												model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/ordseqno") == sAbsDrugArrayList[2]  ) {
											
												model.setValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prtlabsnyn", "Y");
											}
										} else {
											if (model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prtldgnm") == sAbsDrugArrayList[0] && model.getValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prcpmixno") == sAbsDrugArrayList[1] ) {
												// 발행내역에 품절약을 표시해주는 방식으로 변경
												model.setValue("/root/main/prtlprcpprelist/prcplist[" + i + "]/prtlabsnyn", "Y");
											}
										}
									}
								}
								model.refresh();
							} else {
								return;
							}
						}
						// 약국 품절여부 체크  END - 20110817  김영학 						

						button5.disabled=true;
						switch1.disabled = true;
					
						var chkdiag = false;
						for ( var i = 0 ; i < grd_diaglist.rows ; i++){
							if ( model.getValue("/root/main/diaginfo/diagcdlist["+i+"]/status") != "D" ){
								if ( model.getValue("/root/main/diaginfo/diagcdlist["+i+"]/diagcd") != "" ){
									chkdiag = true;
								}
							}
						} 
						if( chkdiag ){
							//fBatSaveAntiMeticPrtlPrcp();
						}else{
							messageBox("환자의 진단을 ", "C001");
							button5.disabled=false;
							switch1.disabled=false;
							return;
						}	
						
						for ( var i = 0; i < grd_prtlprcpprelist.rows-1 ; i++){
							if ( model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/payflagcd") !="0" && model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/payflagcd") !="1" && model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/payflagcd") !="2" ){
								messageBox("급여구분을 지정하십시오.", "C010");
								button5.disabled=false;
								switch1.disabled=false;
								return;
							}
						}
						
						
						//수량 0 체크
						for ( var i = 0; i < grd_prtlprcpprelist.rows-1 ; i++){
							if ( parseFloat(model.getValue("/root/main/prtlprcpprelist/prcplist["+(i+1)+"]/prcpqty") )==0){
								grd_prtlprcpprelist.deleteRow(i+1);
								i= i-1;
							}
						}
						grd_prtlprcpprelist.refresh();
						//동일 프로토콜 여부 체크
						if (model.getValue("/root/send/data/orderdata/cpgappno")==""){  //진행여부 체크								
							for (  i = 0; i < grd_prtlhislist.rows; i++){
								if ( model.getValue("/root/main/prtlhislist/item["+i+"]/orddd") ==model.getValue("/root/send/srchdata/receivedata/orddd") ){
									if ( model.getValue("/root/main/prtlhislist/item["+i+"]/sickclscd") ==model.getValue("/root/send/srchdata/sickclscd") ){
									if ( model.getValue("/root/main/prtlhislist/item["+i+"]/prtlcd") ==model.getValue("/root/send/srchdata/prtlcd") ){	
										if (model.getValue("/root/main/prtlhislist/item["+i+"]/appstat") ==""  || model.getValue("/root/main/prtlhislist/item["+i+"]/appstat") =="00"  || model.getValue("/root/main/prtlhislist/item["+i+"]/appstat") =="10"){
											messageBox("진행중인 동일한 프로토콜이 있으므로 저장 불가합니다.", "C010");
											button5.disabled=false;
											switch1.disabled=false;
											return;
										}
									}
									}
								}
							}
						}
							
						if ( model.getValue("/root/hidden/dupcheck/item/cnt") == "0" ){ //중복가능 진료과 체크
							if (model.getValue("/root/send/data/orderdata/cpgappno")==""){  //진행여부 체크
								for (  i = 0; i < grd_prtlhislist.rows; i++){
									if ( model.getValue("/root/main/prtlhislist/item["+i+"]/orddd") ==model.getValue("/root/send/srchdata/receivedata/orddd") ){
									if (model.getValue("/root/main/prtlhislist/item["+i+"]/appstat") ==""  || model.getValue("/root/main/prtlhislist/item["+i+"]/appstat") =="00"  || model.getValue("/root/main/prtlhislist/item["+i+"]/appstat") =="10"){
										messageBox("진행중인 프로토콜이 있으므로 저장 불가합니다.", "C010");
										button5.disabled=false;
										switch1.disabled=false;
										return;
									}
									}
								}
							}
						}
					
						if (model.getValue("/root/send/data/orderdata/cpgappno")!=""){  //진행여부 체크
							messageBox("저장된 프로토콜은 조회 / Hold만 가능합니다.", "C010");
							button5.disabled=false;
							switch1.disabled=false;
							return;
						}
					
						
						if ( model.getValue("/root/main/prtlinfo/drugstage") ==""){
							messageBox("투여단계를 ", "C001");
							button5.disabled=false;
							switch1.disabled=false;
							return;
						}
						if ( model.getValue("/root/main/prtlinfo/drugcycle") ==""){
							messageBox("Cycle을 ", "C001");
							button5.disabled=false;
							switch1.disabled=false;
							return;
						}
						
						if ( model.getValue("/root/hidden/calcyn")=="N" ){
							messageBox("용량계산 후 저장 가능합니다.", "C010");
							button5.disabled=false;
							switch1.disabled=false;
							return;
						}
						if ( model.getValue("/root/hidden/calappyn")=="N" ){
							messageBox("용량계산 후 적용버튼을 누른 후에 저장하셔야 합니다.", "C010");
							button5.disabled=false;
							switch1.disabled=false;
							return;
						}
						
						if (model.getValue("/root/paminfo/list/pid") != model.getValue("/root/send/srchdata/receivedata/pid")) {
							messageBox("환자정보를 확인하십시오.", "C010");
							button5.disabled=false;
							switch1.disabled=false;
							return;
						}
						
						// 20101021_laboru_경북대병원_투여시점 시간 단위로 보이게 수정(소수점 셋째 자리에서 반올림)
						// 처방 저장할때 원래 값으로 되돌림
						for(var i = 1; i <= getNodesetCount("/root/main/prtlprcpprelist/prcplist") ; i++) {
							model.setValue("root/main/prtlprcpprelist/prcplist[" + i + "]/drugseq" , model.getValue("root/tempprcp/prtlprcpprelist/prcplist[" + i + "]/drugseq"));
						}
						
						var usegoal="";
						if (model.getValue("/root/send/srchdata/receivedata/ioflag") =="O"){
							if (messageBox("외래 항암프로토콜을 ", "Q002")==6){
								
								if ( model.getValue("/root/main/prtlinfo/usegoal") ==""){  // 프로토콜 사용목적 팝업 조건 수정 2017.04.25 엄영만
									modal("SPADB70000", getCurrentMonitorNumber() , "450", "450", "", "", "", "", false, "", "");
									usegoal = model.getValue("/root/send/data/orderdata/usegoal");
									if(usegoal=="" || usegoal==null){
										messageBox("사용목적 선택은 필수입니다.", "I", "");
										button5.disabled=false;
										return;
									} else {
										model.setValue("/root/main/prtlinfo/usegoal", usegoal);
									}
								}
								
								callLoadingWindow("");
								model.setValue("/root/send/data/orderdata/sendpid", 				model.getValue("/root/send/srchdata/receivedata/pid"));
								model.setValue("/root/send/data/orderdata/sendorddd", 			model.getValue("/root/send/srchdata/receivedata/orddd"));
								model.setValue("/root/send/data/orderdata/sendioflag", 			model.getValue("/root/send/srchdata/receivedata/ioflag"));
								model.setValue("/root/send/data/orderdata/sendcretno", 			model.getValue("/root/send/srchdata/receivedata/cretno"));
								model.setValue("/root/send/data/orderdata/sendprtlcd", 			model.getValue("/root/send/srchdata/prtlcd"));
								model.setValue("/root/send/data/orderdata/sendsickclscd", 	model.getValue("/root/send/srchdata/sickclscd"));
								model.setValue("/root/send/data/orderdata/sendantimetprtlcd", model.getValue("/root/send/srchdata/antimetprtlcd"));
								model.setValue("/root/send/data/orderdata/sendorddeptcd", 	model.getValue("/root/send/srchdata/receivedata/orddeptcd"));
								model.setValue("/root/send/data/orderdata/appdd", 					model.getValue("/root/main/prtlinfo/startdate"));
								model.setValue("/root/send/data/orderdata/starttimes", 			model.getValue("/root/main/prtlinfo/startterm"));
								model.setValue("/root/send/data/orderdata/endtimes", 				model.getValue("/root/main/prtlinfo/endterm"));
								model.setValue("/root/send/data/orderdata/drugstage", 			model.getValue("/root/main/prtlinfo/drugstage"));
								model.setValue("/root/send/data/orderdata/drugcycle", 			model.getValue("/root/main/prtlinfo/drugcycle"));
								model.setValue("/root/send/data/orderdata/prereqyn", 				model.getValue("/root/main/prtlinfo/prereqyn"));
								model.setValue("/root/send/data/orderdata/usegoal", 				model.getValue("/root/main/prtlinfo/usegoal"));
								model.setValue("/root/send/data/orderdata/ht", 						model.getValue("/root/main/data/ht"));
								model.setValue("/root/send/data/orderdata/wtflag", 					model.getValue("/root/main/data/wtflag"));
								model.setValue("/root/send/data/orderdata/wt", 						model.getValue("/root/main/data/wt"));
								model.setValue("/root/send/data/orderdata/ibw", 						model.getValue("/root/main/data/ibw"));
								model.setValue("/root/send/data/orderdata/bsa", 						model.getValue("/root/main/data/bsa"));
								model.setValue("/root/send/data/orderdata/gfrflag", 					model.getValue("/root/main/data/gfrflag"));
								model.setValue("/root/send/data/orderdata/gfr", 						model.getValue("/root/main/data/gfr"));
								model.setValue("/root/send/data/orderdata/sendage", 				model.getValue("/root/main/data/age"));
								model.setValue("/root/send/data/orderdata/sexrate", 				model.getValue("/root/main/data/sexrate"));
								model.setValue("/root/send/data/orderdata/sc", 						model.getValue("/root/main/data/sc"));
								model.setValue("/root/send/data/orderdata/urvol", 					model.getValue("/root/main/data/urvol"));
								model.setValue("/root/send/data/orderdata/urcr", 						model.getValue("/root/main/data/urcr"));
								model.setValue("/root/send/data/orderdata/auc", 						model.getValue("/root/main/data/auc"));
								model.setValue("/root/send/data/orderdata/carbovol", 				model.getValue("/root/main/data/carbovol"));
								
								model.removeNode ( "/root/send/data/orderprcpdata" );
								model.setValue("/root/send/data/acpttermfrom",	model.getValue( "/root/main/prtlinfo/startterm" ));
								model.setValue("/root/send/data/acpttermto",		model.getValue( "/root/main/prtlinfo/endterm" ));
								model.copyNode("/root/send/data/prcplist","/root/main/prtlprcpprelist"); //20090406 마정민추가
								
								//submit("TXADB01001");
								model.removeNodeset("/root/temp/temp/ret/cpgappno");
								submit("TRADB01029");
								model.setValue("/root/send/data/orderdata/cpgappno", model.getValue("/root/temp/temp/ret/cpgappno"));
								model.refresh();
								
								fSetVol(); // 용량 계산 후 용량분할 해야 함.
								submit("TRADB01030"); //용량분할
								//20090406 마정민 추가
								model.removeNodeset ( "/root/send/data/prcplist" ); 
								fGrdRebuildStyle();								
								
								setRowStyle("grd_prtlprcpprelist" , "8" , "Y" 	 , "tempprcpflag", "equal" );
								nodeList = instance1.selectNodes("/root/main/prtlprcpprelist/prcplist");
  								rCSV = getNodeListCSV(nodeList);  		
								model.makeNode ( "/root/send/data/prcplist" );
								model.setValue("/root/send/data/prcplist",rCSV);
						
								//환자진단정보
								nodeList = instance1.selectNodes("/root/main/diaginfo/diagcdlist");
  								rCSV = getNodeListCSV(nodeList);  								
								model.setValue("/root/send/data/diaglist",rCSV);
								
								//환자정보
								model.copyNode("/root/send/data/patinfolist","/root/paminfo/list");
								//인증데이터
								fAntiPrtlSignSave();
								
								var signyn = "Y";  
								model.setValue ( "/root/save/saveflaginfo/signyn", signyn );
								if ( signyn == "Y" ) {
									var signid = getUserInfo("userid");
									var signbfcnts = model.getValue("/root/send/data/signdata/signbfcnts");
									var setnode = "/root/main/prtlprcpprelist/prcplist";
									var signopt = false;
									var v_stext = "Sign Success";	//처방인증
									if ( v_stext != "N" ) {
										if (isNull( v_stext )) {
											button5.disabled=false;
											switch1.disabled=false;
											removeLoadingWindow();
											return false;
										}
										else {
											model.setValue("/root/send/data/signdata/signaftcnts", v_stext );
											submit("TXADB01023");
											submit("TRADB01027");	
										}
										var saveSignPrcpInfo = model.instances(0).selectNodes("/root/result/signprcplist");
										model.setValue ( "/root/send/cond6", getNodeListCSV(saveSignPrcpInfo)); 
										signopt = false; //진단에서 또 안띄우기 위해서 false로 수정
									
									    var chk = fBatSaveAntiMeticDiag();		
								        if ( chk == true ) {
										}
										if (model.getValue("/root/main/prtlinfo/startdate") == getCurrentDate()){
											messageBox("항암처방은 6PM에 일괄적으로 발생되므로 적용일시가 오늘인 처방은 발생되지 않습니다. \r\n\r\n따라서, 반드시 오늘 이내에 간호사가 확인검증하셔야 처방이 발생됩니다.\r\n\r\n담당간호사에게 연락하여 항암처방 확인검증작업을 필히 하도록 해주십시오.", "E999", "");
										} else {
											messageBox("저장완료되었습니다.", "I999", "");
										}
										removeLoadingWindow();
										//window.close();
									} else {
										button5.disabled=false;
										switch1.disabled=false;
										removeLoadingWindow();
										return;
									}
								}		
							} else {
								button5.disabled=false;								
								switch1.disabled=false;
								return;
							}
						} else {
							//window.load("SPADB60300_항암처방시체크사항.xrw","modal","code",  "left:150px; top:150px; width:610px; height:650px;min:hidden;max:hidden;resize:false;");
							
							if (messageBox("입원 항암프로토콜을 ", "Q002")==6){
								
								if ( model.getValue("/root/main/prtlinfo/usegoal") ==""){  // 프로토콜 사용목적 팝업 조건 수정 2017.04.25 엄영만
									modal("SPADB70000", getCurrentMonitorNumber() , "450", "450", "", "", "", "", false, "", "");
									usegoal = model.getValue("/root/send/data/orderdata/usegoal");
									if(usegoal=="" || usegoal==null){
										messageBox("사용목적 선택은 필수입니다.", "I", "");
										button5.disabled=false;
										return;
									} else {
										model.setValue("/root/main/prtlinfo/usegoal", usegoal);
									}
								}
								
								callLoadingWindow("");
                                model.setValue("/root/send/data/orderdata/sendpid", 				model.getValue("/root/send/srchdata/receivedata/pid"));
								model.setValue("/root/send/data/orderdata/sendorddd", 			model.getValue("/root/send/srchdata/receivedata/orddd"));
								model.setValue("/root/send/data/orderdata/sendioflag", 			model.getValue("/root/send/srchdata/receivedata/ioflag"));
								model.setValue("/root/send/data/orderdata/sendcretno", 			model.getValue("/root/send/srchdata/receivedata/cretno"));
								model.setValue("/root/send/data/orderdata/sendprtlcd", 			model.getValue("/root/send/srchdata/prtlcd"));
								model.setValue("/root/send/data/orderdata/sendsickclscd", 	model.getValue("/root/send/srchdata/sickclscd"));
								model.setValue("/root/send/data/orderdata/sendantimetprtlcd", model.getValue("/root/send/srchdata/antimetprtlcd"));
								model.setValue("/root/send/data/orderdata/sendorddeptcd", 	model.getValue("/root/send/srchdata/receivedata/orddeptcd"));
								model.setValue("/root/send/data/orderdata/appdd", 					model.getValue("/root/main/prtlinfo/startdate"));
								model.setValue("/root/send/data/orderdata/starttimes", 			model.getValue("/root/main/prtlinfo/startterm"));
								model.setValue("/root/send/data/orderdata/endtimes", 				model.getValue("/root/main/prtlinfo/endterm"));
								model.setValue("/root/send/data/orderdata/drugstage", 			model.getValue("/root/main/prtlinfo/drugstage"));
								model.setValue("/root/send/data/orderdata/drugcycle", 			model.getValue("/root/main/prtlinfo/drugcycle"));
								model.setValue("/root/send/data/orderdata/prereqyn", 				model.getValue("/root/main/prtlinfo/prereqyn"));
								model.setValue("/root/send/data/orderdata/usegoal", 				model.getValue("/root/main/prtlinfo/usegoal"));
								model.setValue("/root/send/data/orderdata/ht", 						model.getValue("/root/main/data/ht"));
								model.setValue("/root/send/data/orderdata/wtflag", 					model.getValue("/root/main/data/wtflag"));
								model.setValue("/root/send/data/orderdata/wt", 						model.getValue("/root/main/data/wt"));
								model.setValue("/root/send/data/orderdata/ibw", 						model.getValue("/root/main/data/ibw"));
								model.setValue("/root/send/data/orderdata/bsa", 						model.getValue("/root/main/data/bsa"));
								model.setValue("/root/send/data/orderdata/gfrflag", 					model.getValue("/root/main/data/gfrflag"));
								model.setValue("/root/send/data/orderdata/gfr", 						model.getValue("/root/main/data/gfr"));
								model.setValue("/root/send/data/orderdata/sendage", 				model.getValue("/root/main/data/age"));
								model.setValue("/root/send/data/orderdata/sexrate", 				model.getValue("/root/main/data/sexrate"));
								model.setValue("/root/send/data/orderdata/sc", 						model.getValue("/root/main/data/sc"));
								model.setValue("/root/send/data/orderdata/urvol", 					model.getValue("/root/main/data/urvol"));
								
								model.setValue("/root/send/data/orderdata/urcr", 						model.getValue("/root/main/data/urcr"));
								model.setValue("/root/send/data/orderdata/auc", 						model.getValue("/root/main/data/auc"));
								model.setValue("/root/send/data/orderdata/carbovol", 				model.getValue("/root/main/data/carbovol"));
								
								model.removeNode ( "/root/send/data/orderprcpdata" );
								model.copyNode("/root/send/data/prcplist","/root/main/prtlprcpprelist"); //20090406 마정민추가
								
								model.setValue("/root/send/data/acpttermfrom",model.getValue( "/root/main/prtlinfo/startterm" ));
								model.setValue("/root/send/data/acpttermto",model.getValue( "/root/main/prtlinfo/endterm" ));
								model.removeNodeset("/root/temp/temp/ret/cpgappno");
								submit("TRADB01029");
								model.setValue("/root/send/data/orderdata/cpgappno", model.getValue("/root/temp/temp/ret/cpgappno"));
								model.refresh();									
								
								submit("TRADB01030"); //용량분할
								
								var chk = fBatSaveAntiMeticPrtlPrcp();		
								if ( chk == true ) {
									submit("TRADB01027");							
										
									if (model.getValue("/root/main/prtlinfo/startdate") == getCurrentDate()){
										messageBox("항암처방은 6PM에 일괄적으로 발생되므로 적용일시가 오늘인 처방은 발생되지 않습니다. \r\n\r\n따라서, 반드시 오늘 이내에 간호사가 확인검증하셔야 처방이 발생됩니다.\r\n\r\n담당간호사에게 연락하여 항암처방 확인검증작업을 필히 하도록 해주십시오.", "E999", "");
										messageBox("저장완료되었습니다.", "I999", "");
									} else {
										messageBox("저장완료되었습니다.", "I999", "");
									}
									//window.close();
									//button5.disabled=true;
									model.setValue("/root/hidden/saveyn", "Y" );
									model.refresh();
									button5.disabled=false;				
									switch1.disabled=false;
									removeLoadingWindow();
								} else {
									removeLoadingWindow();
								}
							} else {
								button5.disabled=false;								
								switch1.disabled=false;
								return;
							}
						}
						
						grd_prtlprcpprelist.rebuildStyle();
						for ( var j =0; j<grd_prtlprcpprelist.rows-1 ;j++){
							if (model.getValue("/root/main/prtlprcpprelist/prcplist["+(j+1)+"]/volkind")!= "") {
								grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("prcpvol"))="#FFF000";
								grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("prcpqty"))="#FFF000";
								grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("drprcpetc7"))="#FFF000";
								grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("drprcpetc8"))="#FFF000";
							}
							
							if (model.getValue("/root/main/prtlprcpprelist/prcplist["+ (j+1)+"]/absnyn") == "Y") { // 품절표시
								grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("prcpnm"))="#ff4848";
							} else if (model.getValue("/root/main/prtlprcpprelist/prcplist["+ (j+1)+"]/clincstdyflag") == "Y") { // 임상표시
								grd_prtlprcpprelist.cellstyle("background-color", (j+1), grd_prtlprcpprelist.colRef("prcpnm"))="#ffbb00";
							}
						}	
						model.setValue("/root/hidden/saveyn", "Y" );
					
						model.refresh();
					]]>
				</script>
			</button>
		</group>
		<caption id="caption48" class="cell_1" style="left:8px; top:18px; width:60px; height:23px; vertical-align:middle; ">등록번호</caption>
		<caption id="caption49" class="cell_1" style="left:173px; top:18px; width:35px; height:23px; vertical-align:middle; ">성명</caption>
		<output id="output3" ref="/root/paminfo/list/pid" style="left:70px; top:20px; width:100px; height:19px; "/>
		<output id="output4" ref="/root/paminfo/list/hngnm" style="left:209px; top:20px; width:70px; height:19px; "/>
		<output id="output5" ref="/root/paminfo/list/sex" style="left:319px; top:20px; width:30px; height:19px; "/>
		<output id="output6" ref="/root/paminfo/list/age" style="left:389px; top:20px; width:35px; height:19px; "/>
		<caption id="caption50" class="cell_1" style="left:282px; top:18px; width:35px; height:23px; vertical-align:middle; ">성별</caption>
		<caption id="caption51" class="cell_1" style="left:352px; top:18px; width:35px; height:23px; vertical-align:middle; ">나이</caption>
		<datagrid id="datagrid1" nodeset="/root/main2/lablist/labinfo" visibility="hidden" caption="caption1^caption2^caption3^caption4" colsep="^" colwidth="100, 105, 100, 100" mergecellsfixedrows="bycolrec" rowsep="|" style="left:555px; top:295px; width:350px; height:150px; ">
			<col ref="prtldgnm"/>
			<col ref="prcpdd" type="input"/>
			<col ref="labtitle"/>
			<col ref="labname"/>
		</datagrid>
		<datagrid id="grd_diaglist" nodeset="/root/main/diaginfo/diagcdlist" caption="^R/O^주^진단코드^진단명^참고^특례" colsep="^" colwidth="35, 35, 25, 65, 324, 0, 35" dataheight="23" ellipsis="true" extendlastcol="scroll" frozenrows="1" mergecellsfixedrows="bycolrec" rowsep="I" tooltip="true" style="left:428px; top:15px; width:540px; height:80px; text-align:center; ">
			<col disabled="true" ref="status" type="combo" style="text-align:center; focus-rect:visible; ">
				<choices>
					<item>
						<label/>
						<value>S</value>
					</item>
					<item>
						<label>신규</label>
						<value>I</value>
					</item>
					<item>
						<label>삭제</label>
						<value>D</value>
					</item>
					<item>
						<label>-</label>
						<value>-</value>
					</item>
					<item>
						<label>수정</label>
						<value>U</value>
					</item>
				</choices>
			</col>
			<col checkvalue="R,C" ref="diagkindcd" type="checkbox" style="focus-rect:visible; "/>
			<col checkvalue="M,S" ref="diagkindcdflag" type="checkbox" style="text-align:center; focus-rect:visible; "/>
			<col imemode="alpha" ref="icd10cd" type="input" style="text-align:center; focus-rect:visible; "/>
			<col ref="diagengnm" type="input" style="text-align:left; focus-rect:visible; "/>
			<col ref="diagremfact"/>
			<col ref="spclinfo" style="text-align:center; focus-rect:visible; "/>
			<script type="javascript" ev:event="onendedit">
				<![CDATA[
					if ( grd_diaglist.col == diagnmCol) {						
						fDiagSrch("diagnm");
					} else if ( grd_diaglist.col == icd10cdCol) {						
						fDiagSrch("icd10cd");
					}
					]]>
			</script>
			<script type="javascript" ev:event="onmousedown">
				<![CDATA[
						fDaigMouseRghtBtnPopup();
					]]>
			</script>
			<script type="javascript" ev:event="xforms-value-changed">
				<![CDATA[
						if ( grd_diaglist.valueMatrix ( grd_diaglist.row,2  ) == "M" && grd_diaglist.col == "2" ) {
							for ( var i = 1; i < grd_diaglist.rows; i++ ) {
									if ( grd_diaglist.valueMatrix ( i, 2 ) == "M" && i !=  grd_diaglist.row ) {
										 grd_diaglist.valueMatrix ( i, 2  ) = "S";
										 if ( model.getValue ( diagNode + "[" + i + "]/status"  ) == "-" ) {
											 model.setValue ( diagNode + "[" + i + "]/status", "U" );
										 }
									}
							}
						}				
						fDiagUpdate();
					]]>
			</script>
			<script type="javascript" ev:event="ondblclick">
				<![CDATA[
						//fDiagDetlVw();
					]]>
			</script>
			<script type="javascript" ev:event="DOMFocusIn">
				<![CDATA[
					grd_diaglist.attribute("height") =380;
				]]>
			</script>
			<script type="javascript" ev:event="DOMFocusOut">
				<![CDATA[
					grd_diaglist.attribute("height") =80;
					initPopupMenu();
				]]>
			</script>
		</datagrid>
	</xhtml:body>
</xhtml:html>