SPPIZ00300_메모이력조회.xfdl 25 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPPIZ00300" position="absolute 0 0 1011 546" titletext="메모 이력 조회" onload="SPPIZ00300_onload">
  5. <Layouts>
  6. <Layout>
  7. <Button id="btn_memotojudg" taborder="8" text="심사메모로 전달" onclick="btn_memotojudg_onclick" class="btn2" position="absolute 727 76 843 96" anchor="top right" style="align:center middle;"/>
  8. <Button id="btn_memotoprcp" taborder="10" text="처방별주석 전달" onclick="btn_memotoprcp_onclick" class="btn2" visible="true" position="absolute 616 76 725 96" anchor="top right" style="align:center middle;"/>
  9. <Button id="btn_judgrowdel" taborder="11" text="삭제" onclick="btn_judgrowdel_onclick" class="btn5" visible="true" position="absolute 963 76 1007 96" anchor="top right"/>
  10. <Tab id="switch1" taborder="12" tabindex="0" position="absolute 1 99 1007 542" onchanged="switch1_onchanged" anchor="all">
  11. <Tabpages>
  12. <Tabpage id="patkind" text="환자별">
  13. <Layouts>
  14. <Layout>
  15. <Grid id="grd_patmemohist" taborder="1" binddataset="ds_main_list1_patclbs" useinputpanel="false" position="absolute 0 0 1006 416" autosizingtype="row" extendsizetype="row" cellsizingtype="col" selecttype="multirow" autoenter="select" autofittype="col" anchor="all" cellmovingtype="col">
  16. <Formats>
  17. <Format id="default">
  18. <Columns>
  19. <Column size="60"/>
  20. <Column size="56"/>
  21. <Column size="68"/>
  22. <Column size="24"/>
  23. <Column size="121"/>
  24. <Column size="350"/>
  25. <Column size="311"/>
  26. <Column size="0"/>
  27. <Column size="0"/>
  28. </Columns>
  29. <Rows>
  30. <Row size="24" band="head"/>
  31. <Row size="24"/>
  32. </Rows>
  33. <Band id="head">
  34. <Cell text="청구년월"/>
  35. <Cell col="1" text="청구차수"/>
  36. <Cell col="2" text="개시일자"/>
  37. <Cell col="3" text="I/O"/>
  38. <Cell col="4" text="진료과"/>
  39. <Cell col="5" text="심사 메모"/>
  40. <Cell col="6" text="청구 메모"/>
  41. <Cell col="7" text="pid"/>
  42. <Cell col="8" text="pidsn"/>
  43. </Band>
  44. <Band id="body">
  45. <Cell style="align:center middle;" text="bind:clamym" mask="####-##" maskchar=" "/>
  46. <Cell col="1" displaytype="text" style="align:center middle;" text="bind:clamdg"/>
  47. <Cell col="2" displaytype="date" text="bind:ordfromdd" calendardisplaynulltype="none"/>
  48. <Cell col="3" style="align:center middle;" text="bind:ioflag"/>
  49. <Cell col="4" text="bind:orddeptcd"/>
  50. <Cell col="5" displaytype="text" edittype="textarea" class="cell_nopadding" text="bind:judgmemo" wordwrap="word" editautoselect="true" autosizerow="limitmin"/>
  51. <Cell col="6" displaytype="text" edittype="textarea" class="cell_nopadding" text="bind:edimemo" wordwrap="word" editautoselect="true" autosizerow="limitmin"/>
  52. <Cell col="7" text="bind:pid"/>
  53. <Cell col="8" text="bind:pidsn"/>
  54. <Cell col="9"/>
  55. <Cell col="10"/>
  56. </Band>
  57. </Format>
  58. </Formats>
  59. </Grid>
  60. <Shape id="line1" class="line_1" position="absolute 5 5 944 5"/>
  61. </Layout>
  62. </Layouts>
  63. </Tabpage>
  64. <Tabpage id="prcpkind" text="처방별">
  65. <Layouts>
  66. <Layout>
  67. <Grid id="grd_prcpmemohist" taborder="1" binddataset="ds_main_list2_prcpclbs" useinputpanel="false" position="absolute 0 0 1006 416" onlbuttonDown="grd_prcpmemohist_onlbuttonDown" onbuttondown="grd_prcpmemohist_onbuttondown" autosizingtype="row" extendsizetype="row" cellsizingtype="col" selecttype="multirow" anchor="all" cellmovingtype="col">
  68. <Formats>
  69. <Format id="default">
  70. <Columns>
  71. <Column size="70"/>
  72. <Column size="60"/>
  73. <Column size="70"/>
  74. <Column size="30"/>
  75. <Column size="105"/>
  76. <Column size="105"/>
  77. <Column size="0"/>
  78. <Column size="78"/>
  79. <Column size="461"/>
  80. <Column size="0"/>
  81. <Column size="0"/>
  82. </Columns>
  83. <Rows>
  84. <Row size="24" band="head"/>
  85. <Row size="24"/>
  86. </Rows>
  87. <Band id="head">
  88. <Cell text="청구년월"/>
  89. <Cell col="1" text="청구차수"/>
  90. <Cell col="2" text="개시일자"/>
  91. <Cell col="3" text="I/O"/>
  92. <Cell col="4" text="진료과"/>
  93. <Cell col="5" text="수가코드"/>
  94. <Cell col="6" text="EDI코드"/>
  95. <Cell col="7" text="특정코드"/>
  96. <Cell col="8" text="메모"/>
  97. <Cell col="9" text="pid"/>
  98. <Cell col="10" text="pidsn"/>
  99. </Band>
  100. <Band id="body">
  101. <Cell style="align:center middle;" text="bind:clamym" mask="####-##" maskchar=" "/>
  102. <Cell col="1" style="align:center middle;" text="bind:clamdg"/>
  103. <Cell col="2" displaytype="date" text="bind:ordfromdd" calendardisplaynulltype="none"/>
  104. <Cell col="3" style="align:center middle;" text="bind:ioflag"/>
  105. <Cell col="4" text="bind:orddeptcd"/>
  106. <Cell col="5" style="align:left middle;" text="bind:calcscorcd"/>
  107. <Cell col="6" text="bind:edicd"/>
  108. <Cell col="7" style="align:left middle;" text="bind:spclcd"/>
  109. <Cell col="8" displaytype="text" edittype="textarea" class="cell_nopadding" text="bind:edimemo" wordwrap="word" editautoselect="true" autosizerow="limitmin"/>
  110. <Cell col="9" text="bind:pid"/>
  111. <Cell col="10" text="bind:pidsn"/>
  112. <Cell col="11"/>
  113. <Cell col="12"/>
  114. </Band>
  115. </Format>
  116. </Formats>
  117. </Grid>
  118. <Shape id="line2" class="line_1" position="absolute 5 5 944 5"/>
  119. </Layout>
  120. </Layouts>
  121. </Tabpage>
  122. </Tabpages>
  123. </Tab>
  124. <Static id="caption1" text="메모이력" class="tit_2" position="absolute 1 79 109 99"/>
  125. <Div id="group5" taborder="14" style="align:center top;" scrollbars="none" class="div_SA" position="absolute 1 26 1007 68" anchor="left top right"/>
  126. <Static id="caption4" text="내원구분" class="search_name" position="absolute 10 38 81 58" anchor="left top"/>
  127. <Radio id="radio1" taborder="2" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 84 38 225 58" onitemchanged="radio1_onitemchanged" anchor="left top">
  128. <Dataset id="innerdataset">
  129. <ColumnInfo>
  130. <Column id="codecolumn" size="256"/>
  131. <Column id="datacolumn" size="256"/>
  132. </ColumnInfo>
  133. <Rows>
  134. <Row>
  135. <Col id="codecolumn">-</Col>
  136. <Col id="datacolumn">전체</Col>
  137. </Row>
  138. <Row>
  139. <Col id="codecolumn">I</Col>
  140. <Col id="datacolumn">입원</Col>
  141. </Row>
  142. <Row>
  143. <Col id="codecolumn">O</Col>
  144. <Col id="datacolumn">외래</Col>
  145. </Row>
  146. </Rows>
  147. </Dataset>
  148. </Radio>
  149. <Static id="caption2" text="기간" class="search_name" position="absolute 242 38 299 58" anchor="left top"/>
  150. <Radio id="rdo_refterm" taborder="3" columncount="6" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 291 38 621 58" onitemchanged="rdo_refterm_onitemchanged" index="3" value="3" anchor="left top">
  151. <Dataset id="innerdataset">
  152. <ColumnInfo>
  153. <Column id="codecolumn" size="256"/>
  154. <Column id="datacolumn" size="256"/>
  155. </ColumnInfo>
  156. <Rows>
  157. <Row>
  158. <Col id="codecolumn">-</Col>
  159. <Col id="datacolumn">전체</Col>
  160. </Row>
  161. <Row>
  162. <Col id="codecolumn">1</Col>
  163. <Col id="datacolumn">1개월</Col>
  164. </Row>
  165. <Row>
  166. <Col id="codecolumn">2</Col>
  167. <Col id="datacolumn">3개월</Col>
  168. </Row>
  169. <Row>
  170. <Col id="codecolumn">3</Col>
  171. <Col id="datacolumn">6개월</Col>
  172. </Row>
  173. <Row>
  174. <Col id="codecolumn">5</Col>
  175. <Col id="datacolumn">1년</Col>
  176. </Row>
  177. <Row>
  178. <Col id="codecolumn">4</Col>
  179. <Col id="datacolumn">지정</Col>
  180. </Row>
  181. </Rows>
  182. </Dataset>
  183. </Radio>
  184. <Calendar id="opt_fromdd" taborder="4" dateformat="yyyy-MM" editformat="yyyy-MM" class="input_search" enable="false" position="absolute 609 38 694 58" anchor="left top"/>
  185. <Static id="caption3" text="~" position="absolute 694 38 710 58" style="align:center middle;" anchor="left top"/>
  186. <Calendar id="opt_todd" taborder="5" dateformat="yyyy-MM" editformat="yyyy-MM" class="input_search" enable="false" position="absolute 710 38 795 58" anchor="left top"/>
  187. <CheckBox id="chk_anofildinclyn" taborder="6" text="타분야 포함" truevalue="Y" class="check_search" position="absolute 798 38 887 58" onchanged="chk_anofildinclyn_onchanged" anchor="left top"/>
  188. <Button id="btn_search" taborder="7" text="조회" onclick="btn_search_onclick" class="btn1" position="absolute 941 38 997 58" anchor="top right"/>
  189. <Button id="btn_memotoclam" taborder="16" text="청구메모로 전달" onclick="btn_memotoclam_onclick" class="btn2" position="absolute 845 76 961 96" anchor="top right" style="align:center middle;"/>
  190. <Static id="caption00" text="메모 이력 조회" class="tit_1" position="absolute 1 0 178 26"/>
  191. </Layout>
  192. </Layouts>
  193. <Objects>
  194. <Dataset id="ds_main_list1_patclbs" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  195. <ColumnInfo>
  196. <Column id="clamdd" type="STRING" size="256"/>
  197. <Column id="ioflag" type="STRING" size="256"/>
  198. <Column id="orddeptcd" type="STRING" size="256"/>
  199. <Column id="judgmemo" type="STRING" size="256"/>
  200. </ColumnInfo>
  201. </Dataset>
  202. <Dataset id="ds_main_list2_prcpclbs" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  203. <ColumnInfo>
  204. <Column id="clamdd" type="STRING" size="256"/>
  205. <Column id="ioflag" type="STRING" size="256"/>
  206. <Column id="orddeptcd" type="STRING" size="256"/>
  207. <Column id="calcscorcd" type="STRING" size="256"/>
  208. <Column id="edicd" type="STRING" size="256"/>
  209. <Column id="spclcd" type="STRING" size="256"/>
  210. </ColumnInfo>
  211. </Dataset>
  212. <Dataset id="ds_send_rslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  213. <ColumnInfo>
  214. <Column id="choimemo" type="STRING" size="256"/>
  215. <Column id="destRef" type="STRING" size="256"/>
  216. <Column id="edicd" type="STRING" size="256"/>
  217. <Column id="spclcd" type="STRING" size="256"/>
  218. <Column id="calcscorcd" type="STRING" size="256"/>
  219. <Column id="edilnno" type="STRING" size="256"/>
  220. </ColumnInfo>
  221. <Rows>
  222. <Row/>
  223. </Rows>
  224. </Dataset>
  225. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  226. <ColumnInfo>
  227. <Column id="pid" type="STRING" size="256"/>
  228. <Column id="orddeptcd" type="STRING" size="256"/>
  229. <Column id="ioflag" type="STRING" size="256"/>
  230. <Column id="refterm" type="STRING" size="256"/>
  231. <Column id="fromdd" type="STRING" size="256"/>
  232. <Column id="todd" type="STRING" size="256"/>
  233. <Column id="anofildinclyn" type="STRING" size="256"/>
  234. <Column id="clamym" type="STRING" size="256"/>
  235. <Column id="clamdg" type="STRING" size="256"/>
  236. <Column id="pidsn" type="STRING" size="256"/>
  237. <Column id="ordfildcd" type="STRING" size="256"/>
  238. </ColumnInfo>
  239. <Rows>
  240. <Row/>
  241. </Rows>
  242. </Dataset>
  243. <Dataset id="ds_init_P0117" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  244. </Objects>
  245. <Bind>
  246. <BindItem id="item0" compid="radio1" propid="value" datasetid="ds_init" columnid="ioflag"/>
  247. <BindItem id="item1" compid="rdo_refterm" propid="value" datasetid="ds_init" columnid="refterm"/>
  248. <BindItem id="item2" compid="opt_fromdd" propid="value" datasetid="ds_init" columnid="fromdd"/>
  249. <BindItem id="item3" compid="opt_todd" propid="value" datasetid="ds_init" columnid="todd"/>
  250. <BindItem id="item4" compid="chk_anofildinclyn" propid="value" datasetid="ds_init" columnid="anofildinclyn"/>
  251. </Bind>
  252. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  253. * System Name :
  254. * Job Name :
  255. * Creator :
  256. * Make Date : 2015-05-01
  257. * Description :
  258. *---------------------------------------------------------------------------------------
  259. * Modify Date Modifier Modify Description
  260. *---------------------------------------------------------------------------------------
  261. * 2015-05-01 Live Converter TF->XP
  262. *
  263. *---------------------------------------------------------------------------------------
  264. ****************************************************************************************/
  265. include "com_commonxp::comm_main.xjs";
  266. // 화면을 초기화한다.
  267. function lf_Initialize()
  268. {
  269. var objParam = [{cdGrpId: "P0117", dsNm: dsf_createDs("ds_init_P0117")}];// 특정내역
  270. appf_getCodeList(objParam, false, false);
  271. ds_main_list1_patclbs.clearData();
  272. ds_main_list2_prcpclbs.clearData();
  273. if (utlf_isNull(ds_init.getColumn(0, "ioflag"))) {
  274. ds_init.setColumn(0, "ioflag", "I");
  275. }
  276. ds_init.setColumn(0, "refterm" , "5");
  277. ds_init.setColumn(0, "anofildinclyn", "Y");
  278. ds_init.setColumn(0, "fromdd" , utlf_addDate(utlf_getCurrentDate(), -180) );
  279. ds_init.setColumn(0, "todd" , utlf_getCurrentDate() );
  280. // 사전심사에서는 청구키가 없어서 null 로 넘어와서 현재일 기준으로 변경
  281. if ( utlf_isNull(ds_init.getColumn(0, "clamym")) ) {
  282. //ds_init.setColumn(0, "clamym", utlf_getYear()+utlf_getMonth() );
  283. ds_init.setColumn(0, "clamym", utlf_getCurrentDate().substr(0,6));
  284. ds_init.setColumn(0, "clamdg", "0");
  285. ds_init.setColumn(0, "pidsn" , "0");
  286. }
  287. switch1_onchanged();
  288. }
  289. // 메모 이력 조회
  290. function lf_SearchClbs()
  291. {
  292. ds_main_list1_patclbs.clearData();
  293. ds_main_list2_prcpclbs.clearData();
  294. var anofildinclyn = ds_init.getColumn(0, "anofildinclyn");
  295. if ( utlf_isNull(anofildinclyn) ) {
  296. ds_init.setColumn(0, "anofildinclyn", "N");
  297. } else {
  298. ds_init.setColumn(0, "anofildinclyn", "Y");
  299. }
  300. if (ds_init.getColumn(0, "pid")) {
  301. tranf_submit({
  302. id : "TRPIZ00301"
  303. , service : "insucomapp.EDIMemoSyts"
  304. , method : "reqGetInAftJudgTrgtManMemoHist"
  305. , inds : "req=ds_init"
  306. , outds : "ds_main_list1_patclbs=patclbs ds_main_list2_prcpclbs=prcpclbs"
  307. //, async : false
  308. });
  309. }
  310. if (ds_main_list1_patclbs.rowcount > 0) {
  311. ds_main_list1_patclbs.rowposition = -1;
  312. }
  313. if (ds_main_list2_prcpclbs.rowcount > 0) {
  314. ds_main_list2_prcpclbs.rowposition = -1;
  315. }
  316. }
  317. var _gridObj; // 그리드 오브젝트 변수
  318. function fc_setGridColorPicker( gridID, xPath )
  319. {
  320. if (document.all("iviewer_colorPicker") == null) {
  321. body.createChild("xforms:iviewer", "id:iviewer_colorPicker; src:../../../com/commonweb/xrw/SPZZZ01100_컬러피커.xrw; left:0px; top:0px; width:104px; height:0px;");
  322. }
  323. if (gridID != null && xPath != null) {
  324. document.all(gridID).attribute("_statenode") = xPath;
  325. }
  326. }
  327. function fc_gridOnmousedown()
  328. {
  329. // 현재 event target Object
  330. var targetObj = event.ptarget;
  331. // datagrid > cell 마우스다운
  332. if(document.all(targetObj.parent.attribute("id")).elementName == "xforms:datagrid") {
  333. _gridObj = targetObj.parent;
  334. if (_gridObj.isCell(targetObj.attribute("id")) && _gridObj.mouseRow - _gridObj.fixedRows >= 0) {
  335. fc_cellOnmousedown(_gridObj);
  336. }
  337. }
  338. try {
  339. // grid 마우스다운
  340. if(document.all(event.currentTarget).elementName == "xforms:datagrid") {
  341. model.property("_onmousedowned_gridID") = event.currentTarget;
  342. //grid_onmousedown();
  343. }
  344. }
  345. catch(e) { //alert("SCRIPT ERROR :: " + e);
  346. }
  347. //event.stopPropagation();
  348. }
  349. function fc_cellOnmousedown( gridObj ) {
  350. if (event.button == 3 && document.controls("iviewer_colorPicker") != null) {
  351. window.showPopupMenu(false);
  352. iviewer_colorPicker.attribute("left") = event.clientX;
  353. iviewer_colorPicker.attribute("top") = event.clientY;
  354. iviewer_colorPicker.attribute("height") = 204;
  355. }
  356. }
  357. function DOMFocusIn() {
  358. if (document.all("iviewer_colorPicker") != null) {
  359. closeIviewerColorPicker();
  360. }
  361. event.stopPropagation();
  362. }
  363. function closeIviewerColorPicker() {
  364. if (parseInt(iviewer_colorPicker.attribute("height")) > 0) {
  365. iviewer_colorPicker.attribute("height") = 0;
  366. window.showPopupMenu(true);
  367. }
  368. }
  369. function SPPIZ00300_onload(obj:Form, e:LoadEventInfo)
  370. {
  371. // 폼 초기화 함수
  372. frmf_initForm(obj);
  373. grdf_initGrid(switch1.patkind.grd_patmemohist);
  374. grdf_initGrid(switch1.prcpkind.grd_prcpmemohist);
  375. // 화면을 초기화한다.
  376. lf_Initialize();
  377. frmf_setFocus(true);
  378. if ( frmf_isPopup()) {
  379. try {
  380. ds_init.setColumn(0, "pid" , sPid);
  381. ds_init.setColumn(0, "orddeptcd" , sOrddeptcd);
  382. ds_init.setColumn(0, "ioflag" , sIoflag);
  383. //ds_init.setColumn(0, "refterm" , "3");
  384. //ds_init.setColumn(0, "anofildinclyn" , sAnofildinclyn);
  385. //ds_init.setColumn(0, "fromdd" , sFromdd);
  386. //ds_init.setColumn(0, "todd" , sTodd);
  387. //ds_init.setColumn(0, "clamym" , sClamym);
  388. ds_init.setColumn(0, "clamdg" , sClamdg);
  389. ds_init.setColumn(0, "pidsn" , sPidsn);
  390. ds_init.setColumn(0, "ordfildcd" , sOrdfildcd);
  391. } catch(e) {
  392. }
  393. }
  394. // 메모 이력 조회
  395. lf_SearchClbs();
  396. }
  397. function btn_search_onclick(obj:Button, e:ClickEventInfo)
  398. {
  399. lf_SearchClbs();
  400. }
  401. function btn_memotojudg_onclick(obj:Button, e:ClickEventInfo)
  402. {
  403. ds_send_rslt.clearData();
  404. var selectedIndex = switch1.tabindex;
  405. if (selectedIndex == 0) { // 명세서
  406. for(i = 0 ; i < ds_main_list1_patclbs.rowcount; i++ ) {
  407. if( ds_main_list1_patclbs.getSelect(i) ) { // true : 선택 상태
  408. var aRow = ds_send_rslt.addRow();
  409. ds_send_rslt.setColumn(aRow, "destRef", "judgmemo");
  410. ds_send_rslt.setColumn(aRow, "choimemo", ds_main_list1_patclbs.getColumn(i, "judgmemo"));
  411. }
  412. }
  413. if( ds_send_rslt.rowcount < 1 ) {
  414. sysf_messageBox("전달 할 메모를","C002");
  415. return;
  416. }
  417. } else if (selectedIndex == 1) { // 원내처방
  418. for(i = 0 ; i < ds_main_list2_prcpclbs.rowcount ; i++ ) {
  419. if( ds_main_list2_prcpclbs.getSelect(i) ) { // true : 선택 상태
  420. var aRow = ds_send_rslt.addRow();
  421. var edicd = ds_main_list2_prcpclbs.getColumn(i, "edicd");
  422. var edimemo = ds_main_list2_prcpclbs.getColumn(i, "edimemo");
  423. ds_send_rslt.setColumn(aRow, "destRef", "judgmemo");
  424. ds_send_rslt.setColumn(aRow, "choimemo", edicd + " : " + edimemo);
  425. }
  426. }
  427. }
  428. var choimemo = ds_send_rslt.getColumn(0, "choimemo");
  429. if (choimemo) {
  430. opener.ds_rslt_sppiz00300.copyData(ds_send_rslt);
  431. try {
  432. if (!utlf_isNull(sFlag)){
  433. opener.fGetMemoHistList(sFlag);
  434. }
  435. }
  436. catch(e) {
  437. this.close();
  438. }
  439. this.close();
  440. } else {
  441. sysf_messageBox("선택된 메모가", "I004"); ///선택된 메모가 없습니다.
  442. }
  443. }
  444. function btn_memotoclam_onclick(obj:Button, e:ClickEventInfo)
  445. {
  446. ds_send_rslt.clearData();
  447. var selectedIndex = switch1.tabindex;
  448. if (selectedIndex == 0) { // 명세서
  449. for(i = 0 ; i < ds_main_list1_patclbs.rowcount; i++ ) {
  450. if( ds_main_list1_patclbs.getSelect(i) ) { // true : 선택 상태
  451. var aRow = ds_send_rslt.addRow();
  452. ds_send_rslt.setColumn(aRow, "destRef", "edimemo");
  453. ds_send_rslt.setColumn(aRow, "choimemo", ds_main_list1_patclbs.getColumn(i, "edimemo"));
  454. }
  455. }
  456. if( ds_send_rslt.rowcount < 1 ) {
  457. sysf_messageBox("전달 할 메모를","C002");
  458. return;
  459. }
  460. } else if (selectedIndex == 1) { // 원내처방
  461. for(i = 0 ; i < ds_main_list2_prcpclbs.rowcount ; i++ ) {
  462. if( ds_main_list2_prcpclbs.getSelect(i) ) { // true : 선택 상태
  463. var aRow = ds_send_rslt.addRow();
  464. var edicd = ds_main_list2_prcpclbs.getColumn(i, "edicd");
  465. var edimemo = ds_main_list2_prcpclbs.getColumn(i, "edimemo");
  466. ds_send_rslt.setColumn(aRow, "destRef", "edimemo");
  467. ds_send_rslt.setColumn(aRow, "choimemo", edicd + " : " + edimemo);
  468. }
  469. }
  470. }
  471. var choimemo = ds_send_rslt.getColumn(0, "choimemo");
  472. if (choimemo) {
  473. opener.ds_rslt_sppiz00300.copyData(ds_send_rslt);
  474. try {
  475. if (!utlf_isNull(sFlag)){
  476. opener.fGetMemoHistList(sFlag);
  477. }
  478. }
  479. catch(e) {
  480. this.close();
  481. }
  482. this.close();
  483. } else {
  484. sysf_messageBox("선택된 메모가", "I004"); ///선택된 메모가 없습니다.
  485. }
  486. }
  487. function btn_memotoprcp_onclick(obj:Button, e:ClickEventInfo)
  488. {
  489. ds_send_rslt.clearData();
  490. var selectedIndex = switch1.tabindex;
  491. var aRow = 0;
  492. if (selectedIndex == 1) { // 원내처방
  493. for(var i = 0 ; i < ds_main_list2_prcpclbs.rowcount; i++ ) {
  494. if( ds_main_list2_prcpclbs.getSelect(i) ) { // true : 선택 상태
  495. aRow = ds_send_rslt.addRow();
  496. ds_send_rslt.setColumn(aRow, "destRef", "prcpmemo");
  497. ds_send_rslt.setColumn(aRow, "choimemo", ds_main_list2_prcpclbs.getColumn(i, "edimemo"));
  498. ds_send_rslt.setColumn(aRow, "edicd", ds_main_list2_prcpclbs.getColumn(i, "edicd"));
  499. }
  500. }
  501. }
  502. var choimemo = ds_send_rslt.getColumn(0, "choimemo");
  503. if (!utlf_isNull(choimemo)) {
  504. opener.ds_rslt_sppiz00300.copyData(ds_send_rslt);
  505. try {
  506. if (!utlf_isNull(sFlag)){
  507. opener.fGetMemoHistList(sFlag);
  508. }
  509. }
  510. catch(e) {
  511. this.close();
  512. }
  513. this.close();
  514. } else {
  515. sysf_messageBox("선택된 메모가", "I004"); ///선택된 메모가 없습니다.
  516. }
  517. }
  518. // 닫기
  519. function Button00_onclick(obj:Button, e:ClickEventInfo)
  520. {
  521. this.close();
  522. }
  523. // 탭 변경
  524. function switch1_onchanged(obj:Tab, e:TabIndexChangeEventInfo)
  525. {
  526. if ( switch1.tabindex == 0 ) {
  527. btn_memotoprcp.enable = false;
  528. btn_judgrowdel.enable = false;
  529. btn_memotojudg.enable = true; // 심사메모로 전달
  530. btn_memotoclam.enable = true; // MX999로 전달
  531. } else if ( switch1.tabindex == 1 ) {
  532. btn_memotoprcp.enable = true;
  533. btn_judgrowdel.enable = false;
  534. btn_memotojudg.enable = true; // 심사메모로 전달
  535. btn_memotoclam.enable = true; // MX999로 전달
  536. }
  537. }
  538. // 내원구분 변경
  539. function radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  540. {
  541. lf_SearchClbs();
  542. }
  543. // 기간 변경
  544. function rdo_refterm_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  545. {
  546. var refterm = ds_init.getColumn(0, "refterm");
  547. if (refterm == "4") {
  548. lf_SearchClbs();
  549. opt_fromdd.enable = true;
  550. opt_todd.enable = true;
  551. } else {
  552. lf_SearchClbs();
  553. opt_fromdd.enable = false;
  554. opt_todd.enable = false;
  555. }
  556. }
  557. // 타분야 변경
  558. function chk_anofildinclyn_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  559. {
  560. lf_SearchClbs();
  561. }
  562. ]]></Script>
  563. </Form>
  564. </FDL>