SMABS10200_처방코드별처리건수.xfdl 27 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMABS10200" position="absolute 0 0 1199 728" titletext="처방별 조혈모세포처리 현황" oninit="SMABS10200_oninit" onload="SMABS10200_onload">
  5. <Layouts>
  6. <Layout>
  7. <Grid id="grd_monthcelltret" taborder="3" binddataset="ds_main_celltret_celltretlist" useinputpanel="false" position="absolute 0 121 1194 721" autoenter="select" cellsizingtype="col" anchor="all">
  8. <Formats>
  9. <Format id="default">
  10. <Columns>
  11. <Column size="24"/>
  12. <Column size="70"/>
  13. <Column size="250"/>
  14. <Column size="60"/>
  15. <Column size="60"/>
  16. <Column size="60"/>
  17. <Column size="60"/>
  18. <Column size="60"/>
  19. <Column size="60"/>
  20. <Column size="60"/>
  21. <Column size="60"/>
  22. <Column size="60"/>
  23. <Column size="60"/>
  24. <Column size="60"/>
  25. <Column size="60"/>
  26. <Column size="63"/>
  27. <Column size="100"/>
  28. <Column size="100"/>
  29. </Columns>
  30. <Rows>
  31. <Row size="24" band="head"/>
  32. <Row size="24"/>
  33. </Rows>
  34. <Band id="head">
  35. <Cell/>
  36. <Cell col="1" text="처방코드"/>
  37. <Cell col="2" text="처방내용"/>
  38. <Cell col="3" text="1월"/>
  39. <Cell col="4" text="2월"/>
  40. <Cell col="5" text="3월"/>
  41. <Cell col="6" text="4월"/>
  42. <Cell col="7" text="5월"/>
  43. <Cell col="8" text="6월"/>
  44. <Cell col="9" text="7월"/>
  45. <Cell col="10" text="8월"/>
  46. <Cell col="11" text="9월"/>
  47. <Cell col="12" text="10월"/>
  48. <Cell col="13" text="11월"/>
  49. <Cell col="14" text="12월"/>
  50. <Cell col="15" text="Total"/>
  51. <Cell col="16" text="전년도"/>
  52. <Cell col="17" text="증감율"/>
  53. </Band>
  54. <Band id="body">
  55. <Cell celltype="head" expr="currow+1"/>
  56. <Cell col="1" celltype="head" edittype="none" text="bind:codenm"/>
  57. <Cell col="2" celltype="head" edittype="none" text="bind:codenm2"/>
  58. <Cell col="3" displaytype="none" edittype="none" text="bind:monthcnt01"/>
  59. <Cell col="4" text="bind:monthcnt02"/>
  60. <Cell col="5" text="bind:monthcnt03"/>
  61. <Cell col="6" text="bind:monthcnt04"/>
  62. <Cell col="7" text="bind:monthcnt05"/>
  63. <Cell col="8" text="bind:monthcnt06"/>
  64. <Cell col="9" text="bind:monthcnt07"/>
  65. <Cell col="10" text="bind:monthcnt08"/>
  66. <Cell col="11" text="bind:monthcnt09"/>
  67. <Cell col="12" text="bind:monthcnt10"/>
  68. <Cell col="13" text="bind:monthcnt11"/>
  69. <Cell col="14" text="bind:monthcnt12"/>
  70. <Cell col="15" text="bind:monthcnttotal"/>
  71. <Cell col="16" text="bind:beforeyearcnt"/>
  72. <Cell col="17" text="bind:cntaddper"/>
  73. </Band>
  74. </Format>
  75. </Formats>
  76. </Grid>
  77. <Grid id="grd_daycelltret" taborder="2" binddataset="ds_main_celltret_daycelltretlist" useinputpanel="false" position="absolute 0 121 1194 721" autoenter="select" cellsizingtype="col">
  78. <Formats>
  79. <Format id="default">
  80. <Columns>
  81. <Column size="25"/>
  82. <Column size="70"/>
  83. <Column size="250"/>
  84. <Column size="60"/>
  85. <Column size="60"/>
  86. <Column size="60"/>
  87. <Column size="60"/>
  88. <Column size="60"/>
  89. <Column size="60"/>
  90. <Column size="60"/>
  91. <Column size="60"/>
  92. <Column size="60"/>
  93. <Column size="60"/>
  94. <Column size="60"/>
  95. <Column size="60"/>
  96. <Column size="60"/>
  97. <Column size="60"/>
  98. <Column size="60"/>
  99. <Column size="60"/>
  100. <Column size="60"/>
  101. <Column size="60"/>
  102. <Column size="60"/>
  103. <Column size="60"/>
  104. <Column size="60"/>
  105. <Column size="60"/>
  106. <Column size="60"/>
  107. <Column size="60"/>
  108. <Column size="60"/>
  109. <Column size="60"/>
  110. <Column size="60"/>
  111. <Column size="60"/>
  112. <Column size="60"/>
  113. <Column size="60"/>
  114. <Column size="60"/>
  115. <Column size="63"/>
  116. <Column size="100"/>
  117. <Column size="100"/>
  118. </Columns>
  119. <Rows>
  120. <Row size="24" band="head"/>
  121. <Row size="24"/>
  122. </Rows>
  123. <Band id="head">
  124. <Cell/>
  125. <Cell col="1" text="처방코드"/>
  126. <Cell col="2" text="처방내용"/>
  127. <Cell col="3" text="1일"/>
  128. <Cell col="4" text="2일"/>
  129. <Cell col="5" text="3일"/>
  130. <Cell col="6" text="4일"/>
  131. <Cell col="7" text="5일"/>
  132. <Cell col="8" text="6일"/>
  133. <Cell col="9" text="7일"/>
  134. <Cell col="10" text="8일"/>
  135. <Cell col="11" text="9일"/>
  136. <Cell col="12" text="10일"/>
  137. <Cell col="13" text="11일"/>
  138. <Cell col="14" text="12일"/>
  139. <Cell col="15" text="13일"/>
  140. <Cell col="16" text="14일"/>
  141. <Cell col="17" text="15일"/>
  142. <Cell col="18" text="16일"/>
  143. <Cell col="19" text="17일"/>
  144. <Cell col="20" text="18일"/>
  145. <Cell col="21" text="19일"/>
  146. <Cell col="22" text="20일"/>
  147. <Cell col="23" text="21일"/>
  148. <Cell col="24" text="22일"/>
  149. <Cell col="25" text="23일"/>
  150. <Cell col="26" text="24일"/>
  151. <Cell col="27" text="25일"/>
  152. <Cell col="28" text="26일"/>
  153. <Cell col="29" text="27일"/>
  154. <Cell col="30" text="28일"/>
  155. <Cell col="31" text="29일"/>
  156. <Cell col="32" text="30일"/>
  157. <Cell col="33" text="31일"/>
  158. <Cell col="34" text="Total"/>
  159. <Cell col="35" text="전월도"/>
  160. <Cell col="36" text="증감율"/>
  161. </Band>
  162. <Band id="body">
  163. <Cell celltype="head" expr="currow+1"/>
  164. <Cell col="1" celltype="head" edittype="none" text="bind:codenm"/>
  165. <Cell col="2" celltype="head" edittype="none" text="bind:codenm2"/>
  166. <Cell col="3" displaytype="none" edittype="none" text="bind:daycnt01"/>
  167. <Cell col="4" text="bind:daycnt02"/>
  168. <Cell col="5" text="bind:daycnt03"/>
  169. <Cell col="6" text="bind:daycnt04"/>
  170. <Cell col="7" text="bind:daycnt05"/>
  171. <Cell col="8" text="bind:daycnt06"/>
  172. <Cell col="9" text="bind:daycnt07"/>
  173. <Cell col="10" text="bind:daycnt08"/>
  174. <Cell col="11" text="bind:daycnt09"/>
  175. <Cell col="12" text="bind:daycnt10"/>
  176. <Cell col="13" text="bind:daycnt11"/>
  177. <Cell col="14" text="bind:daycnt12"/>
  178. <Cell col="15" text="bind:daycnt13"/>
  179. <Cell col="16" text="bind:daycnt14"/>
  180. <Cell col="17" text="bind:daycnt15"/>
  181. <Cell col="18" text="bind:daycnt16"/>
  182. <Cell col="19" text="bind:daycnt17"/>
  183. <Cell col="20" text="bind:daycnt18"/>
  184. <Cell col="21" text="bind:daycnt19"/>
  185. <Cell col="22" text="bind:daycnt20"/>
  186. <Cell col="23" text="bind:daycnt21"/>
  187. <Cell col="24" text="bind:daycnt22"/>
  188. <Cell col="25" text="bind:daycnt23"/>
  189. <Cell col="26" text="bind:daycnt24"/>
  190. <Cell col="27" text="bind:daycnt25"/>
  191. <Cell col="28" text="bind:daycnt26"/>
  192. <Cell col="29" text="bind:daycnt27"/>
  193. <Cell col="30" text="bind:daycnt28"/>
  194. <Cell col="31" text="bind:daycnt29"/>
  195. <Cell col="32" text="bind:daycnt30"/>
  196. <Cell col="33" text="bind:daycnt31"/>
  197. <Cell col="34" text="bind:daycnttotal"/>
  198. <Cell col="35" text="bind:beforeyearcnt"/>
  199. <Cell col="36" text="bind:cntaddper"/>
  200. </Band>
  201. </Format>
  202. </Formats>
  203. </Grid>
  204. <Static id="caption6" text="처방별 조혈모세포처리 현황" class="tit_1" position="absolute 0 0 258 25"/>
  205. <Button id="btn_prt" taborder="1" text="출력" class="btn6" visible="false" position="absolute 0 26 56 48"/>
  206. <Shape id="line1" class="line_10" position="absolute 0 116 1194 122" anchor="left top right"/>
  207. <Button id="button2" taborder="4" text="엑셀저장" class="btn7" position="absolute 1114 97 1194 116" anchor="top right" onclick="button2_onclick"/>
  208. <Div id="grp_sea" anchor="left top right" taborder="5" class="div_SA2" position="absolute 0 50 1194 90">
  209. <Layouts>
  210. <Layout width="1194" height="40">
  211. <Static id="caption4" text="기간(적용일) :" class="search_name" position="absolute 15 12 127 29"/>
  212. <Static id="caption7" text="~" class="search_no_b" position="absolute 233 12 245 29"/>
  213. <Button id="button3" taborder="7" text="조회" class="btn1" position="absolute 1123 9 1179 31" anchor="top right" onclick="grp_sea_button3_onclick"/>
  214. <Shape id="line2" linetype="vertical" class="line_4" position="absolute 1104 9 1110 31" anchor="top right"/>
  215. <Calendar id="ipt_execfromdd" taborder="8" class="input_s_essential" position="absolute 130 10 230 29" autoselect="true" autoskip="true" onchanged="grp_sea_ipt_execfromdd_onchanged"/>
  216. <Calendar id="ipt_exectodd" taborder="9" class="input_s_essential" position="absolute 248 10 348 29" onchanged="grp_sea_ipt_exectodd_onchanged"/>
  217. <Radio id="rdo_monthday" taborder="10" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 358 10 448 30" onitemchanged="grp_sea_rdo_monthday_onitemchanged">
  218. <Dataset id="innerdataset">
  219. <ColumnInfo>
  220. <Column id="codecolumn"/>
  221. <Column id="datacolumn"/>
  222. </ColumnInfo>
  223. <Rows>
  224. <Row>
  225. <Col id="codecolumn">M</Col>
  226. <Col id="datacolumn">월별</Col>
  227. </Row>
  228. <Row>
  229. <Col id="codecolumn">D</Col>
  230. <Col id="datacolumn">일별</Col>
  231. </Row>
  232. </Rows>
  233. </Dataset>
  234. </Radio>
  235. <Static id="caption9" text="비교(적용일) :" class="search_name" visible="false" position="absolute 493 12 605 29"/>
  236. <Calendar id="ipt_execfromdd2" taborder="11" class="input_s_essential" visible="false" position="absolute 608 11 708 30" onchanged="grp_sea_ipt_execfromdd2_onchanged"/>
  237. <Static id="caption2" text="~" class="search_no_b" visible="false" position="absolute 711 13 723 30"/>
  238. <Calendar id="ipt_exectodd2" taborder="12" class="input_s_essential" visible="false" position="absolute 726 11 826 30" onchanged="grp_sea_ipt_exectodd2_onchanged"/>
  239. </Layout>
  240. </Layouts>
  241. </Div>
  242. <Static id="caption1" text="처방별 조혈모세포처리 현황" class="tit_2" position="absolute 0 100 202 121"/>
  243. </Layout>
  244. </Layouts>
  245. <Objects>
  246. <Dataset id="ds_send_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  247. <ColumnInfo>
  248. <Column id="execfromdd" type="STRING" size="256"/>
  249. <Column id="exectodd" type="STRING" size="256"/>
  250. <Column id="execfromdd2" type="STRING" size="256"/>
  251. <Column id="exectodd2" type="STRING" size="256"/>
  252. <Column id="prcpexecdeptcd" type="STRING" size="256"/>
  253. <Column id="searchflag" type="STRING" size="256"/>
  254. <Column id="monthdayflag" type="STRING" size="256"/>
  255. </ColumnInfo>
  256. <Rows>
  257. <Row>
  258. <Col id="execfromdd"/>
  259. <Col id="exectodd"/>
  260. <Col id="execfromdd2"/>
  261. <Col id="exectodd2"/>
  262. <Col id="prcpexecdeptcd"/>
  263. <Col id="searchflag">P</Col>
  264. <Col id="monthdayflag"/>
  265. </Row>
  266. </Rows>
  267. </Dataset>
  268. <Dataset id="ds_main_celltret_celltretlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  269. <ColumnInfo>
  270. <Column id="codenm" type="STRING" size="256" sumtext="처방코드"/>
  271. <Column id="codenm2" type="STRING" size="256" sumtext="처방내용"/>
  272. <Column id="monthcnt01" type="INT" size="256" sumtext="1월건수"/>
  273. <Column id="monthcnt02" type="INT" size="256" sumtext="2월건수"/>
  274. <Column id="monthcnt03" type="INT" size="256" sumtext="3월건수"/>
  275. <Column id="monthcnt04" type="INT" size="256" sumtext="4월건수"/>
  276. <Column id="monthcnt05" type="INT" size="256" sumtext="5월건수"/>
  277. <Column id="monthcnt06" type="INT" size="256" sumtext="6월건수"/>
  278. <Column id="monthcnt07" type="INT" size="256" sumtext="7월건수"/>
  279. <Column id="monthcnt08" type="INT" size="256" sumtext="8월건수"/>
  280. <Column id="monthcnt09" type="INT" size="256" sumtext="9월건수"/>
  281. <Column id="monthcnt10" type="INT" size="256" sumtext="10월건수"/>
  282. <Column id="monthcnt11" type="INT" size="256" sumtext="11월건수"/>
  283. <Column id="monthcnt12" type="INT" size="256" sumtext="12월건수"/>
  284. <Column id="monthcnttotal" type="INT" size="256" sumtext="전체건수"/>
  285. <Column id="beforeyearcnt" type="INT" size="256" sumtext="전년도건수"/>
  286. <Column id="cntaddper" type="BIGDECIMAL" size="256" sumtext="증감율"/>
  287. </ColumnInfo>
  288. </Dataset>
  289. <Dataset id="ds_main_celltret_daycelltretlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  290. <ColumnInfo>
  291. <Column id="codenm" type="STRING" size="256" sumtext="처방코드"/>
  292. <Column id="codenm2" type="STRING" size="256" sumtext="처방내용"/>
  293. <Column id="daycnt01" type="INT" size="256" sumtext="일건수"/>
  294. <Column id="daycnt02" type="INT" size="256" sumtext="일건수"/>
  295. <Column id="daycnt03" type="INT" size="256" sumtext="일건수"/>
  296. <Column id="daycnt04" type="INT" size="256" sumtext="일건수"/>
  297. <Column id="daycnt05" type="INT" size="256" sumtext="일건수"/>
  298. <Column id="daycnt06" type="INT" size="256" sumtext="일건수"/>
  299. <Column id="daycnt07" type="INT" size="256" sumtext="일건수"/>
  300. <Column id="daycnt08" type="INT" size="256" sumtext="일건수"/>
  301. <Column id="daycnt09" type="INT" size="256" sumtext="일건수"/>
  302. <Column id="daycnt10" type="INT" size="256" sumtext="일건수"/>
  303. <Column id="daycnt11" type="INT" size="256" sumtext="일건수"/>
  304. <Column id="daycnt12" type="INT" size="256" sumtext="일건수"/>
  305. <Column id="daycnt13" type="INT" size="256" sumtext="일건수"/>
  306. <Column id="daycnt14" type="INT" size="256" sumtext="일건수"/>
  307. <Column id="daycnt15" type="INT" size="256" sumtext="일건수"/>
  308. <Column id="daycnt16" type="INT" size="256" sumtext="일건수"/>
  309. <Column id="daycnt17" type="INT" size="256" sumtext="일건수"/>
  310. <Column id="daycnt18" type="INT" size="256" sumtext="일건수"/>
  311. <Column id="daycnt19" type="INT" size="256" sumtext="일건수"/>
  312. <Column id="daycnt20" type="INT" size="256" sumtext="일건수"/>
  313. <Column id="daycnt21" type="INT" size="256" sumtext="일건수"/>
  314. <Column id="daycnt22" type="INT" size="256" sumtext="일건수"/>
  315. <Column id="daycnt23" type="INT" size="256" sumtext="일건수"/>
  316. <Column id="daycnt24" type="INT" size="256" sumtext="일건수"/>
  317. <Column id="daycnt25" type="INT" size="256" sumtext="일건수"/>
  318. <Column id="daycnt26" type="INT" size="256" sumtext="일건수"/>
  319. <Column id="daycnt27" type="INT" size="256" sumtext="일건수"/>
  320. <Column id="daycnt28" type="INT" size="256" sumtext="일건수"/>
  321. <Column id="daycnt29" type="INT" size="256" sumtext="일건수"/>
  322. <Column id="daycnt30" type="INT" size="256" sumtext="일건수"/>
  323. <Column id="daycnt31" type="INT" size="256" sumtext="일건수"/>
  324. <Column id="daycnttotal" type="INT" size="256" sumtext="전체건수"/>
  325. <Column id="beforeyearcnt" type="INT" size="256" sumtext="전년도건수"/>
  326. <Column id="cntaddper" type="BIGDECIMAL" size="256" sumtext="증감율"/>
  327. </ColumnInfo>
  328. </Dataset>
  329. </Objects>
  330. <Bind>
  331. <BindItem id="item0" compid="grp_sea.ipt_execfromdd" propid="value" datasetid="ds_send_req" columnid="execfromdd"/>
  332. <BindItem id="item1" compid="grp_sea.ipt_exectodd" propid="value" datasetid="ds_send_req" columnid="exectodd"/>
  333. <BindItem id="item2" compid="grp_sea.rdo_monthday" propid="value" datasetid="ds_send_req" columnid="monthdayflag"/>
  334. <BindItem id="item3" compid="grp_sea.ipt_execfromdd2" propid="value" datasetid="ds_send_req" columnid="execfromdd2"/>
  335. <BindItem id="item4" compid="grp_sea.ipt_exectodd2" propid="value" datasetid="ds_send_req" columnid="exectodd2"/>
  336. </Bind>
  337. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  338. * System Name :
  339. * Job Name :
  340. * Creator :
  341. * Make Date : 2015-11-13
  342. * Description :
  343. *---------------------------------------------------------------------------------------
  344. * Modify Date Modifier Modify Description
  345. *---------------------------------------------------------------------------------------
  346. * 2015-11-13 Live Converter TF->XP
  347. *
  348. *---------------------------------------------------------------------------------------
  349. ****************************************************************************************/
  350. include "com_commonxp::comm_main.xjs";
  351. include "ast_examcurexp::AEZ0001.xjs";
  352. include "ast_hsctxp::bmtcommon.xjs";
  353. function SMABS10200_oninit(obj:Form, e:InitEventInfo)
  354. {
  355. frmf_initForm(obj);
  356. }
  357. function SMABS10200_onload(obj:Form, e:LoadEventInfo)
  358. {
  359. grdf_initGrid(grd_daycelltret);
  360. grdf_initGrid(grd_monthcelltret);
  361. ds_send_req.setColumn(0, "prcpexecdeptcd", sysf_getUserInfo("dutplcecd"));
  362. grp_sea.rdo_monthday.index = 0;
  363. ds_send_req.setColumn(0, "monthdayflag", "D");
  364. fSetDefaultDD();
  365. }
  366. function fSetDefaultDD()
  367. {
  368. var scurrentdd = utlf_getCurrentDate();
  369. if(ds_send_req.getColumn(0, "monthdayflag") == "D")
  370. {
  371. ds_send_req.setColumn(0, "execfromdd", scurrentdd);
  372. ds_send_req.setColumn(0, "exectodd", scurrentdd);
  373. ds_send_req.setColumn(0, "execfromdd2", scurrentdd.toDate().getAddDate(-1, "M").getDateFormat("YYYYMMDD"));
  374. ds_send_req.setColumn(0, "exectodd2", scurrentdd.toDate().getAddDate(-1, "M").getDateFormat("YYYYMMDD"));
  375. }
  376. else
  377. {
  378. ds_send_req.setColumn(0, "execfromdd", scurrentdd.toDate().getAddDate(-30,"D").getDateFormat("YYYYMMDD"));
  379. ds_send_req.setColumn(0, "exectodd", scurrentdd.toDate().getAddDate(30,"D").getDateFormat("YYYYMMDD"));
  380. ds_send_req.setColumn(0, "execfromdd2", scurrentdd.toDate().getAddDate(-30,"D").getDateFormat("YYYYMMDD"));
  381. ds_send_req.setColumn(0, "exectodd2", scurrentdd.toDate().getAddDate(30,"D").getDateFormat("YYYYMMDD"));
  382. }
  383. }
  384. function grp_sea_ipt_execfromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
  385. {
  386. var fromdd = String(obj.value);
  387. var oCurYear = fromdd.toDate().getDateFormat("YYYY");
  388. var oCurMonth = fromdd.toDate().getDateFormat("MM");
  389. var flag = "";
  390. var oMaxDay = new Date(new Date(oCurYear, oCurMonth, 1)-86400000).getDate();
  391. var oMaxDay2 = new Date(new Date(oCurYear, oCurMonth -1, 1)-86400000).getDate();
  392. if(grp_sea.rdo_monthday.value == "D")
  393. {
  394. flag = "M";
  395. }
  396. else
  397. {
  398. flag = "Y";
  399. ds_send_req.setColumn(0, "execfromdd", String(fromdd).substr(0,6));
  400. }
  401. if(flag == "M" && oMaxDay == fromdd.toDate().getDateFormat("DD"))
  402. {
  403. ds_send_req.setColumn(0, "execfromdd2", (oCurYear + oCurMonth + "01").toDate().getAddDate(-1, flag).getDateFormat("YYYYMM") + oMaxDay2);
  404. }
  405. else
  406. {
  407. ds_send_req.setColumn(0, "execfromdd2", (String(fromdd).substr(0,6)).toDate().getAddDate(-1, flag).getDateFormat("YYYYMMDD"));
  408. }
  409. }
  410. function grp_sea_ipt_exectodd_onchanged(obj:Calendar, e:ChangeEventInfo)
  411. {
  412. var todd = String(obj.value);
  413. var oCurYear = todd.toDate().getDateFormat("YYYY");
  414. var oCurMonth = todd.toDate().getDateFormat("MM");
  415. var flag = "";
  416. var oMaxDay = new Date(new Date(oCurYear, oCurMonth, 1)-86400000).getDate();
  417. var oMaxDay2 = new Date(new Date(oCurYear, oCurMonth -1, 1)-86400000).getDate();
  418. if(grp_sea.rdo_monthday.value == "D")
  419. {
  420. flag = "M";
  421. }
  422. else
  423. {
  424. flag = "Y";
  425. ds_send_req.setColumn(0, "exectodd", String(todd).substr(0,6));
  426. }
  427. if(flag == "M" && oMaxDay == todd.toDate().getDateFormat("DD"))
  428. {
  429. ds_send_req.setColumn(0, "exectodd2", (oCurYear + oCurMonth + "01").toDate().getAddDate(-1, flag).getDateFormat("YYYYMM") + oMaxDay2);
  430. }
  431. else
  432. {
  433. ds_send_req.setColumn(0, "exectodd2", (String(todd).substr(0,6)).toDate().getAddDate(-1, flag).getDateFormat("YYYYMMDD"));
  434. }
  435. }
  436. function grp_sea_rdo_monthday_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  437. {
  438. fSetDefaultDD();
  439. var fromdd = ds_send_req.getColumn(0, "execfromdd");
  440. var todd = ds_send_req.getColumn(0, "exectodd");
  441. if(obj.value == "D")
  442. {
  443. grd_monthcelltret.visible = false;
  444. grd_daycelltret.visible = true;
  445. grp_sea.ipt_execfromdd.dateformat = "yyyy-MM-dd";
  446. grp_sea.ipt_execfromdd.editformat = "yyyy-MM-dd";
  447. grp_sea.ipt_exectodd.dateformat = "yyyy-MM-dd";
  448. grp_sea.ipt_exectodd.editformat = "yyyy-MM-dd";
  449. grp_sea.ipt_execfromdd2.dateformat = "yyyy-MM-dd";
  450. grp_sea.ipt_execfromdd2.editformat = "yyyy-MM-dd";
  451. grp_sea.ipt_exectodd2.dateformat = "yyyy-MM-dd";
  452. grp_sea.ipt_exectodd2.editformat = "yyyy-MM-dd";
  453. }
  454. else
  455. {
  456. grd_monthcelltret.visible = true;
  457. grd_daycelltret.visible = false;
  458. grp_sea.ipt_execfromdd.dateformat = "yyyy-MM";
  459. grp_sea.ipt_execfromdd.editformat = "yyyy-MM";
  460. grp_sea.ipt_exectodd.dateformat = "yyyy-MM";
  461. grp_sea.ipt_exectodd.editformat = "yyyy-MM";
  462. grp_sea.ipt_execfromdd2.dateformat = "yyyy-MM";
  463. grp_sea.ipt_execfromdd2.editformat = "yyyy-MM";
  464. grp_sea.ipt_exectodd2.dateformat = "yyyy-MM";
  465. grp_sea.ipt_exectodd2.editformat = "yyyy-MM";
  466. ds_send_req.setColumn(0, "execfromdd2", (fromdd + 1).toDate().getAddDate(-1, "Y").getDateFormat("YYYYMMDD"));
  467. ds_send_req.setColumn(0, "exectodd2", (todd + 1).toDate().getAddDate(-1, "Y").getDateFormat("YYYYMMDD"));
  468. }
  469. }
  470. function grp_sea_ipt_execfromdd2_onchanged(obj:Calendar, e:ChangeEventInfo)
  471. {
  472. if(grp_sea.rdo_monthday.value == "D")
  473. {
  474. }
  475. else
  476. {
  477. ds_send_req.setColumn(0, "execfromdd2", String(obj.value).substr(0,6));
  478. }
  479. }
  480. function grp_sea_ipt_exectodd2_onchanged(obj:Calendar, e:ChangeEventInfo)
  481. {
  482. if(grp_sea.rdo_monthday.value == "D")
  483. {
  484. }
  485. else
  486. {
  487. ds_send_req.setColumn(0, "exectodd2", String(obj.value).substr(0,6));
  488. }
  489. }
  490. function grp_sea_button3_onclick(obj:Button, e:ClickEventInfo)
  491. {
  492. fGetCellTrpeInfo();
  493. }
  494. function fGetCellTrpeInfo()
  495. {
  496. if(ds_send_req.getColumn(0, "monthdayflag") == "D")
  497. {
  498. var oParam = {};
  499. oParam.id = "TRABS10202";
  500. oParam.service = "hsctstemcellapp.StemCellTreat";
  501. oParam.method = "reqGetCellTretStats";
  502. oParam.inds = "req=ds_send_req";
  503. oParam.outds = "ds_main_celltret_daycelltretlist=celltretlist ds_=message";
  504. oParam.async = false;
  505. //oParam.callback = "cf_TRABS10202";
  506. tranf_submit(oParam);
  507. }
  508. else
  509. {
  510. var oParam = {};
  511. oParam.id = "TRABS10201";
  512. oParam.service = "hsctstemcellapp.StemCellTreat";
  513. oParam.method = "reqGetCellTretStats";
  514. oParam.inds = "req=ds_send_req";
  515. oParam.outds = "ds_main_celltret_celltretlist=celltretlist ds_=message";
  516. oParam.async = false;
  517. //oParam.callback = "cf_TRABS10201";
  518. tranf_submit(oParam);
  519. }
  520. if(ds_send_req.getColumn(0, "monthdayflag") == "M")
  521. {
  522. var nodelist = ds_main_celltret_celltretlist
  523. for (var i = 0; i < nodelist.rowcount; i ++)
  524. {
  525. var iMonthCntTotal = ds_main_celltret_celltretlist.getColumn(i, "monthcnttotal");
  526. var iBeforeYearCnt = ds_main_celltret_celltretlist.getColumn(i, "beforeyearcnt");
  527. if (utlf_isNull(iMonthCntTotal) || utlf_isNull(iBeforeYearCnt) || iBeforeYearCnt == 0 )
  528. {
  529. ds_main_celltret_celltretlist.setColumn(i, "cntaddper", "");
  530. }
  531. else
  532. {
  533. var dCntAddPer = ((parseFloat(iMonthCntTotal) - parseFloat(iBeforeYearCnt)) / parseFloat(iBeforeYearCnt)) * 100;
  534. ds_main_celltret_celltretlist.setColumn(i, "cntaddper", (Math.round(dCntAddPer * 100) / 100));
  535. }
  536. }
  537. }
  538. else
  539. {
  540. var nodelist2 = ds_main_celltret_daycelltretlist;
  541. for (var i = 0; i < nodelist2.rowcount; i ++)
  542. {
  543. var iDayCntTotal = ds_main_celltret_daycelltretlist.getColumn(i, "daycnttotal");
  544. var iBeforeYearCnt = ds_main_celltret_daycelltretlist.getColumn(i, "beforeyearcnt");
  545. if (utlf_isNull(iDayCntTotal) || utlf_isNull(iBeforeYearCnt) || iBeforeYearCnt == 0 )
  546. {
  547. ds_main_celltret_daycelltretlist.setColumn(i, "cntaddper", "");
  548. }
  549. else
  550. {
  551. var dCntAddPer = ((parseFloat(iDayCntTotal) - parseFloat(iBeforeYearCnt)) / parseFloat(iBeforeYearCnt)) * 100;
  552. ds_main_celltret_daycelltretlist.setColumn(i, "cntaddper", (Math.round(dCntAddPer * 100) / 100));
  553. }
  554. }
  555. }
  556. }
  557. function button2_onclick(obj:Button, e:ClickEventInfo)
  558. {
  559. if(ds_send_req.getColumn(0, "monthdayflag") == "M")
  560. {
  561. grdf_exportExcel(grd_monthcelltret, "처방별조혈모세포처리현황(월별)", "Sheet1", "true", "", "");
  562. }
  563. else
  564. {
  565. grdf_exportExcel(grd_daycelltret, "처방별조혈모세포처리현황(일별)", "Sheet1", "true", "", "");
  566. }
  567. }
  568. ]]></Script>
  569. </Form>
  570. </FDL>