SMMRD05000_대장암치료내역관리.xfdl 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMMRD05000" classname="SMMRD05000_대장암치료내역관리" inheritanceid="" position="absolute 0 0 1190 780" titletext="New Form" oninit="SMMRD05000_oninit" onload="SMMRD05000_onload">
  5. <Layouts>
  6. <Layout>
  7. <Grid id="grd_cncr" taborder="1" binddataset="ds_data_cncrlist" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" position="absolute 0 97 465 780" anchor="all" oncelldblclick="grd_cncr_oncelldblclick">
  8. <Formats>
  9. <Format id="default">
  10. <Columns>
  11. <Column size="25" band="left"/>
  12. <Column size="60" band="left"/>
  13. <Column size="60" band="left"/>
  14. <Column size="70"/>
  15. <Column size="70"/>
  16. <Column size="70"/>
  17. <Column size="70"/>
  18. </Columns>
  19. <Rows>
  20. <Row size="35" band="head"/>
  21. <Row size="24"/>
  22. </Rows>
  23. <Band id="head">
  24. <Cell/>
  25. <Cell col="1" text="등록번호"/>
  26. <Cell col="2" text="환자명"/>
  27. <Cell col="3" text="술전검사"/>
  28. <Cell col="4" text="병리조직&#13;&#10;검사결과"/>
  29. <Cell col="5" text="수술소견"/>
  30. <Cell col="6" text="치료및추적"/>
  31. </Band>
  32. <Band id="body">
  33. <Cell celltype="head" text="expr:currow + 1"/>
  34. <Cell col="1" text="bind:pid" wordwrap="char"/>
  35. <Cell col="2" text="bind:hngnm" wordwrap="char"/>
  36. <Cell col="3" text="bind:rec1" wordwrap="char"/>
  37. <Cell col="4" text="bind:rec2"/>
  38. <Cell col="5" text="bind:rec3"/>
  39. <Cell col="6" text="bind:rec4" wordwrap="char"/>
  40. </Band>
  41. </Format>
  42. </Formats>
  43. </Grid>
  44. <Shape id="line1" class="line_10" position="absolute 0 91 465 97" anchor="left top right"/>
  45. <Div id="div_rec" taborder="3" position="absolute 474 0 1190 755" url="emr_cncrpatmngtxp::SMMRD05001_술전검사.xfdl" anchor="top right bottom"/>
  46. <Div id="grp_srch" taborder="4" class="div_SA" position="absolute 0 24 465 87" anchor="left top right">
  47. <Layouts>
  48. <Layout>
  49. <Edit id="ipt_srchpid" taborder="0" autoselect="true" class="input_search" position="absolute 79 36 169 55" anchor="default"/>
  50. <Static id="caption1" text="등록번호 :" class="search_name" position="absolute 4 38 75 55" anchor="default"/>
  51. <Static id="caption32" text="조회기간 :" class="search_name" position="absolute 5 14 78 31" anchor="default"/>
  52. <Calendar id="ipt_srchstartdd" taborder="2" autoselect="true" dateformat="yyyy-MM-dd" class="input_search" position="absolute 80 12 165 31" anchor="default"/>
  53. <Static id="caption17" text="~" position="absolute 169 13 184 31" anchor="default"/>
  54. <Calendar id="ipt_srchenddd" taborder="3" autoselect="true" dateformat="yyyy-MM-dd" class="input_search" position="absolute 183 12 269 31" anchor="default"/>
  55. <Shape id="line4" linetype="vertical" position="absolute 376 18 382 44" anchor="top right"/>
  56. <Button id="btn_search" taborder="4" text="조회" onclick="grp_srch_btn_search_onclick" class="btn1" position="absolute 395 21 451 43" anchor="top right"/>
  57. </Layout>
  58. </Layouts>
  59. </Div>
  60. <Static id="caption28" text="대장암 치료내역 관리" onclick="caption28_onclick" class="tit_1" position="absolute 0 0 155 24"/>
  61. <Combo id="cmb_srchdeptcd" taborder="5" innerdataset="ds_init_forminfo" codecolumn="formcd" datacolumn="formnm" onitemchanged="cmb_srchdeptcd_onitemchanged" class="combo_search" position="absolute 1288 4 1424 23" visible="false"/>
  62. <Static id="caption30" text="기록 :" class="search_name" position="absolute 1213 6 1273 23" visible="false"/>
  63. <Button id="btn_Int" taborder="6" text="초기화" position="absolute 958 760 1023 780" class="btn4" anchor="right bottom" onclick="btn_Int_onclick" visible="false"/>
  64. <Button id="btn_new" taborder="7" text="신규" class="btn4" position="absolute 1026 760 1078 780" anchor="right bottom" onclick="btn_new_onclick"/>
  65. <Button id="btn_Del" taborder="8" text="삭제" class="btn4" position="absolute 1082 760 1134 780" anchor="right bottom" onclick="btn_Del_onclick"/>
  66. <Button id="btn_Save" taborder="9" text="저장" class="btn4" position="absolute 1138 760 1190 780" anchor="right bottom" onclick="btn_Save_onclick"/>
  67. <Button id="btn_syncdata" taborder="10" text="가져오기" class="btn5" position="absolute 541 760 606 780" anchor="right bottom" onclick="btn_syncdata_onclick" visible="false"/>
  68. <Button id="btn_Excel" taborder="11" text="Excel" onclick="btn_Excel_onclick" class="btn7" position="absolute 474 760 539 780" anchor="right bottom"/>
  69. </Layout>
  70. </Layouts>
  71. <Bind>
  72. <BindItem id="item7" compid="cmb_srchdeptcd" propid="" datasetid="ds_main_cond" columnid="orddeptcd"/>
  73. <BindItem id="item34" compid="cmb_srchdeptcd" propid="value" datasetid="ds_main_cond" columnid="deptcd"/>
  74. <BindItem id="item0" compid="grp_srch.ipt_srchstartdd" propid="value" datasetid="ds_cond_cncrlist" columnid="fromdd"/>
  75. <BindItem id="item1" compid="grp_srch.ipt_srchenddd" propid="value" datasetid="ds_cond_cncrlist" columnid="todd"/>
  76. <BindItem id="item2" compid="grp_srch.ipt_srchpid" propid="value" datasetid="ds_cond_cncrlist" columnid="pid"/>
  77. </Bind>
  78. <Objects>
  79. <Dataset id="ds_init_forminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  80. <ColumnInfo>
  81. <Column id="hardcdno" type="BIGDECIMAL" size="255"/>
  82. <Column id="trgtcd" type="STRING" size="255"/>
  83. <Column id="trgtcdnm" type="STRING" size="255"/>
  84. <Column id="hardspec" type="STRING" size="255"/>
  85. <Column id="trgtcdsnm" type="STRING" size="255"/>
  86. <Column id="cdseqno" type="BIGDECIMAL" size="255"/>
  87. <Column id="valifromdd" type="STRING" size="255"/>
  88. <Column id="valitodd" type="STRING" size="255"/>
  89. <Column id="valifromdt" type="STRING" size="255"/>
  90. <Column id="valitodt" type="STRING" size="255"/>
  91. <Column id="condqry" type="STRING" size="255"/>
  92. <Column id="ccode" type="STRING" size="255"/>
  93. </ColumnInfo>
  94. <Rows>
  95. <Row>
  96. <Col id="hardcdno">9991</Col>
  97. <Col id="trgtcd">rec1</Col>
  98. <Col id="trgtcdnm">술전검사</Col>
  99. <Col id="hardspec">emr_cncrpatmngtxp::SMMRD05001_술전검사.xfdl</Col>
  100. <Col id="cdseqno">1</Col>
  101. <Col id="valifromdd">20180411</Col>
  102. <Col id="valitodd">99991231</Col>
  103. <Col id="condqry"/>
  104. </Row>
  105. <Row>
  106. <Col id="hardcdno">9991</Col>
  107. <Col id="trgtcd">rec2</Col>
  108. <Col id="trgtcdnm">병리조직검사결과</Col>
  109. <Col id="hardspec">emr_cncrpatmngtxp::SMMRD05002_병리조직검사결과.xfdl</Col>
  110. <Col id="cdseqno">2</Col>
  111. <Col id="valifromdd">20180411</Col>
  112. <Col id="valitodd">99991231</Col>
  113. <Col id="condqry"/>
  114. </Row>
  115. <Row>
  116. <Col id="hardcdno">9991</Col>
  117. <Col id="trgtcd">rec3</Col>
  118. <Col id="trgtcdnm">수술소견</Col>
  119. <Col id="hardspec">emr_cncrpatmngtxp::SMMRD05003_수술소견.xfdl</Col>
  120. <Col id="cdseqno">3</Col>
  121. <Col id="valifromdd">20180411</Col>
  122. <Col id="valitodd">99991231</Col>
  123. <Col id="condqry"/>
  124. </Row>
  125. <Row>
  126. <Col id="hardcdno">9991</Col>
  127. <Col id="trgtcd">rec4</Col>
  128. <Col id="trgtcdnm">치료및추적</Col>
  129. <Col id="hardspec">emr_cncrpatmngtxp::SMMRD05004_치료및추적.xfdl</Col>
  130. <Col id="cdseqno">4</Col>
  131. <Col id="valifromdd">20180411</Col>
  132. <Col id="valitodd">99991231</Col>
  133. <Col id="condqry"/>
  134. </Row>
  135. </Rows>
  136. </Dataset>
  137. <Dataset id="ds_cond_cncrlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  138. <ColumnInfo>
  139. <Column id="fromdd" type="STRING" size="256"/>
  140. <Column id="todd" type="STRING" size="256"/>
  141. <Column id="pid" type="STRING" size="256"/>
  142. </ColumnInfo>
  143. <Rows>
  144. <Row>
  145. <Col id="fromdd"/>
  146. <Col id="todd"/>
  147. <Col id="pid"/>
  148. </Row>
  149. </Rows>
  150. </Dataset>
  151. <Dataset id="ds_data_cncrlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  152. <Dataset id="ds_cond_cncrinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  153. <ColumnInfo>
  154. <Column id="formkind" type="STRING" size="256"/>
  155. <Column id="pid" type="STRING" size="256"/>
  156. <Column id="hngnm" type="STRING" size="256"/>
  157. <Column id="formcd" type="STRING" size="256"/>
  158. <Column id="condqry" type="STRING" size="256"/>
  159. </ColumnInfo>
  160. <Rows>
  161. <Row>
  162. <Col id="formkind">N</Col>
  163. <Col id="pid"/>
  164. <Col id="formcd">rec1</Col>
  165. <Col id="hngnm"/>
  166. <Col id="condqry"/>
  167. </Row>
  168. </Rows>
  169. </Dataset>
  170. </Objects>
  171. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  172. * System Name :
  173. * Job Name :
  174. * Creator :
  175. * Make Date : 2018-04-01
  176. * Description :
  177. *---------------------------------------------------------------------------------------
  178. * Modify Date Modifier Modify Description
  179. *---------------------------------------------------------------------------------------
  180. *
  181. *
  182. *---------------------------------------------------------------------------------------
  183. ****************************************************************************************/
  184. //=======================================================================================
  185. // Lib Include
  186. //---------------------------------------------------------------------------------------
  187. include "com_commonxp::comm_main.xjs";
  188. //=======================================================================================
  189. // Global Form Variable
  190. //---------------------------------------------------------------------------------------
  191. var arErrorCode = new HashArray();
  192. //=======================================================================================
  193. // Function
  194. //---------------------------------------------------------------------------------------
  195. /****************************************************************************************
  196. * Argument : N/A
  197. * Description : N/A
  198. ****************************************************************************************/
  199. //=======================================================================================
  200. // Transaction Callback
  201. //---------------------------------------------------------------------------------------
  202. /****************************************************************************************
  203. * Argument : 01.sSvcId : 서비스 ID
  204. * : 02.nErrorCode : 에러코드
  205. * : 03.sErrorMsg : 에러메시지
  206. * Description : TR 의 콜백함수
  207. ****************************************************************************************/
  208. function cf_(sSvcId, nErrorCode, sErrorMsg) {
  209. arErrorCode.push(sSvcId, nErrorCode);
  210. if(nErrorCode < 0) return;
  211. }
  212. //=======================================================================================
  213. // Event
  214. //---------------------------------------------------------------------------------------
  215. /****************************************************************************************
  216. * Components : Form
  217. * Components ID : SMMRD05000
  218. * Event : oninit
  219. * Argument : 01.obj : Object Event has occurred
  220. * : 02.e : Event Object
  221. * Description : 화면 초기화
  222. ****************************************************************************************/
  223. function SMMRD05000_oninit(obj:Form, e:InitEventInfo)
  224. {
  225. frmf_initForm(obj);
  226. }
  227. /****************************************************************************************
  228. * Components : Form
  229. * Components ID : SMMRD05000
  230. * Event : onload
  231. * Argument : 01.obj : Object Event has occurred
  232. * : 02.e : Event Object
  233. * Description : 화면 초기화
  234. ****************************************************************************************/
  235. function SMMRD05000_onload(obj:Form, e:LoadEventInfo)
  236. {
  237. // Grid Init
  238. grdf_setGridSort( grd_cncr );
  239. var cDate = utlf_getCurrentDate();
  240. var fDate = (utlf_getCurrentDate().toDate()).getAddDate(-1, "M");
  241. fDate = fDate.getDateFormat();
  242. ds_cond_cncrlist.setColumn(0, "fromdd", fDate);
  243. ds_cond_cncrlist.setColumn(0, "todd", cDate);
  244. dsf_createDsRow("ds_cond_TRMMT01002", [{col:"hardcdno", type:"STRING", size:256, val:"9991"}]);
  245. var oParam = {};
  246. oParam.id = "TRMMT01002";
  247. oParam.service = "schedulemngtapp.ScheduleMngt";
  248. oParam.method = "reqGetHrcdinfo";
  249. oParam.inds = "req=ds_cond_TRMMT01002";
  250. oParam.outds = "ds_init_forminfo=hrcdinfo";
  251. oParam.async = false;
  252. tranf_submit(oParam);
  253. grp_srch.btn_search.click();
  254. }
  255. /****************************************************************************************
  256. * Components : Button
  257. * Components ID : grp_srch_btn_search
  258. * Event : onclick
  259. * Argument : 01.obj : Object Event has occurred
  260. * : 02.e : Event Object
  261. * Description : 리스트 조회
  262. ****************************************************************************************/
  263. function grp_srch_btn_search_onclick(obj:Button, e:ClickEventInfo)
  264. {
  265. var oParam = {};
  266. oParam.id = "TRMRD05000";
  267. oParam.service = "cncrpatmngtapp.CncrRegstryMngt";
  268. oParam.method = "reqGetCncrRegstryMngtList";
  269. oParam.inds = "req=ds_cond_cncrlist";
  270. oParam.outds = "ds_data_cncrlist=list";
  271. oParam.async = false;
  272. //oParam.callback = "cf_TRMRD05000";
  273. tranf_submit(oParam);
  274. }
  275. function btn_Int_onclick(obj:Button, e:ClickEventInfo)
  276. {
  277. }
  278. function btn_new_onclick(obj:Button, e:ClickEventInfo)
  279. {
  280. if( utlf_isNull(div_rec.url ) ){
  281. return;
  282. }
  283. div_rec.lf_FormInit("Y");
  284. }
  285. function btn_Del_onclick(obj:Button, e:ClickEventInfo)
  286. {
  287. if( utlf_isNull(div_rec.url ) ){
  288. return;
  289. }
  290. div_rec.lf_FormSave("D");
  291. }
  292. function btn_Save_onclick(obj:Button, e:ClickEventInfo)
  293. {
  294. if( utlf_isNull(div_rec.url ) ){
  295. return;
  296. }
  297. div_rec.lf_FormSave();
  298. }
  299. function grd_cncr_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  300. {
  301. if( e.row < 0 || e.col < 3 ) return;
  302. var recNm = null;
  303. if( e.col == obj.getBindCellIndex("body", "rec1") ){
  304. recNm = "rec1";
  305. }else if( e.col == obj.getBindCellIndex("body", "rec2") ){
  306. recNm = "rec2";
  307. }else if( e.col == obj.getBindCellIndex("body", "rec3") ){
  308. recNm = "rec3"
  309. }else if( e.col == obj.getBindCellIndex("body", "rec4") ){
  310. recNm = "rec4";
  311. }
  312. if( recNm == null ) return;
  313. var recYn = ds_data_cncrlist.getColumn(e.row, recNm);
  314. var pid = ds_data_cncrlist.getColumn(e.row, "pid");
  315. var hngnm = ds_data_cncrlist.getColumn(e.row, "hngnm");
  316. ds_cond_cncrinfo.setColumn(0, "formkind", recYn);
  317. ds_cond_cncrinfo.setColumn(0, "pid", pid);
  318. ds_cond_cncrinfo.setColumn(0, "hngnm", hngnm);
  319. ds_cond_cncrinfo.setColumn(0, "formcd", recNm);
  320. var condqry = utlf_transNullToEmpty(ds_init_forminfo.lookup("trgtcd", recNm, "hardspec"));
  321. ds_cond_cncrinfo.setColumn(0, "condqry", condqry);
  322. var formurl = ds_init_forminfo.lookup("trgtcd", recNm, "hardspec");
  323. if( !utlf_isNull(formurl) ){
  324. if( div_rec.url != formurl ){
  325. div_rec.url = formurl;
  326. }else{
  327. div_rec.lf_FormInit();
  328. }
  329. }else{
  330. sysf_messageBox("기록 화면이 존재하지 않습니다.", "E");
  331. }
  332. }
  333. function btn_syncdata_onclick(obj:Button, e:ClickEventInfo)
  334. {
  335. div_rec.lf_getSyncData();
  336. }
  337. function btn_Excel_onclick(obj:Button, e:ClickEventInfo)
  338. {
  339. var recNm = ds_cond_cncrinfo.getColumn(0, "formcd");
  340. var grdid = "";
  341. var caseid = "";
  342. var scrnid = "";
  343. if( recNm == "rec1" ){
  344. grdid = "grd_preslist";
  345. caseid = "pres";
  346. scrnid = "SMMRD05001";
  347. }else if( recNm == "rec2" ){
  348. grdid = "grd_rsltlist";
  349. caseid = "rslt";
  350. scrnid = "SMMRD05002";
  351. }else if( recNm == "rec3" ){
  352. grdid = "grd_opoplist";
  353. caseid = "opop";
  354. scrnid = "SMMRD05003";
  355. }else if( recNm == "rec4" ){
  356. grdid = "grd_cufulist";
  357. caseid = "cufu";
  358. scrnid = "SMMRD05004";
  359. }
  360. frmf_setParameter("SPMRD05000_param_grdid", grdid);
  361. frmf_setParameter("SPMRD05000_param_caseid", caseid);
  362. frmf_setParameter("SPMRD05000_param_scrnid", scrnid);
  363. frmf_modal("SPMRD05005", "SPMRD05005", null, null, null, null, null, null, null, null, null, null, "M");
  364. frmf_clearParameter("SPMRD05000_param_grdid");
  365. frmf_clearParameter("SPMRD05000_param_caseid");
  366. frmf_clearParameter("SPMRD05000_param_scrnid");
  367. }
  368. ]]></Script>
  369. </Form>
  370. </FDL>