SMPID22500_명세서이동.xfdl 34 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPID22500" position="absolute 0 0 1256 805" titletext="명세서이동" onload="workform_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static id="Static00" position="absolute 1003 25 1256 51" class="sta_DA_box" anchor="top right"/>
  8. <Static id="cap_title" text="명세서이동" class="tit_1" position="absolute 0 3 163 23"/>
  9. <Div id="group1" taborder="1" style="align:center top;" position="absolute 0 25 993 117" class="div_SA" anchor="left top right">
  10. <Layouts>
  11. <Layout>
  12. <Static id="caption30" text="청구년월" class="search_name" position="absolute 8 10 82 30" anchor="default"/>
  13. <Static id="caption32" text="청구구분" class="search_name" position="absolute 8 35 82 55" anchor="default"/>
  14. <Combo id="cmb_clamflag" taborder="48" class="combo_search" position="absolute 82 35 208 55" anchor="default" innerdataset="@ds_cond_clamflag" codecolumn="cdid" datacolumn="cdnm"/>
  15. <Static id="caption37" text="명번호" class="search_name" position="absolute 638 35 699 55" anchor="default"/>
  16. <Edit id="ipt_docuseqno1" taborder="49" class="input_search" position="absolute 712 35 751 55" anchor="default"/>
  17. <Edit id="ipt_docuseqno2" taborder="50" class="input_search" position="absolute 770 35 809 55" anchor="default" oneditclick="group1_ipt_docuseqno2_oneditclick"/>
  18. <Static id="caption38" text="등록번호" class="search_name" position="absolute 229 60 303 80" anchor="default"/>
  19. <Edit id="ipt_patunitsrch" taborder="51" class="input_search" position="absolute 303 60 416 80" anchor="default"/>
  20. <Button id="btn_select" taborder="52" text="조회" onlbuttonup="btn_select_onlbuttonup" class="btn1" position="absolute 925 10 981 30" anchor="top right" onclick="group1_btn_select_onclick"/>
  21. <Static id="caption45" text="~" position="absolute 755 35 766 55" anchor="default" style="align:center middle;"/>
  22. <Combo id="cmb_clamdg" taborder="53" position="absolute 157 10 208 30" anchor="default" innerdataset="@ds_cond_clamdg" codecolumn="clamdgcd" datacolumn="clamdgnm"/>
  23. <Static id="caption1" text="내원형태" class="search_name" position="absolute 8 60 82 80" anchor="default"/>
  24. <Combo id="cmb_ioflag" taborder="54" class="combo_search" position="absolute 82 60 208 80" anchor="default" innerdataset="@ds_cond_iofalg" codecolumn="value" datacolumn="label"/>
  25. <Static id="caption2" text="청구번호" class="search_name" position="absolute 638 10 712 30" anchor="default"/>
  26. <Edit id="ipt_clamno" taborder="55" class="input_search" position="absolute 712 10 809 30" anchor="default"/>
  27. <Shape id="line3" linetype="vertical" class="line_4" position="absolute 823 7 823 79" anchor="default"/>
  28. <Combo id="cmb_ordfildcd" taborder="56" class="combo_search" position="absolute 303 10 416 30" anchor="default" innerdataset="@ds_cond_ordfild" codecolumn="cdid" datacolumn="cdnm"/>
  29. <Static id="caption5" text="진료분야" class="search_name" position="absolute 229 10 303 30" anchor="default"/>
  30. <Combo id="cmb_orddrid" taborder="57" class="combo_search" position="absolute 501 35 614 55" anchor="default" innerdataset="@ds_cond_orddrid" codecolumn="cd" datacolumn="nm"/>
  31. <Static id="caption46" text="진료과" class="search_name" position="absolute 440 10 501 30" anchor="default"/>
  32. <Combo id="cmb_orddeptcd" taborder="58" class="combo_search" position="absolute 501 10 614 30" anchor="default" innerdataset="@ds_cond_deptinfolist" codecolumn="cd" datacolumn="nm"/>
  33. <Static id="caption7" text="주치의" class="search_name" position="absolute 440 35 501 55" anchor="default"/>
  34. <Combo id="cmb_clamdeptcd" taborder="59" class="combo_search" position="absolute 303 35 416 55" anchor="default" innerdataset="@ds_init_clamdept" codecolumn="cdid" datacolumn="cdnm"/>
  35. <Static id="caption11" text="청구과" class="search_name" position="absolute 229 35 290 55" anchor="default"/>
  36. <Combo id="cmb_judg" taborder="60" class="combo_search" position="absolute 501 60 614 80" anchor="default" innerdataset="@ds_cond_judgerinfo" codecolumn="judgrid" datacolumn="judgrnm"/>
  37. <Static id="caption15" text="심사자" class="search_name" position="absolute 440 60 501 80" anchor="default"/>
  38. <cp_monthCal id="cp_monthCal00" titletext="monthCalendar" taborder="61" text="cp_monthCal00" scrollbars="none" position="absolute 82 10 156 30" anchor="default"/>
  39. <CheckBox id="checkbox1" taborder="62" text="진료개시일불일치" position="absolute 632 63 762 83" truevalue="Y"/>
  40. <CheckBox id="checkbox2" taborder="63" text="교부번호불일치" position="absolute 764 62 896 82" truevalue="Y"/>
  41. </Layout>
  42. </Layouts>
  43. </Div>
  44. <Static id="caption4" text="이동차수" class="cell_1" position="absolute 1004 26 1084 50" style="align:center middle;" anchor="top right"/>
  45. <MaskEdit id="ipt_toclamdg" taborder="3" mask="####" class="input_essential" position="absolute 1190 28 1253 48" anchor="top right"/>
  46. <CheckBox id="chk_clamflagcd" taborder="4" text="누락청구이동" truevalue="Y" class="checkbox_search" position="absolute 1003 56 1103 76" anchor="top right" onchanged="chk_clamflagcd_onchanged" onclick="chk_clamflagcd_onclick"/>
  47. <Combo id="cmb_toclamflagcd" taborder="5" class="combo_search" visible="false" position="absolute 1129 56 1256 76" anchor="top right" onitemchanged="cmb_toclamflagcd_onitemchanged" innerdataset="@ds_cond_clamflag" codecolumn="cdid" datacolumn="cdnm"/>
  48. <Button id="btn_save" taborder="6" text="이동" onlbuttonup="btn_save_onlbuttonup" class="btn4" position="absolute 1070 125 1126 145" anchor="top right" onclick="btn_save_onclick"/>
  49. <Button id="btn_init" taborder="7" text="초기화" onlbuttonup="btn_init_onlbuttonup" class="btn4" position="absolute 1129 125 1197 145" anchor="top right"/>
  50. <Button id="btn_cancel" taborder="8" text="종료" class="btn4" position="absolute 1200 125 1256 145" anchor="top right" onclick="btn_cancel_onclick"/>
  51. <Static id="cap_judgtrgtman" text="대상자조회" class="tit_2" position="absolute 0 127 91 147"/>
  52. <Button id="btn_cretdel" taborder="9" text="전체선택" onlbuttonup="btn_cretdel_onlbuttonup" class="btn2" position="absolute 91 124 155 144"/>
  53. <Grid id="grd_clbsmast" class="datagrid2" taborder="10" useinputpanel="false" position="absolute 0 147 1256 805" anchor="all" autofittype="none" binddataset="ds_grid_datagrid1" oncellclick="grd_clbsmast_oncellclick" cellsizingtype="col">
  54. <Formats>
  55. <Format id="default">
  56. <Columns>
  57. <Column size="35"/>
  58. <Column size="57"/>
  59. <Column size="40"/>
  60. <Column size="54"/>
  61. <Column size="61"/>
  62. <Column size="22"/>
  63. <Column size="49"/>
  64. <Column size="30"/>
  65. <Column size="30"/>
  66. <Column size="68"/>
  67. <Column size="68"/>
  68. <Column size="67"/>
  69. <Column size="60"/>
  70. <Column size="129"/>
  71. <Column size="71"/>
  72. <Column size="83"/>
  73. <Column size="56"/>
  74. <Column size="53"/>
  75. <Column size="59"/>
  76. <Column size="52"/>
  77. <Column size="44"/>
  78. <Column size="42"/>
  79. </Columns>
  80. <Rows>
  81. <Row size="35" band="head"/>
  82. <Row size="24" band="head"/>
  83. <Row size="24"/>
  84. </Rows>
  85. <Band id="head">
  86. <Cell rowspan="2" text="C" taborder="undefined"/>
  87. <Cell col="1" rowspan="2" text="청구년월" taborder="undefined"/>
  88. <Cell col="2" rowspan="2" text="차수" taborder="undefined"/>
  89. <Cell col="3" rowspan="2" text="청구구분" taborder="undefined"/>
  90. <Cell col="4" rowspan="2" colspan="2" text="등록번호" taborder="undefined"/>
  91. <Cell col="6" rowspan="2" text="환자명" taborder="undefined"/>
  92. <Cell col="7" rowspan="2" text="보험&#10;유형" taborder="undefined"/>
  93. <Cell col="8" rowspan="2" text="보조&#10;유형" taborder="undefined"/>
  94. <Cell col="9" rowspan="2" text="입원일자" taborder="undefined"/>
  95. <Cell col="10" rowspan="2" text="진료개시일" taborder="undefined"/>
  96. <Cell col="11" rowspan="2" text="진료종료일" taborder="undefined"/>
  97. <Cell col="12" rowspan="2" text="진료분야" taborder="undefined"/>
  98. <Cell col="13" rowspan="2" text="진료과" taborder="undefined"/>
  99. <Cell col="14" text="진료개시일" taborder="undefined"/>
  100. <Cell col="15" text="교부번호" taborder="undefined"/>
  101. <Cell col="16" rowspan="2" text="진료의" taborder="undefined"/>
  102. <Cell col="17" rowspan="2" text="심사자" taborder="undefined"/>
  103. <Cell col="18" rowspan="2" text="최종&#10;심사자" taborder="undefined"/>
  104. <Cell col="19" rowspan="2" text="심사&#13;&#10;상태" taborder="undefined"/>
  105. <Cell col="20" rowspan="2" text="청구&#13;&#10;상태" taborder="undefined"/>
  106. <Cell col="21" rowspan="2" text="잠금&#10;설정" taborder="undefined"/>
  107. <Cell row="1" col="14" colspan="2" text="불일치구분" taborder="undefined"/>
  108. </Band>
  109. <Band id="body">
  110. <Cell displaytype="checkbox" edittype="checkbox" text="bind:fromchk"/>
  111. <Cell col="1" displaytype="date" style="align:center middle;" text="bind:clamym" mask="yyyy-MM"/>
  112. <Cell col="2" displaytype="text" style="align:center middle;" text="bind:clamdg"/>
  113. <Cell col="3" displaytype="combo" style="align:center middle;" text="bind:clamflagcd" combodataset="ds_cond_clamflag" combocodecol="cdid" combodatacol="cdnm"/>
  114. <Cell col="4" style="align:center middle;" text="bind:pid"/>
  115. <Cell col="5" style="align:center middle;" text="bind:pidsn"/>
  116. <Cell col="6" style="align:center middle;" text="bind:patnm"/>
  117. <Cell col="7" style="align:center middle;" text="bind:insukind"/>
  118. <Cell col="8" style="align:center middle;" text="bind:suppkind"/>
  119. <Cell col="9" displaytype="date" style="align:center middle;" text="bind:indd" mask="yyyy-MM-dd"/>
  120. <Cell col="10" displaytype="date" style="align:center middle;" text="bind:ordfromdd" mask="yyyy-MM-dd"/>
  121. <Cell col="11" displaytype="date" style="align:center middle;" text="bind:ordtodd" mask="yyyy-MM-dd"/>
  122. <Cell col="12" displaytype="combo" style="align:center middle;" text="bind:ordfildcd" combodataset="ds_cond_ordfild" combocodecol="cdid" combodatacol="cdnm"/>
  123. <Cell col="13" displaytype="combo" style="align:left middle;" text="bind:orddeptcd" combodataset="ds_cond_deptinfolist" combocodecol="cd" combodatacol="nm"/>
  124. <Cell col="14" displaytype="combo" text="bind:clamdgchk" combodataset="ds_cond_clamflag" combocodecol="cdid" combodatacol="cdnm"/>
  125. <Cell col="15" displaytype="combo" text="bind:mpsnochk" combodataset="ds_cond_clamflag" combocodecol="cdid" combodatacol="cdnm"/>
  126. <Cell col="16" displaytype="combo" style="align:center middle;" text="bind:orddrid" combodataset="ds_cond_orddrid" combocodecol="cd" combodatacol="nm"/>
  127. <Cell col="17" displaytype="combo" style="align:center middle;" text="bind:judgrid" combodataset="ds_cond_judgerinfo" combocodecol="judgrid" combodatacol="judgrnm"/>
  128. <Cell col="18" displaytype="normal" style="align:center middle;" text="bind:lastupdtrnm"/>
  129. <Cell col="19" displaytype="combo" style="align:center middle;" text="bind:judgendyn" combodataset="ds_init_P0151" combocodecol="cdid" combodatacol="cdnm"/>
  130. <Cell col="20" displaytype="combo" style="align:center middle;" text="bind:clamendyn" combodataset="ds_init_P0430" combocodecol="cdid" combodatacol="cdnm"/>
  131. <Cell col="21" style="align:center middle;" text="bind:lockyn"/>
  132. <Cell col="22"/>
  133. </Band>
  134. </Format>
  135. </Formats>
  136. </Grid>
  137. <cp_monthCal id="cp_monthCal00" titletext="monthCalendar" taborder="11" text="cp_monthCal00" scrollbars="none" position="absolute 1087 28 1187 48" anchor="top right"/>
  138. </Layout>
  139. </Layouts>
  140. <Objects>
  141. <Dataset id="ds_cond_insurcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  142. <Dataset id="ds_grid_datagrid1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  143. <ColumnInfo>
  144. <column id="fromchk"/>
  145. <column id="tochk"/>
  146. <column id="clamym"/>
  147. <column id="clamdg"/>
  148. <column id="clamflagcd"/>
  149. <column id="pid"/>
  150. <column id="pidsn"/>
  151. <column id="patnm"/>
  152. <column id="gender"/>
  153. <column id="patage"/>
  154. <column id="insukind"/>
  155. <column id="suppkind"/>
  156. <column id="t_insukind"/>
  157. <column id="t_suppkind"/>
  158. <column id="indd"/>
  159. <column id="ordfromdd"/>
  160. <column id="ordtodd"/>
  161. <column id="ordfildcd"/>
  162. <column id="orddeptcd"/>
  163. <column id="orddrid"/>
  164. <column id="judgrid"/>
  165. <column id="judgrnm"/>
  166. <column id="lastupdtrid"/>
  167. <column id="judgendyn"/>
  168. <column id="clamendyn"/>
  169. <column id="lockyn"/>
  170. <column id="insuno"/>
  171. <column id="certno"/>
  172. <column id="insdnm"/>
  173. <column id="acddd"/>
  174. <column id="acdacptno"/>
  175. <column id="insucd"/>
  176. <column id="clamno"/>
  177. <column id="acptno"/>
  178. <column id="acptdd"/>
  179. <column id="docuseqno"/>
  180. <column id="adjtresncd"/>
  181. <column id="clamkey"/>
  182. <column id="workflag"/>
  183. <column id="clbtworkflag"/>
  184. <column id="rclamyn"/>
  185. <column id="clamtypecd"/>
  186. <column id="sumtypecd"/>
  187. <column id="ownbflag"/>
  188. <column id="rsvordgubn"/>
  189. <Column id="lastupdtrnm" type="STRING" size="256"/>
  190. </ColumnInfo>
  191. </Dataset>
  192. <Dataset id="ds_cond_clamdg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  193. <ColumnInfo>
  194. <column id="clamdgid"/>
  195. <column id="clamdgnm"/>
  196. </ColumnInfo>
  197. </Dataset>
  198. <Dataset id="ds_cond_clamflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  199. <Dataset id="ds_cond_iofalg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  200. <ColumnInfo>
  201. <Column id="value" type="STRING" size="256"/>
  202. <Column id="label" type="STRING" size="256"/>
  203. </ColumnInfo>
  204. <Rows>
  205. <Row>
  206. <Col id="value">I</Col>
  207. <Col id="label">입원</Col>
  208. </Row>
  209. <Row>
  210. <Col id="value">O</Col>
  211. <Col id="label">외래</Col>
  212. </Row>
  213. </Rows>
  214. </Dataset>
  215. <Dataset id="ds_grid_datagrid2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  216. <ColumnInfo>
  217. <column id="makeflag"/>
  218. <column id="copyflag"/>
  219. <column id="t_clamym"/>
  220. <column id="t_clamdg"/>
  221. <column id="t_clamflagcd"/>
  222. <column id="ioflag"/>
  223. <column id="fromchk"/>
  224. <column id="tochk"/>
  225. <column id="clamym"/>
  226. <column id="clamdg"/>
  227. <column id="pid"/>
  228. <column id="pidsn"/>
  229. <column id="workflag"/>
  230. <column id="clamkey"/>
  231. <column id="ordfromdd"/>
  232. <column id="insukind"/>
  233. <column id="suppkind"/>
  234. <column id="acptno"/>
  235. <column id="acptdd"/>
  236. <column id="docuseqno"/>
  237. <column id="adjtresncd"/>
  238. <column id="ms010"/>
  239. <column id="t_insukind"/>
  240. <column id="t_suppkind"/>
  241. <column id="insuno"/>
  242. <column id="certno"/>
  243. <column id="insdnm"/>
  244. <column id="acddd"/>
  245. <column id="acdacptno"/>
  246. <column id="insucd"/>
  247. <column id="chgresn"/>
  248. <column id="clamflag"/>
  249. </ColumnInfo>
  250. </Dataset>
  251. <Dataset id="ds_cond_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  252. <ColumnInfo>
  253. <Column id="cd" type="STRING" size="256"/>
  254. <Column id="nm" type="STRING" size="256"/>
  255. </ColumnInfo>
  256. </Dataset>
  257. <Dataset id="ds_cond_deptinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  258. <ColumnInfo>
  259. <Column id="cd" type="STRING" size="256"/>
  260. <Column id="nm" type="STRING" size="256"/>
  261. </ColumnInfo>
  262. </Dataset>
  263. <Dataset id="ds_cond_ordfild" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  264. <ExtCommon id="ExtCommon00"/>
  265. <Dataset id="ds_cond_judgerinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  266. <ColumnInfo>
  267. <Column id="judgrid" type="STRING" size="256"/>
  268. <Column id="judgrnm" type="STRING" size="256"/>
  269. </ColumnInfo>
  270. </Dataset>
  271. <Dataset id="ds_init_clamdept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  272. <ColumnInfo>
  273. <Column id="cdid" type="STRING" size="256"/>
  274. <Column id="cdnm" type="STRING" size="256"/>
  275. <Column id="cdval" type="STRING" size="256"/>
  276. <Column id="minval" type="STRING" size="256"/>
  277. </ColumnInfo>
  278. </Dataset>
  279. <Dataset id="ds_init_P0151" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  280. <ColumnInfo>
  281. <Column id="cdid" type="STRING" size="256"/>
  282. <Column id="cdnm" type="STRING" size="256"/>
  283. </ColumnInfo>
  284. </Dataset>
  285. <Dataset id="ds_init_P0430" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  286. <ColumnInfo>
  287. <Column id="cdid" type="STRING" size="256"/>
  288. <Column id="cdnm" type="STRING" size="256"/>
  289. </ColumnInfo>
  290. </Dataset>
  291. <Dataset id="ds_rslt_clamdg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  292. </Objects>
  293. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  294. * System Name :
  295. * Job Name :
  296. * Creator :
  297. * Make Date : 2015-05-01
  298. * Description :
  299. *---------------------------------------------------------------------------------------
  300. * Modify Date Modifier Modify Description
  301. *---------------------------------------------------------------------------------------
  302. * 2015-05-01 Live Converter TF->XP
  303. *
  304. *---------------------------------------------------------------------------------------
  305. ****************************************************************************************/
  306. include "com_commonxp::comm_main.xjs";
  307. /*popup 확인 */
  308. var makeflag = "";
  309. var copyflag = "";
  310. var ioflag = "";
  311. var clamym = "";
  312. var clamdg = "";
  313. var pid = "";
  314. var pidsn = "";
  315. var t_clamym = "";
  316. var t_clamdg = "";
  317. var t_clamflagcd = "";
  318. function workform_onload(obj:Form, e:LoadEventInfo)
  319. {
  320. frmf_initForm(obj);
  321. grdf_initGrid(grd_clbsmast);
  322. var curDate = utlf_getCurrentDate(); //getCurrentDate();
  323. var objParam = [ {cdGrpId: "P0151", dsNm: dsf_createDs("ds_init_P0151")} // 심사상태
  324. ,{cdGrpId: "P0430", dsNm: dsf_createDs("ds_init_P0430")} ];// 청구상태
  325. appf_getCodeList(objParam, false, false);
  326. appf_getCodeList([{cdGrpId:"P0008", dsNm:"ds_cond_insurcd"} ]);
  327. //접수구분 조회<>
  328. appf_getCodeList([{cdGrpId:"P0155", dsNm:"ds_cond_clamflag"} ]);
  329. frmf_addComboItem("group1.cmb_clamflag", " " , "");
  330. appf_getCodeList([{cdGrpId:"P0291", dsNm:"ds_cond_ordfild"} ]); //진료과
  331. group1.cmb_ordfildcd.value ="-";
  332. dsf_createDsRow("ds_cond_req",
  333. [{col:"deptcd", val:""}
  334. ,{col:"ordfildcd", val:""}
  335. ,{col:"reqfild", val:""}
  336. ,{col:"reqdeptno", val:""}]);
  337. // 진료과, 주치의, 심사자
  338. var sInDsName = dsf_createDsRow("ds_cond",[{col: "ioflag", val: ""}]);
  339. tranf_submit({id : "TRPID20201"
  340. , service: "aftjudgapp.InAftJudgTrgtMan"
  341. , method : "reqGetInitComCd"
  342. , inds : "req=ds_cond"
  343. , outds : "ds_cond_deptinfolist=orddeptcd2 ds_cond_orddrid=orddrid2 ds_cond_judgerinfo=judgrid ds_init_clamdept=clamdept"
  344. , async : false});
  345. group1.cmb_clamdeptcd.value ="-";
  346. group1.cmb_orddeptcd.value ="-";
  347. group1.cmb_clamflag.value ="-"; //접수구분 전체 세팅
  348. frmf_addComboItem("group1.cmb_orddrid", "전체" , "-");
  349. group1.cmb_orddrid.value ="-";
  350. group1.cmb_judg.value = "-"; //심사자 '전체'로 초기화
  351. // 팝업으로 호출되었으면... 타이틀 변경해준다.
  352. pid = opener.frmf_getParameter("pid");
  353. if (!utlf_isNull(pid)) {
  354. makeflag = opener.frmf_getParameter("makeflag");
  355. copyflag = opener.frmf_getParameter("copyflag");
  356. ioflag = opener.frmf_getParameter("ioflag");
  357. clamym = opener.frmf_getParameter("clamym");
  358. clamdg = opener.frmf_getParameter("clamdg");
  359. pid = opener.frmf_getParameter("pid");
  360. pidsn = opener.frmf_getParameter("pidsn");
  361. t_clamym = opener.frmf_getParameter("t_clamym");
  362. t_clamdg = opener.frmf_getParameter("t_clamdg");
  363. t_clamflagcd = opener.frmf_getParameter("t_clamflagcd");
  364. group1.cp_monthCal00.setData(clamym);
  365. cp_monthCal00.setData(t_clamym);
  366. fn_Cal00();
  367. ipt_toclamdg.value = t_clamdg;
  368. group1.cmb_clamdg.value = clamdg;
  369. group1.ipt_patunitsrch.value = pid;
  370. group1.cmb_ioflag.value = ioflag;
  371. }
  372. if(!utlf_isNull(pid)){
  373. fGetDocuList();
  374. }else{
  375. ipt_toclamdg.value =clamdg;
  376. cp_monthCal00.setData(clamym);
  377. }
  378. }
  379. function fn_Cal00(){
  380. var clamym = group1.cp_monthCal00.getData();
  381. var clamtoym = group1.cp_monthCal00.getData();
  382. var sInDsName = dsf_createDsRow("ds_search"
  383. , [{col: "clamym", val: clamym}
  384. , {col: "clamtoym", val: clamtoym}
  385. , {col: "ioflag", val: opener.frmf_getParameter("ioflag")}
  386. , {col: "insukind", val: ""}]);
  387. var oParam = {};
  388. oParam.id = "TRPID20407";
  389. oParam.service = "aftjudgapp.InAftJudgTrgtMan";
  390. oParam.method = "reqGetClamdg";
  391. oParam.inds = "req="+ sInDsName;
  392. oParam.outds = "ds_cond_clamdg=clamdg";
  393. oParam.async = false;
  394. oParam.callback = "cf_TRPID20407";
  395. tranf_submit(oParam);
  396. }
  397. function cf_TRPID20407(sSvcId, nErrorCode, sErrorMsg) {
  398. if(nErrorCode < 0) return;
  399. group1.cmb_clamdg.index = 0;
  400. ds_cond_clamdg.insertRow(0);
  401. ds_cond_clamdg.setColumn(0, "clamdgcd", "");
  402. ds_cond_clamdg.setColumn(0, "clamdgnm", "전체");
  403. }
  404. function btn_select_onlbuttonup(obj:Button, e:MouseEventInfo)
  405. {
  406. fGetDocuList();
  407. }
  408. function btn_init_onlbuttonup(obj:Button, e:MouseEventInfo)
  409. {
  410. ds_grid_datagrid1.clearData();
  411. group1.cmb_ordfildcd.value = "-";
  412. group1.cmb_clamflag.value = "-";
  413. group1.cmb_clamdeptcd.value = "-";
  414. group1.cmb_orddeptcd.value = "-";
  415. group1.cmb_orddrid.value = "-";
  416. group1.cmb_judg.value = "-"; //심사자 '전체'로 초기화
  417. cp_monthCal00.setData("");
  418. ipt_toclamdg.value = "";
  419. group1.cmb_clamdg.value = "";
  420. var curDate = utlf_getCurrentDate(); //getCurrentDate();
  421. group1.cp_monthCal00.setData(curDate);
  422. group1.cp_monthCal00.setCallEvent("fn_Cal00"); //캘린더 fn_Cal 함수Load
  423. group1.ipt_clamno.value ="";
  424. group1.ipt_patunitsrch.value ="";
  425. group1.ipt_docuseqno1.value ="";
  426. group1.ipt_docuseqno2.value ="";
  427. }
  428. function btn_save_onlbuttonup(obj:Button, e:MouseEventInfo)
  429. {
  430. fSetDocuMake();
  431. }
  432. function btn_cretdel_onlbuttonup(obj:Button, e:MouseEventInfo)
  433. {
  434. for(var i=0;i<ds_grid_datagrid1.getRowCount();i++){
  435. var lockyn = ds_grid_datagrid1.getColumn(i,"lockyn");
  436. if(lockyn =="N"){
  437. ds_grid_datagrid1.setColumn(i,"fromchk","1");
  438. }
  439. }
  440. }
  441. function fGetDocuList() {
  442. var ordfildcd = group1.cmb_ordfildcd.value;
  443. var clamdeptcd = group1.cmb_clamdeptcd.value;
  444. var orddeptcd = group1.cmb_orddeptcd.value;
  445. var orddrid = group1.cmb_orddrid.value;
  446. var judgrid = group1.cmb_judg.value;
  447. var clamno = group1.ipt_clamno.value;
  448. var acptno = "";
  449. var docuseqno1 = group1.ipt_docuseqno1.value;
  450. var docuseqno2 = group1.ipt_docuseqno2.value;
  451. if(ordfildcd =="-"){
  452. ordfildcd="";
  453. }
  454. if(clamdeptcd =="-"){
  455. clamdeptcd="";
  456. }
  457. if(orddeptcd =="-"){
  458. orddeptcd="";
  459. }
  460. if(orddrid =="-"){
  461. orddrid="";
  462. }
  463. if(judgrid =="-"){
  464. judgrid="";
  465. }
  466. if (utlf_isNull(group1.ipt_patunitsrch.value)) {
  467. if (utlf_isNull(ordfildcd) && utlf_isNull(clamdeptcd) && utlf_isNull(orddeptcd) && utlf_isNull(orddrid) && utlf_isNull(judgrid)) {
  468. sysf_messageBox("진료분야, 청구과, 진료과, 주치의, 심사자중 하나이상은", "I003"); //I003=필수입력입니다.
  469. return;
  470. }
  471. }
  472. var sInDsName = dsf_createDsRow("ds_cond"
  473. , [{col: "makeflag" , val: makeflag}//작업선택
  474. , {col: "copyflag" , val: copyflag} //"생성조건"}//
  475. , {col: "clamym" , val: group1.cp_monthCal00.getData()} //"청구년월"}//
  476. , {col: "clamdg" , val: group1.cmb_clamdg.value} //"청구차수"}//
  477. , {col: "clamflagcd" , val: group1.cmb_clamflag.value} //"청구구분"}//
  478. , {col: "ioflag" , val: group1.cmb_ioflag.value} //"내원구분"}//
  479. , {col: "pid" , val: group1.ipt_patunitsrch.value} //등록번호
  480. , {col: "pidsn" , val: ""} //등록번호순번
  481. , {col: "insukind" , val: ""}//보험유형
  482. , {col: "suppkind" , val: ""} //보조유형
  483. , {col: "ordfildcd" , val: ordfildcd} //진료분야
  484. , {col: "clamdeptcd" , val: clamdeptcd} //청구과
  485. , {col: "orddeptcd" , val: orddeptcd} //진료과
  486. , {col: "orddrid" , val: orddrid} //주치의
  487. , {col: "judgrid" , val: judgrid} //심사자
  488. , {col: "judgendyn" , val: ""} //심사상태
  489. , {col: "clamno" , val: group1.ipt_clamno.value} //청구번호
  490. , {col: "acptno" , val:""} //접수번호
  491. , {col: "docuseqno1" , val: docuseqno1} //명번호1
  492. , {col: "docuseqno2" , val: docuseqno2}
  493. , {col: "clamdgchk" , val: group1.checkbox1.value}
  494. , {col: "mpsnochk" , val: group1.checkbox2.value}]); //명번호2
  495. tranf_submit({
  496. id: "TRPID20601"
  497. , service: "aftjudgapp.DocuManage"
  498. , method: "reqGetDocuMngList"
  499. , inds: "req=" + sInDsName
  500. , outds: "ds_grid_datagrid1=clbs"
  501. , callback: "cbf_TRPID20601" });
  502. }
  503. function cbf_TRPID20601(){
  504. if(ds_grid_datagrid1.getRowCount()>0){
  505. ds_grid_datagrid1.addColumn("fromchk","string");
  506. if(ds_grid_datagrid1.getRowCount() ==1){
  507. ds_grid_datagrid1.setColumn(0,"fromchk","1");
  508. //ds_grid_datagrid1.setColumn(0,"clamflagcd",group1.cmb_clamflag.value);
  509. }
  510. group1.cp_monthCal00.setData(ds_grid_datagrid1.getColumn(0,"clamym"));
  511. cp_monthCal00.setData(ds_grid_datagrid1.getColumn(0,"clamym"));
  512. ipt_toclamdg.value = ds_grid_datagrid1.getColumn(0,"clamdg");
  513. }
  514. ds_grid_datagrid1.rowposition = -1;
  515. for (i=0; i < ds_grid_datagrid1.rowcount; i++ ) {
  516. if (ds_grid_datagrid1.getColumn(i,"clamsameyn") == "Y" ){
  517. } else {
  518. ds_grid_datagrid1.setColumn(i,"clamdgchk","");
  519. }
  520. if (ds_grid_datagrid1.getColumn(i,"mpsnosameyn") == "Y" ) {
  521. } else {
  522. ds_grid_datagrid1.setColumn(i,"mpsnochk","");
  523. }
  524. }
  525. }
  526. function btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  527. {
  528. this.close();
  529. }
  530. // ----------------------------------------------------------------------
  531. // ▶ 명세서관리 자료생성
  532. // ----------------------------------------------------------------------
  533. function fSetDocuMake() {
  534. // 자료생성전 체크
  535. var rslt = fValidcheck();
  536. if (rslt != false) {
  537. var fromchk="";
  538. var iCnt=0;
  539. ds_grid_datagrid2.clearData();
  540. for (var i = 0; i < ds_grid_datagrid1.getRowCount(); i++) {
  541. fromchk = ds_grid_datagrid1.getColumn(i,"fromchk");
  542. if (fromchk == "1") {
  543. var nRow = ds_grid_datagrid2.addRow();
  544. ds_grid_datagrid2.copyRow(nRow,ds_grid_datagrid1,i);
  545. ds_grid_datagrid2.setColumn(nRow,"makeflag",makeflag);
  546. ds_grid_datagrid2.setColumn(nRow,"copyflag",copyflag);
  547. ds_grid_datagrid2.setColumn(nRow,"t_clamym",cp_monthCal00.getData());
  548. ds_grid_datagrid2.setColumn(nRow,"t_clamdg",ipt_toclamdg.value);
  549. // 1. 누락청구이동인 경우
  550. if (chk_clamflagcd.value == "Y") {
  551. ds_grid_datagrid2.setColumn(nRow,"t_clamflagcd","4"); // 4:누락청구
  552. } else {
  553. var t_clamdg = ipt_toclamdg.value;
  554. var clamflagcd = ds_grid_datagrid1.getColumn(i,"clamflagcd");
  555. // 2. 누락청구에서 원청구로 이동하는 경우
  556. if (t_clamdg > "0" && t_clamdg < "999" && clamflagcd == "4") {
  557. ds_grid_datagrid2.setColumn(nRow,"t_clamflagcd","0"); //
  558. }
  559. // 3. 청구구분 변경없이 이동하는 경우
  560. else {
  561. ds_grid_datagrid2.setColumn(iCnt,"t_clamflagcd", ds_grid_datagrid1.getColumn(i,"clamflagcd"));
  562. }
  563. }
  564. iCnt++;
  565. }
  566. }
  567. if(iCnt >0){
  568. tranf_submit ( {
  569. id: "TXPID20601"
  570. , service: "aftjudgapp.DocuManage"
  571. , method: "reqExeDocuManage"
  572. , inds: "clbs=ds_grid_datagrid2"
  573. // , outds: "ds_cont_datagrid=temp"
  574. , callback: "cbf_TXPID20601"
  575. //, async: true
  576. } );
  577. }else{
  578. sysf_messageBox("이동할 명세서가", "I004"); // I004=없습니다.
  579. }
  580. }
  581. }
  582. function cbf_TXPID20601(){
  583. clamym = cp_monthCal00.getData();
  584. clamdg = ipt_toclamdg.value;
  585. group1.cp_monthCal00.getData(clamym);
  586. group1.cmb_clamdg.value = clamdg;
  587. fGetDocuList();
  588. }
  589. // ----------------------------------------------------------------------
  590. // ▶ 자료생성전 체크
  591. // ----------------------------------------------------------------------
  592. function fValidcheck() {
  593. var clamym = group1.cp_monthCal00.getData();
  594. var clamdg = group1.cmb_clamdg.value;
  595. var t_clamym = cp_monthCal00.getData();
  596. var t_clamdg = ipt_toclamdg.value;
  597. if (utlf_isNull(t_clamym)) {
  598. sysf_messageBox("생성 청구년월이", "I004"); //I004: 없습니다.
  599. return false;
  600. }
  601. else if (utlf_isNull(t_clamdg)) {
  602. sysf_messageBox("생성 청구차수가", "I004"); //I004: 없습니다.
  603. return false;
  604. }
  605. else {
  606. if ( clamym + clamdg == t_clamym + t_clamdg ) {
  607. sysf_messageBox(" 생성 청구년월 또는 청구차수가 변경되지", "E007"); //E007=않았습니다.
  608. ipt_toclamdg.setFocus();
  609. return false;
  610. }
  611. }
  612. return true;
  613. }
  614. function btn_save_onclick(obj:Button, e:ClickEventInfo)
  615. {
  616. }
  617. function cmb_toclamflagcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  618. {
  619. if (obj.value == "Y") {
  620. cmb_toclamflagcd.value = '4';
  621. fGetMaxClamdg()
  622. } else {
  623. }
  624. obj.updateToDataset();
  625. }
  626. function fGetMaxClamdg() {
  627. var row = ds_grid_datagrid1.rowposition;
  628. var sInDsName = dsf_createDsRow("ds_cond_item1"
  629. , [{col: "clamflag" , val: cmb_toclamflagcd.value}//작업선택
  630. , {col: "ordfildcd" , val: ds_grid_datagrid1.getColumn(row, "ordfildcd")} //"생성조건"}//
  631. , {col: "clamtypecd" , val:ds_grid_datagrid1.getColumn(row, "clamtypecd")} //접수번호
  632. , {col: "sumtypecd" , val: ds_grid_datagrid1.getColumn(row, "sumtypecd")}]); //명번호2
  633. var oParam = {};
  634. oParam.id = "TRPID20602";
  635. oParam.service = "aftjudgapp.DocuManage";
  636. oParam.method = "reqGetPidmclamMaxClamdg";
  637. oParam.inds = "req=ds_cond_item1";
  638. oParam.outds = "ds_rslt_clamdg=clbs";
  639. oParam.async = false;
  640. tranf_submit(oParam);
  641. ipt_toclamdg.value = ds_rslt_clamdg.getColumn(0,"maxclamdg");
  642. }
  643. function chk_clamflagcd_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  644. {
  645. if (obj.value == "Y") {
  646. cmb_toclamflagcd.value = '4';
  647. fGetMaxClamdg()
  648. } else {
  649. }
  650. obj.updateToDataset();
  651. }
  652. ]]></Script>
  653. </Form>
  654. </FDL>