123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560 |
- <?xml version="1.0" encoding="EUC-KR"?>
- <!--
- * 제 목 : SPPAO01401_헌혈증입력.xrw
- * 설 명 : 헌혈증입력
- * 설 계 자 : 조영상
- * 작 성 자 : 조영상
- * 작 성 일 : 2007.10.20
- * 수정이력 :
- * 기 타 :
- -->
- <?xml-stylesheet href="../../../com/commonweb/css/common.css" type="text/css" ?>
- <xhtml:html xmlns:xhtml="http://www.w3.org/1999/xhtml" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="http://www.w3.org/2002/01/xforms" xmlns:ev="http://www.w3.org/2001/xml-events">
- <xhtml:head>
- <xhtml:title>헌혈증입력</xhtml:title>
- <model id="model1">
- <instance id="instance1">
- <root xmlns="">
- <main>
- <bldc>
- <totdisccnt/>
- <totdiscamt/>
- <total/>
- <totalamt/>
- <appflag>CNT</appflag>
- </bldc>
- <h_bldc>
- <bldc>
- <bldc_pid/>
- <bldc_rcptdd/>
- <bldc_rcptno/>
- <bldc_rcptseqno/>
- <bldc_seqno/>
- <bldc_instcd/>
- <bldc_rcptstat/>
- <bldc_ordtype/>
- <bldc_orddd/>
- <bldc_orddeptcd/>
- <bldc_orddrid/>
- <bldc_grupcalcscorcd/>
- <bldc_snglcalcscorcd/>
- <bldc_appdd/>
- <bldc_calcqty/>
- <bldc_calctims/>
- <bldc_calcdays/>
- <bldc_calcamt/>
- <bldc_disccnt/>
- <bldc_discamt/>
- <bldc_apprsn/>
- <bldc_rcptexecdd/>
- <bldc_rcpttm/>
- <bldc_rcptrid/>
- <bldc_remfact/>
- <bldc_fstrgstrid/>
- <bldc_fstrgstdt/>
- <bldc_lastupdtrid/>
- <bldc_lastupdtdt/>
- <bldc_prcpdd/>
- <bldc_prcpno/>
- <bldc_prcphistno/>
- <bldc_execprcpseqno/>
- <bldc_cretno/>
- <bldc_claimdd/>
- <bldc_no/>
- <bldc_hngnm/>
- <bldc_calcpayflag/>
- <bldc_ckbox/>
- <bldc_ckbox_org/>
- </bldc>
- </h_bldc>
- <capp>
- <h_bldc>
- <bldc>
- <bldc_gubun/>
- <bldc_pid/>
- <bldc_rcptdd/>
- <bldc_rcptno/>
- <bldc_rcptseqno/>
- <bldc_seqno/>
- <bldc_instcd/>
- <bldc_rcptstat/>
- <bldc_ordtype/>
- <bldc_orddd/>
- <bldc_orddeptcd/>
- <bldc_orddrid/>
- <bldc_grupcalcscorcd/>
- <bldc_snglcalcscorcd/>
- <bldc_appdd/>
- <bldc_calcqty/>
- <bldc_calctims/>
- <bldc_calcdays/>
- <bldc_calcamt/>
- <bldc_disccnt/>
- <bldc_discamt/>
- <bldc_apprsn/>
- <bldc_rcptexecdd/>
- <bldc_rcpttm/>
- <bldc_rcptrid/>
- <bldc_remfact/>
- <bldc_fstrgstrid/>
- <bldc_fstrgstdt/>
- <bldc_lastupdtrid/>
- <bldc_lastupdtdt/>
- <bldc_prcpdd/>
- <bldc_prcpno/>
- <bldc_prcphistno/>
- <bldc_execprcpseqno/>
- <bldc_cretno/>
- <bldc_claimdd/>
- <bldc_no/>
- <bldc_hngnm/>
- <bldc_calcpayflag/>
- <bldc_ckbox/>
- <bldc_ckbox_org/>
- </bldc>
- </h_bldc>
- </capp>
- </main>
- <send>
- <data1>
- <pid/>
- <orddd/>
- <cretno/>
- <ordtype/>
- <orddeptcd/>
- <orddrid/>
- <fromdd/>
- <todd/>
- </data1>
- </send>
- <init>
- <P0104list>
- <P0104/>
- </P0104list>
- </init>
- <hidden>
- <session/>
- </hidden>
- </root>
- </instance>
- <script type="javascript" ev:event="xforms-ready">
- <![CDATA[
-
- fInit();
-
- fGetUserInfosSampling();
-
- zbcfGetCodeList(new Array("P0104"), new Array("/root/init/P0104list"));
-
- if (checkOpener()) {
-
- var SPPAO01401_CopyBtn = opener.javascript.getParameter("SPPAO01401_CopyBtn");
-
- if (SPPAO01401_CopyBtn == "Y") {
- ipt_total.disabled = false;
- btn_copy.visible = true;
- } else {
- ipt_total.disabled = false;
- btn_copy.visible = true;
- }
-
- opener.javascript.setParameter("SPPAO01401_RTN", "");
-
- var SPPAO01401_PARM = opener.javascript.getParameter("SPPAO01401_PARM");
-
- var array_parm = SPPAO01401_PARM.split("▦");
-
- gPid = array_parm[0];
- gOrddd = array_parm[1]; //orddd OR indd
- gCretno = array_parm[2];
- gOrddeptcd = array_parm[3];
- gOrddrid = array_parm[4];
- gInsukind = array_parm[5];
- gSuppkind = array_parm[6];
- gOrdtype = array_parm[7];
- gCalcflag = array_parm[8]; //ordtype = 'O'인 경우만
- strSend = array_parm[9];
- strRcv = array_parm[10];
- gSdate = array_parm[11]; // 유형 적용 시작일
- gEdate = array_parm[12]; // 유형 적용 종료일
-
- if (fVarChck() == false) return;
-
- opener.javascript.setParameter("SPPAO01401_PARM", "");
-
- fSearch();
- }
- ]]>
- </script>
- <submission id="TRZBC00101" mediatype="application/x-www-form-urlencoded" method="post" replace="instance"/>
- <submission id="TRPAO01452" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/h_bldc"/>
- <submission id="TRPAO01453" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/capp"/>
- <submission id="TRPAO01454" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/temp/list"/>
- </model>
- <script type="javascript" src="../../../com/commonweb/js/common.js"/>
- <script type="javascript" src="../../../com/basiccodeweb/js/ZBC001.js"/>
- <script type="javascript" src="../../../com/commonweb/js/dateHelper.js"/>
- <script type="javascript" src="../../../com/commonweb/js/stringHelper.js"/>
- <script type="javascript" src="../../../com/commonweb/js/tfHelper.js"/>
- <script type="javascript" src="../../../com/commonweb/js/numericHelper.js"/>
- <script type="javascript" src="../../../com/commonweb/js/utilHelper.js"/>
- <script type="javascript" src="../../../pam/opatmngtweb/js/PMOCOM.js"/>
- <script type="javascript">
- <![CDATA[
-
- var gPid, gOrddd, gCretno, gOrddeptcd, gOrddrid, gInsukind, gSuppkind, gOrdtype, gCalcflag, strSend, strRcv, gSdate, gEdate;
-
- function fInit() {
-
- model.removeNodeset("/root/main/h_bldc/bldc");
- model.removeNodeset("/root/main/capp/h_bldc/bldc");
- model.setvalue("/root/main/bldc/totalamt", "0");
-
- model.refresh();
- }
-
- function fVarChck() {
-
- if (gPid == null || gPid == "" || gPid == " " || gPid == "-") {
- messageBox("환자번호가 전달되지 않았습니다!","E999","");
- return false;
- }
-
- if (gOrddd == null || gOrddd == "" || gOrddd == " " || gOrddd == "-") {
- messageBox("진료일자가 전달되지 않았습니다!","E999","");
- return false;
- }
-
- if (gCretno == null || gCretno == "" || gCretno == " " || gCretno == "-") {
- messageBox("생성번호가 전달되지 않았습니다!","E999","");
- return false;
- }
-
- if (gOrdtype == null || gOrdtype == "" || gOrdtype == " " || gOrdtype == "-") {
- messageBox("진료형태가 전달되지 않았습니다!","E999","");
- return false;
- }
-
- if (gOrdtype == "O") {
- if (gCalcflag == null || gCalcflag == "" || gCalcflag == " " || gCalcflag == "-") {
- messageBox("계산여부가 전달되지 않았습니다!","E999","");
- return false;
- }
- }
-
- return true;
- }
-
- function fSearch(){
-
- fInit();
-
- model.setvalue("/root/send/data1/pid", gPid);
- model.setvalue("/root/send/data1/orddd", gOrddd);
- model.setvalue("/root/send/data1/cretno", gCretno);
- model.setvalue("/root/send/data1/ordtype", gOrdtype);
- model.setvalue("/root/send/data1/orddeptcd", gOrddeptcd);
- model.setvalue("/root/send/data1/orddrid", gOrddrid);
- model.setvalue("/root/send/data1/fromdd", gSdate);
- model.setvalue("/root/send/data1/todd", gEdate);
-
- // 계산 내역
- grd_bldc.rebuildStyle();
- submit("TRPAO01452");
-
- var path = grd_bldc.nodeset;
- var cnt = instance1.selectNodes(path).length;
-
- for (var i = 1; i <= cnt; i++) {
- if (parseInt(model.getValue(path + "[" + i + "]/bldc_depoamt")) > 0) {
- grd_bldc.rowStyle(i, "data", "background-color") = "#ffc8c8";
- grd_bldc.cellAttribute("disabled", i, grd_bldc.colRef("bldc_ckbox")) = "true";
- }
- }
-
- // 수혈 대체 내역
- grd_bldcapp.rebuildStyle();
- submit("TRPAO01453");
-
- path = grd_bldcapp.nodeset;
- cnt = instance1.selectNodes(path).length;
-
- model.setvalue("/root/main/bldc/total", cnt);
- ipt_total.refresh();
-
- var totalamt = 0;
-
- for (var i = 1 ; i <= cnt ; i++) {
-
- if (model.getValue(path + "[" + i + "]/bldc_depodd") != "") { // 입금
- grd_bldcapp.rowStyle(i, "data", "background-color") = "#ffc8c8";
- }
-
- if (model.getValue(path + "[" + i + "]/bldc_apprsn") != "") { // 덤프
- grd_bldcapp.cellStyle("background-color", i, grd_bldcapp.colRef("apprsn")) = "#ffff00";
- }
-
- totalamt += parseInt(model.getvalue(path + "[" + i + "]/bldc_discamt")); //총금액
- }
-
- model.setvalue("/root/main/bldc/totalamt", totalamt);
- opt_totamt.refresh();
- }
- ]]>
- </script>
- </xhtml:head>
- <xhtml:body pagewidth="876" pageheight="693" style="margin-left:8; margin-top:8; margin-right:8; margin-bottom:8; ">
- <line id="line1" class="line_1" style="x1:0px; y1:350px; x2:860px; y2:350px; "/>
- <caption id="caption1" class="tit_2" style="left:5px; top:335px; width:108px; height:13px; ">혈액계산내역</caption>
- <caption id="caption2" class="tit_2" style="left:0px; top:5px; width:108px; height:13px; ">헌혈증적용내역</caption>
- <line id="line2" class="line_1" style="x1:0px; y1:20px; x2:860px; y2:20px; "/>
- <datagrid id="grd_bldc" nodeset="/root/main/h_bldc/bldc" caption="No^^실시일^그룹수가코드^수가코드명^단가^할인금^개수^투여일수^급비^입금일^입금액^처방일^처방번호^이력^순번" colsep="^" colwidth="35, 30, 75, 80, 280, 55, 55, 30, 55, 65, 80, 65, 80, 70, 40, 40" dataheight="23" mergecellsfixedrows="bycolrec" rowheight="23" rowsep="|" style="left:0px; top:355px; width:860px; height:290px; ">
- <col ref="bldc_no" style="text-align:center; "/>
- <col ref="bldc_ckbox" type="checkbox"/>
- <col ref="bldc_appdd" format="yyyy-mm-dd" style="text-align:center; "/>
- <col ref="bldc_grupcalcscorcd" style="text-align:left; "/>
- <col ref="bldc_hngnm" style="text-align:left; "/>
- <col ref="bldc_calcamt" format="(-)#,###" style="text-align:right; "/>
- <col ref="bldc_discamt" format="(-)#,###" style="text-align:right; "/>
- <col ref="bldc_calcqty" style="text-align:center; "/>
- <col ref="bldc_calcdays" style="text-align:center; "/>
- <col disabled="true" ref="bldc_calcpayflag" type="combo" style="text-align:center; ">
- <choices>
- <itemset nodeset="/root/init/P0104list/P0104">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <col ref="bldc_depodd" format="yyyy-mm-dd" style="text-align:center; "/>
- <col ref="bldc_depoamt" format="(-)#,###" style="text-align:right; "/>
- <col ref="bldc_prcpdd" format="yyyy-mm-dd" style="text-align:center; "/>
- <col ref="bldc_prcpno" style="text-align:center; "/>
- <col ref="bldc_prcphistno" style="text-align:center; "/>
- <col ref="bldc_execprcpseqno" style="text-align:center; "/>
- </datagrid>
- <datagrid id="grd_bldcapp" nodeset="/root/main/capp/h_bldc/bldc" caption="No^덤프^실시일^그룹수가코드^수가코드명^단가^할인금^개수^투여일수^ABO검사^입금일^입금액^처방일^처방번호^이력^순번^ABO" colsep="^" colwidth="35, 30, 75, 80, 280, 55, 55, 30, 55, 65, 80, 65, 80, 70, 40, 40" dataheight="23" mergecellsfixedrows="bycolrec" rowheight="23" rowsep="|" style="left:0px; top:25px; width:860px; height:290px; ">
- <col ref="bldc_no" style="text-align:center; "/>
- <col ref="apprsn" style="font-weight:bold; text-align:center; "/>
- <col ref="bldc_appdd" format="yyyy-mm-dd" style="text-align:center; "/>
- <col ref="bldc_grupcalcscorcd" style="text-align:left; "/>
- <col ref="bldc_hngnm" style="text-align:left; "/>
- <col ref="bldc_calcamt" format="(-)#,###" style="text-align:right; "/>
- <col ref="bldc_discamt" format="(-)#,###" style="text-align:right; "/>
- <col ref="bldc_calcqty" style="text-align:center; "/>
- <col ref="bldc_calcdays" style="text-align:center; "/>
- <col disabled="true" ref="bldc_abocnt" type="combo" style="text-align:center; ">
- <choices>
- <item>
- <label>○</label>
- <value>1</value>
- </item>
- </choices>
- </col>
- <col ref="bldc_depodd" format="yyyy-mm-dd" style="text-align:center; "/>
- <col ref="bldc_depoamt" format="(-)#,###" style="text-align:right; "/>
- <col ref="bldc_prcpdd" format="yyyy-mm-dd" style="text-align:center; "/>
- <col ref="bldc_prcpno" style="text-align:center; "/>
- <col ref="bldc_prcphistno" style="text-align:center; "/>
- <col ref="bldc_execprcpseqno" style="text-align:center; "/>
- </datagrid>
- <output id="opt_totamt" ref="/root/main/bldc/totalamt" format="(-)#,###" style="left:770px; top:330px; width:90px; height:19px; font-weight:bold; text-align:center; background-color:#ffffa0; border-color:#c0c0c0; border-width:1; border-style:solid; "/>
- <caption id="caption4" style="left:700px; top:333px; width:64px; height:15px; font-weight:bold; ">할인총액 :</caption>
- <button id="btn_copy" class="btn2_letter2" style="left:633px; top:330px; width:42px; height:19px; ">
- <caption>적용</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
-
- if (model.getvalue("/root/main/bldc/total") > grd_bldc.rows - 1) {
- messageBox("혈액계산내역의 갯수를 초과하였습니다.", "E999", "");
- return false;
- }
-
- var flag = model.getValue("/root/main/bldc/appflag");
-
- model.removenode("/root/main/capp/h_bldc");
- model.makeNode("/root/main/capp/h_bldc");
-
- var cnt = instance1.selectNodes("/root/main/h_bldc/bldc").length;
-
- var totalamt = 0;
-
- if (flag == "SEL") {
-
- for (var i = 1; i <= cnt; i++) {
-
- var path = "/root/main/h_bldc/bldc[" + i + "]";
-
- if (model.getValue(path + "/bldc_depodd") == "" && model.getValue(path + "/bldc_ckbox") != "true") {
- continue;
- }
-
- model.duplicate("/root/main/capp/h_bldc", path);
-
- totalamt += parseInt(model.getValue(path + "/bldc_discamt"));
- }
- }
-
- if (flag == "CNT") {
-
- var appcnt = model.getValue("/root/main/bldc/total");
-
- // 입금된 내역은 개수에 관계없이 무조건 선택되게끔
- for (var i = 1; i <= cnt; i++) {
-
- var path = "/root/main/h_bldc/bldc[" + i + "]";
-
- if (parseInt(model.getValue(path + "/bldc_depoamt")) == 0) {
- continue;
- }
-
- model.setValue(path + "/bldc_ckbox", "true");
- appcnt--;
-
- model.duplicate("/root/main/capp/h_bldc", path);
-
- totalamt += parseInt(model.getValue(path + "/bldc_discamt"));
- }
-
- // 그 후 남는 개수가 있으면 추가
- for (var i = 1; i <= cnt; i++) {
-
- var path = "/root/main/h_bldc/bldc[" + i + "]";
-
- if (parseInt(model.getValue(path + "/bldc_depoamt")) > 0) {
- continue;
- }
-
- if (appcnt > 0) {
- model.setValue(path + "/bldc_ckbox", "true");
- appcnt--;
- } else {
- break;
- }
-
- model.duplicate("/root/main/capp/h_bldc", path);
-
- totalamt += parseInt(model.getValue(path + "/bldc_discamt"));
- }
- }
-
- // ABO 수혈검사료 적용 개수 설정
-
- cnt = instance1.selectNodes("/root/main/capp/h_bldc/bldc").length;
-
- var ddArr = new Array();
- var idx = 0;
-
- for (var i = 1; i <= cnt; i++) {
-
- var appdd = model.getValue("/root/main/capp/h_bldc/bldc[" + i + "]/bldc_appdd");
-
- if (ddArr.length < 1) {
- ddArr[idx] = appdd;
- idx++;
- model.setValue("/root/main/capp/h_bldc/bldc[" + i + "]/bldc_abocnt", "1");
- continue;
- }
-
- var flag = true;
- for (var j = 0; j < ddArr.length; j++) {
- if (appdd == ddArr[j]) {
- flag = false;
- break;
- }
- }
-
- if (flag) {
- model.setValue("/root/main/capp/h_bldc/bldc[" + i + "]/bldc_abocnt", "1");
- ddArr[idx] = appdd;
- idx++;
- }
- }
-
- grd_bldcapp.refresh();
- grd_bldc.refresh();
-
- model.setvalue("/root/main/bldc/totalamt", totalamt);
- opt_totamt.refresh();
-
- ]]>
- </script>
- </button>
- <button id="btn_confirm" class="btn4_letter2" style="left:745px; top:655px; width:56px; height:22px; ">
- <caption>승인</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- if (checkOpener()) {
-
- opener.javascript.setParameter("SPPAO01401_RTN", "Y");
-
- if (strRcv != null && strRcv != "" && strRcv != " " && strRcv != "-") {
-
- copyNodesetType(strRcv, "/root/main/capp/h_bldc", "replace", parent.model, model);
- opener.javascript.setParameter("SPPAO01401_TotBldcDiscAmt", model.getvalue("/root/main/bldc/totalamt"));
-
- }
-
- window.close();
- }
- ]]>
- </script>
- </button>
- <button id="btn_cancel" class="btn4_letter2" style="left:804px; top:655px; width:56px; height:22px; ">
- <caption>취소</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- if (checkOpener()) {
- opener.javascript.setParameter("SPPAO01401_RTN", "N");
- window.close();
- }
- ]]>
- </script>
- </button>
- <button id="button1" class="btn4_letter2" style="left:687px; top:655px; width:56px; height:22px; ">
- <caption>조회</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- fSearch();
-
- alert(instance1.selectNodes("/root/main/capp/h_bldc/bldc").length + "\n" + instance1.selectNodes("/root/main/capp/h_bldc/bldc/bldc_pid").length);
- ]]>
- </script>
- </button>
- <caption id="caption5" style="left:155px; top:332px; width:206px; height:15px; color:crimson; ">※ 입금된 내역은 변경할 수 없습니다.</caption>
- <select1 id="rdo_appflag" ref="/root/main/bldc/appflag" appearance="full" cellspacing="70" cols="2" overflow="visible" style="left:370px; top:332px; width:255px; height:15px; font-weight:bold; border-style:none; ">
- <choices>
- <item>
- <label>헌혈증 개수 :</label>
- <value>CNT</value>
- </item>
- <item>
- <label>직접 선택</label>
- <value>SEL</value>
- </item>
- </choices>
- <script type="javascript" ev:event="xforms-value-changed">
- <![CDATA[
- if (model.getValue("/root/main/bldc/appflag") == "CNT") {
- ipt_total.disabled = false;
- } else {
- ipt_total.disabled = true;
- }
- ]]>
- </script>
- </select1>
- <input id="ipt_total" ref="/root/main/bldc/total" style="left:475px; top:330px; width:55px; height:19px; font-weight:bold; text-align:center; background-color:#ffffa0; ">
- <script type="javascript" ev:event="onkeyup">
- <![CDATA[
- if (event.keyCode != "13") {
- return;
- }
-
- setInputNodeCurText();
-
- btn_copy.dispatch("DOMActivate");
- ]]>
- </script>
- </input>
- </xhtml:body>
- </xhtml:html>
|