SMRST06800_입고전표마감작업(약국).xfdl 22 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMRST06800" position="absolute 0 0 1264 884" titletext="입고전표마감작업" oninit="SMRST06800_oninit" onload="SMRST06800_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div id="grp_sea" taborder="1" class="div_SA" position="absolute 0 24 950 85" anchor="left top right">
  8. <Layouts>
  9. <Layout>
  10. <Static id="caption5" text="기관코드" class="search_name" position="absolute 7 10 83 27"/>
  11. <Static id="caption9" text="작업부서" class="search_name" position="absolute 7 34 83 51"/>
  12. <Edit id="ipt_deptcd" taborder="1" class="input_default" position="absolute 103 34 182 53" autoselect="true" autoskip="true"/>
  13. <Combo id="cmb_instcd" taborder="2" innerdataset="ds_init_comcd" codecolumn="cdid" datacolumn="cdnm" class="combo_essential" position="absolute 103 10 316 29"/>
  14. <Button id="button29" taborder="3" class="icon_search" position="absolute 187 36 203 52" onclick="grp_sea_button29_onclick"/>
  15. <Edit id="ipt_deptnm" taborder="4" class="input_default" position="absolute 206 34 368 53" autoselect="true" autoskip="true"/>
  16. <Static id="caption7" text="물품구분" class="search_name" position="absolute 391 10 467 27"/>
  17. <Static id="caption10" text="작업자" class="search_name" position="absolute 391 35 467 52"/>
  18. <Edit id="input3" taborder="5" enable="false" position="absolute 471 35 536 54"/>
  19. <Combo id="cmb_goodflag" taborder="6" innerdataset="ds_init_cmb_goodflag" codecolumn="cdid" datacolumn="cdnm" class="combo_essential" position="absolute 471 10 611 29"/>
  20. <Edit id="input4" taborder="7" enable="false" position="absolute 541 35 611 54"/>
  21. <Static id="caption1" text="마감년월" class="search_name" position="absolute 642 11 718 28"/>
  22. <Static id="caption2" text="기표일자" class="search_name" position="absolute 642 36 718 53"/>
  23. <Calendar id="input2" taborder="8" class="input_default" position="absolute 717 34 823 53" mask="yyyy-mm-dd" autoselect="true" autoskip="true" style="align:center middle;"/>
  24. <Calendar id="ipt_stocym" taborder="9" class="input_default" position="absolute 717 9 823 28" mask="yyyy-mm" dateformat="yyyy-MM" value="null" editformat="yyyy-MM" autoselect="true" autoskip="true" onchanged="grp_sea_ipt_stocym_onchanged" style="align:center middle;"/>
  25. <Shape id="line3" linetype="vertical" position="absolute 864 10 870 54" anchor="top right"/>
  26. <Button id="btn_req" taborder="10" text="조회" class="btn1" position="absolute 878 20 934 42" anchor="top right" onclick="grp_sea_btn_req_onclick"/>
  27. </Layout>
  28. </Layouts>
  29. </Div>
  30. <Shape position="absolute 0 115 950 121" linetype="horizontal" id="line7" class="line_10" anchor="left top right"/>
  31. <Button position="absolute 830 96 894 115" id="btn_gen" class="btn2" text="전표발행" anchor="top right" onclick="btn_gen_onclick"/>
  32. <Static text="전표 분개 리스트" position="absolute 0 99 123 120" id="caption61" class="tit_2"/>
  33. <Grid position="absolute 0 120 950 708" id="grd_autosliplist" binddataset="ds_main_list_detailist" autoenter="select" autofittype="col" cellsizingtype="col" anchor="all">
  34. <Formats>
  35. <Format id="default">
  36. <Columns>
  37. <Column size="21"/>
  38. <Column size="0"/>
  39. <Column size="127"/>
  40. <Column size="100"/>
  41. <Column size="100"/>
  42. <Column size="100"/>
  43. <Column size="100"/>
  44. <Column size="237"/>
  45. <Column size="81"/>
  46. <Column size="72"/>
  47. </Columns>
  48. <Rows>
  49. <Row size="24" band="head"/>
  50. <Row size="24"/>
  51. </Rows>
  52. <Band id="head">
  53. <Cell/>
  54. <Cell col="1" text="기관코드"/>
  55. <Cell col="2" text="주거래처"/>
  56. <Cell col="3" text="입고일"/>
  57. <Cell col="4" text="합계금액"/>
  58. <Cell col="5" text="공급가액"/>
  59. <Cell col="6" text="부가가치세"/>
  60. <Cell col="7" text="증빙적요"/>
  61. <Cell col="8" text="매입매출구분"/>
  62. <Cell col="9" text="과세구분"/>
  63. </Band>
  64. <Band id="body">
  65. <Cell celltype="head"/>
  66. <Cell col="1" text="bind:instcd"/>
  67. <Cell col="2" style="align:left middle;padding:0 0 0 3;" text="bind:rlanm"/>
  68. <Cell col="3" displaytype="date" text="bind:notefactspec1" calendardisplaynulltype="nulltext"/>
  69. <Cell col="4" displaytype="number" text="bind:amt"/>
  70. <Cell col="5" displaytype="number" text="bind:suplamt"/>
  71. <Cell col="6" displaytype="number" text="bind:valaddtax"/>
  72. <Cell col="7" style="align:left middle;padding:0 0 0 3;" text="bind:mainrec"/>
  73. <Cell col="8" displaytype="combo" style="align:center middle;" text="bind:taxbillflag" combodataset="ds_cmb_taxbillflag" combocodecol="value" combodatacol="label" enable="false"/>
  74. <Cell col="9" displaytype="combo" style="align:center middle;" text="bind:taxkind" combodataset="ds_cmb_taxkind" combocodecol="value" combodatacol="label" enable="false"/>
  75. </Band>
  76. </Format>
  77. </Formats>
  78. </Grid>
  79. <Button position="absolute 741 96 827 115" id="button1" class="btn2" text="발행내역삭제" anchor="top right" onclick="button1_onclick"/>
  80. <Button position="absolute 897 96 950 115" id="btn_excel" class="btn5" text="Excel" anchor="top right" onclick="btn_excel_onclick"/>
  81. <MaskEdit readonly="true" position="absolute 217 95 338 114" align="align:right middle;" id="opt_amt" mask="9,999999999999" style="font:Dotum,9,bold;"/>
  82. <MaskEdit readonly="true" position="absolute 394 95 500 114" align="align:right middle;" id="opt_suplamt" mask="9,999999999999" style="font:Dotum,9,bold;"/>
  83. <MaskEdit readonly="true" position="absolute 555 95 661 114" align="align:right middle;" id="opt_valaddtax" mask="9,999999999999" style="font:Dotum,9,bold;"/>
  84. <Static text="총금액:" position="absolute 170 98 234 113" align="align:right middle;" id="caption16"/>
  85. <Static text="공급가:" position="absolute 344 98 398 113" align="align:right middle;" id="caption3"/>
  86. <Static text="부가세:" position="absolute 505 98 554 113" align="align:right middle;" id="caption4"/>
  87. <Static id="caption6" text="입고전표마감" class="tit_1" position="absolute 0 0 243 25"/>
  88. </Layout>
  89. </Layouts>
  90. <Objects>
  91. <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_cond_oncolumnchanged">
  92. <ColumnInfo>
  93. <Column id="usernm" type="STRING" size="256"/>
  94. <Column id="userid" type="STRING" size="256"/>
  95. <Column id="instcd" type="STRING" size="256"/>
  96. <Column id="stocdeptcd" type="STRING" size="256"/>
  97. <Column id="stocdeptnm" type="STRING" size="256"/>
  98. <Column id="goodflag" type="STRING" size="256"/>
  99. <Column id="stocym" type="STRING" size="256"/>
  100. <Column id="reqdd" type="STRING" size="256"/>
  101. </ColumnInfo>
  102. <Rows>
  103. <Row>
  104. <Col id="usernm"/>
  105. <Col id="userid"/>
  106. <Col id="instcd"/>
  107. <Col id="stocdeptcd"/>
  108. <Col id="stocdeptnm"/>
  109. <Col id="goodflag"/>
  110. <Col id="stocym"/>
  111. <Col id="reqdd"/>
  112. </Row>
  113. </Rows>
  114. </Dataset>
  115. <Dataset id="ds_init_total" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  116. <ColumnInfo>
  117. <Column id="amt" type="STRING" size="256"/>
  118. <Column id="suplamt" type="STRING" size="256"/>
  119. <Column id="valaddtax" type="STRING" size="256"/>
  120. </ColumnInfo>
  121. <Rows>
  122. <Row>
  123. <Col id="amt">0</Col>
  124. <Col id="suplamt">0</Col>
  125. <Col id="valaddtax">0</Col>
  126. </Row>
  127. </Rows>
  128. </Dataset>
  129. <Dataset id="ds_main_list_detailist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  130. <Dataset id="ds_cmb_taxbillflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  131. <ColumnInfo>
  132. <Column id="label" type="STRING" size="256"/>
  133. <Column id="value" type="STRING" size="256"/>
  134. </ColumnInfo>
  135. <Rows>
  136. <Row>
  137. <Col id="label">매입</Col>
  138. <Col id="value">1</Col>
  139. </Row>
  140. <Row>
  141. <Col id="label">매출</Col>
  142. <Col id="value">2</Col>
  143. </Row>
  144. </Rows>
  145. </Dataset>
  146. <Dataset id="ds_cmb_taxkind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  147. <ColumnInfo>
  148. <Column id="label" type="STRING" size="256"/>
  149. <Column id="value" type="STRING" size="256"/>
  150. </ColumnInfo>
  151. <Rows>
  152. <Row>
  153. <Col id="label">과세</Col>
  154. <Col id="value">01</Col>
  155. </Row>
  156. <Row>
  157. <Col id="label">영세율</Col>
  158. <Col id="value">02</Col>
  159. </Row>
  160. <Row>
  161. <Col id="label">대손세액가감</Col>
  162. <Col id="value">03</Col>
  163. </Row>
  164. <Row>
  165. <Col id="label">비과세</Col>
  166. <Col id="value">04</Col>
  167. </Row>
  168. </Rows>
  169. </Dataset>
  170. <Dataset id="ds_send_inslip" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  171. <Dataset id="ds_temp_insliplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  172. <ColumnInfo>
  173. <Column id="slipdd" type="STRING" size="256" sumtext=" 전표일자 "/>
  174. <Column id="slipno" type="STRING" size="256" sumtext=" 전표번호 "/>
  175. <Column id="winprcsflag" type="STRING" size="256" sumtext=" 정산상태 0:미결재,8:회계처리대상,9:회계처리완료"/>
  176. </ColumnInfo>
  177. </Dataset>
  178. </Objects>
  179. <Bind>
  180. <BindItem id="item0" compid="grp_sea.cmb_instcd" propid="value" datasetid="ds_main_cond" columnid="instcd"/>
  181. <BindItem id="item1" compid="grp_sea.cmb_goodflag" propid="value" datasetid="ds_main_cond" columnid="goodflag"/>
  182. <BindItem id="item2" compid="grp_sea.ipt_stocym" propid="value" datasetid="ds_main_cond" columnid="stocym"/>
  183. <BindItem id="item3" compid="grp_sea.input2" propid="value" datasetid="ds_main_cond" columnid="reqdd"/>
  184. <BindItem id="item4" compid="grp_sea.input3" propid="value" datasetid="ds_main_cond" columnid="userid"/>
  185. <BindItem id="item5" compid="grp_sea.input4" propid="value" datasetid="ds_main_cond" columnid="usernm"/>
  186. <BindItem id="item6" compid="grp_sea.ipt_deptcd" propid="value" datasetid="ds_main_cond" columnid="stocdeptcd"/>
  187. <BindItem id="item7" compid="grp_sea.ipt_deptnm" propid="value" datasetid="ds_main_cond" columnid="stocdeptnm"/>
  188. <BindItem id="item8" compid="opt_amt" propid="value" datasetid="ds_init_total" columnid="amt"/>
  189. <BindItem id="item9" compid="opt_suplamt" propid="value" datasetid="ds_init_total" columnid="suplamt"/>
  190. <BindItem id="item10" compid="opt_valaddtax" propid="value" datasetid="ds_init_total" columnid="valaddtax"/>
  191. </Bind>
  192. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  193. * System Name :
  194. * Job Name :
  195. * Creator :
  196. * Make Date : 2017-06-19
  197. * Description :
  198. *---------------------------------------------------------------------------------------
  199. * Modify Date Modifier Modify Description
  200. *---------------------------------------------------------------------------------------
  201. * 2017-06-19 Live Converter TF->XP
  202. *
  203. *---------------------------------------------------------------------------------------
  204. ****************************************************************************************/
  205. include "com_commonxp::comm_main.xjs";
  206. include "mis_miscommonxp::MIS.xjs";
  207. include "mis_miscommonxp::RSZ001.xjs";
  208. var arErrorCode = new HashArray();
  209. function SMRST06800_oninit(obj:Form, e:InitEventInfo)
  210. {
  211. frmf_initForm(obj);
  212. }
  213. function SMRST06800_onload(obj:Form, e:LoadEventInfo)
  214. {
  215. grdf_initGrid(grd_autosliplist);
  216. grdf_setRowTypeIcon(grd_autosliplist, 0);
  217. fInitialize();
  218. }
  219. function fInitialize()
  220. {
  221. rszfUserGoodFlagList("grp_sea.cmb_goodflag",sysf_getUserInfo("userid"));
  222. rszfUserInstList(grp_sea.cmb_instcd,sysf_getUserInfo("userid"));
  223. ds_main_cond.enableevent = false;
  224. ds_main_cond.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  225. ds_main_cond.setColumn(0, "stocdeptcd", sysf_getUserInfo("dutplcecd"));
  226. ds_main_cond.setColumn(0, "stocdeptnm", sysf_getUserInfo("dutplcenm"));
  227. ds_main_cond.setColumn(0, "userid", sysf_getUserInfo("userid"));
  228. ds_main_cond.setColumn(0, "usernm", sysf_getUserInfo("usernm"));
  229. ds_main_cond.enableevent = true;
  230. var sDate = utlf_getCurrentDate();
  231. var cDate = String(sDate).substring(0, 6);
  232. ds_main_cond.setColumn(0, "stocym" , cDate);
  233. ds_main_cond.setColumn(0, "reqdd" , sDate);
  234. ds_main_cond.setColumn(0, "goodflag" , "PH");
  235. }
  236. function ds_main_cond_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  237. {
  238. if(e.columnid == "stocdeptcd")
  239. {
  240. grp_sea.ipt_deptcd.value = e.newvalue;
  241. grp_sea.ipt_deptcd.setFocus();
  242. if(String(e.newvalue).length == 0)
  243. {
  244. grp_sea.ipt_deptnm.value = "";
  245. }
  246. else
  247. {
  248. misfValidationCheck("02", "", "stocdeptcd,stocdeptnm" );
  249. }
  250. }
  251. if(e.columnid == "stocdeptnm")
  252. {
  253. grp_sea.ipt_deptnm.value = e.newvalue;
  254. grp_sea.ipt_deptnm.setFocus();
  255. if(String(e.newvalue).length == 0)
  256. {
  257. grp_sea.ipt_deptcd.value = "";
  258. }
  259. else
  260. {
  261. misfValidationCheck("02", "", "stocdeptcd,stocdeptnm" );
  262. }
  263. }
  264. }
  265. function grp_sea_button29_onclick(obj:Button, e:ClickEventInfo)
  266. {
  267. var recv_list = "stocdeptcd,stocdeptnm";
  268. misfOpenPopUpList("02", grp_sea.ipt_deptcd,"", recv_list) ;
  269. }
  270. function grp_sea_ipt_stocym_onchanged(obj:Calendar, e:ChangeEventInfo)
  271. {
  272. ds_main_cond.setColumn(0, "stocym", String(obj.value).substr(0,6));
  273. }
  274. function grp_sea_btn_req_onclick(obj:Button, e:ClickEventInfo)
  275. {
  276. ds_main_list_detailist.clearData();
  277. var oParam = {};
  278. oParam.id = "TRRST06301";
  279. oParam.service = "stocsumapp.StocSumMngt";
  280. oParam.method = "reqGetPhamInputSlipEndList";
  281. oParam.inds = "req=ds_main_cond";
  282. oParam.outds = "ds_main_list_detailist=detailist";
  283. oParam.async = false;
  284. //oParam.callback = "cf_TRRST06301";
  285. tranf_submit(oParam);
  286. fn_total();
  287. }
  288. function fn_total()
  289. {
  290. ds_init_total.setColumn(0, "amt", ds_main_list_detailist.getSum("amt"));
  291. ds_init_total.setColumn(0, "suplamt", ds_main_list_detailist.getSum("suplamt"));
  292. ds_init_total.setColumn(0, "valaddtax", ds_main_list_detailist.getSum("valaddtax"));
  293. }
  294. function button1_onclick(obj:Button, e:ClickEventInfo)
  295. {
  296. var query014 = "N";
  297. var iPath = ds_send_inslip;
  298. var vdate = new Date();
  299. var HH = vdate.getHours();
  300. var MI = vdate.getMinutes();
  301. var SS = vdate.getSeconds();
  302. var vTime = HH +"" + MI +"" + SS;
  303. var vSlipDate = String(ds_main_cond.getColumn(0, "reqdd")); // 기표일자
  304. var stocym = ds_main_cond.getColumn(0, "stocym");
  305. var fromdd = stocym + "01";
  306. var todd = stocym + "31";
  307. var vBizpk = sysf_getUserInfo("dutplceinstcd") +"_" // 기관
  308. + vSlipDate +"_" // 기표일자
  309. + utlf_getCurrentDate()+ vTime +'_I_DRG'; // 작업일시
  310. var vSlipCmt = vSlipDate.substr(0,4) + "."
  311. + vSlipDate.substr(4,2) + "."
  312. + vSlipDate.substr(6,2) + " 월분 약품 구입대금지급"; // 대표적요
  313. if (sysf_getUserInfo("dutplceinstcd") =="014")
  314. {
  315. query014 = "Y";
  316. }
  317. dsf_makeValue(iPath, "instcd", "string", sysf_getUserInfo("dutplceinstcd"), 0);
  318. dsf_makeValue(iPath, "genrdd", "string", vSlipDate, 0);
  319. dsf_makeValue(iPath, "stocym", "string", stocym, 0);
  320. dsf_makeValue(iPath, "slipflag", "string", "6", 0);
  321. dsf_makeValue(iPath, "bizpk", "string", vBizpk, 0);
  322. dsf_makeValue(iPath, "slipdeptcd", "string", sysf_getUserInfo("dutplcecd"), 0);
  323. dsf_makeValue(iPath, "unslwrit", "string", sysf_getUserInfo("userid"), 0);
  324. dsf_makeValue(iPath, "defrayreqdd", "string", vSlipDate, 0);
  325. dsf_makeValue(iPath, "slipcmt", "string", vSlipCmt, 0);
  326. dsf_makeValue(iPath, "usedd", "string", vSlipDate.substr(0,6)+"01" , 0);
  327. dsf_makeValue(iPath, "endmonth", "string", vSlipDate.substr(0,6) , 0);
  328. dsf_makeValue(iPath, "fromdd", "string", fromdd, 0);
  329. dsf_makeValue(iPath, "todd", "string", todd, 0);
  330. dsf_makeValue(iPath, "frslipdd", "string", fromdd, 0);
  331. dsf_makeValue(iPath, "toslipdd", "string", todd, 0);
  332. dsf_makeValue(iPath, "frcalcdocudd", "string", fromdd, 0);
  333. dsf_makeValue(iPath, "tocalcdocudd", "string", todd, 0);
  334. dsf_makeValue(iPath, "frcalccnfmdd", "string", fromdd, 0);
  335. dsf_makeValue(iPath, "tocalccnfmdd", "string", todd, 0);
  336. dsf_makeValue(iPath, "slipinclusion", "string","", 0);
  337. dsf_makeValue(iPath, "query014", "string", query014, 0);
  338. dsf_setDefaultVal(iPath, "slipinclusion:N");
  339. var oParam = {};
  340. oParam.id = "TXRST06301";
  341. oParam.service = "stocsumapp.StocSumMngt";
  342. oParam.method = "reqDelPhamInputSlipEnd";
  343. oParam.inds = "req=ds_send_inslip";
  344. oParam.outds = "";
  345. oParam.async = false;
  346. oParam.callback = "cf_TXRST06301";
  347. tranf_submit(oParam);
  348. if(arErrorCode.pop("TXRST06301") > -1)
  349. {
  350. sysf_messageBox(stocym + "전표발행내역이 삭제되었습니다.", "I");
  351. }
  352. }
  353. function cf_TXRST06301(sSvcId, nErrorCode, sErrorMsg)
  354. {
  355. arErrorCode.push(sSvcId, nErrorCode);
  356. if(nErrorCode < 0) return;
  357. }
  358. function btn_gen_onclick(obj:Button, e:ClickEventInfo)
  359. {
  360. var query014 = "N";
  361. var iPath = ds_send_inslip;
  362. var vdate = new Date();
  363. var HH = vdate.getHours();
  364. var MI = vdate.getMinutes();
  365. var SS = vdate.getSeconds();
  366. var vTime = HH +"" + MI +"" + SS;
  367. var vSlipDate = String(ds_main_cond.getColumn(0, "reqdd"));
  368. var stocym = ds_main_cond.getColumn(0, "stocym");
  369. var fromdd = stocym + "01";
  370. var todd = stocym + "31";
  371. var vBizpk = sysf_getUserInfo("dutplceinstcd") +"_" // 기관
  372. + vSlipDate +"_" // 기표일자
  373. + utlf_getCurrentDate()+ vTime +'_I_DRG'; // 작업일시
  374. var vSlipCmt = vSlipDate.substr(0,4) + "."
  375. + vSlipDate.substr(4,2) + "."
  376. + vSlipDate.substr(6,2) + " 월분 약품 구입대금지급"; // 대표적요
  377. if (sysf_getUserInfo("dutplceinstcd") =="014")
  378. {
  379. query014 = "Y";
  380. }
  381. dsf_makeValue(iPath, "instcd", "string", sysf_getUserInfo("dutplceinstcd"), 0);
  382. dsf_makeValue(iPath, "genrdd", "string", vSlipDate, 0);
  383. dsf_makeValue(iPath, "stocym", "string", stocym, 0);
  384. dsf_makeValue(iPath, "slipflag", "string", "6", 0);
  385. dsf_makeValue(iPath, "bizpk", "string", vBizpk, 0);
  386. dsf_makeValue(iPath, "slipdeptcd", "string", sysf_getUserInfo("dutplcecd"), 0);
  387. dsf_makeValue(iPath, "unslwrit", "string", sysf_getUserInfo("userid"), 0);
  388. dsf_makeValue(iPath, "defrayreqdd", "string", vSlipDate, 0);
  389. dsf_makeValue(iPath, "slipcmt", "string", vSlipCmt, 0);
  390. dsf_makeValue(iPath, "usedd", "string", vSlipDate.substr(0,6)+"01" , 0);
  391. dsf_makeValue(iPath, "endmonth", "string", vSlipDate.substr(0,6) , 0);
  392. dsf_makeValue(iPath, "fromdd", "string", fromdd, 0);
  393. dsf_makeValue(iPath, "todd", "string", todd, 0);
  394. dsf_makeValue(iPath, "frslipdd", "string", fromdd, 0);
  395. dsf_makeValue(iPath, "toslipdd", "string", todd, 0);
  396. dsf_makeValue(iPath, "frcalcdocudd", "string", fromdd, 0);
  397. dsf_makeValue(iPath, "tocalcdocudd", "string", todd, 0);
  398. dsf_makeValue(iPath, "frcalccnfmdd", "string", fromdd, 0);
  399. dsf_makeValue(iPath, "tocalccnfmdd", "string", todd, 0);
  400. dsf_makeValue(iPath, "slipinclusion", "string","", 0);
  401. dsf_makeValue(iPath, "query014", "string", query014, 0);
  402. dsf_setDefaultVal(ds_send_inslip, "slipinclusion:N");
  403. var oParam = {};
  404. oParam.id = "TXRST06301";
  405. oParam.service = "stocsumapp.StocSumMngt";
  406. oParam.method = "reqExePhamInputSlipEnd";
  407. oParam.inds = "req=ds_send_inslip";
  408. oParam.outds = "ds_temp_insliplist=insliplist";
  409. oParam.async = false;
  410. oParam.callback = "cf_TXRST06301";
  411. tranf_submit(oParam);
  412. if(arErrorCode.pop("TXRST06301") > -1)
  413. {
  414. var slipno = ds_temp_insliplist.getColumn(0, "slipno");
  415. if (!utlf_isNull(slipno))
  416. {
  417. sysf_messageBox("전표번호는 " + slipno + "입니다.", "I");
  418. }
  419. }
  420. }
  421. function cf_TXRST06301(sSvcId, nErrorCode, sErrorMsg)
  422. {
  423. arErrorCode.push(sSvcId, nErrorCode);
  424. if(nErrorCode < 0) return;
  425. }
  426. function btn_excel_onclick(obj:Button, e:ClickEventInfo)
  427. {
  428. misfSaveExcel(grd_autosliplist);
  429. }
  430. ]]></Script>
  431. </Form>
  432. </FDL>