SMPIS01300_청구생성오류점검.xfdl 42 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPIS01300" position="absolute 0 0 1205 743" titletext="청구생성오류점검" oninit="SMPIS01300_oninit" onload="SMPIS01300_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 1 23 1191 731" id="group2" anchor="all">
  8. <Layouts>
  9. <Layout>
  10. <Static text="환자 리스트" position="absolute 0 117 100 138" id="caption8" class="tit_2" anchor="default"/>
  11. <Button position="absolute 1110 114 1190 133" id="btn_excelsave" class="btn7" text="엑셀저장" anchor="top right" onclick="group2_btn_excelsave_onclick"/>
  12. <Grid position="absolute 0 134 1190 704" id="grd_outjudg" class="datagrid2" binddataset="ds_main_grdlist_calcorderlist" anchor="all" cellsizingtype="col">
  13. <Formats>
  14. <Format id="default">
  15. <Columns>
  16. <Column size="22"/>
  17. <Column size="62"/>
  18. <Column size="49"/>
  19. <Column size="35"/>
  20. <Column size="80"/>
  21. <Column size="83"/>
  22. <Column size="42"/>
  23. <Column size="20"/>
  24. <Column size="23"/>
  25. <Column size="45"/>
  26. <Column size="55"/>
  27. <Column size="66"/>
  28. <Column size="72"/>
  29. <Column size="66"/>
  30. <Column size="205"/>
  31. <Column size="70"/>
  32. <Column size="40"/>
  33. <Column size="40"/>
  34. <Column size="40"/>
  35. <Column size="40"/>
  36. <Column size="83"/>
  37. <Column size="28"/>
  38. <Column size="75"/>
  39. <Column size="75"/>
  40. <Column size="83"/>
  41. <Column size="31"/>
  42. <Column size="47"/>
  43. <Column size="61"/>
  44. <Column size="76"/>
  45. <Column size="100"/>
  46. <Column size="100"/>
  47. <Column size="100"/>
  48. <Column size="100"/>
  49. </Columns>
  50. <Rows>
  51. <Row size="28" band="head"/>
  52. <Row size="24"/>
  53. </Rows>
  54. <Band id="head">
  55. <Cell/>
  56. <Cell col="1" text="등록번호"/>
  57. <Cell col="2" text="성명"/>
  58. <Cell col="3" text="내원&#13;&#10;유형"/>
  59. <Cell col="4" text="처방일자"/>
  60. <Cell col="5" text="실시일자"/>
  61. <Cell col="6" text="시행&#10;여부"/>
  62. <Cell col="7" text="유&#13;&#10;형"/>
  63. <Cell col="8" text="보&#13;&#10;조"/>
  64. <Cell col="9" text="진료과"/>
  65. <Cell col="10" text="진료의"/>
  66. <Cell col="11" text="주상병"/>
  67. <Cell col="12" text="처방코드"/>
  68. <Cell col="13" text="EDI코드"/>
  69. <Cell col="14" text="한글명"/>
  70. <Cell col="15" text="단가"/>
  71. <Cell col="16" text="수량"/>
  72. <Cell col="17" text="횟수"/>
  73. <Cell col="18" text="일수"/>
  74. <Cell col="19" text="총투"/>
  75. <Cell col="20" text="금액"/>
  76. <Cell col="21" text="급비"/>
  77. <Cell col="22" text="입원일자"/>
  78. <Cell col="23" text="유형시작일"/>
  79. <Cell col="24" text="종료일"/>
  80. <Cell col="25" text="원외"/>
  81. <Cell col="26" text="심사자"/>
  82. <Cell col="27" text="접수번호"/>
  83. <Cell col="28" text="생성일자"/>
  84. <Cell col="29" text="청구유무"/>
  85. <Cell col="30" text="실시자"/>
  86. <Cell col="31" text="시행부서"/>
  87. <Cell col="32" text="보험요율"/>
  88. </Band>
  89. <Band id="body">
  90. <Cell celltype="head" expr="currow+1"/>
  91. <Cell col="1" text="bind:pid"/>
  92. <Cell col="2" text="bind:hngnm"/>
  93. <Cell col="3" text="bind:ioflag"/>
  94. <Cell col="4" displaytype="date" text="bind:prcpdd" mask="yyyy-MM-dd"/>
  95. <Cell col="5" displaytype="date" text="bind:execdd" mask="yyyy-MM-dd"/>
  96. <Cell col="6" text="bind:yn"/>
  97. <Cell col="7" text="bind:insukind"/>
  98. <Cell col="8" text="bind:suppkind"/>
  99. <Cell col="9" text="bind:orddeptcd"/>
  100. <Cell col="10" text="bind:orddrnm"/>
  101. <Cell col="11" text="bind:diag"/>
  102. <Cell col="12" text="bind:snglcalcscorcd"/>
  103. <Cell col="13" text="bind:edicd"/>
  104. <Cell col="14" style="align:left middle;" text="bind:calchngnm"/>
  105. <Cell col="15" displaytype="number" text="bind:appunitcost"/>
  106. <Cell col="16" displaytype="number" text="bind:calcqty"/>
  107. <Cell col="17" displaytype="number" text="bind:calctims"/>
  108. <Cell col="18" text="bind:calcdays"/>
  109. <Cell col="19" displaytype="number" text="bind:totqty"/>
  110. <Cell col="20" displaytype="number" text="bind:calcamt"/>
  111. <Cell col="21" displaytype="combo" edittype="combo" text="bind:calcscorpayflag" combodataset="ds_cmb_calcscorpayflag" combocodecol="value" combodatacol="label" enable="false"/>
  112. <Cell col="22" displaytype="expr:utlf_isNull(indd) ? 'normal' : 'date' " text="bind:indd" mask="expr:utlf_isNull(indd) ? '' : 'yyyy-MM-dd'"/>
  113. <Cell col="23" displaytype="expr:utlf_isNull(fromdd) ? 'normal' : 'date'" text="bind:fromdd" mask="expr:utlf_isNull(fromdd) ? '' : 'yyyy-MM-dd'"/>
  114. <Cell col="24" displaytype="expr:utlf_isNull(todd) ? 'normal' : 'date'" text="bind:todd" mask="expr:utlf_isNull(todd) ? '' : 'yyyy-MM-dd'"/>
  115. <Cell col="25" text="bind:oprcp"/>
  116. <Cell col="26" text="bind:judgrid"/>
  117. <Cell col="27" text="bind:acptno"/>
  118. <Cell col="28" displaytype="expr:utlf_isNull(cretfromdd) ? 'normal' : 'date'" text="bind:cretfromdd" mask="expr:utlf_isNull(cretfromdd) ? '' : 'yyyy-MM-dd'"/>
  119. <Cell col="29" text="bind:clamkey"/>
  120. <Cell col="30" text="bind:execrnm"/>
  121. <Cell col="31" text="bind:execdeptnm"/>
  122. <Cell col="32" text="bind:brateflagnm"/>
  123. </Band>
  124. </Format>
  125. </Formats>
  126. </Grid>
  127. <Button position="absolute 1021 114 1107 133" id="btn_batch" class="btn2" text="배치결과확인" anchor="top right" onclick="group2_btn_batch_onclick"/>
  128. <Div id="group3" taborder="1" position="absolute 0 1 1190 111" class="div_SA" anchor="left top right">
  129. <Layouts>
  130. <Layout>
  131. <Static id="caption2" text="진료과" class="search_name" position="absolute 8 31 73 48" anchor="default"/>
  132. <Combo id="base_date" taborder="4" innerdataset="@ds_init_tmp_orddeptcd_orddeptcdlist" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 91 30 191 49" anchor="default" onitemchanged="group2_group3_base_date_onitemchanged"/>
  133. <Shape id="line1" linetype="vertical" class="line_4" position="absolute 1087 7 1093 99" anchor="top right"/>
  134. <Button id="btn_search" taborder="5" text="조회" class="btn1" position="absolute 1113 40 1169 62" anchor="top right" onclick="group2_group3_btn_search_onclick"/>
  135. <Static id="caption26" text="진료의" class="search_name" position="absolute 212 31 282 48" anchor="default"/>
  136. <Combo id="cmb_orddrid" taborder="6" innerdataset="@ds_init_tmp_orddrid_orddridlist" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 268 29 368 48" anchor="default"/>
  137. <Static id="caption3" text="내원유형" class="search_name" position="absolute 403 7 479 24" anchor="default"/>
  138. <Radio id="rdo_ioflag" taborder="7" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 502 5 637 25" anchor="default" onitemchanged="group2_group3_rdo_ioflag_onitemchanged">
  139. <Dataset id="innerdataset">
  140. <ColumnInfo>
  141. <Column id="codecolumn"/>
  142. <Column id="datacolumn"/>
  143. </ColumnInfo>
  144. <Rows>
  145. <Row>
  146. <Col id="codecolumn">A</Col>
  147. <Col id="datacolumn">전체</Col>
  148. </Row>
  149. <Row>
  150. <Col id="codecolumn">I</Col>
  151. <Col id="datacolumn">입원</Col>
  152. </Row>
  153. <Row>
  154. <Col id="codecolumn">O</Col>
  155. <Col id="datacolumn">외래</Col>
  156. </Row>
  157. </Rows>
  158. </Dataset>
  159. </Radio>
  160. <Calendar id="ipt_fromdd" taborder="8" class="input_search" position="absolute 91 5 191 24" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
  161. <Calendar id="ipt_todd" taborder="9" class="input_search" position="absolute 211 5 311 24" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
  162. <Static id="caption4" text="~" position="absolute 196 5 211 25" anchor="default"/>
  163. <Edit id="ipt_code" taborder="10" class="input_search" position="absolute 502 55 620 74" anchor="default" ontextchanged="group2_group3_ipt_code_ontextchanged"/>
  164. <Edit id="ipt_patunitsrch" taborder="11" class="input_search" position="absolute 735 5 823 24" anchor="default" onkeydown="group2_group3_ipt_patunitsrch_onkeydown"/>
  165. <Static id="caption5" text="환자조회" class="search_name" position="absolute 652 7 728 24" anchor="default"/>
  166. <Static id="caption7" text="처방일자" class="search_name" position="absolute 8 7 84 24" anchor="default"/>
  167. <Combo id="combo1" taborder="12" innerdataset="@ds_init_U0001list" codecolumn="cdid" datacolumn="cdnm" position="absolute 938 5 1042 24" anchor="default"/>
  168. <Static id="caption9" text="심사자" class="search_name" position="absolute 856 7 929 24" anchor="default"/>
  169. <Static id="caption10" text="검색조건" class="search_name" position="absolute 8 56 84 73" anchor="default"/>
  170. <Radio id="rdo_searchcond" taborder="13" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 90 55 257 75" anchor="default" onitemchanged="group2_group3_rdo_searchcond_onitemchanged">
  171. <Dataset id="innerdataset">
  172. <ColumnInfo>
  173. <Column id="codecolumn"/>
  174. <Column id="datacolumn"/>
  175. </ColumnInfo>
  176. <Rows>
  177. <Row>
  178. <Col id="codecolumn">calc</Col>
  179. <Col id="datacolumn">코드별</Col>
  180. </Row>
  181. <Row>
  182. <Col id="codecolumn">cancer</Col>
  183. <Col id="datacolumn">항암제</Col>
  184. </Row>
  185. <Row>
  186. <Col id="codecolumn">kind</Col>
  187. <Col id="datacolumn">분류별</Col>
  188. </Row>
  189. </Rows>
  190. </Dataset>
  191. </Radio>
  192. <Radio id="rdo_cancer" taborder="14" columncount="-1" rowcount="-1" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" enable="false" position="absolute 263 55 383 75" anchor="default">
  193. <Dataset id="innerdataset">
  194. <ColumnInfo>
  195. <Column id="codecolumn"/>
  196. <Column id="datacolumn"/>
  197. </ColumnInfo>
  198. <Rows>
  199. <Row>
  200. <Col id="codecolumn">A</Col>
  201. <Col id="datacolumn">전체</Col>
  202. </Row>
  203. <Row>
  204. <Col id="codecolumn">1</Col>
  205. <Col id="datacolumn">1군</Col>
  206. </Row>
  207. <Row>
  208. <Col id="codecolumn">2</Col>
  209. <Col id="datacolumn">2군</Col>
  210. </Row>
  211. </Rows>
  212. </Dataset>
  213. </Radio>
  214. <Combo id="cmb_large" taborder="15" innerdataset="@FilteredDataset01" codecolumn="earncls1" datacolumn="earncls1nm" enable="false" position="absolute 502 29 636 48" anchor="default" onitemchanged="group2_group3_cmb_large_onitemchanged"/>
  215. <Combo id="cmb_middle" taborder="16" enable="false" position="absolute 735 29 839 48" anchor="default" onitemchanged="group2_group3_cmb_middle_onitemchanged"/>
  216. <Combo id="cmb_small" taborder="17" enable="false" position="absolute 938 30 1042 49" anchor="default"/>
  217. <Static id="cp_large" text="처방대분류" class="search_name" position="absolute 403 30 492 47" anchor="default"/>
  218. <Static id="cp_code" text="수가코드" class="search_name" position="absolute 403 55 479 72" anchor="default"/>
  219. <Static id="cp_middle" text="중분류" class="search_name" position="absolute 652 30 716 47" anchor="default"/>
  220. <Static id="cp_small" text="소분류" class="search_name" position="absolute 856 30 921 47" anchor="default"/>
  221. <Static id="cp_edicd" text="EDI코드" class="search_name" position="absolute 652 55 728 72" anchor="default"/>
  222. <Edit id="ipt_edicd" taborder="18" class="input_search" position="absolute 735 55 823 74" anchor="default" ontextchanged="group2_group3_ipt_edicd_ontextchanged"/>
  223. <Static id="caption6" text="실시일자" class="search_name" position="absolute 8 80 84 97" anchor="default"/>
  224. <Calendar id="ipt_exefromdd" taborder="19" class="input_search" position="absolute 91 80 191 99" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd " value="null"/>
  225. <Static id="caption11" text="~" position="absolute 196 80 211 100" anchor="default"/>
  226. <Calendar id="ipt_exetodd" taborder="20" class="input_search" position="absolute 211 80 311 99" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
  227. <Static id="caption12" text="청구유무" class="search_name" position="absolute 856 55 932 72" anchor="default"/>
  228. <Combo id="combo2" taborder="21" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 938 55 1042 74" anchor="default">
  229. <Dataset id="innerdataset">
  230. <ColumnInfo>
  231. <Column id="codecolumn"/>
  232. <Column id="datacolumn"/>
  233. </ColumnInfo>
  234. <Rows>
  235. <Row>
  236. <Col id="codecolumn"/>
  237. <Col id="datacolumn">전체</Col>
  238. </Row>
  239. <Row>
  240. <Col id="codecolumn">Y</Col>
  241. <Col id="datacolumn">Y</Col>
  242. </Row>
  243. <Row>
  244. <Col id="codecolumn">N</Col>
  245. <Col id="datacolumn">N</Col>
  246. </Row>
  247. </Rows>
  248. </Dataset>
  249. </Combo>
  250. <Combo id="cmb_insukind" taborder="22" innerdataset="@ds_init_P0008list" codecolumn="cdid" datacolumn="cdnm" position="absolute 502 80 636 99" anchor="default"/>
  251. <Static id="caption13" text="보험유형" class="search_name" position="absolute 403 80 479 97" anchor="default"/>
  252. <Button id="btn_tstlist" taborder="23" class="icon_search" position="absolute 823 7 839 23" onclick="group2_group3_btn_tstlist_onclick" anchor="default"/>
  253. <Button id="btn_tstlist00" taborder="24" class="icon_search" position="absolute 822 56 838 72" onclick="group2_group3_btn_tstlist00_onclick" anchor="default"/>
  254. <Button id="btn_tstlist01" taborder="25" class="icon_search" position="absolute 621 56 637 72" onclick="group2_group3_btn_tstlist01_onclick" anchor="default"/>
  255. </Layout>
  256. </Layouts>
  257. </Div>
  258. </Layout>
  259. </Layouts>
  260. </Div>
  261. <Static id="caption1" text="청구생성오류점검" class="tit_1" position="absolute 1 0 249 23"/>
  262. </Layout>
  263. </Layouts>
  264. <Objects>
  265. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  266. <ColumnInfo>
  267. <Column id="datecond" type="STRING" size="256"/>
  268. <Column id="fromdd" type="STRING" size="256"/>
  269. <Column id="todd" type="STRING" size="256"/>
  270. <Column id="ioflag" type="STRING" size="256"/>
  271. <Column id="orddeptcd" type="STRING" size="256"/>
  272. <Column id="orddrid" type="STRING" size="256"/>
  273. <Column id="codecond" type="STRING" size="256"/>
  274. <Column id="code" type="STRING" size="256"/>
  275. <Column id="edicd" type="STRING" size="256"/>
  276. <Column id="patunitsrch" type="STRING" size="256"/>
  277. <Column id="judgrid" type="STRING" size="256"/>
  278. <Column id="cancer" type="STRING" size="256"/>
  279. <Column id="large" type="STRING" size="256"/>
  280. <Column id="middle" type="STRING" size="256"/>
  281. <Column id="small" type="STRING" size="256"/>
  282. <Column id="exefromdd" type="STRING" size="256"/>
  283. <Column id="exetodd" type="STRING" size="256"/>
  284. <Column id="clamkey" type="STRING" size="256"/>
  285. <Column id="insukind" type="STRING" size="256"/>
  286. <Column id="screen_id" type="STRING" size="256"/>
  287. <Column id="pid" type="STRING" size="256"/>
  288. </ColumnInfo>
  289. <Rows>
  290. <Row>
  291. <Col id="datecond"/>
  292. <Col id="fromdd"/>
  293. <Col id="todd"/>
  294. <Col id="ioflag"/>
  295. <Col id="orddeptcd"/>
  296. <Col id="orddrid"/>
  297. <Col id="codecond"/>
  298. <Col id="code"/>
  299. <Col id="edicd"/>
  300. <Col id="patunitsrch"/>
  301. <Col id="judgrid"/>
  302. <Col id="cancer"/>
  303. <Col id="large"/>
  304. <Col id="middle"/>
  305. <Col id="small"/>
  306. <Col id="exefromdd"/>
  307. <Col id="exetodd"/>
  308. <Col id="clamkey"/>
  309. <Col id="insukind"/>
  310. </Row>
  311. </Rows>
  312. </Dataset>
  313. <Dataset id="ds_main_grdlist_calcorderlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  314. <ColumnInfo>
  315. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  316. <Column id="hngnm" type="STRING" size="256" sumtext="성명"/>
  317. <Column id="ioflag" type="STRING" size="256" sumtext="내원유형"/>
  318. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  319. <Column id="execdd" type="STRING" size="256" sumtext="실시일자"/>
  320. <Column id="insukind" type="STRING" size="256" sumtext="유형"/>
  321. <Column id="suppkind" type="STRING" size="256" sumtext="보조"/>
  322. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
  323. <Column id="orddrnm" type="STRING" size="256" sumtext="진료의"/>
  324. <Column id="diag" type="STRING" size="256" sumtext="주상병"/>
  325. <Column id="snglcalcscorcd" type="STRING" size="256" sumtext="처방코드"/>
  326. <Column id="edicd" type="STRING" size="256" sumtext="EDI코드"/>
  327. <Column id="calchngnm" type="STRING" size="256" sumtext="한글명"/>
  328. <Column id="appunitcost" type="STRING" size="256" sumtext="단가"/>
  329. <Column id="calcqty" type="STRING" size="256" sumtext="수량"/>
  330. <Column id="calctims" type="STRING" size="256" sumtext="횟수"/>
  331. <Column id="calcdays" type="STRING" size="256" sumtext="일수"/>
  332. <Column id="totqty" type="STRING" size="256" sumtext="총투여량"/>
  333. <Column id="calcamt" type="STRING" size="256" sumtext="금액"/>
  334. <Column id="calcscorpayflag" type="STRING" size="256" sumtext="급비"/>
  335. <Column id="indd" type="STRING" size="256" sumtext="압원일자"/>
  336. <Column id="fromdd" type="STRING" size="256" sumtext="유형시작일"/>
  337. <Column id="todd" type="STRING" size="256" sumtext="종료일"/>
  338. <Column id="oprcp" type="STRING" size="256" sumtext="원외"/>
  339. <Column id="judgrid" type="STRING" size="256" sumtext="심사자"/>
  340. <Column id="acptno" type="STRING" size="256" sumtext="접수번호"/>
  341. <Column id="cretfromdd" type="STRING" size="256" sumtext="생성일자"/>
  342. <Column id="yn" type="STRING" size="256" sumtext="시행여부"/>
  343. <Column id="clamkey" type="STRING" size="256" sumtext="청구유무"/>
  344. <Column id="execrnm" type="STRING" size="256" sumtext="실시자"/>
  345. <Column id="execdeptnm" type="STRING" size="256" sumtext="시행부서"/>
  346. <Column id="brateflagnm" type="STRING" size="256" sumtext="보험요율"/>
  347. </ColumnInfo>
  348. </Dataset>
  349. <Dataset id="ds_init_U0001list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  350. <ColumnInfo>
  351. <Column id="cdnm" type="STRING" size="256"/>
  352. <Column id="cdid" type="STRING" size="256"/>
  353. </ColumnInfo>
  354. </Dataset>
  355. <Dataset id="ds_init_tmp_orddeptcd_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  356. <ColumnInfo>
  357. <Column id="cd" type="STRING" size="256"/>
  358. <Column id="nm" type="STRING" size="256"/>
  359. </ColumnInfo>
  360. </Dataset>
  361. <Dataset id="ds_init_tmp_orddrid_orddridlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  362. <ColumnInfo>
  363. <Column id="cd" type="STRING" size="256"/>
  364. <Column id="nm" type="STRING" size="256"/>
  365. </ColumnInfo>
  366. </Dataset>
  367. <Dataset id="ds_init_hidden_earnclslist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  368. <ColumnInfo>
  369. <Column id="step" type="STRING" size="256" sumtext="단계구분"/>
  370. <Column id="earncls1" type="STRING" size="256" sumtext="수익분류1"/>
  371. <Column id="earncls2" type="STRING" size="256" sumtext="수익분류2"/>
  372. <Column id="earncls3" type="STRING" size="256" sumtext="수익분류3"/>
  373. <Column id="earncls1nm" type="STRING" size="256" sumtext="수익분류1명"/>
  374. <Column id="earncls2nm" type="STRING" size="256" sumtext="수익분류2명"/>
  375. <Column id="earncls3nm" type="STRING" size="256" sumtext="수익분류3명"/>
  376. </ColumnInfo>
  377. </Dataset>
  378. <FilteredDataset id="FilteredDataset00" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_init_hidden_earnclslist"/>
  379. <Dataset id="ds_init_P0008list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  380. <ColumnInfo>
  381. <Column id="cdnm" type="STRING" size="256"/>
  382. <Column id="cdid" type="STRING" size="256"/>
  383. </ColumnInfo>
  384. </Dataset>
  385. <Dataset id="ds_hidden_sppmc02500_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  386. <ColumnInfo>
  387. <Column id="srchcond" type="STRING" size="256"/>
  388. <Column id="pid" type="STRING" size="256"/>
  389. <Column id="hngnm" type="STRING" size="256"/>
  390. </ColumnInfo>
  391. <Rows>
  392. <Row/>
  393. </Rows>
  394. </Dataset>
  395. <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  396. <Dataset id="ds_hidden_smpic00200_judgsrch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  397. <Dataset id="ds_hidden_smpic00200_rslt_mech" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  398. <Dataset id="ds_hidden_smpic00200_rslt_picmech" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  399. <Dataset id="ds_cmb_calcscorpayflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  400. <ColumnInfo>
  401. <Column id="label" type="STRING" size="256"/>
  402. <Column id="value" type="STRING" size="256"/>
  403. </ColumnInfo>
  404. <Rows>
  405. <Row>
  406. <Col id="label">급</Col>
  407. <Col id="value">0</Col>
  408. </Row>
  409. <Row>
  410. <Col id="label">100</Col>
  411. <Col id="value">1</Col>
  412. </Row>
  413. <Row>
  414. <Col id="label">비</Col>
  415. <Col id="value">2</Col>
  416. </Row>
  417. <Row>
  418. <Col id="label">선</Col>
  419. <Col id="value">8</Col>
  420. </Row>
  421. <Row>
  422. <Col id="label">선</Col>
  423. <Col id="value">9</Col>
  424. </Row>
  425. </Rows>
  426. </Dataset>
  427. <FilteredDataset id="FilteredDataset01" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_init_hidden_earnclslist" filterstr="step == 'L'"/>
  428. <FilteredDataset id="FilteredDataset02" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_init_hidden_earnclslist"/>
  429. </Objects>
  430. <Bind>
  431. <BindItem id="item0" compid="group2.group3.ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
  432. <BindItem id="item1" compid="group2.group3.ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
  433. <BindItem id="item2" compid="group2.group3.rdo_ioflag" propid="value" datasetid="ds_send" columnid="ioflag"/>
  434. <BindItem id="item3" compid="group2.group3.ipt_patunitsrch" propid="value" datasetid="ds_send" columnid="patunitsrch"/>
  435. <BindItem id="item4" compid="group2.group3.combo1" propid="value" datasetid="ds_send" columnid="judgrid"/>
  436. <BindItem id="item5" compid="group2.group3.base_date" propid="value" datasetid="ds_send" columnid="orddeptcd"/>
  437. <BindItem id="item6" compid="group2.group3.cmb_orddrid" propid="value" datasetid="ds_send" columnid="orddrid"/>
  438. <BindItem id="item7" compid="group2.group3.cmb_large" propid="value" datasetid="ds_send" columnid="large"/>
  439. <BindItem id="item8" compid="group2.group3.cmb_middle" propid="value" datasetid="ds_send" columnid="middle"/>
  440. <BindItem id="item9" compid="group2.group3.cmb_small" propid="value" datasetid="ds_send" columnid="small"/>
  441. <BindItem id="item10" compid="group2.group3.rdo_searchcond" propid="value" datasetid="ds_send" columnid="codecond"/>
  442. <BindItem id="item11" compid="group2.group3.rdo_cancer" propid="value" datasetid="ds_send" columnid="cancer"/>
  443. <BindItem id="item12" compid="group2.group3.ipt_code" propid="value" datasetid="ds_send" columnid="code"/>
  444. <BindItem id="item13" compid="group2.group3.cmb_insukind" propid="value" datasetid="ds_send" columnid="insukind"/>
  445. <BindItem id="item14" compid="group2.group3.ipt_edicd" propid="value" datasetid="ds_send" columnid="edicd"/>
  446. <BindItem id="item15" compid="group2.group3.combo2" propid="value" datasetid="ds_send" columnid="clamkey"/>
  447. <BindItem id="item16" compid="group2.group3.ipt_exefromdd" propid="value" datasetid="ds_send" columnid="exefromdd"/>
  448. <BindItem id="item17" compid="group2.group3.ipt_exetodd" propid="value" datasetid="ds_send" columnid="exetodd"/>
  449. </Bind>
  450. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  451. * System Name :
  452. * Job Name :
  453. * Creator :
  454. * Make Date : 2016-05-24
  455. * Description :
  456. *---------------------------------------------------------------------------------------
  457. * Modify Date Modifier Modify Description
  458. *---------------------------------------------------------------------------------------
  459. * 2016-05-24 Live Converter TF->XP
  460. *
  461. *---------------------------------------------------------------------------------------
  462. ****************************************************************************************/
  463. include "com_commonxp::comm_main.xjs";
  464. include "pam_pamcomnxp::PAM001.xjs";
  465. include "pam_pamcomnxp::PAM.xjs";
  466. function SMPIS01300_oninit(obj:Form, e:InitEventInfo)
  467. {
  468. frmf_initForm(obj);
  469. }
  470. function SMPIS01300_onload(obj:Form, e:LoadEventInfo)
  471. {
  472. fInitialize();
  473. }
  474. function fInitialize()
  475. {
  476. ds_main_grdlist_calcorderlist.clearData();
  477. var arrParam = [{dsNm: "ds_init_P0008list", cdGrpId: "P0008"}]
  478. appf_getCodeList(arrParam);
  479. frmf_addComboItem("group2.group3.cmb_insukind","전체","","above");
  480. fGetOrdDept();
  481. dsf_createDsRow("ds_tmp", [{col:"instcd", type:"STRING", size:256, val: sysf_getUserInfo("dutplceinstcd")}
  482. , {col:"group", type:"STRING", size:256, val: ""}]);
  483. var oParam = {};
  484. oParam.id = "TRPIB00603";
  485. oParam.service = "insubasecdmngtapp.JudgCmt";
  486. oParam.method = "reqGetJudgRidList";
  487. oParam.inds = "req=ds_tmp";
  488. oParam.outds = "ds_init_U0001list=U0001";
  489. oParam.async = false;
  490. //oParam.callback = "cf_TRPIB00603";
  491. tranf_submit(oParam);
  492. var oParam = {};
  493. oParam.id = "TRPIS00510";
  494. oParam.service = "aftjudgstatapp.CalcOrderList";
  495. oParam.method = "reqGetEarnclsList";
  496. oParam.inds = "req=ds_tmp";
  497. oParam.outds = "ds_init_hidden_earnclslist=earnclslist";
  498. oParam.async = false;
  499. //oParam.callback = "cf_TRPIS00510";
  500. tranf_submit(oParam);
  501. ds_send.setColumn(0, "codecond", "calc");
  502. if(!utlf_isNull(ds_send.getColumn(0, "patunitsrch")))
  503. {
  504. if(utlf_isNull(ds_send.getColumn(0, "ioflag")))
  505. {
  506. ds_send.setColumn(0, "ioflag", "A");
  507. }
  508. fSearch();
  509. }
  510. else
  511. {
  512. ds_send.setColumn(0, "ioflag", "A");
  513. ds_send.setColumn(0, "fromdd", utlf_getCurrentDate());
  514. ds_send.setColumn(0, "todd", utlf_getCurrentDate());
  515. ds_send.setColumn(0, "exefromdd", utlf_getCurrentDate());
  516. ds_send.setColumn(0, "exetodd", utlf_getCurrentDate());
  517. }
  518. }
  519. function fGetOrdDept()
  520. {
  521. var oParam = {};
  522. oParam.id = "TRPID20309";
  523. oParam.service = "aftjudgapp.InAftJudgTrgtMan";
  524. oParam.method = "reqGetDeptCDDrID";
  525. oParam.inds = "req=ds_send";
  526. oParam.outds = "ds_init_tmp_orddeptcd_orddeptcdlist=orddeptcd ds_init_tmp_orddrid_orddridlist=orddrid";
  527. oParam.async = false;
  528. //oParam.callback = "cf_TRPID20309";
  529. tranf_submit(oParam);
  530. }
  531. function fSearch()
  532. {
  533. var chk_pid = ds_send.getColumn(0, "patunitsrch");
  534. var chk_fromdd = ds_send.getColumn(0, "fromdd");
  535. var chk_todd = ds_send.getColumn(0, "todd");
  536. var chk_code = ds_send.getColumn(0, "code");
  537. var chk_edicd = ds_send.getColumn(0, "edicd");
  538. var chk_cancer = ds_send.getColumn(0, "cancer");
  539. var chk_large = ds_send.getColumn(0, "large");
  540. ds_main_grdlist_calcorderlist.clearData();
  541. ds_send.setColumn(0, "screen_id", frmf_getScreenID(null));
  542. ds_send.setColumn(0, "pid", ds_send.getColumn(0, "patunitsrch"));
  543. var oParam = {};
  544. oParam.id = "TRPIS01300";
  545. oParam.service = "aftjudgstatapp.CalcOrderList";
  546. oParam.method = "reqGetCalcOrderList";
  547. oParam.inds = "req=ds_send";
  548. oParam.outds = "ds_main_grdlist_calcorderlist=calcorderlist";
  549. oParam.async = false;
  550. //oParam.callback = "cf_TRPIS01300";
  551. tranf_submit(oParam);
  552. if(ds_main_grdlist_calcorderlist.getColumn(0, "pid") == "over10000")
  553. {
  554. ds_main_grdlist_calcorderlist.clearData();
  555. sysf_messageBox("조회된 건수가 만건을 초과하여 배치로 ", "I001");
  556. }
  557. }
  558. function group2_group3_btn_search_onclick(obj:Button, e:ClickEventInfo)
  559. {
  560. fSearch();
  561. }
  562. function group2_group3_rdo_ioflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  563. {
  564. fGetOrdDept();
  565. }
  566. function group2_group3_ipt_patunitsrch_onkeydown(obj:Edit, e:KeyEventInfo)
  567. {
  568. if(e.keycode == 13)
  569. {
  570. if (obj.value.length > 1)
  571. {
  572. ds_send.setColumn(0, "patunitsrch", obj.value);
  573. if( isNaN(ds_send.getColumn(0, "patunitsrch")))
  574. {
  575. fPatSrch();
  576. }
  577. else
  578. {
  579. fSearch();
  580. }
  581. }
  582. }
  583. }
  584. function group2_group3_btn_tstlist_onclick(obj:Button, e:ClickEventInfo)
  585. {
  586. fPatSrch();
  587. }
  588. function fPatSrch()
  589. {
  590. var ipt_pid = ds_send.getColumn(0, "patunitsrch")
  591. if (ipt_pid)
  592. {
  593. if (!isNaN(ipt_pid))
  594. {
  595. ds_hidden_sppmc02500_cond.setColumn(0, "srchcond", "1");
  596. ds_hidden_sppmc02500_cond.setColumn(0, "pid", ipt_pid);
  597. }
  598. else
  599. {
  600. ds_hidden_sppmc02500_cond.setColumn(0, "srchcond", "2");
  601. ds_hidden_sppmc02500_cond.setColumn(0, "hngnm", ipt_pid);
  602. }
  603. }
  604. else
  605. {
  606. ds_hidden_sppmc02500_cond.clearData();
  607. ds_hidden_sppmc02500_cond.addRow();
  608. }
  609. var objArg = new Object();
  610. objArg.arg_ds_send = ds_hidden_sppmc02500_cond;
  611. frmf_modal("SPPMC02500", "SPPMC02500", objArg, null, null, null, null, null, null, null, null, null, "M");
  612. var srch_pid = ds_patinfolist.getColumn(0, "pid");
  613. if (srch_pid)
  614. {
  615. ds_patinfolist.clearData();
  616. ds_send.setColumn(0, "patunitsrch", srch_pid);
  617. }
  618. }
  619. function group2_group3_base_date_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  620. {
  621. var orddeptcd = ds_send.getColumn(0, "orddeptcd");
  622. if (orddeptcd)
  623. {
  624. ds_init_tmp_orddrid_orddridlist.filterstr = "dp == '" + orddeptcd +"'";
  625. }
  626. else
  627. {
  628. ds_init_tmp_orddrid_orddridlist.filterstr = "";
  629. }
  630. ds_send.setColumn(0, "orddrid", "");
  631. }
  632. function group2_group3_cmb_large_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  633. {
  634. ds_send.setColumn(0, "middle", "");
  635. ds_send.setColumn(0, "small", "");
  636. FilteredDataset00.filterstr = "step == 'M' && earncls1 == '" + obj.value + "'"
  637. group2.group3.cmb_middle.innerdataset = FilteredDataset00;
  638. group2.group3.cmb_middle.datacolumn = "earncls2nm";
  639. group2.group3.cmb_middle.codecolumn = "earncls2";
  640. }
  641. function group2_group3_cmb_middle_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  642. {
  643. FilteredDataset02.filterstr = "step == 'S' && earncls1 == '" + ds_send.getColumn(0, "large") + "' && earncls2 == '" + obj.value + "'";
  644. group2.group3.cmb_small.innerdataset = FilteredDataset02;
  645. group2.group3.cmb_small.datacolumn = "earncls3nm";
  646. group2.group3.cmb_small.codecolumn = "earncls3";
  647. }
  648. function group2_group3_rdo_searchcond_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  649. {
  650. ds_send.setColumn(0, "code", "");
  651. ds_send.setColumn(0, "cancer", "");
  652. ds_send.setColumn(0, "large", "");
  653. var choice = ds_send.getColumn(0, "codecond");
  654. if ( choice == "calc" )
  655. {
  656. group2.group3.cp_code.enable = true;
  657. group2.group3.ipt_code.enable = true;
  658. group2.group3.cp_edicd.enable = true;
  659. group2.group3.ipt_edicd.enable = true;
  660. group2.group3.rdo_cancer.enable = false;
  661. group2.group3.cp_large.enable = false;
  662. group2.group3.cp_middle.enable = false;
  663. group2.group3.cp_small.enable = false;
  664. group2.group3.cmb_large.enable = false;
  665. group2.group3.cmb_middle.enable = false;
  666. group2.group3.cmb_small.enable = false;
  667. }
  668. else if ( choice == "cancer" )
  669. {
  670. group2.group3.rdo_cancer.index = 0;
  671. group2.group3.cp_code.enable = false;
  672. group2.group3.ipt_code.enable = false;
  673. group2.group3.cp_edicd.enable = false;
  674. group2.group3.ipt_edicd.enable = false;
  675. group2.group3.rdo_cancer.enable = true;
  676. group2.group3.cp_large.enable = true;
  677. group2.group3.cp_middle.enable = true;
  678. group2.group3.cp_small.enable = true;
  679. group2.group3.cmb_large.enable = true;
  680. group2.group3.cmb_middle.enable = true;
  681. group2.group3.cmb_small.enable = true;
  682. }
  683. else if ( choice == "kind" )
  684. {
  685. group2.group3.cp_code.enable = false;
  686. group2.group3.ipt_code.enable = false;
  687. group2.group3.cp_edicd.enable = false;
  688. group2.group3.ipt_edicd.enable = false;
  689. group2.group3.rdo_cancer.enable = false;
  690. group2.group3.cp_large.enable = true;
  691. group2.group3.cp_middle.enable = true;
  692. group2.group3.cp_small.enable = true;
  693. group2.group3.cmb_large.enable = true;
  694. group2.group3.cmb_middle.enable = true;
  695. group2.group3.cmb_small.enable = true;
  696. }
  697. }
  698. function group2_group3_btn_tstlist01_onclick(obj:Button, e:ClickEventInfo)
  699. {
  700. fGetSnglcalcscorcd();
  701. }
  702. function group2_group3_ipt_code_ontextchanged(obj:Edit, e:TextChangedEventInfo)
  703. {
  704. ds_send.setColumn(0, "edicd", "");
  705. }
  706. function fGetSnglcalcscorcd()
  707. {
  708. ds_hidden_smpic00200_judgsrch.setColumn(0, "con1_dd", ds_send.getColumn(0, "fromdd"));
  709. ds_hidden_smpic00200_judgsrch.setColumn(0, "con2_gsflag", "S");
  710. ds_hidden_smpic00200_judgsrch.setColumn(0, "con3_search1", "calcscorcd");
  711. ds_hidden_smpic00200_judgsrch.setColumn(0, "con4_search2", "");
  712. ds_hidden_smpic00200_judgsrch.setColumn(0, "con5_insu", "insu");
  713. ds_hidden_smpic00200_rslt_mech.clearData();
  714. ds_hidden_smpic00200_rslt_picmech.clearData();
  715. var objArg = new Object();
  716. objArg.arg_ds_temp = ds_hidden_smpic00200_judgsrch;
  717. frmf_modal("SMPIC00200", "SMPIC00200", objArg, null, null, null, null, null, null, null, null, null, "M");
  718. ds_hidden_smpic00200_rslt_mech.copyData(ds_temp_mech);
  719. ds_hidden_smpic00200_rslt_picmech.copyData(ds_temp_picmmech);
  720. if (ds_hidden_smpic00200_rslt_mech.rowcount == 0)
  721. {
  722. sysf_messageBox("수가조회 화면에서 선택한 결과가", "I004");
  723. return;
  724. }
  725. if(ds_hidden_smpic00200_rslt_mech.getColumn(0, "ordinptflag") != "A" )
  726. {
  727. sysf_messageBox("처방이 불가한 코드", "E008");
  728. return;
  729. }
  730. ds_send.setColumn(0, "code", ds_hidden_smpic00200_rslt_picmech.getColumn(0, "picmmech_calcscorcd"));
  731. }
  732. function group2_group3_ipt_edicd_ontextchanged(obj:Edit, e:TextChangedEventInfo)
  733. {
  734. ds_send.setColumn(0, "code", "");
  735. }
  736. function group2_group3_btn_tstlist00_onclick(obj:Button, e:ClickEventInfo)
  737. {
  738. fGetEdicd();
  739. }
  740. function fGetEdicd()
  741. {
  742. ds_hidden_smpic00200_judgsrch.setColumn(0, "con1_dd", ds_send.getColumn(0, "fromdd"));
  743. ds_hidden_smpic00200_judgsrch.setColumn(0, "con2_gsflag", "S");
  744. ds_hidden_smpic00200_judgsrch.setColumn(0, "con3_search1", "edicd");
  745. ds_hidden_smpic00200_judgsrch.setColumn(0, "con4_search2", "");
  746. ds_hidden_smpic00200_judgsrch.setColumn(0, "con5_insu", "insu");
  747. ds_hidden_smpic00200_rslt_mech.clearData();
  748. ds_hidden_smpic00200_rslt_picmech.clearData();
  749. var objArg = new Object();
  750. objArg.arg_ds_temp = ds_hidden_smpic00200_judgsrch;
  751. frmf_modal("SMPIC00200", "SMPIC00200", objArg, null, null, null, null, null, null, null, null, null, "M");
  752. ds_hidden_smpic00200_rslt_mech.copyData(ds_temp_mech);
  753. ds_hidden_smpic00200_rslt_picmech.copyData(ds_temp_picmmech);
  754. if(ds_hidden_smpic00200_rslt_mech.rowcount == 0)
  755. {
  756. sysf_messageBox("수가조회 화면에서 선택한 결과가", "I004");
  757. return;
  758. }
  759. if(ds_hidden_smpic00200_rslt_mech.getColumn(0, "ordinptflag") != "A")
  760. {
  761. sysf_messageBox("처방이 불가한 코드", "E008");
  762. return;
  763. }
  764. ds_send.setColumn(0, "code", ds_hidden_smpic00200_rslt_picmech.getColumn(0, "picmmech_insuedicd"));
  765. }
  766. function group2_btn_excelsave_onclick(obj:Button, e:ClickEventInfo)
  767. {
  768. if(ds_main_grdlist_calcorderlist.rowcount == 0)
  769. {
  770. sysf_messageBox("엑셀저장할 내역이", "I004");
  771. }
  772. else
  773. {
  774. grdf_exportExcel(group2.grd_outjudg, "계산처방시행 조회_"+utlf_getCurrentDate(), "see");
  775. }
  776. }
  777. function group2_btn_batch_onclick(obj:Button, e:ClickEventInfo)
  778. {
  779. var todd = utlf_getCurrentDate();
  780. var objArg = new Object();
  781. objArg.todd = todd;
  782. objArg.execrid = sysf_getUserId();
  783. objArg.prgmid = "CalcOrderListBatch";
  784. frmf_open("SPZSB00301", "SPZSB00301", objArg, "","","","","","","","","","M");
  785. //zsbfOpenBatchLogPopup("aftjudgstatmgr.CalcOrderListBatch",utlf_getCurrentDate(),todd.getDateFormat());
  786. }
  787. ]]></Script>
  788. </Form>
  789. </FDL>