SMPID22400_명세서복사.xfdl 35 KB

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