SPPID21400_외래미시행처방조회.xfdl 70 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626
  1. <?xml version="1.0" encoding="utf-8" standalone="no"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPPID21400" position="absolute 0 0 1190 719" titletext="외래미시행오더조회" oninit="SPPID21400_oninit" onload="SPPID21400_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" text="외래미시행오더조회" class="tit_1" position="absolute 0 0 188 23"/>
  8. <Div id="grp_sea" taborder="1" class="div_SA" position="absolute 0 24 1186 59">
  9. <Layouts>
  10. <Layout>
  11. <Static id="caption1" text="환자번호 :" class="search_name" position="absolute 15 9 101 26"/>
  12. <Edit id="inp_pid" taborder="6" class="input_search" position="absolute 104 8 194 27" onkeypress="grp_biz_grp_sea_inp_pid_onkeypress" onkeydown="grp_sea_inp_pid_onkeydown"/>
  13. <Edit id="opt_patnm" taborder="7" readonly="true" class="output_fix" position="absolute 216 8 296 27" enable="false"/>
  14. <Button id="btn_srch" taborder="8" text="조회" class="btn1" position="absolute 1115 7 1171 29" onclick="grp_sea_btn_srch_onclick"/>
  15. <Shape id="line1" linetype="vertical" class="line_4" position="absolute 1100 7 1103 29"/>
  16. <Button id="btn_srchpid" taborder="9" class="icon_search" position="absolute 197 10 213 26" onclick="grp_sea_btn_srchpid_onclick"/>
  17. <CheckBox id="chk_otherdept" taborder="10" text="타과포함 조회" position="absolute 320 9 431 26" truevalue="Y" onclick="grp_sea_chk_otherdept_onclick"/>
  18. <CheckBox id="chk_execdd" taborder="11" text="시행처방 포함" position="absolute 432 10 543 27" truevalue="Y" onclick="grp_sea_chk_execdd_onclick"/>
  19. </Layout>
  20. </Layouts>
  21. </Div>
  22. <Shape id="line8" class="line_10" position="absolute 0 79 265 90"/>
  23. <Static id="caption15" text="일자" class="tit_2" position="absolute 0 65 107 86"/>
  24. <Static id="caption3" text="미시행 오더" class="tit_2" position="absolute 270 65 397 86"/>
  25. <Shape id="line2" class="line_10" position="absolute 270 79 1185 90"/>
  26. <Button id="button3" taborder="2" text="엑셀" class="btn7" position="absolute 993 62 1051 81" onclick="button3_onclick"/>
  27. <Button id="btn_judgcancel" taborder="3" text="통합심사취소" onclick="grp_biz_btn_judgcancel_onclick" class="btn2" visible="false" position="absolute 1054 62 1140 81"/>
  28. <Button id="btn_judgend" taborder="4" text="통합심사완료" class="btn2" position="absolute 1054 62 1140 81" onclick="btn_judgend_onclick"/>
  29. <Button id="btn_save" taborder="5" text="저장" class="btn2" position="absolute 1143 62 1185 81" onclick="btn_save_onclick"/>
  30. <Grid id="grd_outunexecprcp" taborder="6" binddataset="ds_main_grd1_unexeclist" useinputpanel="false" position="absolute 0 86 265 686" onaftersort="grp_biz_grd_outunexecprcp_onaftersort" oncellclick="grd_outunexecprcp_oncellclick" autofittype="col" cellsizingtype="col">
  31. <Formats>
  32. <Format id="default">
  33. <Columns>
  34. <Column size="0"/>
  35. <Column size="23"/>
  36. <Column size="110"/>
  37. <Column size="0"/>
  38. <Column size="0"/>
  39. <Column size="49"/>
  40. <Column size="0"/>
  41. <Column size="56"/>
  42. <Column size="0"/>
  43. <Column size="0"/>
  44. <Column size="0"/>
  45. <Column size="0"/>
  46. </Columns>
  47. <Rows>
  48. <Row size="32" band="head"/>
  49. <Row size="23"/>
  50. </Rows>
  51. <Band id="head">
  52. <Cell text="환자번호"/>
  53. <Cell col="1"/>
  54. <Cell col="2" text="진료일자"/>
  55. <Cell col="3" text="실&#13;&#10;시"/>
  56. <Cell col="4" text="진료과코드"/>
  57. <Cell col="5" text="진료과"/>
  58. <Cell col="6" text="진료의코드"/>
  59. <Cell col="7" text="진료의"/>
  60. <Cell col="8" text="cretno"/>
  61. <Cell col="9" text="continueyn"/>
  62. <Cell col="10" text="fstacptdt"/>
  63. <Cell col="11"/>
  64. </Band>
  65. <Band id="body">
  66. <Cell text="bind:pid"/>
  67. <Cell col="1" celltype="head" expr="currow+1"/>
  68. <Cell col="2" text="bind:orddd"/>
  69. <Cell col="3" text="bind:prcphopedd"/>
  70. <Cell col="4" text="bind:orddeptcd"/>
  71. <Cell col="5" text="bind:orddeptnm"/>
  72. <Cell col="6" text="bind:orddrid"/>
  73. <Cell col="7" text="bind:orddrnm"/>
  74. <Cell col="8" text="bind:cretno"/>
  75. <Cell col="9" text="bind:continueyn"/>
  76. <Cell col="10" text="bind:fstacptdt"/>
  77. <Cell col="11" text="bind:insukind"/>
  78. </Band>
  79. </Format>
  80. </Formats>
  81. </Grid>
  82. <Grid id="grd_outunexecprcpord" taborder="7" binddataset="ds_main_grd2_unexecordlist" useinputpanel="false" position="absolute 270 86 1185 686" onrowchanged="grp_biz_grd_outunexecprcpord_onrowchanged" onaftersort="grp_biz_grd_outunexecprcpord_onaftersort" oncellclick="grd_outunexecprcpord_oncellclick" cellsizingtype="col">
  83. <Formats>
  84. <Format id="default">
  85. <Columns>
  86. <Column size="22"/>
  87. <Column size="20"/>
  88. <Column size="0"/>
  89. <Column size="20"/>
  90. <Column size="45"/>
  91. <Column size="70"/>
  92. <Column size="65"/>
  93. <Column size="145"/>
  94. <Column size="25"/>
  95. <Column size="42"/>
  96. <Column size="19"/>
  97. <Column size="19"/>
  98. <Column size="120"/>
  99. <Column size="70"/>
  100. <Column size="70"/>
  101. <Column size="120"/>
  102. <Column size="120"/>
  103. <Column size="55"/>
  104. <Column size="0"/>
  105. <Column size="0"/>
  106. <Column size="30"/>
  107. <Column size="55"/>
  108. <Column size="60"/>
  109. <Column size="55"/>
  110. <Column size="0"/>
  111. <Column size="0"/>
  112. <Column size="0"/>
  113. <Column size="0"/>
  114. <Column size="0"/>
  115. <Column size="0"/>
  116. <Column size="0"/>
  117. <Column size="0"/>
  118. <Column size="0"/>
  119. <Column size="0"/>
  120. <Column size="0"/>
  121. <Column size="0"/>
  122. <Column size="0"/>
  123. <Column size="0"/>
  124. <Column size="0"/>
  125. </Columns>
  126. <Rows>
  127. <Row size="25" band="head"/>
  128. <Row size="25"/>
  129. </Rows>
  130. <Band id="head">
  131. <Cell/>
  132. <Cell col="1"/>
  133. <Cell col="2"/>
  134. <Cell col="3" text="G"/>
  135. <Cell col="4" text="구분"/>
  136. <Cell col="5" text="처방코드"/>
  137. <Cell col="6" text="EDI코드"/>
  138. <Cell col="7" text="한글명"/>
  139. <Cell col="8" text="급"/>
  140. <Cell col="9" text="투여량"/>
  141. <Cell col="10" text="회"/>
  142. <Cell col="11" text="일"/>
  143. <Cell col="12" text="처방시간"/>
  144. <Cell col="13" text="실시처방일"/>
  145. <Cell col="14" text="실시희망일"/>
  146. <Cell col="15" text="실시일시"/>
  147. <Cell col="16" text="예약일시"/>
  148. <Cell col="17" text="실시상태"/>
  149. <Cell col="18" text="진료과"/>
  150. <Cell col="19" text="진료의"/>
  151. <Cell col="20" text="상병"/>
  152. <Cell col="21" text="특정코드"/>
  153. <Cell col="22" text="특정내역"/>
  154. <Cell col="23" text="통합심사"/>
  155. <Cell col="24" text="unitflag"/>
  156. <Cell col="25" text="환자번호"/>
  157. <Cell col="26" text="외래등록일자"/>
  158. <Cell col="27" text="외래생성번호"/>
  159. <Cell col="28" text="일련번호"/>
  160. <Cell col="29" text="처방번호"/>
  161. <Cell col="30" text="처방이력번호"/>
  162. <Cell col="31" text="실시처방일련번호"/>
  163. <Cell col="32" text="기관코드"/>
  164. <Cell col="33" text="특정메모구분"/>
  165. <Cell col="34" text="참고사항"/>
  166. <Cell col="35" text="저장여부"/>
  167. <Cell col="36" text="보험유형"/>
  168. <Cell col="37" text="처방일자"/>
  169. <Cell col="38" text="EDI코드구분"/>
  170. </Band>
  171. <Band id="body">
  172. <Cell celltype="head" expr="currow+1"/>
  173. <Cell col="1" text="bind:update"/>
  174. <Cell col="2" text="bind:spclchange"/>
  175. <Cell col="3" text="bind:grupsnglyn"/>
  176. <Cell col="4" displaytype="combo" edittype="combo" text="bind:hosinhosoutflag" combodataset="ds_cmb_hosinhosoutflag" combocodecol="value" combodatacol="label"/>
  177. <Cell col="5" text="bind:calcscorcd"/>
  178. <Cell col="6" text="bind:edicd"/>
  179. <Cell col="7" style="align:left middle;" text="bind:ordnm"/>
  180. <Cell col="8" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:payflagcd" combodataset="ds_cmb_payflagcd" combocodecol="value" combodatacol="label"/>
  181. <Cell col="9" displaytype="number" text="bind:execprcpqty"/>
  182. <Cell col="10" displaytype="number" text="bind:execprcptims"/>
  183. <Cell col="11" displaytype="number" text="bind:execprcpdayno"/>
  184. <Cell col="12" displaytype="date" text="bind:prcptm" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="none"/>
  185. <Cell col="13" displaytype="date" text="bind:actorddd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
  186. <Cell col="14" displaytype="date" text="bind:prcphopedd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
  187. <Cell col="15" displaytype="date" text="bind:exectm" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="none"/>
  188. <Cell col="16" displaytype="date" text="bind:rsrvtm" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="none"/>
  189. <Cell col="17" text="bind:execprcpstatcd"/>
  190. <Cell col="18" text="bind:orddeptcd"/>
  191. <Cell col="19" text="bind:orddrid"/>
  192. <Cell col="20" text="bind:diagyn"/>
  193. <Cell col="21" style="align:left middle;" text="bind:spclcd"/>
  194. <Cell col="22" style="align:left middle;" text="bind:spclspec"/>
  195. <Cell col="23" text="bind:judgendflag"/>
  196. <Cell col="24" text="bind:unitflag"/>
  197. <Cell col="25" text="bind:pid"/>
  198. <Cell col="26" text="bind:orddd"/>
  199. <Cell col="27" text="bind:cretno"/>
  200. <Cell col="28" text="bind:seqno"/>
  201. <Cell col="29" text="bind:prcpno"/>
  202. <Cell col="30" text="bind:prcphistno"/>
  203. <Cell col="31" text="bind:execprcpseqno"/>
  204. <Cell col="32" text="bind:instcd"/>
  205. <Cell col="33" text="bind:spclmemoflag"/>
  206. <Cell col="34" text="bind:remfact"/>
  207. <Cell col="35" text="bind:spclyn"/>
  208. <Cell col="36" text="bind:insukind"/>
  209. <Cell col="37" text="bind:prcpdd"/>
  210. <Cell col="38" text="bind:edicdflag"/>
  211. </Band>
  212. </Format>
  213. </Formats>
  214. </Grid>
  215. <Div id="grp_spcl" taborder="8" style="background:#ffffffff;border:1 solid #808080ff ;" position="absolute 589 341 1185 594" visible="false">
  216. <Layouts>
  217. <Layout>
  218. <Div id="grp_btn" taborder="2" position="absolute 0 224 594 251" anchor="default">
  219. <Layouts>
  220. <Layout>
  221. <Button id="btn_cancel" taborder="1" text="취소" class="btn4" position="absolute 537 3 593 25" anchor="default" onclick="grp_spcl_grp_btn_btn_cancel_onclick"/>
  222. <Button id="btn_confirm" taborder="2" text="확인" class="btn4" position="absolute 478 3 534 25" anchor="default" onclick="grp_spcl_grp_btn_btn_confirm_onclick"/>
  223. <Shape id="line7" class="line_6" position="absolute 0 0 593 3" anchor="default"/>
  224. </Layout>
  225. </Layouts>
  226. </Div>
  227. <Static id="caption2" text="특정내역 상세" class="tit_2" position="absolute 0 7 108 28"/>
  228. <Radio id="radio1" taborder="3" columncount="2" rowcount="-1" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 431 4 543 21" enable="false" onitemchanged="grp_spcl_radio1_onitemchanged">
  229. <Dataset id="innerdataset">
  230. <ColumnInfo>
  231. <Column id="codecolumn"/>
  232. <Column id="datacolumn"/>
  233. </ColumnInfo>
  234. <Rows>
  235. <Row>
  236. <Col id="codecolumn">JX999</Col>
  237. <Col id="datacolumn">JX999</Col>
  238. </Row>
  239. <Row>
  240. <Col id="codecolumn">MX999</Col>
  241. <Col id="datacolumn">MX999</Col>
  242. </Row>
  243. </Rows>
  244. </Dataset>
  245. </Radio>
  246. <Button id="btn_delete" taborder="4" text="삭제" class="btn2" position="absolute 550 4 592 23" onclick="grp_spcl_btn_delete_onclick"/>
  247. <Shape id="line3" class="line_10" position="absolute 0 21 593 32"/>
  248. <Static id="caption4" text="EDI코드" class="cell_1" position="absolute 0 28 59 51"/>
  249. <Edit id="opt_snglcalcscorcd" taborder="5" readonly="true" class="output_fix" position="absolute 62 29 162 48" enable="false"/>
  250. <Shape id="line4" class="line_2" position="absolute 0 50 593 53"/>
  251. <Static id="caption5" text="특정코드" class="cell_1" position="absolute 165 28 224 51"/>
  252. <Combo id="cmb_spclcd" taborder="6" innerdataset="@ds_init_P0117list" codecolumn="cdid" datacolumn="cdnm" class="combo_default" position="absolute 227 29 593 48" columncount="-1" rowcount="-1" enable="false" onitemchanged="grp_spcl_cmb_spclcd_onitemchanged"/>
  253. <TextArea id="tar_spclspec" taborder="7" position="absolute 62 53 593 195"/>
  254. <Static id="caption7" text="특정내역" class="cell_1" position="absolute 0 52 59 198"/>
  255. <Static id="caption8" text="기재형식" class="cell_1" position="absolute 0 199 59 222"/>
  256. <Edit id="opt_spclformat" taborder="8" readonly="true" class="output_fix" position="absolute 62 200 593 219" enable="false"/>
  257. <Shape id="line5" class="line_2" position="absolute 0 197 593 200"/>
  258. </Layout>
  259. </Layouts>
  260. </Div>
  261. <Button id="btn_payflag" taborder="9" text="처방급비저장" class="btn2" visible="false" position="absolute 904 62 990 81" onclick="btn_payflag_onclick"/>
  262. <Shape id="line9" class="line_6" position="absolute 2 688 1187 691"/>
  263. <Button id="btn_init" taborder="10" text="초기화" class="btn4" position="absolute 1060 691 1128 713" onclick="btn_init_onclick"/>
  264. <Button id="btn_close" taborder="11" text="닫기" class="btn4" position="absolute 1131 691 1187 713" onclick="btn_close_onclick"/>
  265. </Layout>
  266. </Layouts>
  267. <Objects>
  268. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  269. <ColumnInfo>
  270. <Column id="pid" type="STRING" size="256"/>
  271. <Column id="patnm" type="STRING" size="256"/>
  272. <Column id="chk" type="STRING" size="256"/>
  273. <Column id="chk2" type="STRING" size="256"/>
  274. <Column id="orddeptcd" type="STRING" size="256"/>
  275. <Column id="prcphopedd" type="STRING" size="256"/>
  276. <Column id="orddd" type="STRING" size="256"/>
  277. <Column id="orddrid" type="STRING" size="256"/>
  278. <Column id="insukind" type="STRING" size="256"/>
  279. <Column id="cretno" type="STRING" size="256"/>
  280. </ColumnInfo>
  281. <Rows>
  282. <Row/>
  283. </Rows>
  284. </Dataset>
  285. <Dataset id="ds_main_grd1_unexeclist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  286. <ColumnInfo>
  287. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  288. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  289. <Column id="orddd" type="STRING" size="256" sumtext="처방일"/>
  290. <Column id="prcphopedd" type="STRING" size="256" sumtext="실시희망일"/>
  291. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
  292. <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과명"/>
  293. <Column id="orddrid" type="STRING" size="256" sumtext="주치의코드"/>
  294. <Column id="orddrnm" type="STRING" size="256" sumtext="주치의명"/>
  295. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  296. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  297. <Column id="continueyn" type="STRING" size="256" sumtext="연속처방여부"/>
  298. <Column id="fstacptdt" type="STRING" size="256" sumtext="원처방일자"/>
  299. </ColumnInfo>
  300. </Dataset>
  301. <Dataset id="ds_main_grd2_unexecordlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  302. <ColumnInfo>
  303. <Column id="update" type="STRING" size="256" sumtext="rowStatus"/>
  304. <Column id="spclchange" type="STRING" size="256" sumtext="특정내역 변경여부"/>
  305. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  306. <Column id="grupsnglyn" type="STRING" size="256" sumtext="그룹여부"/>
  307. <Column id="calcscorcd" type="STRING" size="256" sumtext="처방코드"/>
  308. <Column id="edicd" type="STRING" size="256" sumtext="EDI코드"/>
  309. <Column id="ordnm" type="STRING" size="256" sumtext="처방명"/>
  310. <Column id="payflagcd" type="STRING" size="256" sumtext="급"/>
  311. <Column id="execprcpqty" type="STRING" size="256" sumtext="투여랑"/>
  312. <Column id="execprcptims" type="STRING" size="256" sumtext="횟수"/>
  313. <Column id="execprcpdayno" type="STRING" size="256" sumtext="일수"/>
  314. <Column id="orddd" type="STRING" size="256" sumtext="외래등록일자"/>
  315. <Column id="cretno" type="STRING" size="256" sumtext="외래등록 생성번호"/>
  316. <Column id="prcphopedd" type="STRING" size="256" sumtext="실시희망일"/>
  317. <Column id="actorddd" type="STRING" size="256" sumtext="실시희망일"/>
  318. <Column id="exectm" type="STRING" size="256" sumtext="실시시간"/>
  319. <Column id="execprcpstatcd" type="STRING" size="256" sumtext="실시상태"/>
  320. <Column id="judgendflag" type="STRING" size="256" sumtext="통합심사"/>
  321. <Column id="ioflag" type="STRING" size="256" sumtext="외래구분"/>
  322. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
  323. <Column id="orddrid" type="STRING" size="256" sumtext="주치의"/>
  324. <Column id="diagyn" type="STRING" size="256" sumtext="상병"/>
  325. <Column id="unitflag" type="STRING" size="256" sumtext="단위구분"/>
  326. <Column id="spclcd" type="STRING" size="256" sumtext="특정코드"/>
  327. <Column id="spclspec" type="STRING" size="256" sumtext="특정내역"/>
  328. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  329. <Column id="prcptm" type="STRING" size="256" sumtext="처방일시"/>
  330. <Column id="prcpno" type="STRING" size="256" sumtext="처방번호"/>
  331. <Column id="prcphistno" type="STRING" size="256" sumtext="처방이력번호"/>
  332. <Column id="execprcpseqno" type="STRING" size="256" sumtext="실시처방일련번호"/>
  333. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  334. <Column id="spclmemoflag" type="STRING" size="256" sumtext="특정메모구분"/>
  335. <Column id="remfact" type="STRING" size="256" sumtext="참고사항"/>
  336. <Column id="spclyn" type="STRING" size="256" sumtext="저장여부"/>
  337. <Column id="seqno" type="STRING" size="256" sumtext="일련번호"/>
  338. <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
  339. <Column id="rsrvtm" type="STRING" size="256" sumtext="예약일시"/>
  340. <Column id="payflagyn" type="STRING" size="256" sumtext="급비변경여부"/>
  341. <Column id="hosinhosoutflag" type="STRING" size="256" sumtext="원내원외구분"/>
  342. <Column id="edicdflag" type="STRING" size="256" sumtext="EDI코드구분"/>
  343. </ColumnInfo>
  344. </Dataset>
  345. <Dataset id="ds_cmb_hosinhosoutflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  346. <ColumnInfo>
  347. <Column id="label" type="STRING" size="256"/>
  348. <Column id="value" type="STRING" size="256"/>
  349. </ColumnInfo>
  350. <Rows>
  351. <Row>
  352. <Col id="label">원내</Col>
  353. <Col id="value">I</Col>
  354. </Row>
  355. <Row>
  356. <Col id="label">원외</Col>
  357. <Col id="value">O</Col>
  358. </Row>
  359. </Rows>
  360. </Dataset>
  361. <Dataset id="ds_cmb_payflagcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  362. <ColumnInfo>
  363. <Column id="label" type="STRING" size="256"/>
  364. <Column id="value" type="STRING" size="256"/>
  365. </ColumnInfo>
  366. <Rows>
  367. <Row>
  368. <Col id="label">급</Col>
  369. <Col id="value">0</Col>
  370. </Row>
  371. <Row>
  372. <Col id="label">100</Col>
  373. <Col id="value">1</Col>
  374. </Row>
  375. <Row>
  376. <Col id="label">비</Col>
  377. <Col id="value">2</Col>
  378. </Row>
  379. </Rows>
  380. </Dataset>
  381. <Dataset id="ds_main_item1_clcj" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  382. <ColumnInfo>
  383. <Column id="edicd" type="STRING" size="256"/>
  384. <Column id="spclcd" type="STRING" size="256"/>
  385. <Column id="basespclcd" type="STRING" size="256"/>
  386. <Column id="spclspec" type="STRING" size="256"/>
  387. <Column id="remfact" type="STRING" size="256"/>
  388. <Column id="row" type="STRING" size="256"/>
  389. <Column id="edicdflag" type="STRING" size="256"/>
  390. <Column id="edilnno" type="STRING" size="256"/>
  391. <Column id="spclmemoflag" type="STRING" size="256"/>
  392. </ColumnInfo>
  393. <Rows>
  394. <Row/>
  395. </Rows>
  396. </Dataset>
  397. <Dataset id="ds_init_P0117list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  398. <ColumnInfo>
  399. <Column id="cdnm" type="STRING" size="256"/>
  400. <Column id="cdid" type="STRING" size="256"/>
  401. </ColumnInfo>
  402. </Dataset>
  403. <Dataset id="ds_hidden_sppmc02500_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  404. <ColumnInfo>
  405. <Column id="srchcond" type="STRING" size="256"/>
  406. <Column id="pid" type="STRING" size="256"/>
  407. <Column id="autoflag" type="STRING" size="256"/>
  408. </ColumnInfo>
  409. <Rows>
  410. <Row/>
  411. </Rows>
  412. </Dataset>
  413. <Dataset id="ds_hidden_rcv_patInfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  414. <ColumnInfo>
  415. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  416. <Column id="patnm" type="STRING" size="256" sumtext="사요자명"/>
  417. </ColumnInfo>
  418. </Dataset>
  419. <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  420. <ColumnInfo>
  421. <Column id="popupendflag" type="STRING" size="256"/>
  422. </ColumnInfo>
  423. <Rows>
  424. <Row>
  425. <Col id="popupendflag"/>
  426. </Row>
  427. </Rows>
  428. </Dataset>
  429. <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  430. <Dataset id="ds_send_diag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  431. <ColumnInfo>
  432. <Column id="pid" type="STRING" size="256"/>
  433. <Column id="orddd" type="STRING" size="256"/>
  434. <Column id="ioflag" type="STRING" size="256"/>
  435. <Column id="deptcd" type="STRING" size="256"/>
  436. <Column id="row" type="STRING" size="256"/>
  437. <Column id="instcd" type="STRING" size="256"/>
  438. <Column id="insukind" type="STRING" size="256"/>
  439. </ColumnInfo>
  440. <Rows>
  441. <Row>
  442. <Col id="pid"/>
  443. <Col id="orddd"/>
  444. <Col id="ioflag"/>
  445. <Col id="deptcd"/>
  446. <Col id="row"/>
  447. <Col id="instcd"/>
  448. <Col id="insukind"/>
  449. </Row>
  450. </Rows>
  451. </Dataset>
  452. <Dataset id="ds_send_delclcj_clcj" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  453. <ColumnInfo>
  454. <Column id="delpid" type="STRING" size="256"/>
  455. <Column id="delorddd" type="STRING" size="256"/>
  456. <Column id="delcretno" type="STRING" size="256"/>
  457. <Column id="deledicd" type="STRING" size="256"/>
  458. <Column id="delspclcd" type="STRING" size="256"/>
  459. </ColumnInfo>
  460. </Dataset>
  461. <Dataset id="ds_send_insclcj_clcj" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  462. <ColumnInfo>
  463. <Column id="prcpno" type="STRING" size="256"/>
  464. <Column id="prcpdd" type="STRING" size="256"/>
  465. <Column id="execprcpseqno" type="STRING" size="256"/>
  466. <Column id="prcphistno" type="STRING" size="256"/>
  467. <Column id="grupsnglyn" type="STRING" size="256"/>
  468. <Column id="calcscorcd" type="STRING" size="256"/>
  469. <Column id="inspid" type="STRING" size="256"/>
  470. <Column id="insorddd" type="STRING" size="256"/>
  471. <Column id="inscretno" type="STRING" size="256"/>
  472. <Column id="unitflag" type="STRING" size="256"/>
  473. <Column id="edicd" type="STRING" size="256"/>
  474. <Column id="spclcd" type="STRING" size="256"/>
  475. <Column id="remfact" type="STRING" size="256"/>
  476. <Column id="spclmemoflag" type="STRING" size="256"/>
  477. <Column id="edicdflag" type="STRING" size="256"/>
  478. <Column id="spclspec" type="STRING" size="256"/>
  479. </ColumnInfo>
  480. </Dataset>
  481. <Dataset id="ds_send_payflag_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  482. <ColumnInfo>
  483. <Column id="payprcpdd" type="STRING" size="256" sumtext="처방일자"/>
  484. <Column id="payprcpno" type="INT" size="256" sumtext="일련번호"/>
  485. <Column id="payprcphistno" type="INT" size="256" sumtext="처방이력번호"/>
  486. <Column id="paypayflagcd" type="STRING" size="256" sumtext="처방급비구분코드"/>
  487. </ColumnInfo>
  488. </Dataset>
  489. </Objects>
  490. <Bind>
  491. <BindItem id="item0" compid="grp_sea.inp_pid" propid="value" datasetid="ds_send" columnid="pid"/>
  492. <BindItem id="item1" compid="grp_sea.opt_patnm" propid="value" datasetid="ds_send" columnid="patnm"/>
  493. <BindItem id="item2" compid="grp_sea.chk_otherdept" propid="value" datasetid="ds_send" columnid="chk"/>
  494. <BindItem id="item3" compid="grp_sea.chk_execdd" propid="value" datasetid="ds_send" columnid="chk2"/>
  495. <BindItem id="item4" compid="grp_spcl.cmb_spclcd" propid="value" datasetid="ds_main_item1_clcj" columnid="spclcd"/>
  496. <BindItem id="item5" compid="grp_spcl.opt_snglcalcscorcd" propid="value" datasetid="ds_main_item1_clcj" columnid="edicd"/>
  497. <BindItem id="item6" compid="grp_spcl.radio1" propid="value" datasetid="ds_main_item1_clcj" columnid="basespclcd"/>
  498. <BindItem id="item7" compid="grp_spcl.tar_spclspec" propid="value" datasetid="ds_main_item1_clcj" columnid="spclspec"/>
  499. <BindItem id="item8" compid="grp_spcl.opt_spclformat" propid="value" datasetid="ds_main_item1_clcj" columnid="remfact"/>
  500. </Bind>
  501. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  502. * System Name :
  503. * Job Name :
  504. * Creator :
  505. * Make Date : 2015-05-01
  506. * Description :
  507. *---------------------------------------------------------------------------------------
  508. * Modify Date Modifier Modify Description
  509. *---------------------------------------------------------------------------------------
  510. * 2015-05-01 Live Converter TF->XP
  511. *
  512. *---------------------------------------------------------------------------------------
  513. ****************************************************************************************/
  514. include "com_commonxp::comm_main.xjs";
  515. function SPPID21400_oninit(obj:Form, e:InitEventInfo)
  516. {
  517. frmf_initForm(obj);
  518. }
  519. function SPPID21400_onload(obj:Form, e:LoadEventInfo)
  520. {
  521. grdf_initGrid(grd_outunexecprcp);
  522. grdf_initGrid(grd_outunexecprcpord);
  523. grdf_setRowTypeIcon(grd_outunexecprcpord, 1);
  524. if (frmf_checkOpener())
  525. {
  526. if(sPid)
  527. {
  528. ds_send.setColumn(0, "pid", sPid);
  529. ds_send.setColumn(0, "chk", sChk);
  530. }
  531. }
  532. fInitialize();
  533. var ipt_pid = ds_send.getColumn(0, "pid");
  534. if (ipt_pid)
  535. {
  536. ds_hidden_sppmc02500_cond.setColumn(0, "srchcond", "1");
  537. ds_hidden_sppmc02500_cond.setColumn(0, "pid", ipt_pid);
  538. ds_hidden_sppmc02500_cond.setColumn(0, "autoflag", "Y");
  539. //model.makeNode("root/main/popupendflag");
  540. var oParam = {};
  541. oParam.id = "TRPID21403";
  542. oParam.service = "aftjudgapp.OutUnExecOrd";
  543. oParam.method = "reqGetPatInfo";
  544. oParam.inds = "req=ds_hidden_sppmc02500_cond";
  545. oParam.outds = "ds_hidden_rcv_patInfo=patInfo";
  546. oParam.async = false;
  547. oParam.callback = "cf_TRPID21403";
  548. tranf_submit(oParam);
  549. }
  550. else
  551. {
  552. ds_hidden_sppmc02500_cond.clearData();
  553. ds_hidden_sppmc02500_cond.addRow();
  554. }
  555. }
  556. function cf_TRPID21403(sSvcId, nErrorCode, sErrorMsg)
  557. {
  558. if(nErrorCode < 0) return;
  559. else
  560. {
  561. var patInfocnt = ds_hidden_rcv_patInfo.rowcount;
  562. if (patInfocnt == 1)
  563. {
  564. ds_send.setColumn(0, "patnm", ds_hidden_rcv_patInfo.getColumn(0, "patnm"));
  565. grp_sea_btn_srch_onclick();
  566. }
  567. else if (patInfocnt > 1)
  568. {
  569. fOJBaseInfoRef();
  570. }
  571. }
  572. }
  573. function fInitialize()
  574. {
  575. var arrParam = [{dsNm: "ds_init_P0117list", cdGrpId: "P0117"}]
  576. appf_getCodeList(arrParam);
  577. ds_init_P0117list.insertRow(0);
  578. ds_main_grd1_unexeclist.clearData();
  579. ds_main_grd2_unexecordlist.clearData();
  580. ds_main_item1_clcj.clearData();
  581. }
  582. function grp_sea_btn_srch_onclick(obj:Button, e:ClickEventInfo)
  583. {
  584. fSrchUnexecOrdList();
  585. }
  586. function fOJBaseInfoRef()
  587. {
  588. var objArg = new Object();
  589. objArg.arg_ds_send= ds_hidden_sppmc02500_cond;
  590. frmf_open("SPPMC02500", "SPPMC02500", objArg, "", "", "", "", "", "", "", "", "", "M");
  591. if(ds_main.getColumn(0, "popupendflag") == "ok")
  592. {
  593. ds_send.setColumn(0, "pid", ds_patinfolist.getColumn(0, "pid"));
  594. ds_send.setColumn(0, "patnm", ds_patinfolist.getColumn(0, "patnm"));
  595. }
  596. ds_hidden_sppmc02500_cond.setColumn(0, "autoflag", "");
  597. ds_patinfolist.clearData();
  598. }
  599. function fSrchUnexecOrdList()
  600. {
  601. if(grp_sea.chk_execdd.value == false)
  602. {
  603. ds_send.setColumn(0, "chk2", "");
  604. }
  605. if(grp_sea.chk_otherdept.value == false)
  606. {
  607. ds_send.setColumn(0, "chk", "");
  608. }
  609. grp_spcl.visible = false;
  610. ds_main_grd1_unexeclist.clearData();
  611. ds_main_grd2_unexecordlist.clearData();
  612. ds_send_delclcj_clcj.clearData();
  613. ds_send_insclcj_clcj.clearData();
  614. var oParam = {};
  615. oParam.id = "TRPID21401";
  616. oParam.service = "aftjudgapp.OutUnExecOrd";
  617. oParam.method = "reqGetOutUnExecPrcpRef";
  618. oParam.inds = "req=ds_send";
  619. oParam.outds = "ds_main_grd1_unexeclist=unexeclist";
  620. oParam.async = false;
  621. oParam.callback = "cf_TRPID21401";
  622. tranf_submit(oParam);
  623. }
  624. function cf_TRPID21401(sSvcId, nErrorCode, sErrorMsg)
  625. {
  626. if(nErrorCode < 0)
  627. {
  628. return;
  629. }
  630. else
  631. {
  632. var unexeclistcnt = ds_main_grd1_unexeclist.rowcount;
  633. if (unexeclistcnt >= 1)
  634. {
  635. grp_spcl.visible = false;
  636. ds_send.setColumn(0, "pid", ds_main_grd1_unexeclist.getColumn(0, "pid"));
  637. ds_send.setColumn(0, "orddd", ds_main_grd1_unexeclist.getColumn(0, "orddd"));
  638. ds_send.setColumn(0, "prcphopedd", ds_main_grd1_unexeclist.getColumn(0, "prcphopedd"));
  639. ds_send.setColumn(0, "orddeptcd", ds_main_grd1_unexeclist.getColumn(0, "orddeptcd"));
  640. ds_send.setColumn(0, "orddrid", ds_main_grd1_unexeclist.getColumn(0, "orddrid"));
  641. ds_send.setColumn(0, "insukind", ds_main_grd1_unexeclist.getColumn(0, "insukind"));
  642. ds_send.setColumn(0, "cretno", ds_main_grd1_unexeclist.getColumn(0, "cretno"));
  643. var oParam = {};
  644. oParam.id = "TRPID21402";
  645. oParam.service = "aftjudgapp.OutUnExecOrd";
  646. oParam.method = "reqGetOutUnExecPrcpOrdRef";
  647. oParam.inds = "req=ds_send";
  648. oParam.outds = "ds_main_grd2_unexecordlist=unexecordlist";
  649. oParam.async = false;
  650. //oParam.callback = "cf_TRPID21402";
  651. tranf_submit(oParam);
  652. ds_main_grd2_unexecordlist.updatecontrol = false;
  653. dsf_setDefaultVal(ds_main_grd2_unexecordlist, "spclchange:0");
  654. ds_main_grd2_unexecordlist.updatecontrol = true;
  655. var judgend = ds_main_grd2_unexecordlist.getColumn(0, "judgendflag");
  656. if (judgend == "Y")
  657. {
  658. btn_judgend.visible = false;
  659. btn_judgcancel.visible = true;
  660. }
  661. else
  662. {
  663. btn_judgend.visible = true;
  664. btn_judgcancel.visible = false;
  665. }
  666. }
  667. }
  668. }
  669. function grp_sea_inp_pid_onkeydown(obj:Edit, e:KeyEventInfo)
  670. {
  671. if(e.keycode == 13)
  672. {
  673. obj.updateToDataset();
  674. ds_hidden_sppmc02500_cond.setColumn(0, "autoflag", "Y");
  675. grp_sea_btn_srch_onclick();
  676. }
  677. }
  678. function grp_sea_btn_srchpid_onclick(obj:Button, e:ClickEventInfo)
  679. {
  680. var autoflag = ds_hidden_sppmc02500_cond.getColumn(0, "autoflag");
  681. if (utlf_isNull(autoflag))
  682. {
  683. ds_hidden_sppmc02500_cond.setColumn(0, "autoflag", "N");
  684. }
  685. ds_hidden_sppmc02500_cond.setColumn(0, "srchcond", "1");
  686. ds_hidden_sppmc02500_cond.setColumn(0, "pid", ds_send.getColumn(0, "pid"));
  687. fOJBaseInfoRef();
  688. }
  689. function grp_sea_chk_otherdept_onclick(obj:CheckBox, e:ClickEventInfo)
  690. {
  691. fSrchUnexecOrdList();
  692. }
  693. function grp_sea_chk_execdd_onclick(obj:CheckBox, e:ClickEventInfo)
  694. {
  695. fSrchUnexecOrdList();
  696. }
  697. function grd_outunexecprcp_oncellclick(obj:Grid, e:GridClickEventInfo)
  698. {
  699. if(e.row > -1)
  700. {
  701. grp_spcl.visible = false; // 특정내역 상세용 Group
  702. var row = e.row;
  703. ds_send.setColumn(0, "pid", ds_main_grd1_unexeclist.getColumn(row, "pid"));
  704. ds_send.setColumn(0, "orddd", ds_main_grd1_unexeclist.getColumn(row, "orddd"));
  705. ds_send.setColumn(0, "prcphopedd", ds_main_grd1_unexeclist.getColumn(row, "prcphopedd"));
  706. ds_send.setColumn(0, "orddeptcd", ds_main_grd1_unexeclist.getColumn(row, "orddeptcd"));
  707. ds_send.setColumn(0, "orddrid", ds_main_grd1_unexeclist.getColumn(row, "orddrid"));
  708. ds_send.setColumn(0, "insukind", ds_main_grd1_unexeclist.getColumn(row, "insukind"));
  709. ds_send.setColumn(0, "cretno", ds_main_grd1_unexeclist.getColumn(row, "cretno"));
  710. var oParam = {};
  711. oParam.id = "TRPID21402";
  712. oParam.service = "aftjudgapp.OutUnExecOrd";
  713. oParam.method = "reqGetOutUnExecPrcpOrdRef";
  714. oParam.inds = "req=ds_send";
  715. oParam.outds = "ds_main_grd2_unexecordlist=unexecordlist";
  716. oParam.async = false;
  717. //oParam.callback = "cf_TRPID21402";
  718. tranf_submit(oParam);
  719. var judgend = ds_main_grd2_unexecordlist.getColumn(0, "judgendflag");
  720. if (judgend == "Y")
  721. {
  722. btn_judgend.visible = false;
  723. btn_judgcancel.visible = true;
  724. }
  725. else
  726. {
  727. btn_judgend.visible = true;
  728. btn_judgcancel.visible = false;
  729. }
  730. }
  731. }
  732. function grd_outunexecprcpord_oncellclick(obj:Grid, e:GridClickEventInfo)
  733. {
  734. if(e.row > -1)
  735. {
  736. if (e.col == grd_outunexecprcpord.getBindCellIndex("Body", "diagyn"))
  737. {
  738. var row = e.row;
  739. var rows = ds_main_grd2_unexecordlist.rowcount;
  740. dsf_makeValue(ds_send_diag, "pid", "string", ds_main_grd2_unexecordlist.getColumn(row, "pid"), 0);
  741. dsf_makeValue(ds_send_diag, "orddd", "string", ds_main_grd2_unexecordlist.getColumn(row, "orddd"), 0);
  742. dsf_makeValue(ds_send_diag, "cretno", "string", ds_main_grd2_unexecordlist.getColumn(row, "cretno"), 0);
  743. dsf_makeValue(ds_send_diag, "ioflag", "string", ds_main_grd2_unexecordlist.getColumn(row, "ioflag"), 0);
  744. dsf_makeValue(ds_send_diag, "deptcd", "string", ds_main_grd2_unexecordlist.getColumn(row, "orddeptcd"), 0);
  745. dsf_makeValue(ds_send_diag, "instcd", "string", ds_main_grd2_unexecordlist.getColumn(row, "instcd"), 0);
  746. dsf_makeValue(ds_send_diag, "insukind", "string", ds_main_grd2_unexecordlist.getColumn(row, "insukind"), 0);
  747. dsf_makeValue(ds_send_diag, "continueyn", "string", ds_main_grd1_unexeclist.getColumn(ds_main_grd1_unexeclist.rowposition, "continueyn"), 0);
  748. dsf_makeValue(ds_send_diag, "fstacptdt", "string", ds_main_grd1_unexeclist.getColumn(ds_main_grd1_unexeclist.rowposition, "fstacptdt"), 0);
  749. dsf_makeValue(ds_send_diag, "row", "string", rows, 0);
  750. var objArg = new Object();
  751. objArg.arg_ds_send= ds_send_diag;
  752. frmf_open("SPPID21500", "SPPID21500", objArg, "", "", "", "", "", "", "", "", "", "M");
  753. }
  754. else if (e.col == grd_outunexecprcpord.getBindCellIndex("Body", "spclcd") || e.col == grd_outunexecprcpord.getBindCellIndex("Body", "spclspec"))
  755. {
  756. ds_main_item1_clcj.clearData();
  757. ds_main_item1_clcj.addRow();
  758. var row = e.row;
  759. var hosinhosoutflag = ds_main_grd2_unexecordlist.getColumn(row, "hosinhosoutflag");
  760. if (hosinhosoutflag == "O")
  761. {
  762. return;
  763. }
  764. var spclcd = ds_main_grd2_unexecordlist.getColumn(row, "spclcd");
  765. ds_main_item1_clcj.setColumn(0, "row", row);
  766. ds_main_item1_clcj.setColumn(0, "edicd", ds_main_grd2_unexecordlist.getColumn(row, "edicd"));
  767. ds_main_item1_clcj.setColumn(0, "edicdflag", ds_main_grd2_unexecordlist.getColumn(row, "edicdflag"));
  768. if (utlf_isNull(spclcd))
  769. {
  770. ds_main_item1_clcj.setColumn(0, "spclcd", "JX999");
  771. var index = 41;
  772. if (ds_main_item1_clcj.getColumn(0, "edilnno"))
  773. {
  774. index = index + 24;
  775. }
  776. else
  777. {
  778. index = index + 1; // combo 의 index 는 0 부터 시작하지만, init data 순서는 1부터 시작하므로
  779. }
  780. //var format = ds_init_P0117list.getColumn(index, "cdval");
  781. //ds_main_item1_clcj.setColumn(0, "remfact", format);
  782. ds_main_item1_clcj.setColumn(0, "spclmemoflag", "E");
  783. var spclcd = ds_main_item1_clcj.getColumn(0, "spclcd");
  784. }
  785. else
  786. {
  787. ds_main_item1_clcj.setColumn(0, "spclcd", spclcd);
  788. ds_main_item1_clcj.setColumn(0, "remfact", ds_main_grd2_unexecordlist.getColumn(row, "remfact"));
  789. ds_main_item1_clcj.setColumn(0, "spclspec", ds_main_grd2_unexecordlist.getColumn(row, "spclspec"));
  790. ds_main_item1_clcj.setColumn(0, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(row, "spclmemoflag"));
  791. }
  792. ds_main_item1_clcj.setColumn(0, "basespclcd", "JX999");
  793. grp_spcl.visible = true;
  794. }
  795. }
  796. }
  797. function btn_payflag_onclick(obj:Button, e:ClickEventInfo)
  798. {
  799. var updtdata = grdf_getGridUpdateData(grd_outunexecprcpord).rowcount;
  800. if (updtdata != 0)
  801. {
  802. var oParam = {};
  803. oParam.id = "TXPID21403";
  804. oParam.service = "aftjudgapp.OutUnExecOrd";
  805. oParam.method = "reqSetOrdPayFlag";
  806. oParam.inds = "oprc=ds_main_grd2_unexecordlist";
  807. oParam.outds = "";
  808. oParam.async = false;
  809. //oParam.callback = "cf_TXPID21403";
  810. tranf_submit(oParam);
  811. }
  812. else
  813. {
  814. sysf_messageBox("변경된 데이터가","I004"); ///변경된 데이터가 없습니다.
  815. }
  816. //model.resetInstanceNode("/root/hidden/oprc");
  817. fSrchUnexecOrdList2();
  818. }
  819. function fSrchUnexecOrdList2()
  820. {
  821. grp_spcl.visible = false;
  822. ds_main_grd2_unexecordlist.clearData();
  823. var row = ds_main_grd1_unexeclist.rowposition;
  824. if(row < 0)
  825. {
  826. row = 0;
  827. }
  828. ds_send.setColumn(0, "pid", ds_main_grd1_unexeclist.getColumn(row, "pid"));
  829. ds_send.setColumn(0, "orddd", ds_main_grd1_unexeclist.getColumn(row, "orddd"));
  830. ds_send.setColumn(0, "prcphopedd", ds_main_grd1_unexeclist.getColumn(row, "prcphopedd"));
  831. ds_send.setColumn(0, "orddeptcd", ds_main_grd1_unexeclist.getColumn(row, "orddeptcd"));
  832. ds_send.setColumn(0, "orddrid", ds_main_grd1_unexeclist.getColumn(row, "orddrid"));
  833. ds_send.setColumn(0, "insukind", ds_main_grd1_unexeclist.getColumn(row, "insukind"));
  834. ds_send.setColumn(0, "cretno", ds_main_grd1_unexeclist.getColumn(row, "cretno"));
  835. var oParam = {};
  836. oParam.id = "TRPID21402";
  837. oParam.service = "aftjudgapp.OutUnExecOrd";
  838. oParam.method = "reqGetOutUnExecPrcpOrdRef";
  839. oParam.inds = "req=ds_send";
  840. oParam.outds = "ds_main_grd2_unexecordlist=unexecordlist";
  841. oParam.async = false;
  842. //oParam.callback = "cf_TRPID21402";
  843. tranf_submit(oParam);
  844. var judgend = ds_main_grd2_unexecordlist.getColumn(0, "judgendflag");
  845. if (judgend == "Y")
  846. {
  847. btn_judgend.visible = false;
  848. btn_judgcancel.visible = true;
  849. }
  850. else
  851. {
  852. btn_judgend.visible = true;
  853. btn_judgcancel.visible = false;
  854. }
  855. }
  856. function button3_onclick(obj:Button, e:ClickEventInfo)
  857. {
  858. grdf_exportExcel(grd_outunexecprcpord, "미시행오더", "sheet1", "바탕 화면");
  859. }
  860. function btn_judgend_onclick(obj:Button, e:ClickEventInfo)
  861. {
  862. var rows = ds_main_grd2_unexecordlist.rowcount;
  863. if (rows > 0 )
  864. {
  865. if (grp_spcl.visible == true)
  866. {
  867. var ans = sysf_messageBox("특정내역 수정 사항을 적용하여 저장", "S001");
  868. if (ans == 6)
  869. {
  870. grp_spcl_grp_btn_btn_confirm_onclick();
  871. }
  872. else
  873. {
  874. grp_spcl.visible = false;
  875. if (ans == 2)
  876. {
  877. return;
  878. }
  879. }
  880. }
  881. ds_send_delclcj_clcj.clearData();
  882. ds_send_insclcj_clcj.clearData();
  883. var updateData = grdf_getGridUpdateData(grd_outunexecprcpord).rowcount;
  884. if (updateData != 0)
  885. {
  886. var delCnt = 0;
  887. var insCnt = 0;
  888. for (var i = 0; i < ds_main_grd2_unexecordlist.rowcount; i++)
  889. {
  890. var pid = ds_main_grd2_unexecordlist.getColumn(i, "pid");
  891. var orddd = ds_main_grd2_unexecordlist.getColumn(i, "orddd");
  892. var cretno = ds_main_grd2_unexecordlist.getColumn(i, "cretno");
  893. var seqno = ds_main_grd2_unexecordlist.getColumn(i, "seqno");
  894. var spclchange = ds_main_grd2_unexecordlist.getColumn(i, "spclchange");
  895. var prcpdd = ds_main_grd2_unexecordlist.getColumn(i, "prcpdd");
  896. var prcpno = ds_main_grd2_unexecordlist.getColumn(i, "prcpno");
  897. var prcphistno = ds_main_grd2_unexecordlist.getColumn(i, "prcphistno");
  898. var execprcpseqno = ds_main_grd2_unexecordlist.getColumn(i, "execprcpseqno");
  899. var grupsnglyn = ds_main_grd2_unexecordlist.getColumn(i, "grupsnglyn");
  900. var calcscorcd = ds_main_grd2_unexecordlist.getColumn(i, "calcscorcd");
  901. var edicd = ds_main_grd2_unexecordlist.getColumn(i, "edicd");
  902. var spclcd = ds_main_grd2_unexecordlist.getColumn(i, "spclcd");
  903. if (spclchange == "2" || spclchange == "4")
  904. {
  905. delCnt = ds_send_delclcj_clcj.addRow();
  906. ds_send_delclcj_clcj.setColumn(delCnt, "delpid", pid);
  907. ds_send_delclcj_clcj.setColumn(delCnt, "delorddd", orddd);
  908. ds_send_delclcj_clcj.setColumn(delCnt, "delcretno", cretno);
  909. ds_send_delclcj_clcj.setColumn(delCnt, "deledicd", edicd);
  910. ds_send_delclcj_clcj.setColumn(delCnt, "delspclcd", spclcd);
  911. }
  912. if (!utlf_isNull(spclchange) && spclchange != "0" && spclchange != "4")
  913. {
  914. var spclcd = ds_main_grd2_unexecordlist.getColumn(i, "spclcd");
  915. var spclspec = ds_main_grd2_unexecordlist.getColumn(i, "spclspec");
  916. if (spclcd == "JX999" || spclcd == "MX999")
  917. {
  918. var iSpclCdTotLength = utlf_getStringLength(spclspec);
  919. var insCharTotCnt = 0; // 특정내역으로 잘라진 총 글자 수
  920. if (iSpclCdTotLength > 350)
  921. {
  922. var iLen = 0; // 특정내역 길이가 700 byte가 되었는지 계산
  923. var iStartInx = 0; // 특정내역 시작 index
  924. var iCharCnt = 0; // 몇글자로 구성되는지 계산
  925. for (var j = 0; j < String(spclspec).length; j++)
  926. {
  927. var sBit = spclspec.charAt(j);
  928. iCharCnt++;
  929. if (escape(sBit).length > 4)
  930. {
  931. iLen = iLen + 2;
  932. }
  933. else
  934. {
  935. iLen = iLen + 1;
  936. }
  937. if (iLen == 350 || iLen > 350)
  938. {
  939. insCnt = ds_send_insclcj_clcj.addRow();
  940. if (iLen == 350)
  941. {
  942. ds_send_insclcj_clcj.setColumn(insCnt, "prcpdd", prcpdd);
  943. ds_send_insclcj_clcj.setColumn(insCnt, "prcpno", prcpno);
  944. ds_send_insclcj_clcj.setColumn(insCnt, "prcphistno", prcphistno);
  945. ds_send_insclcj_clcj.setColumn(insCnt, "execprcpseqno", execprcpseqno);
  946. ds_send_insclcj_clcj.setColumn(insCnt, "grupsnglyn", grupsnglyn);
  947. ds_send_insclcj_clcj.setColumn(insCnt, "calcscorcd", calcscorcd);
  948. ds_send_insclcj_clcj.setColumn(insCnt, "inspid", pid);
  949. ds_send_insclcj_clcj.setColumn(insCnt, "insorddd", orddd);
  950. ds_send_insclcj_clcj.setColumn(insCnt, "inscretno", cretno);
  951. ds_send_insclcj_clcj.setColumn(insCnt, "unitflag", ds_main_grd2_unexecordlist.getColumn(i, "unitflag"));
  952. ds_send_insclcj_clcj.setColumn(insCnt, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(i, "spclmemoflag"));
  953. ds_send_insclcj_clcj.setColumn(insCnt, "edicd", ds_main_grd2_unexecordlist.getColumn(i, "edicd"));
  954. ds_send_insclcj_clcj.setColumn(insCnt, "spclcd", spclcd);
  955. ds_send_insclcj_clcj.setColumn(insCnt, "spclspec", String(spclspec).substr(iStartInx, iCharCnt));
  956. ds_send_insclcj_clcj.setColumn(insCnt, "remfact", ds_main_grd2_unexecordlist.getColumn(i, "remfact"));
  957. iStartInx += iCharCnt;
  958. insCharTotCnt += 350;
  959. }
  960. else if (iLen > 350)
  961. {
  962. ds_send_insclcj_clcj.setColumn(insCnt, "prcpdd", prcpdd);
  963. ds_send_insclcj_clcj.setColumn(insCnt, "prcpno", prcpno);
  964. ds_send_insclcj_clcj.setColumn(insCnt, "prcphistno", prcphistno);
  965. ds_send_insclcj_clcj.setColumn(insCnt, "execprcpseqno", execprcpseqno);
  966. ds_send_insclcj_clcj.setColumn(insCnt, "grupsnglyn", grupsnglyn);
  967. ds_send_insclcj_clcj.setColumn(insCnt, "calcscorcd", calcscorcd);
  968. ds_send_insclcj_clcj.setColumn(insCnt, "inspid", pid);
  969. ds_send_insclcj_clcj.setColumn(insCnt, "insorddd", orddd);
  970. ds_send_insclcj_clcj.setColumn(insCnt, "inscretno", cretno);
  971. ds_send_insclcj_clcj.setColumn(insCnt, "unitflag", ds_main_grd2_unexecordlist.getColumn(i, "unitflag"));
  972. ds_send_insclcj_clcj.setColumn(insCnt, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(i, "spclmemoflag"));
  973. ds_send_insclcj_clcj.setColumn(insCnt, "edicd", ds_main_grd2_unexecordlist.getColumn(i, "edicd"));
  974. ds_send_insclcj_clcj.setColumn(insCnt, "spclcd", spclcd);
  975. ds_send_insclcj_clcj.setColumn(insCnt, "spclspec", String(spclspec).substr(iStartInx, iCharCnt-1));
  976. ds_send_insclcj_clcj.setColumn(insCnt, "remfact", ds_main_grd2_unexecordlist.getColumn(i, "remfact"));
  977. iStartInx += (iCharCnt - 1);
  978. j--;
  979. insCharTotCnt += 349;
  980. }
  981. iCharCnt = 0;
  982. iLen = 0;
  983. }
  984. }
  985. if (iSpclCdTotLength != insCharTotCnt)
  986. {
  987. insCnt = ds_send_insclcj_clcj.addRow();
  988. ds_send_insclcj_clcj.setColumn(insCnt, "prcpdd", prcpdd);
  989. ds_send_insclcj_clcj.setColumn(insCnt, "prcpno", prcpno);
  990. ds_send_insclcj_clcj.setColumn(insCnt, "prcphistno", prcphistno);
  991. ds_send_insclcj_clcj.setColumn(insCnt, "execprcpseqno", execprcpseqno);
  992. ds_send_insclcj_clcj.setColumn(insCnt, "grupsnglyn", grupsnglyn);
  993. ds_send_insclcj_clcj.setColumn(insCnt, "calcscorcd", calcscorcd);
  994. ds_send_insclcj_clcj.setColumn(insCnt, "inspid", pid);
  995. ds_send_insclcj_clcj.setColumn(insCnt, "insorddd", orddd);
  996. ds_send_insclcj_clcj.setColumn(insCnt, "inscretno", cretno);
  997. ds_send_insclcj_clcj.setColumn(insCnt, "unitflag", ds_main_grd2_unexecordlist.getColumn(i, "unitflag"));
  998. ds_send_insclcj_clcj.setColumn(insCnt, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(i, "spclmemoflag"));
  999. ds_send_insclcj_clcj.setColumn(insCnt, "edicd", ds_main_grd2_unexecordlist.getColumn(i, "edicd"));
  1000. ds_send_insclcj_clcj.setColumn(insCnt, "spclcd", spclcd);
  1001. ds_send_insclcj_clcj.setColumn(insCnt, "spclspec", String(spclspec).substr(iStartInx, String(spclspec).length));
  1002. ds_send_insclcj_clcj.setColumn(insCnt, "remfact", ds_main_grd2_unexecordlist.getColumn(i, "remfact"));
  1003. }
  1004. }
  1005. else
  1006. {
  1007. insCnt = ds_send_insclcj_clcj.addRow();
  1008. ds_send_insclcj_clcj.setColumn(insCnt, "prcpdd", prcpdd);
  1009. ds_send_insclcj_clcj.setColumn(insCnt, "prcpno", prcpno);
  1010. ds_send_insclcj_clcj.setColumn(insCnt, "prcphistno", prcphistno);
  1011. ds_send_insclcj_clcj.setColumn(insCnt, "execprcpseqno", execprcpseqno);
  1012. ds_send_insclcj_clcj.setColumn(insCnt, "grupsnglyn", grupsnglyn);
  1013. ds_send_insclcj_clcj.setColumn(insCnt, "calcscorcd", calcscorcd);
  1014. ds_send_insclcj_clcj.setColumn(insCnt, "inspid", pid);
  1015. ds_send_insclcj_clcj.setColumn(insCnt, "insorddd", orddd);
  1016. ds_send_insclcj_clcj.setColumn(insCnt, "inscretno", cretno);
  1017. ds_send_insclcj_clcj.setColumn(insCnt, "unitflag", ds_main_grd2_unexecordlist.getColumn(i, "unitflag"));
  1018. ds_send_insclcj_clcj.setColumn(insCnt, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(i, "spclmemoflag"));
  1019. ds_send_insclcj_clcj.setColumn(insCnt, "edicd", ds_main_grd2_unexecordlist.getColumn(i, "edicd"));
  1020. ds_send_insclcj_clcj.setColumn(insCnt, "spclcd", spclcd);
  1021. ds_send_insclcj_clcj.setColumn(insCnt, "spclspec", spclspec);
  1022. ds_send_insclcj_clcj.setColumn(insCnt, "remfact", ds_main_grd2_unexecordlist.getColumn(i, "remfact"));
  1023. }
  1024. }
  1025. else
  1026. {
  1027. insCnt = ds_send_insclcj_clcj.addRow();
  1028. ds_send_insclcj_clcj.setColumn(insCnt, "prcpdd", prcpdd);
  1029. ds_send_insclcj_clcj.setColumn(insCnt, "prcpno", prcpno);
  1030. ds_send_insclcj_clcj.setColumn(insCnt, "prcphistno", prcphistno);
  1031. ds_send_insclcj_clcj.setColumn(insCnt, "execprcpseqno", execprcpseqno);
  1032. ds_send_insclcj_clcj.setColumn(insCnt, "grupsnglyn", grupsnglyn);
  1033. ds_send_insclcj_clcj.setColumn(insCnt, "calcscorcd", calcscorcd);
  1034. ds_send_insclcj_clcj.setColumn(insCnt, "inspid", pid);
  1035. ds_send_insclcj_clcj.setColumn(insCnt, "insorddd", orddd);
  1036. ds_send_insclcj_clcj.setColumn(insCnt, "inscretno", cretno);
  1037. ds_send_insclcj_clcj.setColumn(insCnt, "unitflag", ds_main_grd2_unexecordlist.getColumn(i, "unitflag"));
  1038. ds_send_insclcj_clcj.setColumn(insCnt, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(i, "spclmemoflag"));
  1039. ds_send_insclcj_clcj.setColumn(insCnt, "edicd", ds_main_grd2_unexecordlist.getColumn(i, "edicd"));
  1040. ds_send_insclcj_clcj.setColumn(insCnt, "spclcd", spclcd);
  1041. ds_send_insclcj_clcj.setColumn(insCnt, "spclspec", spclspec);
  1042. ds_send_insclcj_clcj.setColumn(insCnt, "remfact", ds_main_grd2_unexecordlist.getColumn(i, "remfact"));
  1043. }
  1044. }
  1045. }
  1046. dsf_setDefaultVal(ds_send_insclcj_clcj, "prcpdd:-,prcpno:0,prcphistno:0,execprcpseqno:0,unitflag:-,spclmemoflag:-,edicd:-,edicdflag:-,spclcd:-,spclspec:-,remfact:-");
  1047. var oParam = {};
  1048. oParam.id = "TXPID21401";
  1049. oParam.service = "aftjudgapp.OutUnExecOrd";
  1050. oParam.method = "reqExeOutClcj";
  1051. oParam.inds = "delclcj=ds_send_delclcj_clcj insclcj=ds_send_insclcj_clcj payflag=ds_send_payflag_list req=ds_send";
  1052. oParam.outds = "";
  1053. oParam.async = false;
  1054. //oParam.callback = "cf_TXPID21401";
  1055. tranf_submit(oParam);
  1056. }
  1057. for (var i = 0; i < rows; i++)
  1058. {
  1059. ds_main_grd2_unexecordlist.setColumn(i, "judgendflag", "Y");
  1060. ds_main_grd2_unexecordlist.setRowType(i, "u");
  1061. }
  1062. var updateData = grdf_getGridUpdateData(grd_outunexecprcpord).rowcount;
  1063. if (updateData != 0)
  1064. {
  1065. var oParam = {};
  1066. oParam.id = "TXPID21402";
  1067. oParam.service = "aftjudgapp.OutUnExecOrd";
  1068. oParam.method = "reqSetJudgEnd";
  1069. oParam.inds = "req=ds_send datalist=ds_main_grd2_unexecordlist:U";
  1070. oParam.outds = "ds_main_grd2_unexecordlist=unexecordlist";
  1071. oParam.async = false;
  1072. //oParam.callback = "cf_TXPID21402";
  1073. tranf_submit(oParam);
  1074. }
  1075. fSrchUnexecOrdList2();
  1076. }
  1077. }
  1078. function btn_init_onclick(obj:Button, e:ClickEventInfo)
  1079. {
  1080. ds_main_grd1_unexeclist.clearData();
  1081. ds_main_grd2_unexecordlist.clearData();
  1082. ds_send.clearData();
  1083. ds_send.addRow();
  1084. ds_main_item1_clcj.clearData();
  1085. }
  1086. function grp_spcl_grp_btn_btn_confirm_onclick(obj:Button, e:ClickEventInfo)
  1087. {
  1088. var spclcd = ds_main_item1_clcj.getColumn(0, "spclcd");
  1089. var row = ds_main_item1_clcj.getColumn(0, "row");
  1090. var flag = ds_main_grd2_unexecordlist.getColumn(row, "spclyn");
  1091. if (utlf_isNull(spclcd))
  1092. {
  1093. if (flag == "N")
  1094. {
  1095. ds_main_grd2_unexecordlist.setColumn(row, "spclcd", "");
  1096. ds_main_grd2_unexecordlist.setColumn(row, "spclspec", "");
  1097. ds_main_grd2_unexecordlist.setColumn(row, "remfact", "");
  1098. ds_main_grd2_unexecordlist.setColumn(row, "spclmemoflag", "");
  1099. ds_main_grd2_unexecordlist.setColumn(row, "spclchange", "0");
  1100. ds_main_grd2_unexecordlist.setRowType(row, "");
  1101. }
  1102. else
  1103. {
  1104. ds_main_grd2_unexecordlist.setColumn(row, "spclchange", "4");
  1105. ds_main_grd2_unexecordlist.setRowType(row, "d");
  1106. }
  1107. }
  1108. else
  1109. {
  1110. if (spclcd != "MX999" && spclcd != "JX999")
  1111. {
  1112. var spclspec = ds_main_item1_clcj.getColumn(0, "spclspec");
  1113. if (spclspec.isByteSize(1050) == false)
  1114. {
  1115. sysf_messageBox("특정내역 입력 제한길이(1050 Byte)를", "E003"); ///특정내역 입력 제한길이(1050 Byte)를 초과하였습니다
  1116. return;
  1117. }
  1118. }
  1119. ds_main_grd2_unexecordlist.setColumn(row, "spclcd", spclcd);
  1120. ds_main_grd2_unexecordlist.setColumn(row, "unitflag", String(spclcd).substr(0,1));
  1121. ds_main_grd2_unexecordlist.setColumn(row, "spclspec", ds_main_item1_clcj.getColumn(0, "spclspec"));
  1122. ds_main_grd2_unexecordlist.setColumn(row, "remfact", ds_main_item1_clcj.getColumn(0, "remfact"));
  1123. ds_main_grd2_unexecordlist.setColumn(row, "spclmemoflag", ds_main_item1_clcj.getColumn(0, "spclmemoflag"));
  1124. if (flag == "N")
  1125. {
  1126. ds_main_grd2_unexecordlist.setColumn(row, "spclchange", "1");
  1127. ds_main_grd2_unexecordlist.setRowType(row, "i");
  1128. }
  1129. else
  1130. {
  1131. ds_main_grd2_unexecordlist.setColumn(row, "spclchange", "2");
  1132. ds_main_grd2_unexecordlist.setRowType(row, "u");
  1133. }
  1134. }
  1135. grp_spcl.visible = false;
  1136. }
  1137. function grp_spcl_grp_btn_btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  1138. {
  1139. grp_spcl.visible = false;
  1140. }
  1141. function btn_close_onclick(obj:Button, e:ClickEventInfo)
  1142. {
  1143. this.close();
  1144. }
  1145. function grp_spcl_btn_delete_onclick(obj:Button, e:ClickEventInfo)
  1146. {
  1147. ds_main_item1_clcj.setColumn(0, "spclcd", "");
  1148. ds_main_item1_clcj.setColumn(0, "spclspec", "");
  1149. ds_main_item1_clcj.setColumn(0, "remfact", "");
  1150. ds_main_item1_clcj.setColumn(0, "spclmemoflag", "");
  1151. grp_spcl_grp_btn_btn_confirm_onclick();
  1152. }
  1153. function btn_save_onclick(obj:Button, e:ClickEventInfo)
  1154. {
  1155. if (grp_spcl.visible == true)
  1156. {
  1157. var ans = sysf_messageBox("특정내역 수정 사항을 적용하여 저장", "S001");
  1158. if (ans == 6)
  1159. {
  1160. grp_spcl_grp_btn_btn_confirm_onclick();
  1161. }
  1162. else
  1163. {
  1164. grp_spcl.visible = false;
  1165. if (ans == 2)
  1166. { // 2: 취소
  1167. return;
  1168. }
  1169. }
  1170. }
  1171. ds_send_delclcj_clcj.clearData();
  1172. ds_send_insclcj_clcj.clearData();
  1173. ds_send_payflag_list.clearData();
  1174. var updateyn = "N"; // 처방급비만 변경되어도 저장할 수 있어야 한다.
  1175. var payCnt = 0;
  1176. for (var i = 0; i < ds_main_grd2_unexecordlist.rowcount; i++)
  1177. {
  1178. var payflagyn = ds_main_grd2_unexecordlist.getColumn(i, "payflagyn");
  1179. if (payflagyn == "Y")
  1180. {
  1181. var prcpdd = ds_main_grd2_unexecordlist.getColumn(i, "prcpdd");
  1182. var prcpno = ds_main_grd2_unexecordlist.getColumn(i, "prcpno");
  1183. var prcphistno = ds_main_grd2_unexecordlist.getColumn(i, "prcphistno");
  1184. var payflagcd = ds_main_grd2_unexecordlist.getColumn(i, "payflagcd");
  1185. payCnt = ds_send_payflag_list.addRow();
  1186. ds_send_payflag_list.setColumn(payCnt, "payprcpdd", prcpdd);
  1187. ds_send_payflag_list.setColumn(payCnt, "payprcpno", prcpno);
  1188. ds_send_payflag_list.setColumn(payCnt, "payprcphistno", prcphistno);
  1189. ds_send_payflag_list.setColumn(payCnt, "paypayflagcd", payflagcd);
  1190. updateyn = "Y";
  1191. }
  1192. }
  1193. var updateData = grdf_getGridUpdateData(grd_outunexecprcpord).rowcount;
  1194. if (updateData != 0 || updateyn == "Y")
  1195. {
  1196. var delCnt = 0;
  1197. var insCnt = 0;
  1198. for (var i = 0; i < ds_main_grd2_unexecordlist.rowcount; i++)
  1199. {
  1200. var pid = ds_main_grd2_unexecordlist.getColumn(i, "pid");
  1201. var orddd = ds_main_grd2_unexecordlist.getColumn(i, "orddd");
  1202. var cretno = ds_main_grd2_unexecordlist.getColumn(i, "cretno");
  1203. var seqno = ds_main_grd2_unexecordlist.getColumn(i, "seqno");
  1204. var spclchange = ds_main_grd2_unexecordlist.getColumn(i, "spclchange");
  1205. var prcpdd = ds_main_grd2_unexecordlist.getColumn(i, "prcpdd");
  1206. var prcpno = ds_main_grd2_unexecordlist.getColumn(i, "prcpno");
  1207. var prcphistno = ds_main_grd2_unexecordlist.getColumn(i, "prcphistno");
  1208. var execprcpseqno = ds_main_grd2_unexecordlist.getColumn(i, "execprcpseqno");
  1209. var grupsnglyn = ds_main_grd2_unexecordlist.getColumn(i, "grupsnglyn");
  1210. var calcscorcd = ds_main_grd2_unexecordlist.getColumn(i, "calcscorcd");
  1211. var edicd = ds_main_grd2_unexecordlist.getColumn(i, "edicd");
  1212. var spclcd = ds_main_grd2_unexecordlist.getColumn(i, "spclcd");
  1213. var edicdflag = ds_main_grd2_unexecordlist.getColumn(i, "edicdflag");
  1214. if (spclchange == "2" || spclchange == "4")
  1215. {
  1216. delCnt = ds_send_delclcj_clcj.addRow();
  1217. ds_send_delclcj_clcj.setColumn(delCnt, "delpid", pid);
  1218. ds_send_delclcj_clcj.setColumn(delCnt, "delorddd", orddd);
  1219. ds_send_delclcj_clcj.setColumn(delCnt, "delcretno", cretno);
  1220. ds_send_delclcj_clcj.setColumn(delCnt, "deledicd", edicd);
  1221. ds_send_delclcj_clcj.setColumn(delCnt, "delspclcd", spclcd);
  1222. }
  1223. if (!utlf_isNull(spclchange) && spclchange != "0" && spclchange != "4")
  1224. {
  1225. var spclcd = ds_main_grd2_unexecordlist.getColumn(i, "spclcd");
  1226. var spclspec = ds_main_grd2_unexecordlist.getColumn(i, "spclspec");
  1227. if (spclcd == "JX999" || spclcd == "MX999")
  1228. {
  1229. var iSpclCdTotLength = utlf_getStringLength(spclspec);
  1230. var insCharTotCnt = 0;
  1231. if (iSpclCdTotLength > 350)
  1232. {
  1233. var iLen = 0; // 특정내역 길이가 700 byte가 되었는지 계산
  1234. var iStartInx = 0; // 특정내역 시작 index
  1235. var iCharCnt = 0; // 몇글자로 구성되는지 계산
  1236. for (var j = 0; j < spclspec.length; j++)
  1237. {
  1238. var sBit = spclspec.charAt(j);
  1239. iCharCnt++;
  1240. if (escape(sBit).length > 4)
  1241. {
  1242. iLen = iLen + 2;
  1243. }
  1244. else
  1245. {
  1246. iLen = iLen + 1;
  1247. }
  1248. if (iLen == 350 || iLen > 350)
  1249. {
  1250. insCnt = ds_send_insclcj_clcj.addRow();
  1251. if (iLen == 350)
  1252. {
  1253. ds_send_insclcj_clcj.setColumn(insCnt, "prcpdd", prcpdd);
  1254. ds_send_insclcj_clcj.setColumn(insCnt, "prcpno", prcpno);
  1255. ds_send_insclcj_clcj.setColumn(insCnt, "prcphistno", prcphistno);
  1256. ds_send_insclcj_clcj.setColumn(insCnt, "execprcpseqno", execprcpseqno);
  1257. ds_send_insclcj_clcj.setColumn(insCnt, "grupsnglyn", grupsnglyn);
  1258. ds_send_insclcj_clcj.setColumn(insCnt, "calcscorcd", calcscorcd);
  1259. ds_send_insclcj_clcj.setColumn(insCnt, "inspid", pid);
  1260. ds_send_insclcj_clcj.setColumn(insCnt, "insorddd", orddd);
  1261. ds_send_insclcj_clcj.setColumn(insCnt, "inscretno", cretno);
  1262. ds_send_insclcj_clcj.setColumn(insCnt, "unitflag", ds_main_grd2_unexecordlist.getColumn(i, "unitflag"));
  1263. ds_send_insclcj_clcj.setColumn(insCnt, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(i, "spclmemoflag"));
  1264. ds_send_insclcj_clcj.setColumn(insCnt, "edicd", ds_main_grd2_unexecordlist.getColumn(i, "edicd"));
  1265. ds_send_insclcj_clcj.setColumn(insCnt, "edicdflag", ds_main_grd2_unexecordlist.getColumn(i, "edicdflag"));
  1266. ds_send_insclcj_clcj.setColumn(insCnt, "spclcd", spclcd);
  1267. ds_send_insclcj_clcj.setColumn(insCnt, "spclspec", String(spclspec).substr(iStartInx, iCharCnt));
  1268. ds_send_insclcj_clcj.setColumn(insCnt, "remfact", ds_main_grd2_unexecordlist.getColumn(i, "remfact"));
  1269. iStartInx += iCharCnt;
  1270. insCharTotCnt += 350;
  1271. }
  1272. else if (iLen > 350)
  1273. {
  1274. ds_send_insclcj_clcj.setColumn(insCnt, "prcpdd", prcpdd);
  1275. ds_send_insclcj_clcj.setColumn(insCnt, "prcpno", prcpno);
  1276. ds_send_insclcj_clcj.setColumn(insCnt, "prcphistno", prcphistno);
  1277. ds_send_insclcj_clcj.setColumn(insCnt, "execprcpseqno", execprcpseqno);
  1278. ds_send_insclcj_clcj.setColumn(insCnt, "grupsnglyn", grupsnglyn);
  1279. ds_send_insclcj_clcj.setColumn(insCnt, "calcscorcd", calcscorcd);
  1280. ds_send_insclcj_clcj.setColumn(insCnt, "inspid", pid);
  1281. ds_send_insclcj_clcj.setColumn(insCnt, "insorddd", orddd);
  1282. ds_send_insclcj_clcj.setColumn(insCnt, "inscretno", cretno);
  1283. ds_send_insclcj_clcj.setColumn(insCnt, "unitflag", ds_main_grd2_unexecordlist.getColumn(i, "unitflag"));
  1284. ds_send_insclcj_clcj.setColumn(insCnt, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(i, "spclmemoflag"));
  1285. ds_send_insclcj_clcj.setColumn(insCnt, "edicd", ds_main_grd2_unexecordlist.getColumn(i, "edicd"));
  1286. ds_send_insclcj_clcj.setColumn(insCnt, "edicdflag", ds_main_grd2_unexecordlist.getColumn(i, "edicdflag"));
  1287. ds_send_insclcj_clcj.setColumn(insCnt, "spclcd", spclcd);
  1288. ds_send_insclcj_clcj.setColumn(insCnt, "spclspec", String(spclspec).substr(iStartInx, iCharCnt-1));
  1289. ds_send_insclcj_clcj.setColumn(insCnt, "remfact", ds_main_grd2_unexecordlist.getColumn(i, "remfact"));
  1290. iStartInx += (iCharCnt - 1);
  1291. j--;
  1292. insCharTotCnt += 349;
  1293. }
  1294. iCharCnt = 0;
  1295. iLen = 0;
  1296. }
  1297. }
  1298. if (iSpclCdTotLength != insCharTotCnt)
  1299. {
  1300. insCnt = ds_send_insclcj_clcj.addRow();
  1301. ds_send_insclcj_clcj.setColumn(insCnt, "prcpdd", prcpdd);
  1302. ds_send_insclcj_clcj.setColumn(insCnt, "prcpno", prcpno);
  1303. ds_send_insclcj_clcj.setColumn(insCnt, "prcphistno", prcphistno);
  1304. ds_send_insclcj_clcj.setColumn(insCnt, "execprcpseqno", execprcpseqno);
  1305. ds_send_insclcj_clcj.setColumn(insCnt, "grupsnglyn", grupsnglyn);
  1306. ds_send_insclcj_clcj.setColumn(insCnt, "calcscorcd", calcscorcd);
  1307. ds_send_insclcj_clcj.setColumn(insCnt, "inspid", pid);
  1308. ds_send_insclcj_clcj.setColumn(insCnt, "insorddd", orddd);
  1309. ds_send_insclcj_clcj.setColumn(insCnt, "inscretno", cretno);
  1310. ds_send_insclcj_clcj.setColumn(insCnt, "unitflag", ds_main_grd2_unexecordlist.getColumn(i, "unitflag"));
  1311. ds_send_insclcj_clcj.setColumn(insCnt, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(i, "spclmemoflag"));
  1312. ds_send_insclcj_clcj.setColumn(insCnt, "edicd", ds_main_grd2_unexecordlist.getColumn(i, "edicd"));
  1313. ds_send_insclcj_clcj.setColumn(insCnt, "edicdflag", ds_main_grd2_unexecordlist.getColumn(i, "edicdflag"));
  1314. ds_send_insclcj_clcj.setColumn(insCnt, "spclcd", spclcd);
  1315. ds_send_insclcj_clcj.setColumn(insCnt, "spclspec", String(spclspec).substr(iStartInx, String(spclspec).length));
  1316. ds_send_insclcj_clcj.setColumn(insCnt, "remfact", ds_main_grd2_unexecordlist.getColumn(i, "remfact"));
  1317. }
  1318. }
  1319. else
  1320. {
  1321. insCnt = ds_send_insclcj_clcj.addRow();
  1322. ds_send_insclcj_clcj.setColumn(insCnt, "prcpdd", prcpdd);
  1323. ds_send_insclcj_clcj.setColumn(insCnt, "prcpno", prcpno);
  1324. ds_send_insclcj_clcj.setColumn(insCnt, "prcphistno", prcphistno);
  1325. ds_send_insclcj_clcj.setColumn(insCnt, "execprcpseqno", execprcpseqno);
  1326. ds_send_insclcj_clcj.setColumn(insCnt, "grupsnglyn", grupsnglyn);
  1327. ds_send_insclcj_clcj.setColumn(insCnt, "calcscorcd", calcscorcd);
  1328. ds_send_insclcj_clcj.setColumn(insCnt, "inspid", pid);
  1329. ds_send_insclcj_clcj.setColumn(insCnt, "insorddd", orddd);
  1330. ds_send_insclcj_clcj.setColumn(insCnt, "inscretno", cretno);
  1331. ds_send_insclcj_clcj.setColumn(insCnt, "unitflag", ds_main_grd2_unexecordlist.getColumn(i, "unitflag"));
  1332. ds_send_insclcj_clcj.setColumn(insCnt, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(i, "spclmemoflag"));
  1333. ds_send_insclcj_clcj.setColumn(insCnt, "edicd", ds_main_grd2_unexecordlist.getColumn(i, "edicd"));
  1334. ds_send_insclcj_clcj.setColumn(insCnt, "edicdflag", ds_main_grd2_unexecordlist.getColumn(i, "edicdflag"));
  1335. ds_send_insclcj_clcj.setColumn(insCnt, "spclcd", spclcd);
  1336. ds_send_insclcj_clcj.setColumn(insCnt, "spclspec", spclspec);
  1337. ds_send_insclcj_clcj.setColumn(insCnt, "remfact", ds_main_grd2_unexecordlist.getColumn(i, "remfact"));
  1338. }
  1339. }
  1340. else
  1341. {
  1342. insCnt = ds_send_insclcj_clcj.addRow();
  1343. ds_send_insclcj_clcj.setColumn(insCnt, "prcpdd", prcpdd);
  1344. ds_send_insclcj_clcj.setColumn(insCnt, "prcpno", prcpno);
  1345. ds_send_insclcj_clcj.setColumn(insCnt, "prcphistno", prcphistno);
  1346. ds_send_insclcj_clcj.setColumn(insCnt, "execprcpseqno", execprcpseqno);
  1347. ds_send_insclcj_clcj.setColumn(insCnt, "grupsnglyn", grupsnglyn);
  1348. ds_send_insclcj_clcj.setColumn(insCnt, "calcscorcd", calcscorcd);
  1349. ds_send_insclcj_clcj.setColumn(insCnt, "inspid", pid);
  1350. ds_send_insclcj_clcj.setColumn(insCnt, "insorddd", orddd);
  1351. ds_send_insclcj_clcj.setColumn(insCnt, "inscretno", cretno);
  1352. ds_send_insclcj_clcj.setColumn(insCnt, "unitflag", ds_main_grd2_unexecordlist.getColumn(i, "unitflag"));
  1353. ds_send_insclcj_clcj.setColumn(insCnt, "spclmemoflag", ds_main_grd2_unexecordlist.getColumn(i, "spclmemoflag"));
  1354. ds_send_insclcj_clcj.setColumn(insCnt, "edicd", ds_main_grd2_unexecordlist.getColumn(i, "edicd"));
  1355. ds_send_insclcj_clcj.setColumn(insCnt, "edicdflag", ds_main_grd2_unexecordlist.getColumn(i, "edicdflag"));
  1356. ds_send_insclcj_clcj.setColumn(insCnt, "spclcd", spclcd);
  1357. ds_send_insclcj_clcj.setColumn(insCnt, "spclspec", spclspec);
  1358. ds_send_insclcj_clcj.setColumn(insCnt, "remfact", ds_main_grd2_unexecordlist.getColumn(i, "remfact"));
  1359. }
  1360. }
  1361. }
  1362. dsf_setDefaultVal(ds_send_insclcj_clcj, "prcpdd:-,prcpno:0,prcphistno:0,execprcpseqno:0,unitflag:-,spclmemoflag:-,edicd:-,edicdflag:-,spclcd:-,spclspec:-,remfact:-");
  1363. var oParam = {};
  1364. oParam.id = "TXPID21401";
  1365. oParam.service = "aftjudgapp.OutUnExecOrd";
  1366. oParam.method = "reqExeOutClcj";
  1367. oParam.inds = "delclcj=ds_send_delclcj_clcj insclcj=ds_send_insclcj_clcj payflag=ds_send_payflag_list req=ds_send";
  1368. oParam.outds = "";
  1369. oParam.async = false;
  1370. //oParam.callback = "cf_TXPID21401";
  1371. tranf_submit(oParam);
  1372. fSrchUnexecOrdList2();
  1373. }
  1374. else
  1375. {
  1376. sysf_messageBox("변경된 데이터가","I004"); ///변경된 데이터가 없습니다.
  1377. }
  1378. }
  1379. function grp_spcl_cmb_spclcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  1380. {
  1381. var index = grp_spcl.cmb_spclcd.index;
  1382. if (index == 0)
  1383. {
  1384. ds_main_item1_clcj.setColumn(0, "spclcd", "");
  1385. ds_main_item1_clcj.setColumn(0, "spclspec", "");
  1386. ds_main_item1_clcj.setColumn(0, "remfact", "");
  1387. ds_main_item1_clcj.setColumn(0, "spclmemoflag", "");
  1388. rdo_spclmemoflag.visible = false;
  1389. }
  1390. else
  1391. {
  1392. if (ds_main_item1_clcj.getColumn(0, "edilnno"))
  1393. {
  1394. index = index + 24;
  1395. }
  1396. else
  1397. {
  1398. index = index + 1; // combo 의 index 는 0 부터 시작하지만, init data 순서는 1부터 시작하므로
  1399. }
  1400. var format = ds_init_P0117list.getColumn(index, "cdval");
  1401. ds_main_item1_clcj.setColumn(0, "remfact", format);
  1402. ds_main_item1_clcj.setColumn(0, "spclmemoflag", "E");
  1403. var spclcd = ds_main_item1_clcj.getColumn(0, "spclcd");
  1404. }
  1405. }
  1406. function grp_spcl_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  1407. {
  1408. var index = 0;
  1409. var spclcd = ds_main_item1_clcj.getColumn(0, "basespclcd");
  1410. if (spclcd == "JX999")
  1411. {
  1412. index = 42;
  1413. }
  1414. else
  1415. {
  1416. index = 24;
  1417. }
  1418. ds_main_item1_clcj.setColumn(0, "spclcd", spclcd);
  1419. var format = ds_init_P0117list.getColumn(index, "cdval");
  1420. ds_main_item1_clcj.setColumn(0, "remfact", format);
  1421. ds_main_item1_clcj.setColumn(0, "spclmemoflag", "E");
  1422. }
  1423. function grp_biz_btn_judgcancel_onclick(obj:Button, e:ClickEventInfo)
  1424. {
  1425. var rows = ds_main_grd2_unexecordlist.rowcount;
  1426. if (rows > 0)
  1427. {
  1428. for (var i = 0; i < rows; i++)
  1429. {
  1430. ds_main_grd2_unexecordlist.setColumn(i, "judgendflag", "N");
  1431. ds_main_grd2_unexecordlist.setRowType(i, "u");
  1432. }
  1433. var updateData = grdf_getGridUpdateData(grd_outunexecprcpord).rowcount;
  1434. if (updateData != 0)
  1435. {
  1436. var oParam = {};
  1437. oParam.id = "TXPID21402";
  1438. oParam.service = "aftjudgapp.OutUnExecOrd";
  1439. oParam.method = "reqSetJudgEnd";
  1440. oParam.inds = "req=ds_send datalist=ds_main_grd2_unexecordlist:U";
  1441. oParam.async = false;
  1442. //oParam.callback = "cf_TXPID21402";
  1443. tranf_submit(oParam);
  1444. fSrchUnexecOrdList2();
  1445. }
  1446. }
  1447. }
  1448. ]]></Script>
  1449. </Form>
  1450. </FDL>