SPMMR06301_정정신청.xfdl 30 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPMMR06301" position="absolute 0 0 600 281" titletext="정정신청" oninit="SPMMR06301_oninit" onload="SPMMR06301_onload" class="frm_POP">
  5. <Layouts>
  6. <Layout>
  7. <Button position="absolute 524 241 580 263" id="btn_cancel" class="btn4" text="취소" onclick="btn_cancel_onclick"/>
  8. <Button position="absolute 464 241 520 263" id="btn_confirm" class="btn4" text="신청" onclick="btn_confirm_onclick"/>
  9. <Static id="caption1" text="사 유" class="cell_1" position="absolute 20 218 81 241"/>
  10. <Combo id="cmb_resn" taborder="3" innerdataset="ds_init_cmb_resn" codecolumn="rsncd" datacolumn="rsnnm" onitemchanged="cmb_resn_onitemchanged" position="absolute 85 218 340 237"/>
  11. <Edit id="ipt_etc" taborder="4" position="absolute 20 245 340 264"/>
  12. <Static id="stt_titleText" text="팝업타이틀" class="sta_POP_title" position="absolute 12 8 161 28"/>
  13. <Button id="btn_close" taborder="5" class="btn_POP_cls" position="absolute 572 10 590 26" onclick="btn_close_onclick"/>
  14. <Static id="Static05" text="H10" onclick="Static76_onclick" class="sta_guide" visible="false" position="absolute 550 0 590 10"/>
  15. <Static id="Static04" text="W&#13;&#10;10" onclick="Static76_onclick" class="sta_guide" visible="false" position="absolute 590 0 600 36"/>
  16. <Static id="Static76" text="H10" onclick="Static76_onclick" class="sta_guide" visible="false" position="absolute 2 36 598 46"/>
  17. <Static id="Static01" text="W&#13;&#10;10" onclick="Static76_onclick" class="sta_guide" visible="false" position="absolute 588 46 598 192"/>
  18. <Static id="Static00" text="W&#13;&#10;10" onclick="Static76_onclick" class="sta_guide" visible="false" position="absolute 2 46 12 192"/>
  19. <Static id="stx_1" position="absolute 20 45 580 100" style="color:red;align:center middle;font:Dotum,11,bold;" text="해당환자는 사본발급 이력이 없습니다." class="sta_DG_box"/>
  20. <Button id="btn_chrt" taborder="6" text="사본발급이력확인" position="absolute 453 105 580 125" class="btn4" onclick="btn_chrt_onclick" enable="false"/>
  21. <Static id="stx_2" position="absolute 20 151 580 206" text="잘못된 정정 및 삭제 시 법적문제가 발생할 수 있으므로 유의하시기 바라며&#13;&#10;다음 내용에 해당하는 것을 선택하여 주시기 바랍니다." style="color:blue;align:center middle;font:Dotum,11,bold;" class="sta_DG_box"/>
  22. <Static id="Static02" text="문의:의무기록실" position="absolute 364 213 576 233" style="color:red;font:arial,12,bold;"/>
  23. </Layout>
  24. </Layouts>
  25. <Objects>
  26. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  27. <ColumnInfo>
  28. <Column id="status" type="STRING" size="256" sumtext="상태"/>
  29. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  30. <Column id="formrecseq" type="BIGDECIMAL" size="256" sumtext="서식기록순번"/>
  31. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  32. <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
  33. <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
  34. <Column id="chosflag" type="STRING" size="256" sumtext="내원구분"/>
  35. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
  36. <Column id="orddrid" type="STRING" size="256" sumtext="진료의id"/>
  37. <Column id="formrecdeptcd" type="STRING" size="256" sumtext="서식기록부서코드"/>
  38. <Column id="formrecuserid" type="STRING" size="256" sumtext="서식기록사용자id"/>
  39. <Column id="lastrechistseq" type="BIGDECIMAL" size="256" sumtext="최종기록이력순번"/>
  40. <Column id="delyn" type="STRING" size="256" sumtext="삭제여부"/>
  41. <Column id="valiyn" type="STRING" size="256" sumtext="유효여부"/>
  42. <Column id="formcd" type="STRING" size="256" sumtext="서식코드"/>
  43. <Column id="srcformcd" type="STRING" size="256" sumtext="참조서식코드"/>
  44. <Column id="formfromdt" type="STRING" size="256" sumtext="서식시작일자"/>
  45. <Column id="formdegnseq" type="BIGDECIMAL" size="256" sumtext="서식디자인순번"/>
  46. <Column id="fstrgstrid" type="STRING" size="256" sumtext="최초등록자id"/>
  47. <Column id="fstrgstdt" type="STRING" size="256" sumtext="최초등록일시"/>
  48. <Column id="lastupdtrid" type="STRING" size="256" sumtext="최종등록자id"/>
  49. <Column id="lastupdtdt" type="STRING" size="256" sumtext="최종등록일시"/>
  50. <Column id="rechistseq" type="BIGDECIMAL" size="256" sumtext="기록이력순번"/>
  51. <Column id="formrecdd" type="STRING" size="256" sumtext="서식기록일자"/>
  52. <Column id="formrechm" type="STRING" size="256" sumtext="서식기록시분"/>
  53. <Column id="formrecextnnm" type="STRING" size="256" sumtext="서식부제목"/>
  54. <Column id="espiseq" type="BIGDECIMAL" size="256" sumtext="전자서명순번"/>
  55. <Column id="certcnts" type="STRING" size="256" sumtext="인증기록base64"/>
  56. <Column id="bfcertcnts" type="STRING" size="256" sumtext="인증전기록"/>
  57. <Column id="espiyn" type="STRING" size="256" sumtext="인증저장여부"/>
  58. <Column id="cosignyn" type="STRING" size="256" sumtext="코사인여부"/>
  59. <Column id="extnflag" type="STRING" size="256" sumtext="구분"/>
  60. <Column id="oprsrvno" type="STRING" size="256" sumtext="수술예약번호"/>
  61. <Column id="dralertcnts" type="STRING" size="256" sumtext="반려사유"/>
  62. <Column id="cosign" type="STRING" size="256" sumtext="코사인진행여부(코사인된기록인지여부)"/>
  63. </ColumnInfo>
  64. <Rows>
  65. <Row/>
  66. </Rows>
  67. </Dataset>
  68. <Dataset id="ds_rsltmsg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  69. <ColumnInfo>
  70. <Column id="msg" type="STRING" size="256" sumtext="메세지"/>
  71. <Column id="formrecseq" type="BIGDECIMAL" size="256" sumtext="서식기록순번"/>
  72. <Column id="rechistseq" type="BIGDECIMAL" size="256" sumtext="기록이력순번"/>
  73. <Column id="espiseq" type="BIGDECIMAL" size="256" sumtext="전자서명순번"/>
  74. <Column id="cosign" type="STRING" size="256" sumtext="코사인진행여부(코사인된기록인지여부)"/>
  75. <Column id="cnclyn" type="STRING" size="256" sumtext="취소(반려여부)"/>
  76. </ColumnInfo>
  77. </Dataset>
  78. <Dataset id="ds_main_accresn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  79. <ColumnInfo>
  80. <Column id="resncd" type="STRING" size="256"/>
  81. <Column id="resnnm" type="STRING" size="256"/>
  82. <Column id="etc" type="STRING" size="256"/>
  83. <Column id="valiyn" type="STRING" size="256"/>
  84. </ColumnInfo>
  85. <Rows>
  86. <Row/>
  87. </Rows>
  88. </Dataset>
  89. <Dataset id="ds_init_cmb_resn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  90. <ColumnInfo>
  91. <Column id="rsnnm" type="STRING"/>
  92. <Column id="rsncd" type="STRING"/>
  93. </ColumnInfo>
  94. <Rows>
  95. <Row>
  96. <Col id="rsnnm">수정</Col>
  97. <Col id="rsncd">G1</Col>
  98. </Row>
  99. <Row>
  100. <Col id="rsnnm">추가</Col>
  101. <Col id="rsncd">G2</Col>
  102. </Row>
  103. <Row>
  104. <Col id="rsnnm">기록삭제</Col>
  105. <Col id="rsncd">G3</Col>
  106. </Row>
  107. <Row>
  108. <Col id="rsnnm">기타</Col>
  109. <Col id="rsncd">G4</Col>
  110. </Row>
  111. </Rows>
  112. </Dataset>
  113. <Dataset id="ds_send_rsnsrch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  114. <ColumnInfo>
  115. <Column id="jobkind" type="STRING" size="256"/>
  116. <Column id="deptcd" type="STRING" size="256"/>
  117. <Column id="instcd" type="STRING" size="256"/>
  118. <Column id="topyn" type="STRING" size="256"/>
  119. <Column id="staffsignyn" type="STRING" size="256"/>
  120. </ColumnInfo>
  121. <Rows>
  122. <Row/>
  123. </Rows>
  124. </Dataset>
  125. <Dataset id="ds_data_chartinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  126. <Dataset id="ds_data_formmast" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  127. <Dataset id="ds_data_formrec" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  128. <Dataset id="ds_rtn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  129. <ColumnInfo>
  130. <Column id="activeyn" type="STRING" size="256"/>
  131. </ColumnInfo>
  132. <Rows>
  133. <Row>
  134. <Col id="activeyn">N</Col>
  135. </Row>
  136. </Rows>
  137. </Dataset>
  138. <Dataset id="ds_temp_pathistlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  139. <ColumnInfo>
  140. <Column id="rowcnt" type="STRING" size="256" sumtext="행번호"/>
  141. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  142. <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
  143. <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
  144. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  145. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
  146. <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과명"/>
  147. <Column id="orddrid" type="STRING" size="256" sumtext="진료의ID"/>
  148. <Column id="orddrnm" type="STRING" size="256" sumtext="진료의명"/>
  149. <Column id="ordtype" type="STRING" size="256" sumtext="내원구분"/>
  150. <Column id="dschdd" type="STRING" size="256" sumtext="퇴원일자"/>
  151. <Column id="chosinfo" type="STRING" size="256" sumtext="내원정보"/>
  152. </ColumnInfo>
  153. </Dataset>
  154. <Dataset id="ds_temp_unprepdrlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  155. <ColumnInfo>
  156. <Column id="checkflag" type="STRING" size="256" sumtext="check구분"/>
  157. <Column id="orddeptnm" type="STRING" size="256" sumtext="등록번호"/>
  158. <Column id="deptabbrnm" type="STRING" size="256" sumtext="부서약어명"/>
  159. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
  160. <Column id="orddrid" type="STRING" size="256" sumtext="진료의ID"/>
  161. <Column id="orddrnm" type="STRING" size="256" sumtext="진료의명"/>
  162. <Column id="jobposcd" type="STRING" size="256" sumtext="직종코드"/>
  163. <Column id="jobposnm" type="STRING" size="256" sumtext="직종명"/>
  164. <Column id="drstate" type="STRING" size="256" sumtext="진료상태"/>
  165. </ColumnInfo>
  166. </Dataset>
  167. <Dataset id="ds_data_unprepinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  168. <ColumnInfo>
  169. <Column id="status" type="STRING" size="256" sumtext="처리구분"/>
  170. <Column id="indschflag" type="STRING" size="256" sumtext="입퇴원구분"/>
  171. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  172. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  173. <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
  174. <Column id="formrecseq" type="STRING" size="256" sumtext="서식기록번호"/>
  175. <Column id="dschdeptcd" type="STRING" size="256" sumtext="퇴원과코드"/>
  176. <Column id="dschdeptnm" type="STRING" size="256" sumtext="퇴원과명"/>
  177. <Column id="unprepno" type="STRING" size="256" sumtext="미비번호"/>
  178. <Column id="dschdd" type="STRING" size="256" sumtext="퇴원일자"/>
  179. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  180. <Column id="orgunprepstat" type="STRING" size="256" sumtext="원미비상태"/>
  181. <Column id="unprepstat" type="STRING" size="256" sumtext="미비상태"/>
  182. <Column id="doctkindflag" type="STRING" size="256" sumtext="의사직종구분"/>
  183. <Column id="orgdoctkindflag" type="STRING" size="256" sumtext="원의사직종구분"/>
  184. <Column id="drstate" type="STRING" size="256" sumtext="의사상태(파견, 종료)"/>
  185. <Column id="unprepdrnm" type="STRING" size="256" sumtext="미비의사명"/>
  186. <Column id="orgunprepdrnm" type="STRING" size="256" sumtext="원미비의사명"/>
  187. <Column id="unprepdeptnm" type="STRING" size="256" sumtext="미비부서명"/>
  188. <Column id="orgunprepdeptnm" type="STRING" size="256" sumtext="원미비부서명"/>
  189. <Column id="orddeptcd" type="STRING" size="256" sumtext="미비과코드"/>
  190. <Column id="orgorddeptcd" type="STRING" size="256" sumtext="원미비과코드"/>
  191. <Column id="detldeptcd" type="STRING" size="256" sumtext="미비분과코드"/>
  192. <Column id="orgdetldeptcd" type="STRING" size="256" sumtext="원미비분과코드"/>
  193. <Column id="unprepdrid" type="STRING" size="256" sumtext="미비의사ID"/>
  194. <Column id="orgunprepdrid" type="STRING" size="256" sumtext="원미비의사ID"/>
  195. <Column id="formcd" type="STRING" size="256" sumtext="서식코드"/>
  196. <Column id="formnm" type="STRING" size="256" sumtext="서식명"/>
  197. <Column id="oprsrvno" type="STRING" size="256" sumtext="수술예약번호"/>
  198. <Column id="unprepitemnm" type="STRING" size="256" sumtext="미비항목명"/>
  199. <Column id="formrecdd" type="STRING" size="256" sumtext="서식일자"/>
  200. <Column id="unprepitemcd" type="STRING" size="256" sumtext="미비항목코드"/>
  201. <Column id="medirecalertcnts" type="STRING" size="256" sumtext="의무기록알림내용"/>
  202. <Column id="drcnfmdt" type="STRING" size="256" sumtext="의사확인일시"/>
  203. <Column id="drcnfmrid" type="STRING" size="256" sumtext="의사확인ID"/>
  204. <Column id="dralertcnts" type="STRING" size="256" sumtext="의사알림내용"/>
  205. <Column id="fstrgstrnm" type="STRING" size="256" sumtext="최초등록자"/>
  206. <Column id="fstrgstdt" type="STRING" size="256" sumtext="최초등록일시"/>
  207. <Column id="lastupdtrnm" type="STRING" size="256" sumtext="최종수정자"/>
  208. <Column id="lastupdtdt" type="STRING" size="256" sumtext="최종수정일시"/>
  209. <Column id="mprocessyn" type="STRING" size="256" sumtext="정정프로세스 여부"/>
  210. </ColumnInfo>
  211. </Dataset>
  212. </Objects>
  213. <Bind>
  214. <BindItem id="item0" compid="cmb_resn" propid="value" datasetid="ds_main_accresn" columnid="resncd"/>
  215. <BindItem id="item1" compid="ipt_etc" propid="value" datasetid="ds_main_accresn" columnid="etc"/>
  216. </Bind>
  217. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  218. * System Name :
  219. * Job Name :
  220. * Creator :
  221. * Make Date : 2014-09-17
  222. * Description :
  223. *---------------------------------------------------------------------------------------
  224. * Modify Date Modifier Modify Description
  225. *---------------------------------------------------------------------------------------
  226. * 2014-09-17 Live Converter TF->XP
  227. *
  228. *---------------------------------------------------------------------------------------
  229. ****************************************************************************************/
  230. include "com_commonxp::comm_main.xjs";
  231. function fConfirm()
  232. {
  233. var sRsnCd = ds_main_accresn.getColumn(0,"resncd");
  234. if (utlf_isNull(sRsnCd))
  235. {
  236. sysf_messageBox("정정사유가", "I004");
  237. cmb_resn.setFocus();
  238. return;
  239. }
  240. else if (sRsnCd == "G3" || sRsnCd == "G4")
  241. {
  242. var sEtc = utlf_transNullToEmpty(ds_main_accresn.getColumn(0,"etc"));
  243. var tmpEtc = sEtc.replace(/\s/g, "");
  244. if (utlf_isNull(tmpEtc)) //기타사유 입력여부 검사
  245. {
  246. sysf_messageBox("사유를", "C001");
  247. ds_main_accresn.setColumn(0,"etc", tmpEtc);
  248. ipt_etc.setFocus();
  249. return;
  250. }
  251. else
  252. {
  253. if (sEtc.length < 6)
  254. {
  255. sysf_messageBox("한글5자, 영문10자 이상 기록", "I008");
  256. ipt_etc.setFocus();
  257. return;
  258. }
  259. }
  260. }
  261. var sRsnCd = utlf_transNullToEmpty(ds_main_accresn.getColumn(0, "resncd"));
  262. var sRsnNm = utlf_transNullToEmpty(ds_main_accresn.getColumn(0, "resnnm"));
  263. var sRsnEtc = utlf_transNullToEmpty(ds_main_accresn.getColumn(0, "etc"));
  264. if (!utlf_isNull(sRsnEtc))
  265. {
  266. sRsnNm += " -Comments : " + sRsnEtc;
  267. }
  268. var unprepitemcd = "000001000";
  269. var unprepitemnm = "기록정정(의사)";
  270. if( sRsnCd == "G2" ){
  271. unprepitemcd = "000000001";
  272. unprepitemnm = "작성미비";
  273. }else if( sRsnCd == "G3" ){
  274. unprepitemcd = "000000137";
  275. unprepitemnm = "기록삭제";
  276. }
  277. var nRow = ds_data_unprepinfo.rowposition;
  278. ds_data_unprepinfo.setColumn(nRow, "unprepitemcd", unprepitemcd);
  279. ds_data_unprepinfo.setColumn(nRow, "unprepitemnm", unprepitemnm);
  280. ds_data_unprepinfo.setColumn(nRow, "dralertcnts", sRsnNm);
  281. dsf_createDsRow("ds_data_unprepetcinfo", [{col:"pid", type:"STRING", size:256, val:ds_data_unprepinfo.getColumn(nRow, "pid")}
  282. , {col:"indd", type:"STRING", size:256, val:ds_data_unprepinfo.getColumn(nRow, "indd")}
  283. , {col:"cretno", type:"STRING", size:256, val:ds_data_unprepinfo.getColumn(nRow, "cretno")}
  284. , {col:"scrnflag", type:"STRING", size:256, val:""}
  285. , {col:"dschflag", type:"STRING", size:256, val:""}
  286. , {col:"unprepstat", type:"STRING", size:256, val:""}
  287. , {col:"unprepdrid", type:"STRING", size:256, val:""}
  288. , {col:"unprepdrnm", type:"STRING", size:256, val:""}
  289. , {col:"doctkindflag", type:"STRING", size:256, val:""}
  290. , {col:"srchflag", type:"STRING", size:256, val:""}
  291. , {col:"fromdd", type:"STRING", size:256, val:""}
  292. , {col:"todd", type:"STRING", size:256, val:""}
  293. , {col:"deptflag", type:"STRING", size:256, val:""}
  294. , {col:"orddeptcd", type:"STRING", size:256, val:""}
  295. , {col:"unprepsign", type:"STRING", size:256, val:""}
  296. , {col:"unprepstatlist", type:"STRING", size:256, val:""}
  297. , {col:"cosignflag", type:"STRING", size:256, val:""}
  298. , {col:"drstate", type:"STRING", size:256, val:""}
  299. , {col:"dayflag", type:"STRING", size:256, val:""}
  300. , {col:"scrnflag", type:"STRING", size:256, val:"unpreppatbase"}
  301. , {col:"orderby", type:"STRING", size:256, val:""}
  302. , {col:"detldeptcd", type:"STRING", size:256, val:""}]);
  303. var oParam = {};
  304. oParam.id = "TXMRI02101";
  305. oParam.service = "unprepmngtapp.ChrtUnprepMngt";
  306. oParam.method = "reqExeSaveUnPrepRecList";
  307. oParam.inds = "savedata=ds_data_unprepinfo srchdata=ds_data_unprepetcinfo";
  308. //oParam.outds = "ds_=unprepreclist";
  309. oParam.async = false;
  310. oParam.callback = "cf_TXMRI02101";
  311. tranf_submit(oParam);
  312. }
  313. function cf_TXMRI02101(sSvcId, nErrorCode, sErrorMsg) {
  314. if(nErrorCode < 0) return;
  315. if( ds_data_formrec.getColumn(0, "cosign") == "Y" ){
  316. dsf_setDefaultVal(ds_data_formrec, "cosignyn:N");
  317. ds_data_formrec.setColumn(0,"status", "D");
  318. ds_data_formrec.setColumn(0,"cosign", "Y");
  319. ds_data_formrec.addColumn("dralertcnts", "string");
  320. ds_data_formrec.setColumn(0,"dralertcnts", "기타 -Comments : 정정신청");
  321. /*
  322. dsf_createDsRow("ds_send_arsnrec", [{col:"jobkindcd", type:"STRING", size:256, val:utlf_transNullToEmpty(sysf_getUserInfo("jobkindcd"))}
  323. , {col:"deptcd", type:"STRING", size:256, val:utlf_transNullToEmpty(sysf_getUserInfo("dutplcecd"))}
  324. , {col:"instcd", type:"STRING", size:256, val:""}
  325. , {col:"pid", type:"STRING", size:256, val:ds_data_formrec.getColumn(0, "pid")}
  326. , {col:"orddd", type:"STRING", size:256, val:ds_data_formrec.getColumn(0, "orddd")}
  327. , {col:"cretno", type:"STRING", size:256, val:ds_data_formrec.getColumn(0, "cretno")}
  328. , {col:"rsncd", type:"STRING", size:256, val:"C5"}
  329. , {col:"rsnnm", type:"STRING", size:256, val:"정정신청"}
  330. , {col:"ioflag", type:"STRING", size:256, val:ds_data_formrec.getColumn(0, "chosflag")}
  331. , {col:"bizflag", type:"STRING", size:256, val:"S"}]);
  332. */
  333. var oParam = {};
  334. oParam.id = "TXMMR01302";
  335. oParam.service = "medirecapp.ComnMediRec";
  336. oParam.method = "reqExeFormRecCoSign";
  337. oParam.inds = "formrec=ds_data_formrec";
  338. oParam.outds = "ds_rsltmsg=rsltmsg";
  339. oParam.async = false;
  340. //oParam.callback = "cf_TXMMR01302";
  341. tranf_submit(oParam);
  342. }
  343. sysf_messageBox("정정신청", "I001");
  344. ds_rtn.setColumn(0, "activeyn", "Y");
  345. var rtnDs = this.removeChild("ds_rtn");
  346. this.close(rtnDs);
  347. }
  348. function SPMMR06301_oninit(obj:Form, e:InitEventInfo)
  349. {
  350. frmf_initForm(obj);
  351. }
  352. function SPMMR06301_onload(obj:Form, e:LoadEventInfo)
  353. {
  354. try{
  355. ds_data_chartinfo.copyData(arg_ds_data_chartinfo);
  356. ds_data_formmast.copyData(arg_ds_data_formmast);
  357. ds_data_formrec.copyData(arg_ds_data_formrec);
  358. }catch(e){
  359. sysf_catchTrace(e);
  360. }
  361. if( ds_data_chartinfo.rowcount > 0 && ds_data_chartinfo.getColumn(0, "issyn") == "Y" ){
  362. stx_1.text = "해당환자는 사본발급 이력을 가지고 있사오니 정정에 유의하시기 바랍니다.";
  363. btn_chrt.enable = true;
  364. }
  365. if( arg_nFlag == "D" ){
  366. cmb_resn.value = "G3";
  367. ds_main_accresn.setColumn(0, "resnnm", "기록삭제");
  368. cmb_resn.enable = false;
  369. }else if( ds_data_formrec.getColumn(0, "status") == "C" ){
  370. cmb_resn.value = "G2";
  371. ds_main_accresn.setColumn(0, "resnnm", "추가");
  372. cmb_resn.enable = false;
  373. }
  374. // Step 1 대상환자의 진료정보를 조회한다.
  375. var sPid = ds_data_formrec.getColumn(0, "pid");
  376. var sOrddd = ds_data_formrec.getColumn(0, "orddd");
  377. var sCretno = ds_data_formrec.getColumn(0, "cretno");
  378. var sIoflag = ds_data_formrec.getColumn(0, "chosioflag");
  379. if( utlf_isNull(sIoflag) ){
  380. sIoflag = ds_data_formrec.getColumn(0, "chosflag");
  381. }
  382. if(sIoflag == "D"){
  383. sIoflag = "I";
  384. }
  385. dsf_createDsRow("ds_cond_reqdata", [{col:"pid", type:"STRING", size:256, val:sPid}
  386. , {col:"ioflag", type:"STRING", size:256, val:sIoflag}
  387. , {col:"dschflag", type:"STRING", size:256, val:"A"}]);
  388. var oParam = {};
  389. oParam.id = "TRMRI02605";
  390. oParam.service = "unprepmngtapp.ChrtUnprepMngt";
  391. oParam.method = "reqGetUnPrepPatChosInfo";
  392. oParam.inds = "req=ds_cond_reqdata";
  393. oParam.outds = "ds_temp_pathistlist=pathistlist";
  394. oParam.async = false;
  395. //oParam.callback = "cf_TRMRI02605";
  396. tranf_submit(oParam);
  397. var nFindRow = ds_temp_pathistlist.findRowExpr("pid == '"+ sPid +"' && orddd == '"+ sOrddd +"' && cretno == '"+ sCretno +"'");
  398. if( nFindRow > -1 ){
  399. var sDschdd = ds_temp_pathistlist.getColumn(nFindRow, "dschdd");
  400. if(sDschdd == "재원중"){
  401. sDchdd = utlf_getCurrentDate();
  402. }
  403. dsf_createDsRow("ds_cond_reqdata", [
  404. {col:"srchflag", type:"STRING", size:256, val:"id"}
  405. , {col:"unprepdeptcd", type:"STRING", size:256, val:sysf_getUserInfo("dutplcecd")}
  406. , {col:"unprepdr", type:"STRING", size:256, val:sysf_getUserInfo("userid")}
  407. , {col:"stnddd", type:"STRING", size:256, val:utlf_getCurrentDate()}
  408. , {col:"deptengabbr", type:"STRING", size:256, val:""}
  409. , {col:"grupflag", type:"STRING", size:256, val:""}
  410. ]);
  411. var oParam = {};
  412. oParam.id = "TRMRI02604";
  413. oParam.service = "unprepmngtapp.ChrtUnprepMngt";
  414. oParam.method = "reqGetUnPrepDrList";
  415. oParam.inds = "req=ds_cond_reqdata";
  416. oParam.outds = "ds_temp_unprepdrlist=unprepdrlist";
  417. oParam.async = false;
  418. //oParam.callback = "cf_TRMRI02604";
  419. tranf_submit(oParam);
  420. if( ds_temp_unprepdrlist.rowcount == 0 ){
  421. sysf_messageBox("진료의 정보가 올바르지 않습니다.", "E");
  422. }
  423. var pid = ds_temp_pathistlist.getColumn(nFindRow, "pid");
  424. var hngnm = ds_temp_pathistlist.getColumn(nFindRow, "hngnm");
  425. var orddd = ds_temp_pathistlist.getColumn(nFindRow, "orddd");
  426. var cretno = ds_temp_pathistlist.getColumn(nFindRow, "cretno");
  427. var dschdd = ds_temp_pathistlist.getColumn(nFindRow, "dschdd");
  428. var dschdeptcd = "-";
  429. var dschdeptnm = "-";
  430. var orddeptcd = "-";
  431. var orddeptnm = "-";
  432. var formrecdeptcd = "";
  433. var formrecseq = ds_data_formrec.getColumn(0, "formrecseq");
  434. var formcd = ds_data_formrec.getColumn(0, "formcd");
  435. var formnm = ds_data_formrec.getColumn(0, "formnm");
  436. var formrecdd = ds_data_formrec.getColumn(0, "formrecdd");
  437. var oprsrvno = ds_data_formrec.getColumn(0, "oprsrvno");
  438. if( utlf_isNull(formrecseq) ){
  439. formrecseq = -1;
  440. }
  441. orddeptcd = ds_temp_unprepdrlist.getColumn(0, "orddeptcd");
  442. orddeptnm = ds_temp_unprepdrlist.getColumn(0, "orddeptnm");
  443. dschdeptcd = ds_temp_pathistlist.getColumn(nFindRow, "orddeptcd");
  444. dschdeptnm = ds_temp_pathistlist.getColumn(nFindRow, "orddeptnm");
  445. formrecdeptcd = dschdeptcd;
  446. var orddrid = ds_temp_unprepdrlist.getColumn(0, "orddrid");
  447. var orddrnm = ds_temp_unprepdrlist.getColumn(0, "orddrnm");
  448. var jobposnm= ds_temp_unprepdrlist.getColumn(0, "jobposnm");
  449. ds_data_unprepinfo.clearData();
  450. var nRow = ds_data_unprepinfo.addRow();
  451. ds_data_unprepinfo.setColumn(nRow, "status" , "i");
  452. ds_data_unprepinfo.setColumn(nRow, "indschflag" , "D");
  453. ds_data_unprepinfo.setColumn(nRow, "pid" , pid);
  454. ds_data_unprepinfo.setColumn(nRow, "indd" , orddd);
  455. ds_data_unprepinfo.setColumn(nRow, "cretno" , cretno);
  456. ds_data_unprepinfo.setColumn(nRow, "hngnm" , hngnm);
  457. ds_data_unprepinfo.setColumn(nRow, "dschdeptcd", dschdeptcd);
  458. ds_data_unprepinfo.setColumn(nRow, "dschdeptnm", dschdeptnm);
  459. ds_data_unprepinfo.setColumn(nRow, "dschdd" , dschdd);
  460. ds_data_unprepinfo.setColumn(nRow, "unprepstat" , 0); // 배치미비
  461. ds_data_unprepinfo.setColumn(nRow, "doctkindflag" , jobposnm);
  462. ds_data_unprepinfo.setColumn(nRow, "unprepdrnm", orddrnm);
  463. ds_data_unprepinfo.setColumn(nRow, "unprepdrid", orddrid);
  464. ds_data_unprepinfo.setColumn(nRow, "formrecdd" , formrecdd);
  465. ds_data_unprepinfo.setColumn(nRow, "orddeptcd" , orddeptcd);
  466. ds_data_unprepinfo.setColumn(nRow, "formcd" , formcd);
  467. ds_data_unprepinfo.setColumn(nRow, "formnm" , formnm);
  468. ds_data_unprepinfo.setColumn(nRow, "oprsrvno" , oprsrvno);
  469. ds_data_unprepinfo.setColumn(nRow, "unprepitemcd", "");
  470. ds_data_unprepinfo.setColumn(nRow, "unprepitemnm", "");
  471. ds_data_unprepinfo.setColumn(nRow, "formrecseq", formrecseq);
  472. ds_data_unprepinfo.setColumn(nRow, "unprepno" , "1");
  473. ds_data_unprepinfo.setColumn(nRow, "mprocessyn" , "Y");
  474. }else{
  475. sysf_messageBox("환자의 진료정보가 정상적이지 않습니다.", "E");
  476. }
  477. // var sUserDeptcd = sysf_getUserInfo("dutplcecd");
  478. // var sJobkind = utlf_transNullToEmpty(sysf_getUserInfo("jobkindcd")).substring(0, 2);
  479. // var iptjobkind = "";
  480. //
  481. // if (sJobkind == "03") {
  482. // iptjobkind = "03";
  483. // }
  484. // else if (sJobkind == "11") {
  485. // iptjobkind = "05";
  486. // }
  487. // else {
  488. // iptjobkind = "-";
  489. // }
  490. //
  491. // ds_send_rsnsrch.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  492. // ds_send_rsnsrch.setColumn(0, "jobkind", iptjobkind);
  493. // ds_send_rsnsrch.setColumn(0, "deptcd", sUserDeptcd);
  494. // ds_send_rsnsrch.setColumn(0, "topyn", "");
  495. // ds_send_rsnsrch.setColumn(0, "staffsignyn", "Y");
  496. //
  497. //
  498. // var oParam = {};
  499. // oParam.id = "TRMRI03102";
  500. // oParam.service = "recmngtapp.IntegrityRec";
  501. // oParam.method = "reqGetRecAccResn";
  502. // oParam.inds = "req=ds_send_rsnsrch";
  503. // oParam.outds = "ds_init_cmb_resn=resnlist";
  504. // oParam.async = true;
  505. // oParam.callback = "cf_TRMRI03102";
  506. //
  507. // tranf_submit(oParam);
  508. }
  509. function cf_TRMRI03102(sSvcId, nErrorCode, sErrorMsg) {
  510. if(nErrorCode < 0) return;
  511. }
  512. function fCancel()
  513. {
  514. ds_rtn.setColumn(0, "activeyn", "N");
  515. var rtnDs = this.removeChild("ds_rtn");
  516. this.close(rtnDs);
  517. }
  518. function cmb_resn_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  519. {
  520. var sRsnCd = ds_main_accresn.getColumn(0, "resncd");
  521. var nFindRow = ds_init_cmb_resn.findRow("rsncd", sRsnCd);
  522. var sRsnNm = ds_init_cmb_resn.getColumn(nFindRow, "rsnnm");
  523. ds_main_accresn.setColumn(0, "resnnm", sRsnNm);
  524. }
  525. function btn_close_onclick(obj:Button, e:ClickEventInfo)
  526. {
  527. fCancel();
  528. }
  529. function btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  530. {
  531. fCancel();
  532. }
  533. function btn_confirm_onclick(obj:Button, e:ClickEventInfo)
  534. {
  535. fConfirm();
  536. }
  537. function btn_chrt_onclick(obj:Button, e:ClickEventInfo)
  538. {
  539. frmf_setParameter("SMMRC03000_pid", arg_pid);
  540. frmf_open("SMMRC03000", "SMMRC03000", null, null, null, null, null, null, null, null, null, null, "M");
  541. }
  542. ]]></Script>
  543. </Form>
  544. </FDL>