SMPIS00100_청구및자료수집이력조회.xfdl 43 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPIS00100" position="absolute 0 0 1256 805" titletext="청구및 자료수집 이력조회" scrollbars="none" onload="SMPIS00100_onload" onkeydown="SMPIS00100_onkeydown">
  5. <Layouts>
  6. <Layout>
  7. <Div id="Div01" taborder="10" anchor="default" position="absolute 83 197 1058 654" positiontype="position" visible="false">
  8. <Layouts>
  9. <Layout width="975" height="457">
  10. <Static id="caption4" text="심사대상자 메모" class="tit_2" position="absolute 10 10 128 30" anchor="default" positiontype="position"/>
  11. <TextArea id="tar_judgmemo" taborder="1" position="absolute 10 30 965 424" anchor="default" imemode="hangul" positiontype="position"/>
  12. <Button id="btn_memocancel" taborder="2" text="확인" class="btn5" position="absolute 921 427 965 447" anchor="default" positiontype="position" onclick="Div01_btn_memocancel_onclick"/>
  13. </Layout>
  14. </Layouts>
  15. </Div>
  16. <Button id="button1" taborder="3" text="셀카피" onclick="button1_onclick" class="btn2" position="absolute 815 74 871 94" anchor="top right" positiontype="position" visible="false"/>
  17. <Button id="button5" taborder="4" text="열카피" onclick="button5_onclick" class="btn2" position="absolute 880 74 936 94" anchor="top right" positiontype="position" visible="false"/>
  18. <Button id="button6" taborder="5" text="행카피" onclick="button6_onclick" class="btn2" position="absolute 939 74 995 94" anchor="top right" positiontype="position" visible="false"/>
  19. <Button id="button2" class="btn3" position="absolute 0 785 92 805" anchor="default" positiontype="position" text="접수증조회" onclick="button2_onclick"/>
  20. <Button id="button3" class="btn3" position="absolute 95 785 211 805" anchor="default" positiontype="position" text="심결보기(F020)" onclick="button3_onclick"/>
  21. <Button id="button4" class="btn3" position="absolute 214 785 330 805" anchor="default" positiontype="position" text="심결보기(F060)" onclick="button4_onclick"/>
  22. <Button id="button7" class="btn3" position="absolute 333 785 461 805" anchor="default" positiontype="position" text="이의신청내역조회" onclick="button7_onclick"/>
  23. <Static id="caption7" position="absolute 822 785 1256 805" anchor="right bottom" positiontype="position" text="※ 접수번호, 명일련은 해당 환자에게 발생한 특정 번호를 바로 찾는 기능입니다." style="color:#ff6600ff;"/>
  24. <Static id="caption1" text="청구및 자료수집 이력조회" class="tit_1" position="absolute 0 0 177 26" positiontype="position"/>
  25. <Div id="Div00" taborder="1" class="div_SA" anchor="left top right" position="absolute 0 27 1256 69" positiontype="position">
  26. <Layouts>
  27. <Layout>
  28. <Static id="caption3" text="내원유형" class="search_name" position="absolute 8 10 82 30" anchor="default" positiontype="position"/>
  29. <Radio id="rdo_ioflag" taborder="1" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 81 10 221 30" index="0" value="A" onitemchanged="rdo_ioflag_onitemchanged" anchor="default" positiontype="position">
  30. <Dataset id="innerdataset">
  31. <ColumnInfo>
  32. <Column id="codecolumn" size="256"/>
  33. <Column id="datacolumn" size="256"/>
  34. </ColumnInfo>
  35. <Rows>
  36. <Row>
  37. <Col id="codecolumn">A</Col>
  38. <Col id="datacolumn">전체</Col>
  39. </Row>
  40. <Row>
  41. <Col id="codecolumn">I</Col>
  42. <Col id="datacolumn">입원</Col>
  43. </Row>
  44. <Row>
  45. <Col id="codecolumn">O</Col>
  46. <Col id="datacolumn">외래</Col>
  47. </Row>
  48. </Rows>
  49. </Dataset>
  50. </Radio>
  51. <Static id="caption2" text="청구과" class="search_name" position="absolute 238 10 299 30" anchor="default" positiontype="position"/>
  52. <Combo id="base_date" taborder="2" class="combo_search" position="absolute 300 10 401 30" innerdataset="@ds_init_clamdeptcd" codecolumn="cdid" datacolumn="cdnm" type="filter" anchor="default" positiontype="position"/>
  53. <Static id="caption5" text="접수번호" class="search_name" position="absolute 644 10 718 30" anchor="default" positiontype="position"/>
  54. <Edit id="ipt_acptno" taborder="4" class="input_search" position="absolute 718 10 819 30" imemode="hangul" maxlength="15" onkeydown="ipt_acptno_onkeydown" anchor="default" positiontype="position"/>
  55. <Static id="caption6" text="명일련" class="search_name" position="absolute 843 10 904 30" anchor="default" positiontype="position"/>
  56. <Edit id="ipt_docuseqno1" taborder="5" class="input_search" position="absolute 903 10 953 30" maxlength="10" onkeydown="ipt_docuseqno_onkeydown" anchor="default" positiontype="position"/>
  57. <Button id="btn_search" taborder="6" text="조회" class="btn1" position="absolute 1188 10 1244 30" anchor="top right" onclick="btn_search_onclick" hotkey="F5" positiontype="position">
  58. <Layouts>
  59. <Layout width="56" height="20"/>
  60. </Layouts>
  61. </Button>
  62. <Edit id="ipt_patunitsrch" taborder="10" position="absolute 497 10 597 30" onkeydown="Div00_ipt_patunitsrch_onkeydown" anchor="default"/>
  63. <Static id="caption00" text="환자조회" class="search_name" position="absolute 424 10 485 30" anchor="default"/>
  64. <Button id="btn_patunitsrch" taborder="11" onclick="btn_patunitsrch_onclick" class="icon_search" position="absolute 600 9 620 29" anchor="default"/>
  65. </Layout>
  66. </Layouts>
  67. </Div>
  68. <Static id="caption8" text="환자 리스트" class="tit_2" position="absolute 0 77 97 97" positiontype="position"/>
  69. <Button id="btn_forceDel" taborder="2" text="입원강제생성삭제" class="btn5" position="absolute 873 74 989 94" anchor="top right" positiontype="position" onclick="btn_forceDel_onclick"/>
  70. <Button id="btn_cretdel" taborder="6" text="생성삭제" class="btn2" position="absolute 992 74 1060 94" anchor="top right" positiontype="position" onclick="btn_cretdel_onclick"/>
  71. <Button id="btn_logview" taborder="7" text="생성삭제로그확인" class="btn2" position="absolute 1063 74 1179 94" anchor="top right" positiontype="position" onclick="btn_logview_onclick"/>
  72. <Button id="btn_excelsave" taborder="8" text="엑셀저장" class="btn7" position="absolute 1180 74 1256 94" anchor="top right" positiontype="position" onclick="btn_excelsave_onclick"/>
  73. <Grid id="grd_outjudg" class="datagrid2" taborder="9" useinputpanel="false" position="absolute 0 97 1256 782" anchor="all" binddataset="DS_GRID_grd_outjudg" positiontype="position" ondbclick="grd_outjudg_ondbclick" onbuttonup="grd_outjudg_onbuttonup" oncellclick="grd_outjudg_oncellclick" onheaddblclick="grd_outjudg_onheaddblclick" onexpanddown="grd_outjudg_onexpanddown" autoenter="select" cellsizingtype="col">
  74. <Formats>
  75. <Format id="default">
  76. <Columns>
  77. <Column size="21"/>
  78. <Column size="34"/>
  79. <Column size="62"/>
  80. <Column size="19"/>
  81. <Column size="49"/>
  82. <Column size="103"/>
  83. <Column size="56"/>
  84. <Column size="39"/>
  85. <Column size="41"/>
  86. <Column size="37"/>
  87. <Column size="20"/>
  88. <Column size="23"/>
  89. <Column size="92"/>
  90. <Column size="61"/>
  91. <Column size="55"/>
  92. <Column size="66"/>
  93. <Column size="84"/>
  94. <Column size="20"/>
  95. <Column size="72"/>
  96. <Column size="66"/>
  97. <Column size="54"/>
  98. <Column size="78"/>
  99. <Column size="78"/>
  100. <Column size="78"/>
  101. <Column size="78"/>
  102. <Column size="80"/>
  103. <Column size="70"/>
  104. <Column size="37"/>
  105. <Column size="170"/>
  106. <Column size="29"/>
  107. <Column size="29"/>
  108. <Column size="75"/>
  109. <Column size="75"/>
  110. <Column size="75"/>
  111. <Column size="75"/>
  112. <Column size="75"/>
  113. <Column size="75"/>
  114. <Column size="75"/>
  115. <Column size="59"/>
  116. <Column size="83"/>
  117. <Column size="80"/>
  118. <Column size="80"/>
  119. <Column size="0"/>
  120. </Columns>
  121. <Rows>
  122. <Row size="22" band="head"/>
  123. <Row size="22" band="head"/>
  124. <Row size="20"/>
  125. </Rows>
  126. <Band id="head">
  127. <Cell rowspan="2" text="No"/>
  128. <Cell col="1" rowspan="2" text="C"/>
  129. <Cell col="2" rowspan="2" text="등록번호"/>
  130. <Cell col="3" rowspan="2" text="순&#10;번"/>
  131. <Cell col="4" rowspan="2" text="성명"/>
  132. <Cell col="5" rowspan="2" text="주민번호"/>
  133. <Cell col="6" rowspan="2" text="청구월"/>
  134. <Cell col="7" rowspan="2" text="구분"/>
  135. <Cell col="8" rowspan="2" text="차수"/>
  136. <Cell col="9" rowspan="2" text="내원&#10;유형"/>
  137. <Cell col="10" rowspan="2" text="유&#10;형"/>
  138. <Cell col="11" rowspan="2" text="보&#10;조"/>
  139. <Cell col="12" rowspan="2" text="청구과"/>
  140. <Cell col="13" rowspan="2" text="진료과"/>
  141. <Cell col="14" rowspan="2" text="주치의"/>
  142. <Cell col="15" rowspan="2" text="심사상태"/>
  143. <Cell col="16" rowspan="2" colspan="2" text="심사메모"/>
  144. <Cell col="18" rowspan="2" text="청구상태"/>
  145. <Cell col="19" rowspan="2" text="접수번호"/>
  146. <Cell col="20" rowspan="2" text="명일련"/>
  147. <Cell col="21" rowspan="2" text="입원일"/>
  148. <Cell col="22" rowspan="2" text="퇴원일"/>
  149. <Cell col="23" rowspan="2" text="진료개시일"/>
  150. <Cell col="24" rowspan="2" text="진료종료일"/>
  151. <Cell col="25" rowspan="2" text="유형시작일"/>
  152. <Cell col="26" rowspan="2" text="종료일"/>
  153. <Cell col="27" rowspan="2" text="심사&#10;결정"/>
  154. <Cell col="28" rowspan="2" text="삭제사유"/>
  155. <Cell col="29" rowspan="2" colspan="2" text="반송사유"/>
  156. <Cell col="31" rowspan="2" text="총진료비"/>
  157. <Cell col="32" rowspan="2" text="본인부담액"/>
  158. <Cell col="33" rowspan="2" text="청구액"/>
  159. <Cell col="34" rowspan="2" text="상한액"/>
  160. <Cell col="35" rowspan="2" text="지원금"/>
  161. <Cell col="36" rowspan="2" text="대불금"/>
  162. <Cell col="37" rowspan="2" text="장애인"/>
  163. <Cell col="38" rowspan="2" text="심사자"/>
  164. <Cell col="39" rowspan="2" text="심사시간"/>
  165. <Cell col="40" rowspan="2" text="조합기호"/>
  166. <Cell col="41" rowspan="2" text="진료과코드"/>
  167. <Cell col="42" rowspan="2" text="lockyn"/>
  168. </Band>
  169. <Band id="body">
  170. <Cell celltype="head" displaytype="normal" edittype="none" expr="expr:currow+1"/>
  171. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
  172. <Cell col="2" displaytype="text" style="align:center middle;" text="bind:pid"/>
  173. <Cell col="3" style="align:center middle;" text="bind:pidsn"/>
  174. <Cell col="4" style="align:center middle;" text="bind:hngnm"/>
  175. <Cell col="5" style="align:center middle;" text="bind:rrgstno"/>
  176. <Cell col="6" displaytype="date" edittype="normal" style="align:center middle;" text="bind:clamym" mask="yyyy-MM" calendardisplaynulltype="none"/>
  177. <Cell col="7" displaytype="combo" style="align:center middle;" text="bind:clamflagcd" combodataset="ds_init_clamflagcd" combocodecol="cdid" combodatacol="cdengabbrnm"/>
  178. <Cell col="8" displaytype="normal" edittype="none" style="align:center middle;" text="bind:clamdg"/>
  179. <Cell col="9" displaytype="combo" style="align:center middle;" text="bind:ioflag" combodataset="ds_init_ioflag" combocodecol="value" combodatacol="label"/>
  180. <Cell col="10" style="align:center middle;" text="bind:insukind"/>
  181. <Cell col="11" style="align:center middle;" text="bind:suppkind"/>
  182. <Cell col="12" displaytype="combo" style="align:left middle;" text="bind:clamdeptnm" combodataset="ds_init_clamdeptnm" combocodecol="cdid" combodatacol="cdnm"/>
  183. <Cell col="13" style="align:center middle;" text="bind:orddeptabbr"/>
  184. <Cell col="14" style="align:center middle;" text="bind:orddrnm"/>
  185. <Cell col="15" displaytype="combo" edittype="none" text="bind:judgendyn" combodataset="ds_init_judgendyn" combocodecol="cdid" combodatacol="cdnm"/>
  186. <Cell col="16" displaytype="none" edittype="none" style="align:center middle;" class="cell_nopadding" text="bind:judgmemo" expandshow="hide" expandsize="18"/>
  187. <Cell col="17" edittype="normal" text="bind:btn_judgmemo" expandshow="show" expandsize="18"/>
  188. <Cell col="18" displaytype="combo" style="align:center middle;" text="bind:clamendyn" combodataset="ds_init_clamendyn" combocodecol="cdid" combodatacol="cdnm"/>
  189. <Cell col="19" style="align:center middle;" text="bind:acptno"/>
  190. <Cell col="20" displaytype="text" style="align:center middle;" text="bind:docuseqno"/>
  191. <Cell col="21" displaytype="date" style="align:center middle;" text="bind:indd" calendardisplaynulltype="none"/>
  192. <Cell col="22" displaytype="date" style="align:center middle;" text="bind:dschdd" calendardisplaynulltype="none"/>
  193. <Cell col="23" displaytype="date" style="align:center middle;" text="bind:ordfromdd" calendardisplaynulltype="none"/>
  194. <Cell col="24" displaytype="date" style="align:center middle;" text="bind:ordtodd" calendardisplaynulltype="none"/>
  195. <Cell col="25" displaytype="date" style="align:center middle;" text="bind:fromdd" calendardisplaynulltype="none"/>
  196. <Cell col="26" displaytype="date" style="align:center middle;" text="bind:todd" calendardisplaynulltype="none"/>
  197. <Cell col="27" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:judgyn"/>
  198. <Cell col="28" displaytype="combo" text="bind:delreason" combodataset="ds_init_delreason" combocodecol="cdid" combodatacol="cdnm"/>
  199. <Cell col="29" text="bind:rtnrsncd1"/>
  200. <Cell col="30" text="bind:rtnrsncd2"/>
  201. <Cell col="31" displaytype="number" style="align:right middle;" text="bind:edimedcaretotamt"/>
  202. <Cell col="32" displaytype="number" style="align:right middle;" text="bind:ediownbamt"/>
  203. <Cell col="33" displaytype="number" style="align:right middle;" text="bind:ediinsuclamamt"/>
  204. <Cell col="34" displaytype="number" style="align:right middle;" text="bind:ediownbmaxexamt"/>
  205. <Cell col="35" displaytype="number" style="align:right middle;" text="bind:edisuppamt"/>
  206. <Cell col="36" displaytype="number" style="align:right middle;" text="bind:edisubtamt"/>
  207. <Cell col="37" displaytype="number" style="align:right middle;" text="bind:edihandcaprfund"/>
  208. <Cell col="38" style="align:center middle;" text="bind:judgrid"/>
  209. <Cell col="39" displaytype="date" style="align:center middle;" text="bind:judgenddd" calendardisplaynulltype="none"/>
  210. <Cell col="40" text="bind:insuno"/>
  211. <Cell col="41" style="align:center middle;" text="bind:orddeptcd"/>
  212. <Cell col="42" text="bind:lockyn"/>
  213. <Cell col="43"/>
  214. <Cell col="44"/>
  215. <Cell col="45"/>
  216. <Cell col="46"/>
  217. <Cell col="47"/>
  218. </Band>
  219. </Format>
  220. </Formats>
  221. </Grid>
  222. <Button id="btn_preview" taborder="11" text="미리보기" class="btn2" position="absolute 1111 74 1179 94" anchor="top right" onclick="btn_preview_onclick" visible="false"/>
  223. </Layout>
  224. </Layouts>
  225. <Objects>
  226. <FileDialog id="fld_input" filter="Worksheet Files (*.xls;*.xlsx)|*.xls;*.xlsx" filterindex="0" defaultextension="false"/>
  227. <Dataset id="DS_GRID_grd_outjudg" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  228. <ColumnInfo>
  229. <Column id="chk" type="STRING"/>
  230. <Column id="pid" type="STRING"/>
  231. <Column id="pidsn" type="STRING"/>
  232. <Column id="hngnm" type="STRING"/>
  233. <Column id="rrgstno" type="STRING"/>
  234. <Column id="clamym" type="STRING"/>
  235. <Column id="clamflagcd" type="STRING"/>
  236. <Column id="clamdg" type="STRING"/>
  237. <Column id="ioflag" type="STRING"/>
  238. <Column id="insukind" type="STRING"/>
  239. <Column id="suppkind" type="STRING"/>
  240. <Column id="clamdeptnm" type="STRING"/>
  241. <Column id="orddeptabbr" type="STRING"/>
  242. <Column id="orddrnm" type="STRING"/>
  243. <Column id="judgendyn" type="STRING"/>
  244. <Column id="judgmemo" type="STRING"/>
  245. <Column id="clamendyn" type="STRING"/>
  246. <Column id="acptno" type="STRING"/>
  247. <Column id="docuseqno" type="STRING"/>
  248. <Column id="indd" type="STRING"/>
  249. <Column id="dschdd" type="STRING"/>
  250. <Column id="ordfromdd" type="STRING"/>
  251. <Column id="ordtodd" type="STRING"/>
  252. <Column id="fromdd" type="STRING"/>
  253. <Column id="todd" type="STRING"/>
  254. <Column id="judgyn" type="STRING"/>
  255. <Column id="delreason" type="STRING"/>
  256. <Column id="rtnrsncd1" type="STRING"/>
  257. <Column id="rtnrsncd2" type="STRING"/>
  258. <Column id="edimedcaretotamt" type="STRING"/>
  259. <Column id="ediownbamt" type="STRING"/>
  260. <Column id="ediinsuclamamt" type="STRING"/>
  261. <Column id="ediownbmaxexamt" type="STRING"/>
  262. <Column id="edisuppamt" type="STRING"/>
  263. <Column id="edisubtamt" type="STRING"/>
  264. <Column id="edihandcaprfund" type="STRING"/>
  265. <Column id="judgrid" type="STRING"/>
  266. <Column id="judgenddd" type="STRING"/>
  267. <Column id="insuno" type="STRING"/>
  268. <Column id="orddeptcd" type="STRING"/>
  269. <Column id="lockyn" type="STRING" size="256"/>
  270. <Column id="btn_judgmemo" type="STRING" size="256"/>
  271. </ColumnInfo>
  272. </Dataset>
  273. <Dataset id="ds_init_clamdeptcd" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  274. <ColumnInfo>
  275. <Column id="cdnm" type="STRING" size="256"/>
  276. <Column id="cdid" type="INT" size="256"/>
  277. </ColumnInfo>
  278. </Dataset>
  279. <Dataset id="ds_init_clamflagcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  280. <ColumnInfo>
  281. <Column id="cdengabbrnm" type="STRING" size="256"/>
  282. <Column id="cdid" type="STRING" size="256"/>
  283. </ColumnInfo>
  284. </Dataset>
  285. <Dataset id="ds_init_clamdeptnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  286. <ColumnInfo>
  287. <Column id="cdnm" type="STRING" size="256"/>
  288. <Column id="cdid" type="STRING" size="256"/>
  289. </ColumnInfo>
  290. </Dataset>
  291. <Dataset id="ds_init_judgendyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  292. <ColumnInfo>
  293. <Column id="cdnm" type="STRING" size="256"/>
  294. <Column id="cdid" type="STRING" size="256"/>
  295. </ColumnInfo>
  296. </Dataset>
  297. <Dataset id="ds_init_clamendyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  298. <ColumnInfo>
  299. <Column id="cdnm" type="STRING" size="256"/>
  300. <Column id="cdid" type="STRING" size="256"/>
  301. </ColumnInfo>
  302. </Dataset>
  303. <Dataset id="ds_init_delreason" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  304. <ColumnInfo>
  305. <Column id="cdnm" type="STRING" size="256"/>
  306. <Column id="cdid" type="STRING" size="256"/>
  307. </ColumnInfo>
  308. </Dataset>
  309. <Dataset id="ds_init_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  310. <ColumnInfo>
  311. <Column id="label" type="STRING" size="256"/>
  312. <Column id="value" type="STRING" size="256"/>
  313. </ColumnInfo>
  314. <Rows>
  315. <Row>
  316. <Col id="label">입원</Col>
  317. <Col id="value">I</Col>
  318. </Row>
  319. <Row>
  320. <Col id="label">외래</Col>
  321. <Col id="value">O</Col>
  322. </Row>
  323. </Rows>
  324. </Dataset>
  325. <ExportObject id="ExtObj" exporttype="0" exporteventtype="itemrecord"/>
  326. <Dataset id="ds_cond_smpir30200" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  327. <ColumnInfo>
  328. <Column id="acptno" type="STRING" size="256"/>
  329. <Column id="judgdg" type="STRING" size="256"/>
  330. </ColumnInfo>
  331. <Rows>
  332. <Row/>
  333. </Rows>
  334. </Dataset>
  335. <Dataset id="ds_cond_smpie01100" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  336. <ColumnInfo>
  337. <Column id="numflag" type="STRING" size="256"/>
  338. <Column id="termflag" type="STRING" size="256"/>
  339. <Column id="fromterm" type="STRING" size="256"/>
  340. <Column id="toterm" type="STRING" size="256"/>
  341. <Column id="srchnum" type="STRING" size="256"/>
  342. <Column id="clamno" type="STRING" size="256"/>
  343. </ColumnInfo>
  344. <Rows>
  345. <Row/>
  346. </Rows>
  347. </Dataset>
  348. <Dataset id="ds_cond_smpie01000" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  349. <ColumnInfo>
  350. <Column id="numflag" type="STRING" size="256"/>
  351. <Column id="srchnum" type="STRING" size="256"/>
  352. </ColumnInfo>
  353. <Rows>
  354. <Row/>
  355. </Rows>
  356. </Dataset>
  357. <Dataset id="ds_cond_smpie00800" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  358. <ColumnInfo>
  359. <Column id="numflag" type="STRING" size="256"/>
  360. <Column id="srchnum" type="STRING" size="256"/>
  361. </ColumnInfo>
  362. <Rows>
  363. <Row/>
  364. </Rows>
  365. </Dataset>
  366. </Objects>
  367. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  368. * System Name :
  369. * Job Name :
  370. * Creator :
  371. * Make Date : 2016-08-10
  372. * Description :
  373. *---------------------------------------------------------------------------------------
  374. * Modify Date Modifier Modify Description
  375. *---------------------------------------------------------------------------------------
  376. * 2016-08-10 Live Converter TF->XP
  377. *
  378. *---------------------------------------------------------------------------------------
  379. ****************************************************************************************/
  380. include "com_commonxp::comm_main.xjs";
  381. function lf_initDataSet(){
  382. // base_date의 INIT Dataset
  383. this.base_date.innerdataset = "DS_INIT_base_date";
  384. this.base_date.codecolumn = "cdid";
  385. this.base_date.datacolumn = "cdnm";
  386. }
  387. // 화면 초기화
  388. function fInitialize()
  389. {
  390. // 공통코드를 조회한다.
  391. appf_getCodeListSubmit([{cdGrpId: "P0155", dsNm: "ds_init_clamflagcd", sortField: "cdnm", sortMehotd: "desc"}
  392. ,{cdGrpId: "P0437", dsNm: "ds_init_clamdeptnm", sortField: "cdnm", sortMehotd: "desc"}
  393. ,{cdGrpId: "P0151", dsNm: "ds_init_judgendyn", sortField: "cdnm", sortMehotd: "desc"}
  394. ,{cdGrpId: "P0430", dsNm: "ds_init_clamendyn", sortField: "cdnm", sortMehotd: "desc"}
  395. ,{cdGrpId: "P0465", dsNm: "ds_init_delreason", sortField: "cdnm", sortMehotd: "desc"}], false, false, "");
  396. // 청구과 콤보 조회시 내원유형이 조건에 포함되므로 팝업의 경우를 고려해서 여기서 뿌려준다.
  397. // 청구과 콤보 리스트
  398. fGetClamDept();
  399. if(frmf_checkOpener())
  400. {
  401. btn_forceDel.visible = false; // 입원강제생성삭제
  402. btn_cretdel.visible = false; //생성삭제
  403. btn_logview.visible = false; // 생성삭제로그확인
  404. var pid = sPid;
  405. Div00.ipt_patunitsrch.value = pid;
  406. fSearch();
  407. } else {
  408. Div00.rdo_ioflag.value = "A";
  409. }
  410. }
  411. // 청구과 리스트 가져오기
  412. function fGetClamDept()
  413. {
  414. var sInDsName = dsf_createDsRow("ds_cond", [{col: "ioflag", val: Div00.rdo_ioflag.value}]);
  415. tranf_submit({id : "TRPID20201"
  416. , service: "aftjudgapp.InAftJudgTrgtMan"
  417. , method : "reqGetInitComCd"
  418. , inds : "req=ds_cond"
  419. , outds : "ds_init_clamdeptcd=clamdept"
  420. , async : false});
  421. ds_init_clamdeptcd.addColumn("cdid_cdnm", "STRING");
  422. for( i = 0 ; i < ds_init_clamdeptcd.rowcount; i++) {
  423. ds_init_clamdeptcd.setColumn(i, "cdid_cdnm", utlf_transNullToEmpty(ds_init_clamdeptcd.getColumn(i, "cdid")) +" "+ utlf_transNullToEmpty(ds_init_clamdeptcd.getColumn(i, "cdnm")));
  424. }
  425. Div00.base_date.datacolumn = "cdid_cdnm";
  426. Div00.base_date.index = 0;
  427. }
  428. // 환자단위 조회
  429. function fPatSrch()
  430. {
  431. var ipt_pid = Div00.ipt_patunitsrch.value;
  432. var objArg = new Object();
  433. if (ipt_pid) {
  434. if ( !isNaN(ipt_pid) )
  435. {
  436. objArg.srchcond = "1"; // 검색조건 : 등록번호로 설정
  437. objArg.pid = "ipt_pid";
  438. }
  439. else
  440. {
  441. objArg.srchcond = "2"; // 검색조건 : 환자명으로 설정
  442. objArg.hngnm = "ipt_pid";
  443. }
  444. } else {
  445. //model.resetInstanceNode("/root/hidden/sppmc02500/cond");
  446. }
  447. // pam/commonweb/xrw/SPPMC02500_환자조회.xrw
  448. frmf_modal("SPPMC02500", "SPPMC02500", objArg); // SPPMC02500_환자조회.xrw
  449. var objPopup = frmf_getChildWindow("SPPMC02500");
  450. var srch_pid = objPopup.frmf_getParameter("pid");
  451. if (srch_pid)
  452. {
  453. Div00.ipt_patunitsrch.value = srch_pid;
  454. }
  455. Div00.ipt_patunitsrch.updateToDataset();
  456. }
  457. // 조회
  458. function fSearch()
  459. {
  460. var chk_userid = Div00.ipt_patunitsrch.value;
  461. var chk_acptno = Div00.ipt_acptno.value;
  462. var chk_docuseqno1 = Div00.ipt_docuseqno1.value;
  463. var chk_userid_yn = utlf_isNull(chk_userid); // 없으면 null -> true
  464. var chk_acptno_yn = utlf_isNull(chk_acptno) || utlf_isNull(chk_docuseqno1) || utlf_isNull(chk_docuseqno2); // 하나라도 없으면 -> true
  465. if( chk_userid_yn && chk_acptno_yn ) {
  466. sysf_messageBox("환자단위조회 조건 혹은 접수번호, 명일련번호 조건은 ", "I003");
  467. } else {
  468. var sInDsName = dsf_createDsRow("ds_cond"
  469. , [{col: "ioflag" , val: Div00.rdo_ioflag.value} //내원유형
  470. , {col: "clamdeptcd" , val: Div00.base_date.value} //청구과
  471. , {col: "pid" , val: Div00.ipt_patunitsrch.value} //환자번호
  472. , {col: "acptno" , val: Div00.ipt_acptno.value} //접수번호
  473. , {col: "docuseqno" , val: Div00.ipt_docuseqno1.value} //명일련from
  474. ]);
  475. tranf_submit({id : "TRPIS00100"
  476. , service: "aftjudgstatapp.ClamHist"
  477. , method : "reqGetClamHist"
  478. , inds : "req=ds_cond"
  479. , outds : "DS_GRID_grd_outjudg=clamhist"
  480. , async : false});
  481. // XML에 chk 컬럼이 없기 때문에 addColumn 필요.
  482. DS_GRID_grd_outjudg.addColumn("chk", "string");
  483. }
  484. DS_GRID_grd_outjudg.rowposition = -1;
  485. }
  486. function SMPIS00100_onload(obj:Form, e:LoadEventInfo)
  487. {
  488. frmf_initForm(obj); // 화면공통
  489. // 화면 초기화
  490. fInitialize();
  491. }
  492. // 접수증조회 onclick
  493. function button2_onclick(obj:Button, e:ClickEventInfo)
  494. {
  495. var row = DS_GRID_grd_outjudg.rowposition;
  496. var acptno = DS_GRID_grd_outjudg.getColumn(row, "acptno");
  497. frmf_setParameter("param", "SMPIS00100");
  498. ds_cond_smpie00800.setColumn(0, "numflag" , "2"); // 2:접수번호
  499. ds_cond_smpie00800.setColumn(0, "srchnum" , acptno);
  500. frmf_modal("SMPIE00800","SMPIE00800", {objDs: ds_cond_smpie00800}, "", "", "", "", "", "", "", "", "", "M");
  501. }
  502. //심결보기(F020) onclick
  503. function button3_onclick(obj:Button, e:ClickEventInfo)
  504. {
  505. var row = DS_GRID_grd_outjudg.rowposition;
  506. var acptno = DS_GRID_grd_outjudg.getColumn(row, "acptno");
  507. ds_cond_smpie01000.setColumn(0, "numflag" , "2"); // 2:접수번호
  508. ds_cond_smpie01000.setColumn(0, "srchnum" , acptno);
  509. frmf_modal("SMPIE01000","SMPIE01000", {objDs: ds_cond_smpie01000}, "", "", "", "", "", "", "", "", "", "M");
  510. }
  511. //심결보기(F060) onclick
  512. function button4_onclick(obj:Button, e:ClickEventInfo)
  513. {
  514. var row = DS_GRID_grd_outjudg.rowposition;
  515. var acptno = DS_GRID_grd_outjudg.getColumn(row, "acptno");
  516. ds_cond_smpie01100.setColumn(0, "numflag" , "2"); // 2:접수번호
  517. ds_cond_smpie01100.setColumn(0, "srchnum" , acptno);
  518. frmf_modal("SMPIE01100","SMPIE01100", {objDs: ds_cond_smpie01100}, "", "", "", "", "", "", "", "", "", "M");
  519. }
  520. //이의신청내역조회 onclick
  521. function button7_onclick(obj:Button, e:ClickEventInfo)
  522. {
  523. var row = DS_GRID_grd_outjudg.rowposition;
  524. var acptno = DS_GRID_grd_outjudg.getColumn(row, "acptno");
  525. ds_cond_smpir30200.setColumn(0, "acptno", acptno);
  526. frmf_modal("SMPIR30200","SMPIR30200", {objDs: ds_cond_smpir30200}, "", "", "", "", "", "", "", "", "", "M");
  527. }
  528. //조회버튼 onclick
  529. function btn_search_onclick(obj:Button, e:ClickEventInfo)
  530. {
  531. fSearch();
  532. }
  533. //내원유형 radio button 변경 시
  534. function rdo_ioflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  535. {
  536. fGetClamDept(); //청구과 리스트 가져오기
  537. }
  538. // 환자조회 enter event
  539. function ipt_patunitsrch_onkeydown(obj:Edit, e:KeyEventInfo)
  540. {
  541. if ( e.keycode == "13" )
  542. {
  543. if ( Div00.ipt_patunitsrch.getLength() > 1)
  544. {
  545. // var rtn = frmf_setInputNodeCurPid_Change( Div00.ipt_patunitsrch.value );
  546. // setInputNodeCurText();
  547. if ( isNaN(Div00.ipt_patunitsrch.value)) // PID로 검색시 조회
  548. {
  549. fPatSrch();
  550. } else {
  551. fSearch();
  552. }
  553. }
  554. }
  555. }
  556. // 환자조회버튼 onclick event
  557. function btn_srchpid_onclick(obj:Button, e:ClickEventInfo)
  558. {
  559. fPatSrch();
  560. }
  561. // 접수번호 enter event
  562. function ipt_acptno_onkeydown(obj:Edit, e:KeyEventInfo)
  563. {
  564. if ( e.keycode == "13" )
  565. {
  566. // setInputNodeCurText();
  567. fSearch();
  568. }
  569. }
  570. // 명일련 enter event
  571. function ipt_docuseqno_onkeydown(obj:Edit, e:KeyEventInfo)
  572. {
  573. if ( e.keycode == "13" )
  574. {
  575. // setInputNodeCurText();
  576. fSearch();
  577. }
  578. }
  579. // 엑셀저장 event
  580. function btn_excelsave_onclick(obj:Button, e:ClickEventInfo)
  581. {
  582. // var vFile = fld_input.open("FileSave", FileDialog.SAVE, "%MYDOCUMENT%", "청구 및 자료수집 이력조회.xlsx");
  583. //
  584. // ExtObj.exporttype = ExportTypes.EXCEL;
  585. // ExtObj.exportfilename = vFile.fullpath;
  586. // ExtObj.exportactivemode = "noactive";
  587. // ExtObj.exportsavemode = "save";
  588. // ExtObj.addExportItem(ExportItemTypes.GRID, grd_outjudg, "Sheet1!A1" );
  589. // ExtObj.export();
  590. grdf_exportExcel(grd_outjudg, "청구및자료수집이력조회", "청구및자료수집이력조회");
  591. }
  592. // 체크버튼 click
  593. function grd_outjudg_oncellclick(obj:Grid, e:GridClickEventInfo)
  594. {
  595. var icol = e.cell;
  596. var irow = e.row;
  597. if ( icol == 1 )
  598. {
  599. if ( DS_GRID_grd_outjudg.getColumn(e.row, "lockyn") == "Y" )
  600. {
  601. sysf_messageBox("잠금설정되어서 선택할 수", "I004"); // I004=없습니다.
  602. DS_GRID_grd_outjudg.setColumn(e.row, "chk", "0");
  603. }
  604. }
  605. }
  606. // 체크버튼 head 더블클릭
  607. function grd_outjudg_onheaddblclick(obj:Grid, e:GridClickEventInfo)
  608. {
  609. var icol = e.cell;
  610. var irow = e.row;
  611. if ( icol == 1 )
  612. {
  613. var i = 0;
  614. for ( i = 0 ; i < DS_GRID_grd_outjudg.getRowCount(); i++ )
  615. {
  616. if( DS_GRID_grd_outjudg.getColumn(i, "chk") == "1" )
  617. {
  618. DS_GRID_grd_outjudg.setColumn(i, "chk", "0");
  619. } else {
  620. if ( DS_GRID_grd_outjudg.getColumn(i, "lockyn") == "N" )
  621. {
  622. DS_GRID_grd_outjudg.setColumn(i, "chk", "1");
  623. }
  624. }
  625. }
  626. }
  627. }
  628. function grd_outjudg_onexpanddown(obj:Grid, e:GridMouseEventInfo)
  629. {
  630. // 심사자메모 button 클릭
  631. // if ( obj.currentcell == obj.getBindCellIndex("body","judgmemo") )
  632. // {
  633. // //Div01.tar_judgmemo.value = DS_GRID_grd_outjudg.getColumn(e.row, "judgmemo");
  634. // //Div01.tar_judgmemo.updateToDataset();
  635. // Div01.visible = true;
  636. // //Div01.tar_judgmemo.setFocus();
  637. // }
  638. obj.updateToDataset();
  639. trace("2222");
  640. if ( obj.currentcol == obj.getBindCellIndex("body","btn_judgmemo") ) { // 참고사항 조회할때만
  641. trace("11111");
  642. // 타이틀
  643. var stitle = "심사대상자 메모";
  644. // 내용
  645. var sCont = DS_GRID_grd_outjudg.getColumn(obj.currentrow, "judgmemo");
  646. // 내용의 readonly(잠금:true / 해제:false)
  647. var sReadonly = true;
  648. var rtn = frmf_textViewPopup(stitle, sCont, sReadonly, "", "", 975, 457);
  649. // if ( (!utlf_isNull(rtn)) & (rtn<>-1) & (sReadonly==true) ) {
  650. // DS_GRID_grd_outjudg.setColumn(obj.currentrow, "judgmemo", rtn);
  651. // }
  652. trace("rtn = " + rtn);
  653. }
  654. }
  655. function btn_cretdel_onclick(obj:Button, e:ClickEventInfo)
  656. {
  657. var delcnt = 0;
  658. var i;
  659. for ( i = 0; i < DS_GRID_grd_outjudg.getRowCount(); i++)
  660. {
  661. if ( DS_GRID_grd_outjudg.getColumn(i, "chk") == "1" && DS_GRID_grd_outjudg.getColumn(i, "lockyn") == "N" )
  662. {
  663. var pid = DS_GRID_grd_outjudg.getColumn(i, "pid");
  664. var patnm = DS_GRID_grd_outjudg.getColumn(i, "hngnm");
  665. var deptcd = DS_GRID_grd_outjudg.getColumn(i, "orddeptcd");
  666. var message = "2. 전체 진료과를 모두 삭제";
  667. var ans = sysf_messageBox("[ 환자명:" + patnm + ", 등록번호:" + pid + ", 진료과:" + deptcd + " ]\n\n" + "1. 선택한 진료과만 삭제", "S003", message); ///하시려면 예(Yes)\n아니면 아니오(No)
  668. // 6: yes, 7:no, 2:cancel
  669. if ( ans == "6" || ans == "7" )
  670. {
  671. // 1.청구년월
  672. var clamym = DS_GRID_grd_outjudg.getColumn(i, "clamym");
  673. // 2.청구차수
  674. var clamdg = DS_GRID_grd_outjudg.getColumn(i, "clamdg");
  675. // 3.생성시작일
  676. var clamfromdd = DS_GRID_grd_outjudg.getColumn(i, "cretfromdd");
  677. // 4.생성종료일
  678. var clamtodd = DS_GRID_grd_outjudg.getColumn(i, "crettodd");
  679. var insutype;
  680. var ordfildcd;
  681. var orddeptcd;
  682. var weekflag;
  683. var ioflag;
  684. // 전체보험유형,진료분야,진료과 삭제이면( 7:no )
  685. if ( ans == "7" )
  686. {
  687. // 5.보험유형 : -.전체
  688. insutype = "-";
  689. // 6.진료분야 : -.전체
  690. ordfildcd = "-";
  691. // 7.진료과
  692. orddeptcd = "-";
  693. } else {
  694. // 5.보험유형 : -.전체
  695. var insukind = DS_GRID_grd_outjudg.getColumn(i, "insukind");
  696. if (insukind == "11")
  697. {
  698. insutype = "2"; //보험
  699. } else if (insukind == "21"){
  700. insutype = "4"; //급여1종
  701. } else if (insukind == "22"){
  702. insutype = "5"; //급여2종
  703. } else if (insukind == "41"){
  704. insutype = "6"; //산재
  705. } else if (insukind == "31"){
  706. insutype = "7"; //자보
  707. }
  708. //6.진료분야
  709. ordfildcd = DS_GRID_grd_outjudg.getColumn(i, "ordfildcd");
  710. //7.진료과
  711. orddeptcd = DS_GRID_grd_outjudg.getColumn(i, "orddeptcd");
  712. }
  713. // 8.청구구분 : -.퇴원+중간, 1.퇴원청구, 2.중간청구
  714. var clamflag = "-";
  715. // 9.이전자료 : 4.삭제
  716. var predata = "4";
  717. // 10.전액본인 : N.생성안함
  718. var ownb100 = "N";
  719. // 11.생성여부 : -.전체
  720. var datacretflag = "-";
  721. // 12.등록번호
  722. var pid = ordfildcd = DS_GRID_grd_outjudg.getColumn(i, "pid");
  723. // 13.환자명
  724. var name = ordfildcd = DS_GRID_grd_outjudg.getColumn(i, "hngnm");
  725. // 14.선택여부
  726. var chk = "true";
  727. // 15.집계구분
  728. if ( DS_GRID_grd_outjudg.getColumn(i, "ioflag") == "I" )
  729. {
  730. weekflag = "T";
  731. ioflag = "I";
  732. } else {
  733. weekflag = "S";
  734. ioflag = "O";
  735. }
  736. //16.생성삭제 TXPID10102
  737. var sInDsName = dsf_createDsRow("ds_cond"
  738. , [{col: "clamfromdd", val: clamfromdd} //생성기간1
  739. , {col: "clamtodd", val: clamtodd} //생성기간2
  740. , {col: "insutype", val: insutype} //보험유형
  741. , {col: "orddeptcd", val: orddeptcd} //진료과목
  742. , {col: "ordfildcd", val: ordfildcd} //진료분야
  743. , {col: "clamflag", val: clamflag} //청구구분
  744. , {col: "predata", val: predata} //이전자료
  745. , {col: "ownb100", val: ownb100} //전액본인
  746. , {col: "datacretflag", val: datacretflag} //생성여부
  747. , {col: "pid", val: pid} //환자번호
  748. , {col: "instcd", val: ""} //기관코드
  749. , {col: "clamym", val: clamym} //청구년월
  750. , {col: "clamdg", val: clamdg} //청구차수
  751. , {col: "weekflag", val: weekflag} //청구단위
  752. , {col: "chk", val: chk} //선택여부
  753. , {col: "ioflag", val: ioflag} //내원형태
  754. ]);
  755. tranf_submit({
  756. id: "TXPID10102"
  757. , service: "aftjudgapp.InClamDataCret"
  758. , method: "reqExeClamDataCret"
  759. , inds : "req=ds_cond"
  760. , async: false
  761. , callback: "cbf_TXPID10102"
  762. });
  763. // 17. 생성삭제로그 자동호출
  764. var e = new ClickEventInfo; //이벤트 선언
  765. var varRet = btn_logview.onclick.fireEvent(btn_logview, e); //이벤트매핑
  766. sysf_messageBox("생성삭제되었는지 반드시 로그를 확인하시기 바랍니다. 생성삭제 호출", "I001"); //I001=처리되었습니다.
  767. }
  768. } else if ( DS_GRID_grd_outjudg.getColumn(i, "chk") == "1" && DS_GRID_grd_outjudg.getColumn(i, "lockyn") == "Y" ) {
  769. sysf_messageBox("잠금설정상태입니다. 삭제", "E001"); ///할 수 없습니다.
  770. }
  771. }
  772. }
  773. // 조회 callback 함수
  774. function cbf_TXPID10102(strSvcID, nErrorCode, strErrorMsg){
  775. //에러 처리
  776. if(nErrorCode == 0){
  777. delcnt++;
  778. }else{
  779. }
  780. }
  781. function btn_logview_onclick(obj:Button, e:ClickEventInfo)
  782. {
  783. //청구월 세팅
  784. var objDate = new Date();
  785. var todd = objDate.addMonth(-1);
  786. todd = objDate.toFormatString("%Y%m%d");
  787. // zsbfOpenBatchLogPopup("clamcretmngtmgr.ClamDataCretMain",getCurrentDate(),todd.getDateFormat());
  788. var objArg = new Object();
  789. objArg.todd = todd;
  790. frmf_open("SPZSB00301","SPZSB00301", objArg);
  791. }
  792. function btn_forceDel_onclick(obj:Button, e:ClickEventInfo)
  793. {
  794. var delcnt = 0;
  795. var i = 1;
  796. for ( i = 0; i < DS_GRID_grd_outjudg.getRowCount(); i++)
  797. {
  798. if ( DS_GRID_grd_outjudg.getColumn(i, "chk") == "1" && DS_GRID_grd_outjudg.getColumn(i, "lockyn") == "N" )
  799. {
  800. if ( DS_GRID_grd_outjudg.getColumn(i, "ioflag") != "I" )
  801. {
  802. sysf_messageBox("외래는 선택", "E001"); ///할 수 없습니다.
  803. return;
  804. }
  805. var pid;
  806. var pidsn;
  807. var patnm = DS_GRID_grd_outjudg.getColumn(i, "hngnm");
  808. var clamym;
  809. var clamdg;
  810. var ans = sysf_messageBox("[ 환자명:" + patnm + ", 등록번호:" + pid + ", 청구월:" + clamym + "] 강제로 청구서를 삭제 하시겠습니까.\n", "S001", "\n반드시 확인하고 실행하십시오."); ///하시려면 예(Yes)\n아니면 아니오(No)
  811. if ( ans == "6" )
  812. {
  813. clamym = DS_GRID_grd_outjudg.getColumn(i, "clamym"); //1.청구년월
  814. clamdg = DS_GRID_grd_outjudg.getColumn(i, "clamdg"); //2.청구차수
  815. pid = DS_GRID_grd_outjudg.getColumn(i, "pid"); //3.등록번호
  816. pidsn = DS_GRID_grd_outjudg.getColumn(i, "pidsn"); //4.등록번호순번
  817. //강제생성삭제
  818. var sInDsName = dsf_createDsRow("ds_cond"
  819. , [{col: "clamym", val: clamym}
  820. , {col: "clamdg", val: clamdg}
  821. , {col: "pid", val: pid}
  822. , {col: "pidsn", val: pidsn}
  823. ]);
  824. tranf_submit({
  825. id: "TXPIS00100"
  826. , service: "aftjudgstatapp.ClamHist"
  827. , method: "reqExeClamForceDel"
  828. , inds : "req=ds_cond"
  829. , async: false
  830. , callback: "cbf_TXPIS00100"
  831. });
  832. }
  833. } else if (DS_GRID_grd_outjudg.getColumn(i, "chk") == "1" && DS_GRID_grd_outjudg.getColumn(i, "lockyn") == "Y") {
  834. sysf_messageBox("잠금설정상태입니다. 삭제", "E001"); ///할 수 없습니다.
  835. }
  836. }
  837. }
  838. // 조회 callback 함수
  839. function cbf_TXPIS00100(strSvcID, nErrorCode, strErrorMsg){
  840. //에러 처리
  841. if(nErrorCode == 0){
  842. fSearch();
  843. }else{
  844. }
  845. }
  846. // 미리보기
  847. function btn_preview_onclick(obj:Button, e:ClickEventInfo){
  848. alert("보고서 양식 없음 2014-11-28 기준");
  849. }
  850. /****************************************************************************************
  851. * Components :
  852. * Components ID : SMPIS00100
  853. * Event : onkeydown
  854. * Argument : 01.obj : Form
  855. * : 02.e : KeyEventInfo
  856. * Description : ESC 버튼 - 화면종료
  857. ****************************************************************************************/
  858. function SMPIS00100_onkeydown(obj:Form, e:KeyEventInfo){
  859. if(e.keycode == 27){
  860. // keycode 27 : ESC
  861. this.close();
  862. }
  863. }
  864. function btn_patunitsrch_onclick(obj:Button, e:ClickEventInfo)
  865. {
  866. lf_PatSrch();
  867. }
  868. function Div00_ipt_patunitsrch_onkeydown(obj:Edit, e:KeyEventInfo)
  869. {
  870. if (e.keycode == 13) { // Enter 입력 시에
  871. if (obj.value.length > 1) { // 2글자 이상이면
  872. if ( !utlf_isNull(obj.value) ) // PID로 검색시 조회
  873. {
  874. lf_PatSrch();
  875. }
  876. else
  877. {
  878. fSearch();
  879. }
  880. }
  881. }
  882. }
  883. function lf_PatSrch()
  884. {
  885. var pFirstValue = Div00.ipt_patunitsrch.value;
  886. dsf_createDsRow("ds_hidden_source"
  887. , [{col: "srchcond", val: "1"}
  888. , {col: "pid", val: pFirstValue}
  889. ]);
  890. var objArg = new Object();
  891. objArg.arg_ds_send = ds_hidden_source;
  892. var rtnDs = frmf_modal("SPPMC02500", "SPPMC02500", objArg, null, null, null, null, null, null, null, null, null, "M");
  893. Div00.ipt_patunitsrch.value = ds_patinfolist.getColumn(0, 'pid');
  894. }
  895. ]]></Script>
  896. </Form>
  897. </FDL>