SMPID22600_명세서추가청구생성.xfdl 38 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPID22600" position="absolute 0 0 1256 805" titletext="명세서추가청구생성" onload="SMPID22600_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div id="grp_tle" position="absolute 0 0 170 23" anchor="default" positiontype="position">
  8. <Layouts>
  9. <Layout>
  10. <Static id="cap_title" class="tit_1" position="absolute 0 3 163 23" anchor="default" text="명세서추가청구생성" positiontype="position"/>
  11. </Layout>
  12. </Layouts>
  13. </Div>
  14. <Div id="grp_biz" position="absolute 0 25 1256 805" anchor="all" positiontype="position" scrollbars="autoboth">
  15. <Layouts>
  16. <Layout>
  17. <Static id="Static00" position="absolute 1032 10 1256 36" class="sta_DA_box" anchor="top right"/>
  18. <Grid id="grd_clbsmast" class="datagrid2" position="absolute 0 97 1256 780" anchor="all" positiontype="position" binddataset="DS_GRID_grd_clbsmast" onheadclick="grp_biz_grd_clbsmast_onheadclick" cellsizingtype="both" oncellclick="grp_biz_grd_clbsmast_oncellclick">
  19. <Formats>
  20. <Format id="default">
  21. <Columns>
  22. <Column size="21"/>
  23. <Column size="35"/>
  24. <Column size="0"/>
  25. <Column size="40"/>
  26. <Column size="61"/>
  27. <Column size="41"/>
  28. <Column size="56"/>
  29. <Column size="67"/>
  30. <Column size="0"/>
  31. <Column size="30"/>
  32. <Column size="53"/>
  33. <Column size="30"/>
  34. <Column size="30"/>
  35. <Column size="71"/>
  36. <Column size="60"/>
  37. <Column size="70"/>
  38. <Column size="60"/>
  39. <Column size="85"/>
  40. <Column size="80"/>
  41. <Column size="58"/>
  42. <Column size="73"/>
  43. <Column size="67"/>
  44. <Column size="67"/>
  45. <Column size="78"/>
  46. <Column size="60"/>
  47. <Column size="72"/>
  48. <Column size="72"/>
  49. <Column size="38"/>
  50. <Column size="0"/>
  51. <Column size="0"/>
  52. <Column size="0"/>
  53. </Columns>
  54. <Rows>
  55. <Row size="35" band="head"/>
  56. <Row size="24"/>
  57. </Rows>
  58. <Band id="head">
  59. <Cell/>
  60. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:fromchk" expr="0"/>
  61. <Cell col="2" text="TO"/>
  62. <Cell col="3" text="추가&#10;청구"/>
  63. <Cell col="4" text="청구년월"/>
  64. <Cell col="5" text="차수"/>
  65. <Cell col="6" text="청구구분"/>
  66. <Cell col="7" colspan="3" text="등록번호"/>
  67. <Cell col="10" text="환자명"/>
  68. <Cell col="11" text="보험&#10;유형"/>
  69. <Cell col="12" text="보조&#10;유형"/>
  70. <Cell col="13" text="진료개시일"/>
  71. <Cell col="14" text="진료분야"/>
  72. <Cell col="15" text="진료과"/>
  73. <Cell col="16" text="주치의"/>
  74. <Cell col="17" text="사업장기호"/>
  75. <Cell col="18" text="증번호"/>
  76. <Cell col="19" text="피보험자"/>
  77. <Cell col="20" text="사고일자"/>
  78. <Cell col="21" text="접수번호"/>
  79. <Cell col="22" text="보험회사"/>
  80. <Cell col="23" text="청구번호"/>
  81. <Cell col="24" text="접수번호"/>
  82. <Cell col="25" text="접수일자"/>
  83. <Cell col="26" text="명세서번호"/>
  84. <Cell col="27" text="사유&#10;코드"/>
  85. <Cell col="28" text="clamkey"/>
  86. <Cell col="29" text="workflag"/>
  87. <Cell col="30" text="clbtworkflag"/>
  88. </Band>
  89. <Band id="body">
  90. <Cell celltype="head" expr="expr:currow+1"/>
  91. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:fromchk"/>
  92. <Cell col="2" displaytype="checkbox" edittype="checkbox" text="bind:tochk"/>
  93. <Cell col="3" style="align:center middle;" text="bind:rclamyn" expr="expr:rclamyn == null | rclamyn == ''? 'N':'Y'"/>
  94. <Cell col="4" displaytype="date" style="align:center middle;" text="bind:clamym" mask="yyyy-MM"/>
  95. <Cell col="5" style="align:center middle;" text="bind:clamdg"/>
  96. <Cell col="6" displaytype="combo" edittype="combo" style="align:left middle;" text="bind:clamflagcd" combodataset="ds_init_clamflagcd" combocodecol="cdid" combodatacol="cdnm"/>
  97. <Cell col="7" style="align:center middle;" text="bind:pid"/>
  98. <Cell col="8" style="align:center middle;" text="bind:pidsn"/>
  99. <Cell col="9" text="bind:pidsn"/>
  100. <Cell col="10" style="align:center middle;" text="bind:patnm"/>
  101. <Cell col="11" displaytype="normal" edittype="none" style="align:center middle;" text="bind:insukind"/>
  102. <Cell col="12" displaytype="normal" edittype="none" style="align:center middle;" text="bind:suppkind"/>
  103. <Cell col="13" displaytype="date" style="align:center middle;" text="bind:ordfromdd" calendardisplaynulltype="none"/>
  104. <Cell col="14" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:ordfildcd" combodataset="ds_init_ordfildcd" combocodecol="cdid" combodatacol="cdnm"/>
  105. <Cell col="15" displaytype="combo" edittype="combo" style="align:left middle;" text="bind:orddeptcd" combodataset="ds_init_orddeptcd" combocodecol="cd" combodatacol="nm"/>
  106. <Cell col="16" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:orddrid" combodataset="ds_init_orddrid" combocodecol="cd" combodatacol="nm"/>
  107. <Cell col="17" style="align:center middle;" text="bind:insuno"/>
  108. <Cell col="18" style="align:center middle;" text="bind:certno"/>
  109. <Cell col="19" style="align:center middle;" text="bind:insdnm"/>
  110. <Cell col="20" style="align:center middle;" text="bind:acddd"/>
  111. <Cell col="21" style="align:left middle;" text="bind:acdacptno"/>
  112. <Cell col="22" style="align:left middle;" text="bind:insucmpycd"/>
  113. <Cell col="23" style="align:center middle;" text="bind:clamno"/>
  114. <Cell col="24" style="align:center middle;" text="bind:acptno"/>
  115. <Cell col="25" displaytype="date" style="align:center middle;" text="bind:acptdd" calendardisplaynulltype="none"/>
  116. <Cell col="26" style="align:center middle;" text="bind:docuseqno"/>
  117. <Cell col="27" style="align:center middle;" text="bind:adjtresncd"/>
  118. <Cell col="28" text="bind:clamkey"/>
  119. <Cell col="29" text="bind:workflag"/>
  120. <Cell col="30" text="bind:clbtworkflag"/>
  121. <Cell col="31"/>
  122. </Band>
  123. </Format>
  124. </Formats>
  125. </Grid>
  126. <Static id="cap_judgtrgtman" class="tit_2" position="absolute 0 77 86 97" anchor="default" text="대상자조회" positiontype="position"/>
  127. <Div id="group1" position="absolute 0 0 1024 67" style="align:center top;" class="div_SA" positiontype="position" anchor="left top right" align="align:center top;">
  128. <Layouts>
  129. <Layout>
  130. <cp_patientInfo id="cp_patientInfo00" titletext="New Form" taborder="35" text="cp_patientInfo00" position="absolute 235 35 599 59" style="background:transparent; " tooltiptext="환자성명으로 검색시 2자 이상 입력하세요."/>
  131. <Static id="caption30" class="search_name" position="absolute 8 10 82 30" anchor="default" text="청구년월" positiontype="position"/>
  132. <Static id="caption32" class="search_name" position="absolute 8 35 82 55" anchor="default" text="청구구분" positiontype="position"/>
  133. <Combo id="cmb_docuflagcd" class="combo_search" taborder="9" position="absolute 82 35 211 55" anchor="default" positiontype="position" innerdataset="@ds_init_clamflagcd" codecolumn="cdid" datacolumn="cdnm"/>
  134. <Static id="caption36" class="search_name" position="absolute 646 10 720 30" anchor="default" text="접수번호" positiontype="position"/>
  135. <Edit id="ipt_acptno" class="input_search" taborder="18" position="absolute 720 10 817 30" anchor="default" positiontype="position" imemode="hangul" maxlength="8"/>
  136. <Static id="caption37" class="search_name" position="absolute 646 35 707 55" anchor="default" text="명번호" positiontype="position"/>
  137. <Edit id="ipt_docuseqno1" class="input_search" taborder="19" position="absolute 720 35 762 55" anchor="default" positiontype="position" imemode="hangul" maxlength="5" tooltiptext="시작번호" onkeydown="grp_biz_group1_ipt_docuseqno1_onkeydown"/>
  138. <Edit id="ipt_docuseqno2" class="input_search" taborder="20" position="absolute 778 35 817 55" anchor="default" positiontype="position" imemode="hangul" maxlength="5" tooltiptext="끝번호" onkeydown="grp_biz_group1_ipt_docuseqno2_onkeydown"/>
  139. <Static id="caption45" position="absolute 764 35 776 55" anchor="default" text="~" style="align:center;" positiontype="position"/>
  140. <Combo id="cmb_clamdg" position="absolute 160 10 211 30" anchor="default" positiontype="position" innerdataset="@ds_init_clamdg" codecolumn="clamdgcd" datacolumn="clamdgnm"/>
  141. <Static id="caption1" class="search_name" position="absolute 235 10 309 30" anchor="default" text="내원형태" positiontype="position"/>
  142. <Combo id="cmb_ioflag" class="combo_search" taborder="3" position="absolute 306 10 404 30" anchor="default" positiontype="position" codecolumn="value" datacolumn="label" innerdataset="@ds_init_ioflag" onitemchanged="grp_biz_group1_cmb_ioflag_onitemchanged"/>
  143. <Static id="caption2" class="search_name" position="absolute 451 10 525 30" anchor="default" text="청구번호" positiontype="position"/>
  144. <Edit id="input1" class="input_search" taborder="18" position="absolute 525 10 622 30" anchor="default" positiontype="position" imemode="hangul" maxlength="8"/>
  145. <Static id="caption3" class="search_name" position="absolute 451 35 525 55" anchor="default" text="작업구분" positiontype="position"/>
  146. <Combo id="cmb_workflag" class="combo_search" taborder="8" position="absolute 525 35 622 55" anchor="default" positiontype="position" codecolumn="value" datacolumn="label" innerdataset="@ds_init_makeflag"/>
  147. <cp_monthCal id="cp_monthCal00" titletext="monthCalendar" taborder="33" text="cp_monthCal00" scrollbars="none" position="absolute 82 10 157 30" anchor="default" class="input_essential"/>
  148. <Button id="btn_select" class="btn1" taborder="32" position="absolute 956 10 1012 30" text="조회" anchor="top right" positiontype="position" onclick="grp_biz_group1_btn_select_onclick"/>
  149. </Layout>
  150. </Layouts>
  151. </Div>
  152. <Static id="caption4" class="cell_1" position="absolute 1033 11 1113 35" style="align:center middle;" anchor="top right" text="생성차수" positiontype="position" align="align:center middle;"/>
  153. <Button id="btn_cancel" class="btn4" position="absolute 1200 74 1256 94" anchor="top right" text="종료" positiontype="position" onclick="grp_biz_btn_cancel_onclick"/>
  154. <Button id="btn_init" class="btn4" position="absolute 1126 74 1195 94" anchor="top right" text="초기화" positiontype="position" onclick="grp_biz_btn_init_onclick"/>
  155. <Button id="btn_save" class="btn4" position="absolute 1064 74 1122 94" anchor="top right" text="생성" positiontype="position" onclick="grp_biz_btn_save_onclick"/>
  156. <CheckBox id="chk_MS010" class="checkbox_search" taborder="22" visible="true" position="absolute 1037 45 1253 65" anchor="top right" text="민원에 의한 추가청구 MS010 생성" truevalue="Y" falsevalue="N" positiontype="position" value="N"/>
  157. <cp_monthCal id="cp_monthCal00" titletext="monthCalendar" taborder="23" text="cp_monthCal00" scrollbars="none" position="absolute 1114 13 1189 33" anchor="top right"/>
  158. <Edit id="ipt_toclamdg" taborder="24" position="absolute 1192 13 1255 33" class="input_essential" onkeydown="grp_biz_ipt_toclamdg_onkeydown"/>
  159. </Layout>
  160. </Layouts>
  161. </Div>
  162. </Layout>
  163. </Layouts>
  164. <Objects>
  165. <Dataset id="DS_GRID_grd_clbsmast" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  166. <ColumnInfo>
  167. <Column id="fromchk" type="STRING"/>
  168. <Column id="tochk" type="STRING"/>
  169. <Column id="rclamyn" type="STRING"/>
  170. <Column id="clamym" type="STRING"/>
  171. <Column id="clamdg" type="STRING"/>
  172. <Column id="clamflagcd" type="STRING"/>
  173. <Column id="pid" type="STRING"/>
  174. <Column id="pidsn" type="STRING"/>
  175. <Column id="patnm" type="STRING"/>
  176. <Column id="insukind" type="STRING"/>
  177. <Column id="suppkind" type="STRING"/>
  178. <Column id="ordfromdd" type="STRING"/>
  179. <Column id="ordfildcd" type="STRING"/>
  180. <Column id="orddeptcd" type="STRING"/>
  181. <Column id="orddrid" type="STRING"/>
  182. <Column id="insuno" type="STRING"/>
  183. <Column id="certno" type="STRING"/>
  184. <Column id="insdnm" type="STRING"/>
  185. <Column id="acddd" type="STRING"/>
  186. <Column id="acdacptno" type="STRING"/>
  187. <Column id="insucmpycd" type="STRING"/>
  188. <Column id="clamno" type="STRING"/>
  189. <Column id="acptno" type="STRING"/>
  190. <Column id="acptdd" type="STRING"/>
  191. <Column id="docuseqno" type="STRING"/>
  192. <Column id="adjtresncd" type="STRING"/>
  193. <Column id="clamkey" type="STRING"/>
  194. <Column id="workflag" type="STRING"/>
  195. <Column id="clbtworkflag" type="STRING"/>
  196. </ColumnInfo>
  197. </Dataset>
  198. <Dataset id="ds_init_insukind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  199. <Dataset id="ds_init_suppkind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  200. <Dataset id="ds_init_ordfildcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  201. <ColumnInfo>
  202. <Column id="cdnm" type="STRING" size="256"/>
  203. <Column id="cdid" type="STRING" size="256"/>
  204. </ColumnInfo>
  205. </Dataset>
  206. <Dataset id="ds_init_clamflagcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  207. <ColumnInfo>
  208. <Column id="cdnm" type="STRING" size="256"/>
  209. <Column id="cdid" type="STRING" size="256"/>
  210. </ColumnInfo>
  211. </Dataset>
  212. <Dataset id="ds_init_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  213. <ColumnInfo>
  214. <Column id="label" type="STRING" size="256"/>
  215. <Column id="value" type="STRING" size="256"/>
  216. </ColumnInfo>
  217. <Rows>
  218. <Row>
  219. <Col id="label">전체</Col>
  220. <Col id="value">-</Col>
  221. </Row>
  222. <Row>
  223. <Col id="label">입원</Col>
  224. <Col id="value">I</Col>
  225. </Row>
  226. <Row>
  227. <Col id="label">외래</Col>
  228. <Col id="value">O</Col>
  229. </Row>
  230. </Rows>
  231. </Dataset>
  232. <Dataset id="ds_init_makeflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  233. <ColumnInfo>
  234. <Column id="label" type="STRING" size="256"/>
  235. <Column id="value" type="STRING" size="256"/>
  236. </ColumnInfo>
  237. <Rows>
  238. <Row>
  239. <Col id="label">전체</Col>
  240. <Col id="value">-</Col>
  241. </Row>
  242. <Row>
  243. <Col id="label">추가청구</Col>
  244. <Col id="value">4</Col>
  245. </Row>
  246. <Row>
  247. <Col id="label">약제상한차액 추가청구</Col>
  248. <Col id="value">6</Col>
  249. </Row>
  250. </Rows>
  251. </Dataset>
  252. <Dataset id="ds_init_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  253. <ColumnInfo>
  254. <Column id="cd" type="STRING" size="256"/>
  255. <Column id="nm" type="STRING" size="256"/>
  256. </ColumnInfo>
  257. </Dataset>
  258. <Dataset id="ds_init_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  259. <ColumnInfo>
  260. <Column id="cd" type="STRING" size="256"/>
  261. <Column id="nm" type="STRING" size="256"/>
  262. </ColumnInfo>
  263. </Dataset>
  264. <Dataset id="ds_maxclamdg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  265. <ColumnInfo>
  266. <Column id="maxclamdg" type="STRING" size="256"/>
  267. </ColumnInfo>
  268. <Rows>
  269. <Row/>
  270. </Rows>
  271. </Dataset>
  272. <Dataset id="ds_send_clbs" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  273. <ColumnInfo>
  274. <Column id="fromchk" type="STRING" size="0"/>
  275. <Column id="tochk" type="STRING" size="0"/>
  276. <Column id="rclamyn" type="STRING" size="0"/>
  277. <Column id="clamym" type="STRING" size="0"/>
  278. <Column id="clamdg" type="STRING" size="0"/>
  279. <Column id="clamflagcd" type="STRING" size="0"/>
  280. <Column id="pid" type="STRING" size="0"/>
  281. <Column id="pidsn" type="STRING" size="0"/>
  282. <Column id="patnm" type="STRING" size="0"/>
  283. <Column id="insukind" type="STRING" size="0"/>
  284. <Column id="suppkind" type="STRING" size="0"/>
  285. <Column id="ordfromdd" type="STRING" size="0"/>
  286. <Column id="ordfildcd" type="STRING" size="0"/>
  287. <Column id="orddeptcd" type="STRING" size="0"/>
  288. <Column id="orddrid" type="STRING" size="0"/>
  289. <Column id="insuno" type="STRING" size="0"/>
  290. <Column id="certno" type="STRING" size="0"/>
  291. <Column id="insdnm" type="STRING" size="0"/>
  292. <Column id="acddd" type="STRING" size="0"/>
  293. <Column id="acdacptno" type="STRING" size="0"/>
  294. <Column id="insucmpycd" type="STRING" size="0"/>
  295. <Column id="clamno" type="STRING" size="0"/>
  296. <Column id="acptno" type="STRING" size="0"/>
  297. <Column id="acptdd" type="STRING" size="0"/>
  298. <Column id="docuseqno" type="STRING" size="0"/>
  299. <Column id="adjtresncd" type="STRING" size="0"/>
  300. <Column id="clamkey" type="STRING" size="0"/>
  301. <Column id="workflag" type="STRING" size="0"/>
  302. <Column id="clbtworkflag" type="STRING" size="0"/>
  303. <Column id="makeflag" type="STRING" size="256"/>
  304. <Column id="t_clamdg" type="STRING" size="256"/>
  305. <Column id="t_clamflagcd" type="STRING" size="256"/>
  306. <Column id="ioflag" type="STRING" size="256"/>
  307. <Column id="ms010" type="STRING" size="256"/>
  308. <Column id="t_clamym" type="STRING" size="256"/>
  309. </ColumnInfo>
  310. </Dataset>
  311. <Dataset id="ds_init_clamdg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  312. <ColumnInfo>
  313. <Column id="clamdgnm" type="STRING" size="256"/>
  314. <Column id="clamdgcd" type="STRING" size="256"/>
  315. </ColumnInfo>
  316. <Rows>
  317. <Row/>
  318. </Rows>
  319. </Dataset>
  320. </Objects>
  321. <Bind>
  322. <BindItem id="item0" compid="grp_biz.ipt_toclamdg" propid="value" datasetid="ds_maxclamdg" columnid="maxclamdg"/>
  323. </Bind>
  324. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  325. * System Name :
  326. * Job Name :
  327. * Creator :
  328. * Make Date : 2015-05-01
  329. * Description :
  330. *---------------------------------------------------------------------------------------
  331. * Modify Date Modifier Modify Description
  332. *---------------------------------------------------------------------------------------
  333. * 2015-05-01 Live Converter TF->XP
  334. *
  335. *---------------------------------------------------------------------------------------
  336. ****************************************************************************************/
  337. include "com_commonxp::comm_main.xjs";
  338. function lf_initDataSet(){
  339. // cmb_docuflagcd의 INIT Dataset
  340. this.cmb_docuflagcd.innerdataset = "DS_INIT_cmb_docuflagcd";
  341. this.cmb_docuflagcd.codecolumn = "cdid";
  342. this.cmb_docuflagcd.datacolumn = "cdnm";
  343. // cmb_clamdg의 INIT Dataset
  344. this.cmb_clamdg.innerdataset = "DS_INIT_cmb_clamdg";
  345. this.cmb_clamdg.codecolumn = "clamdgcd";
  346. this.cmb_clamdg.datacolumn = "clamdgnm";
  347. }
  348. var g_from_cnt = 0;
  349. var g_to_cnt = 0;
  350. // 화면초기화
  351. function fInitialize()
  352. {
  353. // 보험유형, 보조유형, 진료분야, 청구구분 리스트
  354. appf_getCodeListSubmit([{cdGrpId: "P0008", dsNm: "ds_init_insukind", sortField: "cdnm", sortMehotd: "desc"}
  355. ,{cdGrpId: "P0010", dsNm: "ds_init_suppkind", sortField: "cdnm", sortMehotd: "desc"}
  356. ,{cdGrpId: "P0291", dsNm: "ds_init_ordfildcd", sortField: "cdnm", sortMehotd: "desc"}
  357. ,{cdGrpId: "P0155", dsNm: "ds_init_clamflagcd", sortField: "cdnm", sortMehotd: "desc"}], true, false, "");
  358. // 진료과 주치의 초기화
  359. var sInDsName = dsf_createDsRow("ds_cond",[{col: "ioflag", val: grp_biz.group1.cmb_ioflag.value}]);
  360. tranf_submit({
  361. id: "TRPID20309"
  362. , service: "aftjudgapp.InAftJudgTrgtMan"
  363. , method: "reqGetDeptCDDrID"
  364. , inds : "req=ds_cond"
  365. , outds: "ds_init_orddeptcd=orddeptcd ds_init_orddrid=orddrid"
  366. , async: false
  367. });
  368. // 청구월 셋팅
  369. var objDate = new Date();
  370. var lastMonth = objDate.addMonth(-1);
  371. lastMonth = objDate.toFormatString("%Y%m");
  372. grp_biz.group1.cp_monthCal00.setData(lastMonth);
  373. // COMBO 전체 세팅
  374. // 1. 내원구분
  375. grp_biz.group1.cmb_ioflag.index = 0;
  376. // 2. 청구구분
  377. frmf_addComboItem("grp_biz.group1.cmb_docuflagcd", "전체", "-");
  378. grp_biz.group1.cmb_docuflagcd.index = 0;
  379. // 3. 작업구분
  380. grp_biz.group1.cmb_workflag.index = 0;
  381. }
  382. // 명세서관리 대상조회
  383. function fGetDocuList()
  384. {
  385. var Month = grp_biz.group1.cp_monthCal00.cal_Month.value;
  386. var sclamym = Month.toFormatString("%Y%m");
  387. var sInDsName = dsf_createDsRow("ds_cond"
  388. ,[{col: "makeflag", val: grp_biz.group1.cmb_workflag.value}
  389. //, {col: "copyflag", val: }
  390. , {col: "clamym", val: sclamym}
  391. , {col: "clamdg", val: grp_biz.group1.cmb_clamdg.value}
  392. , {col: "clamflagcd", val: grp_biz.group1.cmb_docuflagcd.value}
  393. , {col: "ioflag", val: grp_biz.group1.cmb_ioflag.value}
  394. , {col: "pid", val: grp_biz.group1.cp_patientInfo00.edt_pid.value}
  395. , {col: "pidsn", val: pidsn }
  396. //, {col: "insukind", val: }
  397. //, {col: "suppkind", val: }
  398. //, {col: "ordfildcd", val: }
  399. //, {col: "clamdeptcd", val: }
  400. //, {col: "orddeptcd", val: }
  401. //, {col: "orddrid", val: }
  402. //, {col: "judgrid", val: }
  403. //, {col: "judgendyn", val: }
  404. , {col: "clamno", val: grp_biz.group1.input1.value}
  405. , {col: "acptno", val: grp_biz.group1.ipt_acptno.value}
  406. , {col: "docuseqno1", val: grp_biz.group1.ipt_docuseqno1.value}
  407. , {col: "docuseqno2", val: grp_biz.group1.ipt_docuseqno2.value}]);
  408. tranf_submit({
  409. id: "TRPID20601"
  410. , service: "aftjudgapp.DocuManage"
  411. , method: "reqGetDocuMngList"
  412. , inds : "req=ds_cond"
  413. , outds: "DS_GRID_grd_clbsmast=clbs"
  414. , async: false
  415. });
  416. DS_GRID_grd_clbsmast.addColumn("fromchk", "string");
  417. if( DS_GRID_grd_clbsmast.rowcount == 1 )
  418. {
  419. DS_GRID_grd_clbsmast.setColumn(0, "fromchk", "1");
  420. g_from_cnt = 1;
  421. // 추가청구일경우 최종청구차수 가져온다.
  422. fGetMaxClamdg();
  423. }
  424. }
  425. // 명세서관리 자료생성
  426. function fSetDocuMake()
  427. {
  428. // 자료생성전 체크
  429. var rslt = fValidcheck();
  430. if (rslt != false)
  431. {
  432. ds_send_clbs.clearData();
  433. var makeflag = grp_biz.group1.cmb_workflag.value;
  434. var Month = grp_biz.cp_monthCal00.cal_Month.value;
  435. var t_clamym = Month.toFormatString("%Y%m");
  436. var fromchk = "";
  437. var iCnt = 0;
  438. DS_GRID_grd_clbsmast.filter("fromchk == '1'");
  439. ds_send_clbs.copyData(DS_GRID_grd_clbsmast, true);
  440. for (var i = 0; i < ds_send_clbs.rowcount; i++)
  441. {
  442. ds_send_clbs.addColumn("makeflag", "string");
  443. ds_send_clbs.addColumn("ioflag", "string");
  444. ds_send_clbs.addColumn("t_clamym", "string");
  445. ds_send_clbs.addColumn("t_clamdg", "string");
  446. ds_send_clbs.addColumn("t_clamflagcd", "string");
  447. ds_send_clbs.addColumn("ms010", "string");
  448. ds_send_clbs.setColumn(iCnt, "makeflag", makeflag);
  449. ds_send_clbs.setColumn(iCnt, "ioflag", grp_biz.group1.cmb_ioflag.value);
  450. ds_send_clbs.setColumn(iCnt, "t_clamym", t_clamym);
  451. ds_send_clbs.setColumn(iCnt, "t_clamdg", grp_biz.ipt_toclamdg.value);
  452. ds_send_clbs.setColumn(iCnt, "t_clamflagcd", t_clamflagcd);
  453. ds_send_clbs.setColumn(iCnt, "ms010", grp_biz.chk_MS010.value);
  454. iCnt++;
  455. }
  456. // 자료생성
  457. tranf_submit({
  458. id: "TXPID20601"
  459. , service: "aftjudgapp.DocuManage"
  460. , method: "reqExeDocuManage"
  461. , inds : "clbs=ds_send_clbs"
  462. , async: true
  463. , callback: "cbf_TXPID20601"
  464. });
  465. }
  466. }
  467. // 자료생성전 체크
  468. function fValidcheck()
  469. {
  470. var makeflag = grp_biz.group1.cmb_workflag.value;
  471. // 생성할 명세서 선택되었는지 체크
  472. DS_GRID_grd_clbsmast.filter("fromchk == '1'");
  473. var chk_cnt = DS_GRID_grd_clbsmast.rowcount;
  474. if (chk_cnt == 0) {
  475. sysf_messageBox("자료생성할 명세서가", "I004"); //I004: 없습니다.
  476. return false;
  477. }
  478. var clamym = grp_biz.group1.cp_monthCal00.cal_Month.value;
  479. var clamdg = grp_biz.group1.cmb_clamdg.value;
  480. var t_clamym = grp_biz.cp_monthCal00.cal_Month.value;
  481. var t_clamdg = grp_biz.ipt_toclamdg.value;
  482. if (t_clamym == null) {
  483. sysf_messageBox("생성 청구년월이", "I004"); //I004: 없습니다.
  484. return false;
  485. }
  486. else if (t_clamdg == null) {
  487. sysf_messageBox("생성 청구차수가", "I004"); //I004: 없습니다.
  488. return false;
  489. }
  490. else {
  491. if ( clamym + clamdg == t_clamym + t_clamdg )
  492. {
  493. sysf_messageBox(" 생성 청구년월 또는 청구차수가 변경되지", "E007"); //E007=않았습니다.
  494. grp_biz.ipt_toclamdg.setFocus();
  495. return false;
  496. }
  497. }
  498. }
  499. function fGetSrchPid()
  500. {
  501. var ipt_pid = grp_biz.group1.cp_patientInfo00.edt_pid.value;
  502. var objArg = new Object();
  503. if (ipt_pid.charCodeAt(0) > 255) {
  504. objArg.srchcond = "1"; // 검색조건 : 등록번호로 설정
  505. objArg.pid = "ipt_pid";
  506. }else{
  507. objArg.srchcond = "2"; // 검색조건 : 환자명으로 설정
  508. objArg.hngnm = "ipt_pid";
  509. }
  510. frmf_modal("SPPMC02500", "SPPMC02500", objArg); // SPPMC02500_환자조회.xrw
  511. var objPopup = frmf_getChildWindow("SPPMC02500");
  512. var srch_pid = objPopup.frmf_getParameter("pid");
  513. if (srch_pid)
  514. {
  515. grp_biz.group1.cp_patientInfo00.edt_pid.value = srch_pid;
  516. }
  517. }
  518. // 추가청구시 추가청구 max차수 조회
  519. function fGetMaxClamdg(chkcnt)
  520. {
  521. var clamflag = "2";
  522. var ordfildcd ;
  523. var clamtypecd ;
  524. var sumtypecd ;
  525. if ( chkcnt == "1" )
  526. {
  527. ordfildcd = DS_GRID_grd_clbsmast.getColumn(0, "ordfildcd");
  528. clamtypecd = DS_GRID_grd_clbsmast.getColumn(0, "clamtypecd");
  529. sumtypecd = DS_GRID_grd_clbsmast.getColumn(0, "sumtypecd");
  530. } else {
  531. var row = DS_GRID_grd_clbsmast.rowposition;
  532. ordfildcd = DS_GRID_grd_clbsmast.getColumn(row, "ordfildcd");
  533. clamtypecd = DS_GRID_grd_clbsmast.getColumn(row, "clamtypecd");
  534. sumtypecd = DS_GRID_grd_clbsmast.getColumn(row, "sumtypecd");
  535. }
  536. var sInDsName = dsf_createDsRow("ds_cond"
  537. ,[{col: "t_clamym", val: grp_biz.cp_monthCal00.getData()}
  538. , {col: "clamflag", val: clamflag}
  539. , {col: "ioflag", val: grp_biz.group1.cmb_ioflag.value}
  540. , {col: "ordfildcd", val: ordfildcd}
  541. , {col: "clamtypecd", val: clamtypecd}
  542. , {col: "sumtypecd", val: sumtypecd}]);
  543. tranf_submit({
  544. id: "TRPID20602"
  545. , service: "aftjudgapp.DocuManage"
  546. , method: "reqGetPidmclamMaxClamdg"
  547. , inds : "req=ds_cond"
  548. , outds: "ds_maxclamdg=clbs"
  549. , async: false
  550. , callback: "cbf_TRPID20602"
  551. });
  552. }
  553. var t_clamflagcd;
  554. var copyflag;
  555. var pidsn;
  556. // 조회 callback 함수
  557. function cbf_TRPID20602(strSvcID, nErrorCode, strErrorMsg)
  558. {
  559. //에러 처리
  560. if(nErrorCode == 0){
  561. grp_biz.ipt_toclamdg.value = ds_maxclamdg.getColumn(0, "maxclamdg");
  562. }else{
  563. }
  564. }
  565. // 조회 callback 함수
  566. function cbf_TXPID20601(strSvcID, nErrorCode, strErrorMsg)
  567. {
  568. //에러 처리
  569. if(nErrorCode == 0)
  570. {
  571. // var makeflag = grp_biz.group1.cmb_workflag.value;
  572. //
  573. // // 2:복사, 3:이동, 4:추가청구이면 변경된 명세서를 조회한다.
  574. // if (makeflag == "2" || makeflag =="3" || makeflag == "4")
  575. // {
  576. // grp_biz.group1.cp_monthCal00.cal_Month.value = grp_biz.cp_monthCal00.cal_Month.value;
  577. // grp_biz.group1.cmb_clamdg.value = grp_biz.ipt_toclamdg.value;
  578. //
  579. // var clamym = grp_biz.group1.cp_monthCal00.cal_Month.value;
  580. // var t_clamym = grp_biz.cp_monthCal00.cal_Month.value;
  581. // var clamdg = grp_biz.ipt_toclamdg.value;
  582. //
  583. // if (clamym == t_clamym)
  584. // {
  585. // frmf_addComboItem("grp_biz.group1.cmb_clamdg", clamdg, clamdg, "above");
  586. // } else {
  587. // frmf_addComboItem("grp_biz.group1.cmb_clamdg", clamdg, clamdg, "init");
  588. // }
  589. // grp_biz.group1.cmb_clamdg.index = 0;
  590. // grp_biz.group1.cmb_docuflagcd.index = 0; // 2.추가청구
  591. // grp_biz.group1.cmb_workflag.index = 0;
  592. // }
  593. DS_GRID_grd_clbsmast.clearData();
  594. //grp_biz_group1_btn_select_onclick();
  595. // 자료생성 후 바로 조회...
  596. var e = new ClickEventInfo; //이벤트 선언
  597. var varRet = grp_biz.group1.btn_select.onclick.fireEvent(grp_biz.group1.btn_select, e); //이벤트 매핑
  598. }else{
  599. sysf_messageBox("명세서 추가 생성을 ", "E001"); //E001=할 수 없습니다..
  600. }
  601. }
  602. function grp_biz_group1_btn_select_onclick(obj:Button, e:ClickEventInfo)
  603. {
  604. fGetDocuList();
  605. }
  606. function grp_biz_btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  607. {
  608. this.close();
  609. }
  610. function grp_biz_btn_save_onclick(obj:Button, e:ClickEventInfo)
  611. {
  612. fSetDocuMake();
  613. }
  614. function grp_biz_btn_init_onclick(obj:Button, e:ClickEventInfo)
  615. {
  616. DS_GRID_grd_clbsmast.clearData();
  617. // 청구월 셋팅
  618. var objDate = new Date();
  619. var lastMonth = objDate.addMonth(-1);
  620. lastMonth = objDate.toFormatString("%Y%m");
  621. grp_biz.group1.cp_monthCal00.cal_Month.value = lastMonth;
  622. // COMBO 전체 세팅
  623. // 1. 내원형태
  624. grp_biz.group1.cmb_ioflag.index = 0;
  625. // 2. 청구구분
  626. grp_biz.group1.cmb_docuflagcd.index = 0;
  627. // 3. 작업구분
  628. grp_biz.group1.cmb_workflag.index = 0;
  629. grp_biz.group1.input1.value = "";
  630. grp_biz.group1.ipt_acptno.value = "";
  631. grp_biz.group1.ipt_docuseqno1.value = "";
  632. grp_biz.group1.ipt_docuseqno2.value = "";
  633. grp_biz.group1.cmb_clamdg.value = "";
  634. grp_biz.group1.cp_patientInfo00.edt_pid.value = "";
  635. grp_biz.ipt_toclamdg.value = "";
  636. }
  637. function grp_biz_grd_clbsmast_onheadclick(obj:Grid, e:GridClickEventInfo)
  638. {
  639. if (e.cell == 1)
  640. {
  641. fn_setGridCheckAll(grp_biz.grd_clbsmast, e);
  642. }
  643. }
  644. var fv_isGridCheckAll = 0;
  645. function fn_setGridCheckAll(obj:Grid, e:GridClickEventInfo)
  646. {
  647. var objDs = eval(obj.binddataset);
  648. var sCol = obj.getCellProperty("body", e.cell, "text").replace("bind:", "");
  649. if (fv_isGridCheckAll)
  650. {
  651. fv_isGridCheckAll = 0;
  652. }
  653. else
  654. {
  655. fv_isGridCheckAll = 1;
  656. }
  657. objDs.enableevent = false;
  658. for (var i = 0; i < objDs.getRowCount(); i++)
  659. {
  660. objDs.setColumn(i, sCol, fv_isGridCheckAll);
  661. }
  662. obj.setCellProperty("Head", 1, "expr", fv_isGridCheckAll);
  663. objDs.enableevent = true;
  664. }
  665. function fn_Cal()
  666. {
  667. var Month = grp_biz.group1.cp_monthCal00.cal_Month.value;
  668. var clamym = Month.toFormatString("%Y%m");
  669. var sInDsName = dsf_createDsRow("ds_cond", [{col: "clamym", val: clamym}
  670. , {col: "ioflag", val: grp_biz.group1.cmb_ioflag.value}]);
  671. tranf_submit({
  672. id: "TRPID20407"
  673. , service: "aftjudgapp.InAftJudgTrgtMan"
  674. , method: "reqGetClamdg"
  675. , inds : "req=ds_cond"
  676. , outds: "ds_init_clamdg=clamdg"
  677. , async: false
  678. });
  679. grp_biz.group1.cmb_clamdg.index = 0;
  680. }
  681. function fn_Cal1()
  682. {
  683. if ( grp_biz.group1.cp_patientInfo00.edt_pid.value == null )
  684. {
  685. var ordfildcd = "";
  686. fGetMaxClamdg();
  687. }
  688. }
  689. function grp_biz_grd_clbsmast_oncellclick(obj:Grid, e:GridClickEventInfo)
  690. {
  691. var icol = e.col;
  692. var irow = e.row;
  693. var ifromcnt=0;
  694. var fromchkyn;
  695. // 명세서선택 총갯수 셋팅
  696. if (icol == 1)
  697. {
  698. fromchkyn = DS_GRID_grd_clbsmast.getColumn(irow, "fromchk");
  699. rclamyn = DS_GRID_grd_clbsmast.getColumn(irow, "rclamyn");
  700. if (fromchkyn == "1")
  701. {
  702. if (rclamyn == "Y")
  703. {
  704. DS_GRID_grd_clbsmast.setColumn(irow, "fromchk", "0");
  705. sysf_messageBox("이미 추가청구 생성되어 선택할 수", "I004"); //없습니다 !
  706. } else {
  707. fGetMaxClamdg("2");
  708. }
  709. }
  710. }
  711. }
  712. function grp_biz_group1_ipt_docuseqno1_onkeydown(obj:Edit, e:KeyEventInfo)
  713. {
  714. if ( e.keycode == 13 )
  715. {
  716. var docuseqno1 = grp_biz.group1.ipt_docuseqno1.value;
  717. var rtn = "";
  718. if(utlf_isNull(docuseqno1))
  719. {
  720. return rtn;
  721. }
  722. var forCnt = 5 - grp_biz.group1.ipt_docuseqno1.getLength();
  723. for( var i = 0; i < forCnt; i++ )
  724. {
  725. rtn+="0";
  726. }
  727. rtn+=docuseqno1;
  728. grp_biz.group1.ipt_docuseqno1.value = rtn;
  729. grp_biz.group1.ipt_docuseqno2.value = rtn;
  730. grp_biz.group1.ipt_docuseqno2.setFocus();
  731. }
  732. }
  733. function grp_biz_group1_ipt_docuseqno2_onkeydown(obj:Edit, e:KeyEventInfo)
  734. {
  735. if ( e.keycode == 13 )
  736. {
  737. var docuseqno2 = grp_biz.group1.ipt_docuseqno2.value;
  738. var rtn = "";
  739. if(utlf_isNull(docuseqno2))
  740. {
  741. return rtn;
  742. }
  743. var forCnt = 5 - grp_biz.group1.ipt_docuseqno2.getLength();
  744. for( var i = 0; i < forCnt; i++ )
  745. {
  746. rtn+="0";
  747. }
  748. rtn+=docuseqno2;
  749. grp_biz.group1.ipt_docuseqno2.value = rtn;
  750. }
  751. }
  752. function grp_biz_group1_cmb_ioflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  753. {
  754. // 청구년월에 대한 청구차수 조회
  755. pidfGetClamdg();
  756. }
  757. function grp_biz_ipt_toclamdg_onkeydown(obj:Edit, e:KeyEventInfo)
  758. {
  759. if ( e.keycode == 13 )
  760. {
  761. var clamdg = grp_biz.ipt_toclamdg.value;
  762. if (clamdg < "2001" || clamdg > "2999")
  763. {
  764. sysf_messageBox("추가청구 차수범위를 벗어났습니다. 2001~2999 사이의 차수를", "C001"); //C001=입력하십시오 !
  765. fGetMaxClamdg();
  766. }
  767. }
  768. }
  769. function SMPID22600_onload(obj:Form, e:LoadEventInfo)
  770. {
  771. frmf_initForm(obj);
  772. // 등록번호 component
  773. grp_biz.group1.cp_patientInfo00.lf_setDataSearchPatInfo("","0");
  774. grp_biz.group1.cp_patientInfo00.att_setControlWidth("98","0");
  775. grp_biz.group1.cp_patientInfo00.att_setVisible("3|4|",false);
  776. // 월달력 이벤트 호출
  777. grp_biz.group1.cp_monthCal00.setCallEvent("fn_Cal");
  778. // 생성차수 이벤트 호출
  779. grp_biz.cp_monthCal00.setCallEvent("fn_Cal1");
  780. // 화면을 초기화한다.
  781. fInitialize();
  782. if ( frmf_checkOpener() )
  783. {
  784. if ( sMakeflag != null )
  785. {
  786. grp_biz.group1.cmb_workflag.value = sMakeflag ; //작업구분
  787. //copyflag = sCopyflag ;
  788. grp_biz.group1.cmb_ioflag.value = sIoflag; // 내원형태
  789. grp_biz.group1.cp_monthCal00.cal_Month.value = sClamym; // 청구년월
  790. grp_biz.group1.cp_patientInfo00.edt_pid.value = sPid; // 등록번호
  791. pidsn = sPidsn;
  792. grp_biz.group1.cmb_docuflagcd.value = sClamflagcd; // 청구구분
  793. grp_biz.cp_monthCal00.cal_Month.value = sT_clamym; // 생성차수
  794. grp_biz.ipt_toclamdg.value = sT_clamdg; // 생성차수
  795. t_clamflagcd = sT_clamflagcd; //청구구분
  796. // 청구차수
  797. frmf_addComboItem("grp_biz.group1.cmb_clamdg", sClamdg, sClamdg);
  798. grp_biz.group1.cmb_clamdg.value = sClamdg;
  799. if ( sPid != null )
  800. {
  801. fGetDocuList();
  802. }
  803. }
  804. }
  805. }
  806. ]]></Script>
  807. </Form>
  808. </FDL>