123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934 |
- <?xml version="1.0" encoding="EUC-KR"?>
- <?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>BMT 환자 이식 차수관리</xhtml:title>
- <model id="model1">
- <instance id="instance1">
- <root xmlns="">
- <main>
- <trnptdgmngt>
- <trnptdglist>
- <totdg/>
- <autoallodg/>
- <allotrnptkinddg/>
- <trnptkind/>
- <scs/>
- <trnptdd/>
- <insukind/>
- <hngnm/>
- <diagcd1/>
- <trnptdg/>
- <pid/>
- <sex/>
- <trnptage/>
- <pattrnptafbtype/>
- <gvhd/>
- <dethyn/>
- <trnptbfdays/>
- <dethresn/>
- <dnornm/>
- <dnorsex/>
- <dnorage/>
- <dnorbtype/>
- <dnorpid/>
- <trnptwardcd/>
- <trnptroomcd/>
- <deptcd/>
- </trnptdglist>
- </trnptdgmngt>
- <hsctinfo>
- <patinfolist>
- <hngnm/>
- <rrgstno1/>
- <age/>
- <sex/>
- <pid/>
- <rrgstno2/>
- </patinfolist>
- </hsctinfo>
- <popupendflag/>
- </main>
- <init>
- <cmbinfo>
- <trnptkind>
- <A0161>
- <cdid/>
- <cdnm/>
- </A0161>
- </trnptkind>
- <scs>
- <A0162>
- <cdid/>
- <cdnm/>
- </A0162>
- </scs>
- <btype>
- <M0376>
- <cdid/>
- <cdnm/>
- </M0376>
- </btype>
- <sex>
- <P0313>
- <cdid/>
- <cdnm/>
- </P0313>
- </sex>
- <deptcd>
- <A0478>
- <cdid/>
- <cdnm/>
- </A0478>
- </deptcd>
- <trnptwardcd>
- <A0479>
- <cdid/>
- <cdnm/>
- </A0479>
- </trnptwardcd>
- <trnptroomcd>
- <A0480>
- <cdid/>
- <cdnm/>
- </A0480>
- </trnptroomcd>
- <lrglist>
- <item>
- <hsctlrgcd/>
- <hsctlrgnm/>
- </item>
- </lrglist>
- <dethresn>
- <A0186>
- <cdid/>
- <cdnm/>
- </A0186>
- </dethresn>
- </cmbinfo>
- </init>
- <send>
- <data>
- <trnptfromdd/>
- <trnpttodd/>
- <trnptkind/>
- <scs/>
- <diagcd1/>
- <sex/>
- <pattrnptafbtype/>
- <insuaprvkind/>
- <pid/>
- <insukind/>
- </data>
- <savedata/>
- <lrggrupcd>DI</lrggrupcd>
- <hsctlrgcd/>
- </send>
- <hidden/>
- <temp>
- <trnptdg>
- <pid/>
- <hngnm/>
- <trnptdg/>
- <totdg/>
- <autoallodg/>
- <allotrnptkinddg/>
- <trnptkind/>
- <trnptdd/>
- <selectrow/>
- </trnptdg>
- <bmtpatientinfo/>
- <tempcodeinfo/>
- <tempcodeinfo2/>
- </temp>
- </root>
- </instance>
- <script type="javascript" src="../../../com/commonweb/js/common.js"/>
- <script type="javascript" src="../../../com/commonweb/js/dateHelper.js"/>
- <script type="javascript" src="../../../com/basiccodeweb/js/ZBC001.js"/>
- <script type="javascript" src="../../../com/commonweb/js/tfHelper.js"/>
- <script type="javascript" src="../../../com/commonweb/js/utilHelper.js"/>
- <script type="javascript" src="../../../com/commonweb/js/stringHelper.js"/>
- <script type="javascript" src="../../../ast/hsctweb/js/bmtcommon.js"/>
- <script type="javascript" ev:event="xforms-ready">
- <![CDATA[
- // zbcfGetCodeList( new Array("A0161","A0162","M0376", "P0313" , "A0479", "A0480", "A0478"),
- // new Array("/root/init/cmbinfo/trnptkind" , "/root/init/cmbinfo/scs",
- // "/root/init/cmbinfo/btype" , "/root/init/cmbinfo/sex",
- // "/root/init/cmbinfo/trnptwardcd", "/root/init/cmbinfo/trnptroomcd",
- // "/root/init/cmbinfo/deptcd") );
- zbcfGetCodeList( new Array("M0376", "P0313"),
- new Array("/root/init/cmbinfo/btype" , "/root/init/cmbinfo/sex") );
-
- //BMT 코드성 데이터 조회.(기존의 공통코드로 사용했던것들을 BMT에서 관리하도록 수정 후)
- aboGetCodeList(new Array("A0161","A0162", "A0479", "A0480", "A0478", "A0186"),
- new Array("/root/init/cmbinfo/trnptkind" , "/root/init/cmbinfo/scs",
- "/root/init/cmbinfo/trnptwardcd", "/root/init/cmbinfo/trnptroomcd",
- "/root/init/cmbinfo/deptcd", "/root/init/cmbinfo/dethresn"));
-
-
-
- // bmtcommon.js : BMT 진단대분류 조회 : 맨 앞에 공백을 추가해주기 위해서 함수로 변경
- abofGetBmtDIagLrgList();
- // bmtcommon.js : 이식종류에 AUTO [00] 추가해주기
- abofSetTrnptKindCdAuto();
- var strnptfromdd = getCurrentDate().substr(0,6).toDate().getAddDate(1,"D").getDateFormat("YYYYMMDD");
- ipt_trnptfromdd.value = strnptfromdd;
- var strnpttodd = getCurrentDate().substr(0,6) + strnptfromdd.toDate().getMonthDay();
- ipt_trnpttodd.value = strnpttodd;
- // 파라미터로 넘어온 것 (등록번호)이 있는지 체크한다.
- if ( checkOpener()) {
- var param = opener.javascript.getParameter("opener_parameter_id");
- if(param != "") // opener parameter value가 있는 경우
- {
- //parameter value를 이용하여 프로그램 수행
- condarray = param.split("▦");
- model.setValue("/root/send/data/pid", condarray[0]);
- return;
- }
- }
- // Opener에서 받은 파라미터가 없으면 Top 정보를 참조한다.
- var paminfo = getGlobalVariable("paminfo"); //프로그램에 따라 원무정보(paminfo), 환자기본정보(patflag) get
- if ( paminfo != "" ) {
- model.removeNodeset("/root/temp/paminfo"); //여러개의 instance발생을 막기 위해 removeNodeset을 해줘야 함.
- model.makeNode("/root/temp/paminfo");
- setCSVToNode("/root/temp/paminfo", paminfo);
- //상단 정보를 이용하여 프로그램 수행
- var pid = model.getValue("/root/temp/paminfo" + "/list/pid");
- model.setValue("/root/send/data/pid", pid);
- } else {
- //세션에 저장된 PID정보를 가져옴.
- var gv_pid = getGlobalVariable("gv_pid", "A");
- if(gv_pid != "") {
- model.setValue("/root/send/data/pid", gv_pid);
- }
- }
- //타부서에서는 버튼 비활성화
- btn_save.disabled = !checkAuth("X");
-
- model.refresh();
- ]]>
- </script>
- <script type="javascript">
- <![CDATA[
- /* @group : BMT 환자 이식차수관리
- * @ver : 2008.02.04
- * @by : 남수현
- * @type : function
- * @access : public
- * @desc : BMT 환자 이식차수관리 리스트조회
- * @param :
- */
- function fGetTrnptDgMngtList(){
- submit("TRABO01501");
- model.refresh();
- }
- /* @group : BMT 환자 이식차수관리
- * @ver : 2008.02.04
- * @by : 남수현
- * @type : function
- * @access : public
- * @desc : 이식차수자동생성
- * @param :
- */
- function fCalcTrnptDgAuto(){
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + 1 + "]/totdg") == "" ) {
- messageBox("전체 차수 생성을 위한 시작차수번호를 첫번째 행에", "C001");
- return false;
- }
- var stotdg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + 1 + "]/totdg"));
- var sautodg = 0;
- var sallodg = 0;
- var sautodgrow = 0;
- var sallodgrow = 0;
- // AUTO와 ALLO의 시작차수번호를 찾는다.
- for (var i = 1; i < grd_patlist.rows; i++) {
- if (sautodg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "00") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/autoallodg") == "" ) {
- messageBox("AUTO 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C001");
- grd_patlist.row = i;
- grd_patlist.col = 2;
- model.setFocus( "grd_patlist");
- return false;
- }
- sautodg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/autoallodg"));
- sautodgrow = i;
- }
- if (sallodg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") != "00") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + 1 + "]/autoallodg") == "" ) {
- messageBox("ALLO 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C001");
- grd_patlist.row = i;
- grd_patlist.col = 2;
- model.setFocus( "grd_patlist");
- return false;
- }
- sallodg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/autoallodg"));
- sallodgrow = i;
- }
- // if ((sautodgrow > 0) && (sallodgrow > 0)) {
- // break;
- // }
- }
-
- for (var i = 1; i < grd_patlist.rows; i++) {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/totdg", stotdg);
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "00") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/autoallodg", sautodg);
- sautodg = sautodg + 1;
- }
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") != "00") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/autoallodg", sallodg);
- sallodg = sallodg + 1;
- }
- stotdg = stotdg + 1;
- }
- model.refresh();
- }
- /* @group : BMT 환자 이식차수관리
- * @ver : 2008.02.04
- * @by : 남수현
- * @type : function
- * @access : public
- * @desc : Allo Kind 이식차수자동생성
- * @param :
- */
- function fCalcTrnptDgAlloAuto(){
- // if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + 1 + "]/allotrnptkinddg") == "" ) {
- // messageBox("Allo Kind 차수 생성을 위한 시작차수번호를 첫번째 행에", "C001");
- // return false;
- // }
- //
- // var sallotrnptkinddg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + 1 + "]/allotrnptkinddg"));
- // var strnptkind = model.getValue("/root/main/trnptdgmngt/trnptdglist[" + 1 + "]/trnptkind");
- //
- // for (var i = 1; i < grd_patlist.rows; i++) {
- // if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == strnptkind ) {
- // model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", sallotrnptkinddg);
- // sallotrnptkinddg = sallotrnptkinddg + 1;
- // }
- // }
- // model.refresh();
-
-
-
- var SiblingStandarddg = 0 , SiblingStandarddgrow = 0 ;
- var SiblingNSTdg = 0, SiblingNSTdgrow = 0;
- var FMMStandarddg = 0, FMMStandarddgrow = 0;
- var FMMNSTdg = 0, FMMNSTdgrow = 0;
- var FMStandarddg = 0, FMStandarddgrow = 0;
- var FMNSTdg = 0, FMNSTdgrow = 0;
- var UnrelatedStandarddg = 0, UnrelatedStandarddgrow = 0;
- var UnrealtedNSTdg = 0, UnrealtedNSTdgrow = 0;
- var CordStandarddg = 0, CordStandarddgrow = 0;
- var CordNSTdg = 0, CordNSTdgrow = 0;
- // AUTO와 ALLO의 시작차수번호를 찾는다.
- for (var i = 1; i < grd_patlist.rows; i++) {
- if (SiblingStandarddg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "01") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg") == "" ) {
- messageBox("Sibling Standard 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C001");
- grd_patlist.row = i;
- model.setFocus( "grd_patlist");
- return false;
- }
- SiblingStandarddg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg"));
- SiblingStandarddgrow = i;
- }
- if (SiblingNSTdg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "02") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg") == "" ) {
- messageBox("Sibling NST 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C002");
- grd_patlist.row = i;
- model.setFocus( "grd_patlist");
- return false;
- }
- SiblingNSTdg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg"));
- SiblingNSTdgrow = i;
- }
- if (FMMStandarddg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "03") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg") == "" ) {
- messageBox("FMM Standard 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C002");
- grd_patlist.row = i;
- model.setFocus( "grd_patlist");
- return false;
- }
- FMMStandarddg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg"));
- FMMStandarddgrow = i;
- }
- if (FMMNSTdg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "04") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg") == "" ) {
- messageBox("FMM NST 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C002");
- grd_patlist.row = i;
- model.setFocus( "grd_patlist");
- return false;
- }
- FMMNSTdg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg"));
- FMMNSTdgrow = i;
- }
- if (FMStandarddg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "05") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg") == "" ) {
- messageBox("FM Standard 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C002");
- grd_patlist.row = i;
- model.setFocus( "grd_patlist");
- return false;
- }
- FMStandarddg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg"));
- FMStandarddgrow = i;
- }
- if (FMNSTdg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "06") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg") == "" ) {
- messageBox("FM NST 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C002");
- grd_patlist.row = i;
- model.setFocus( "grd_patlist");
- return false;
- }
- FMNSTdg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg"));
- FMNSTdgrow = i;
- }
- if (UnrelatedStandarddg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "07") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg") == "" ) {
- messageBox("Unrelated Standard 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C002");
- grd_patlist.row = i;
- model.setFocus( "grd_patlist");
- return false;
- }
- UnrelatedStandarddg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg"));
- UnrelatedStandarddgrow = i;
- }
- if (UnrealtedNSTdg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "08") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg") == "" ) {
- messageBox("Unrealted NST 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C002");
- grd_patlist.row = i;
- model.setFocus( "grd_patlist");
- return false;
- }
- UnrealtedNSTdg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg"));
- UnrealtedNSTdgrow = i;
- }
- if (CordStandarddg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "09") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg") == "" ) {
- messageBox("Cord Standard 차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C002");
- grd_patlist.row = i;
- model.setFocus( "grd_patlist");
- return false;
- }
- CordStandarddg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg"));
- CordStandarddgrow = i;
- }
- if (CordNSTdg == 0 && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "10") {
- if ( model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg") == "" ) {
- messageBox("Cord NST차수 생성을 위한 시작차수번호를 " + i + "번째 행에", "C002");
- grd_patlist.row = i;
- model.setFocus( "grd_patlist");
- return false;
- }
- CordNSTdg = parseInt(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg"));
- CordNSTdgrow = i;
- }
- }
-
- for (var i = 1; i < grd_patlist.rows; i++) {
-
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "01") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", SiblingStandarddg);
- SiblingStandarddg = SiblingStandarddg + 1;
- }
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "02") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", SiblingNSTdg);
- SiblingNSTdg = SiblingNSTdg + 1;
- }
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "03") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", FMMStandarddg);
- FMMStandarddg = FMMStandarddg + 1;
- }
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "04") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", FMMNSTdg);
- FMMNSTdg = FMMNSTdg + 1;
- }
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "05") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", FMStandarddg);
- FMStandarddg = FMStandarddg + 1;
- }
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "06") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", FMNSTdg);
- FMNSTdg = FMNSTdg + 1;
- }
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "07") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", UnrelatedStandarddg);
- UnrelatedStandarddg = UnrelatedStandarddg + 1;
- }
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "08") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", UnrealtedNSTdg);
- UnrealtedNSTdg = UnrealtedNSTdg + 1;
- }
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "09") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", CordStandarddg);
- CordStandarddg = CordStandarddg + 1;
- }
- if (model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/trnptkind") == "10") {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", CordNSTdg);
- CordNSTdg = CordNSTdg + 1;
- }
-
- }
- model.refresh();
-
-
-
-
-
-
-
-
-
-
-
- }
- /* @group : BMT 환자 이식차수관리
- * @ver : 2008.02.04
- * @by : 남수현
- * @type : function
- * @access : public
- * @desc : 선택차수지우기
- * @param : A [전체차수], S [선택차수]
- */
- function fSetTrnptDgClear(paramFlag){
- if ( paramFlag == "S" ) {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/totdg" , "");
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/autoallodg", "");
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/allotrnptkinddg", "");
- model.setValue("/root/temp/trnptdg/totdg" , "");
- model.setValue("/root/temp/trnptdg/autoallodg" , "");
- model.setValue("/root/temp/trnptdg/allotrnptkinddg" , "");
- } else if ( paramFlag == "A" ) {
- for (var i = 1; i < grd_patlist.rows; i++) {
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/totdg" , "");
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/autoallodg", "");
- model.setValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/allotrnptkinddg", "");
- }
- }
- model.refresh();
- }
-
-
- function fDataCheck () {
- var nodelist = instance1.selectNodes("/root/main/trnptdgmngt/trnptdglist");
- for(var i = 1; i <= nodelist.length; i++){
- for(var j = 1; j <= nodelist.length; j++){
- if (i != j && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + i + "]/totdg") == model.getValue("/root/main/trnptdgmngt/trnptdglist[" + j + "]/totdg") && model.getValue("/root/main/trnptdgmngt/trnptdglist[" + j + "]/totdg") != ""){
- messageBox("Total 차수의 값이" + i + "번째 행과 " + j + "번째 행이 같습니다. 다시", "C002");
- return false;
- }
- }
- }
- return true;
- }
-
-
- function fSetTrnptKindDg () {
- if(fDataCheck()){
- submit("TXABO01501");
- }
- model.refresh();
- }
-
- ]]>
- </script>
- <submission id="TRABO00001" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/data/pid" replace="instance" resultref="/root/main/hsctinfo"/>
- <submission id="TRABO02101" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/init/cmbinfo/lrglist"/>
- <submission id="TRABO01501" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/data" replace="instance" resultref="/root/main/trnptdgmngt"/>
- <submission id="TXABO01501" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/main/trnptdgmngt/trnptdglist" replace="instance" resultref="/root/hidden"/>
- <submission id="TRABO02103" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/temp/tempcodeinfo"/>
- </model>
- </xhtml:head>
- <xhtml:body guideline="1,1195;" style="margin-left:8; margin-top:0; margin-right:8; margin-bottom:0; ">
- <group id="grp_tle" style="left:0px; top:0px; width:1195px; height:13px; ">
- <caption id="caption6" class="tit_1" style="left:0px; top:0px; width:164px; height:13px; ">차수관리</caption>
- </group>
- <group id="grp_biz" scroll="auto" style="left:0px; top:40px; width:1195px; height:744px; ">
- <caption id="caption1" class="tit_2" style="left:5px; top:80px; width:100px; height:13px; ">BMT 리스트</caption>
- <line id="line1" class="line_1" style="x1:0px; y1:95px; x2:1194px; y2:95px; "/>
- <group id="grp_sea" style="left:0px; top:10px; width:1194px; height:60px; vertical-align:top; ">
- <shape id="roundrect1" class="roundrect_search" appearance="roundrect" ellipsewidth="10" ellipseheight="10" style="left:0px; top:0px; width:1194px; height:59px; background-color:#fffbf2; border-color:#ffd799; "/>
- <caption id="caption2" class="search_name" style="left:15px; top:7px; width:112px; height:17px; ">기간(이식일) :</caption>
- <caption id="caption3" class="search_name" style="left:364px; top:7px; width:86px; height:17px; ">승인구분 :</caption>
- <caption id="caption4" class="search_name" style="left:567px; top:7px; width:73px; height:17px; ">진단명 :</caption>
- <caption id="caption5" class="search_no_b" style="left:233px; top:7px; width:12px; height:17px; ">~</caption>
- <line id="line13" class="line_4" style="x1:1107px; y1:8px; x2:1107px; y2:51px; "/>
- <caption id="caption33" class="search_name" style="left:758px; top:7px; width:151px; height:17px; ">Stem Cell Source :</caption>
- <select1 id="combo1" ref="/root/send/data/insuaprvkind" class="combo_search" appearance="minimal" style="left:452px; top:7px; width:100px; height:19px; ">
- <choices>
- <item>
- <label/>
- <value/>
- </item>
- <item>
- <label>급여</label>
- <value>1</value>
- </item>
- <item>
- <label>비급여</label>
- <value>2</value>
- </item>
- <item>
- <label>사후승인</label>
- <value>3</value>
- </item>
- </choices>
- </select1>
- <select1 id="combo2" ref="/root/send/data/diagcd1" class="combo_search" appearance="minimal" style="left:643px; top:7px; width:100px; height:19px; ">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/lrglist/item">
- <label ref="hsctlrgnm"/>
- <value ref="hsctlrgcd"/>
- </itemset>
- </choices>
- </select1>
- <select1 id="combo5" ref="/root/send/data/scs" class="combo_search" appearance="minimal" style="left:912px; top:7px; width:100px; height:19px; ">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/scs/A0162">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </select1>
- <select1 id="combo3" ref="/root/send/data/trnptkind" class="combo_search" appearance="minimal" style="left:452px; top:34px; width:100px; height:19px; ">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/trnptkind/A0161">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </select1>
- <caption id="caption7" class="search_name" style="left:364px; top:34px; width:86px; height:17px; ">이식종류 :</caption>
- <select1 id="combo4" ref="/root/send/data/pattrnptafbtype" class="combo_search" appearance="minimal" style="left:643px; top:34px; width:100px; height:19px; ">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/btype/M0376">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </select1>
- <caption id="caption8" class="search_name" style="left:567px; top:34px; width:73px; height:17px; ">혈액형 :</caption>
- <caption id="caption9" class="search_name" style="left:758px; top:34px; width:60px; height:17px; ">성별 :</caption>
- <select1 id="combo6" ref="/root/send/data/sex" class="combo_search" appearance="minimal" style="left:821px; top:32px; width:70px; height:19px; ">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/sex/P0313">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </select1>
- <button id="btn_sea" class="btn1_letter2" style="left:1123px; top:19px; width:56px; height:22px; ">
- <caption>조회</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- model.setValue("/root/send/data/pid", ipt_pid.currentText);
- submit("TRABO00001"); //환자 정보 조회;
- fGetTrnptDgMngtList();
- ]]>
- </script>
- </button>
- <input id="ipt_trnptfromdd" ref="/root/send/data/trnptfromdd" class="input_s_essential" inputtype="date" style="left:130px; top:7px; width:100px; height:19px; "/>
- <input id="ipt_trnpttodd" ref="/root/send/data/trnpttodd" class="input_s_essential" inputtype="date" style="left:249px; top:7px; width:100px; height:19px; "/>
- <output id="output5" ref="/root/main/hsctinfo/patinfolist/age" class="output_search" style="left:289px; top:35px; width:30px; height:19px; text-align:center; "/>
- <output id="output6" ref="/root/main/hsctinfo/patinfolist/sex" class="output_search" style="left:322px; top:35px; width:30px; height:19px; text-align:center; "/>
- <output id="output17" ref="/root/main/hsctinfo/patinfolist/hngnm" class="output_search" style="left:206px; top:35px; width:80px; height:19px; text-align:center; "/>
- <caption id="caption16" class="search_name" style="left:15px; top:36px; width:86px; height:17px; ">등록번호 :</caption>
- <input id="ipt_pid" ref="/root/send/data/pid" class="input_essential" editable="true" inputtype="button" maxlength="10" style="left:104px; top:35px; width:100px; height:19px; ">
- <script type="javascript" ev:event="onkeyup">
- <![CDATA[
- if(event.keyCode == "13"){
- btn_sea.dispatch("DOMActivate");
- }
- ]]>
- </script>
- <script type="javascript" ev:event="xforms-next">
- <![CDATA[
- model.setFocus( "ipt_pid");
- ]]>
- </script>
- <script type="javascript" ev:event="onbuttonclick">
- <![CDATA[
- abofGetBmtPatientSearch("/root/main/hsctinfo/patinfolist", "/root/temp/bmtpatientinfo");
- model.setValue("/root/send/data/pid", model.getValue("/root/temp/bmtpatientinfo/pid"));
- submit("TRABO00001"); //환자 정보 조회;
- fGetTrnptDgMngtList();
-
- ]]>
- </script>
- </input>
- <caption id="caption17" class="search_name" style="left:906px; top:34px; width:60px; height:17px; ">급여 :</caption>
- <select1 id="combo7" ref="/root/send/data/insukind" class="combo_search" appearance="minimal" style="left:969px; top:32px; width:70px; height:19px; ">
- <choices>
- <item>
- <label/>
- <value/>
- </item>
- <item>
- <label>급여</label>
- <value>1</value>
- </item>
- <item>
- <label>비급여</label>
- <value>2</value>
- </item>
- </choices>
- </select1>
- </group>
- <caption id="caption10" class="tit_2" style="left:5px; top:695px; width:90px; height:13px; ">차수관리</caption>
- <line id="line2" class="line_1" style="x1:0px; y1:710px; x2:1194px; y2:710px; "/>
- <caption id="caption31" class="cell_1" style="left:0px; top:715px; width:90px; height:23px; vertical-align:middle; ">등록번호</caption>
- <output id="output25" ref="/root/temp/trnptdg/pid" class="output_fix" style="left:93px; top:716px; width:80px; height:19px; text-align:center; "/>
- <output id="output1" ref="/root/temp/trnptdg/hngnm" class="output_fix" style="left:176px; top:716px; width:80px; height:19px; text-align:center; "/>
- <caption id="caption11" class="cell_1" style="left:259px; top:715px; width:90px; height:23px; vertical-align:middle; ">회차</caption>
- <output id="output2" ref="/root/temp/trnptdg/trnptdg" class="output_fix" style="left:352px; top:716px; width:60px; height:19px; text-align:center; "/>
- <caption id="caption12" class="cell_1" style="left:415px; top:715px; width:90px; height:23px; vertical-align:middle; ">이식일자</caption>
- <output id="output3" ref="/root/temp/trnptdg/trnptdd" class="output_fix" format="yyyy-mm-dd" style="left:508px; top:716px; width:80px; height:19px; text-align:center; "/>
- <caption id="caption13" class="cell_1" style="left:591px; top:715px; width:90px; height:23px; vertical-align:middle; ">Total</caption>
- <caption id="caption14" class="cell_1" style="left:747px; top:715px; width:90px; height:23px; vertical-align:middle; ">AUTO/ALLO</caption>
- <caption id="caption15" class="cell_1" style="left:903px; top:715px; width:90px; height:23px; vertical-align:middle; ">이식종류</caption>
- <output id="output4" ref="/root/temp/trnptdg/trnptkind" class="output_fix" style="left:996px; top:716px; width:135px; height:19px; text-align:center; "/>
- <button id="button3" class="btn2_letter7" style="left:1097px; top:690px; width:97px; height:19px; ">
- <caption>선택차수지우기</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- // 선택한 환자의 차수정보를 Celar한다.
- if ( messageBox(model.getValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/hngnm") + " 환자의 Total, Auto/Allo, Allo Kind 차수정보를 지웁니다.", "Q004") == 6 ) {
- fSetTrnptDgClear("S");
- }
- ]]>
- </script>
- </button>
- <button id="button4" class="btn2_letter6" style="left:1008px; top:690px; width:86px; height:19px; ">
- <caption>차수자동생성</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- // Total 차수와 Auto/Allo 처수를 자동 생성한다.
- if ( messageBox("Total 차수와 Auto/Allo 차수를 생성합니다.", "Q004") == 6 ) {
- fCalcTrnptDgAuto();
- }
- ]]>
- </script>
- <hint>
- <![CDATA[Total과 Auto/Allo 차수 생성]]>
- </hint>
- </button>
- <line id="line127" class="line_3" style="left:0px; width:90px; x1:0px; y1:737px; x2:1194px; y2:737px; "/>
- <button id="btn_excsave" class="btn2_letter4" style="left:1130px; top:75px; width:64px; height:19px; ">
- <caption>엑셀저장</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- var fileName = window.fileDialog("save", ",", false, "차수관리", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");
- if(fileName != "") {
- grd_patlist.saveExcel(fileName, "sheet1");
- }
- ]]>
- </script>
- </button>
- <datagrid id="grd_patlist" nodeset="/root/main/trnptdgmngt/trnptdglist" class="datagrid2" caption="Total 차수^AUTO 및 ALLO차수^Kind 차수^이식종류^Stem Cell Source^이식일^급여^환자명^진단명^이식차수^등록번호^성별^이식당시나이^혈액형^GVHD^ 생존 여부^이식후생존일^사인^공여자명^공여자성별^공여자나이^공여자혈액형^공여자
등록번호^UNIT^병실^진료과" colsep="^" colwidth="52, 67, 71, 113, 74, 73, 50, 81, 150, 30, 60, 36, 39, 45, 65, 39, 45, 100, 100, 42, 42, 45, 89, 104, 103, 100" dataheight="25" explorerbar="sortshow" extendlastcol="scroll" focuscolor="#b9e5fb" mergecellsfixedrows="bycolrec" rowheader="seq" rowheight="32" rowsep="|" style="left:0px; top:100px; width:1194px; height:585px; text-align:center; word-wrap:word; ">
- <col ref="totdg" type="input"/>
- <col ref="autoallodg" type="input"/>
- <col ref="allotrnptkinddg" type="input"/>
- <col disabled="true" ref="trnptkind" type="combo" style="left:240px; top:32px; width:100px; height:23px; ">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/trnptkind/A0161">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <col disabled="true" ref="scs" type="combo">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/scs/A0162">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <col ref="trnptdd" format="yyyy-mm-dd"/>
- <col ref="insukind" type="combo">
- <choices>
- <item>
- <label>급여</label>
- <value>1</value>
- </item>
- <item>
- <label>비급여</label>
- <value>2</value>
- </item>
- </choices>
- </col>
- <col ref="hngnm"/>
- <col ref="diagcd1" type="combo">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/lrglist/item">
- <label ref="hsctlrgnm"/>
- <value ref="hsctlrgcd"/>
- </itemset>
- </choices>
- </col>
- <col ref="trnptdg"/>
- <col ref="pid"/>
- <col disabled="true" ref="sex" type="combo">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/sex/P0313">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <col ref="trnptage"/>
- <col disabled="true" ref="pattrnptafbtype" type="combo">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/btype/M0376">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <col ref="gvhd"/>
- <col ref="dethyn"/>
- <col ref="trnptbfdays"/>
- <col ref="dethresn" type="combo">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/dethresn/A0186">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <col ref="dnornm"/>
- <col disabled="true" ref="dnorsex" type="combo" style="left:1079px; top:32px; width:42px; height:23px; ">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/sex/P0313">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <col ref="dnorage"/>
- <col disabled="true" ref="dnorbtype" type="combo">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/btype/M0376">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <col ref="dnorpid"/>
- <col disabled="true" ref="trnptwardcd" type="combo">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/trnptwardcd/A0479">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <col disabled="true" ref="trnptroomcd" type="combo">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/trnptroomcd/A0480">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <col disabled="true" ref="deptcd" type="combo">
- <choices>
- <itemset nodeset="/root/init/cmbinfo/deptcd/A0478">
- <label ref="cdnm"/>
- <value ref="cdid"/>
- </itemset>
- </choices>
- </col>
- <script type="javascript" ev:event="onclick">
- <![CDATA[
- if ( grd_patlist.isCell(event.target) && grd_patlist.row >= grd_patlist.fixedRows) {
-
- grd_patlist.editCell();
- model.setValue("/root/temp/trnptdg/pid" , model.getValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/pid"));
- model.setValue("/root/temp/trnptdg/hngnm" , model.getValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/hngnm"));
- model.setValue("/root/temp/trnptdg/trnptdg" , model.getValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/trnptdg"));
- model.setValue("/root/temp/trnptdg/totdg" , model.getValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/totdg"));
- model.setValue("/root/temp/trnptdg/autoallodg" , model.getValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/autoallodg"));
- model.setValue("/root/temp/trnptdg/trnptdd" , model.getValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/trnptdd"));
- model.setValue("/root/temp/trnptdg/selectrow" , grd_patlist.row);
- model.setValue("/root/temp/trnptdg/trnptkind" , grd_patlist.labelmatrix(grd_patlist.row, 4));
-
- model.setValue("/root/temp/trnptdg/allotrnptkinddg", model.getValue("/root/main/trnptdgmngt/trnptdglist[" + grd_patlist.row + "]/allotrnptkinddg"));
- model.refresh();
-
- }
- ]]>
- </script>
- <script type="javascript" ev:event="onaftersort">
- <![CDATA[
- grd_patlist.gridToInstance();
- ]]>
- </script>
- </datagrid>
- <button id="button1" class="btn2_letter11" style="left:864px; top:690px; width:141px; height:19px; ">
- <caption>Allo Kind 차수자동생성</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- // Allo 이식종류별 처수를 자동 생성한다.
- if ( messageBox("Allo 이식종류별 차수를 생성합니다.", "Q004") == 6 ) {
- fCalcTrnptDgAlloAuto();
- }
- ]]>
- </script>
- <hint>
- <![CDATA[Allo Kind 차수 생성]]>
- </hint>
- </button>
- <button id="button2" class="btn2_letter7" style="left:764px; top:690px; width:97px; height:19px; ">
- <caption>전체차수지우기</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- // 선택한 환자의 차수정보를 Celar한다.
- if ( messageBox("전체 환자의 Total, Auto/Allo, Allo Kind 차수정보를 지웁니다.", "Q004") == 6 ) {
- fSetTrnptDgClear("A");
- }
- ]]>
- </script>
- </button>
- <output id="output7" ref="/root/temp/trnptdg/totdg" class="output_fix" style="left:684px; top:716px; width:60px; height:19px; text-align:center; "/>
- <output id="output8" ref="/root/temp/trnptdg/autoallodg" class="output_fix" style="left:840px; top:716px; width:60px; height:19px; text-align:center; "/>
- <output id="output9" ref="/root/temp/trnptdg/allotrnptkinddg" class="output_fix" style="left:1134px; top:716px; width:60px; height:19px; text-align:center; "/>
- </group>
- <group id="grp_btn" style="left:0px; top:13px; width:1195px; height:27px; ">
- <button id="btn_save" class="btn4_letter2" style="left:1137px; top:5px; width:56px; height:22px; ">
- <caption>저장</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- fSetTrnptKindDg();
- fGetTrnptDgMngtList();
- ]]>
- </script>
- </button>
- <button id="btn_prt" class="btn6_letter2" style="left:0px; top:5px; width:56px; height:22px; ">
- <caption>출력</caption>
- <script type="javascript" ev:event="DOMActivate">
- <![CDATA[
- exeReportPreview("RPABO01501", "XMLSTR", "/root/main/trnptdgmngt");
- ]]>
- </script>
- </button>
- </group>
- </xhtml:body>
- </xhtml:html>
|