/** * ÆÄ ÀÏ ¸í : SPADT62200.js * ¼³ ¸í : (ÆË¾÷)º´µ¿Ã³¹æÀüÃâ·Â Javascriot * ¼³ °è ÀÚ : °øµÎ°æ * ÀÛ ¼º ÀÚ : °øµÎ°æ * ¼öÁ¤ÀÌ·Â : 2007.10.2 / ÃÖÃÊÀÛ¼º / °øµÎ°æ */ /** * ÃʱâÈ­ */ function fInit_prnt() { submit("TRADT62201"); //20090811 À̼±°æ ó¹æÀü ¼öµ¿ ùÃâ·Â½Ã log »ý¼º if(model.getValue("/root/send/prcpinfo/autoyn") != "Y" && model.getValue("/root/send/prcpinfo/reprintyn") != "Y") { model.addLog("º´µ¿Ã³¹æÀü Ãâ·Â log START"); model.addLog("pid : " + model.getValue("root/main/prcpdata/patinfo/pid")); model.addLog("prcpdd : " + model.getValue("root/main/prcpdata/patinfo/prcpdd")); model.addLog("drugno : " + model.getValue("root/main/prcpdata/patinfo/drugno")); model.addLog("º´µ¿Ã³¹æÀü Ãâ·Â log END"); } //20101102 À̼±°æ ¼öÁ¤ : ÀÏÀϱâÁذú 1ȸ ±âÁØÀÇ ¿ë·®°ú ¼ö·®À» º¸¿©ÁÖ´Â °ÍÀ» °áÁ¤ÇÏ¿© °á°ú¸¦ ¸®ÅÏ var colHidnValue = grdBaseColHidn("D"); //1ȸ ±âÁØ if( colHidnValue == "C") { model.makeValue("/root/main/prcpdata/patinfo/prcpvol2chk", "Y"); } if(model.getValue("/root/main/prcpdata/patinfo/pid") != ""){ var memo = model.getValue("/root/main/prcpdata/patinfo/memo"); var memoCnt = 0; var lineCnt = 0; var pageCnt = 0; var strMemo = ""; var nextMemo = ""; if ( memo.indexOf("\n", lineCnt ) >=0){ while ( (memoCnt = memo.indexOf("\n", lineCnt ))>=0){ if( pageCnt < 3) { if (lineCnt == 0) { strMemo = strMemo + memo.substring( lineCnt, memoCnt ); } else { strMemo = strMemo + "\n" + memo.substring( lineCnt, memoCnt ) ; } } else { if (pageCnt == 3) { nextMemo = nextMemo + memo.substring( lineCnt, memoCnt ); } else { nextMemo = nextMemo + "\n" + memo.substring( lineCnt, memoCnt ) ; } } lineCnt = memoCnt + 1; pageCnt++; } if ( lineCnt < memo.length ) { nextMemo = nextMemo + "\n" + memo.substring( lineCnt, memo.length ); } } else { strMemo = memo; } model.setValue("/root/main/prcpdata/patinfo/memo", strMemo); model.makeValue("/root/main/prcpdata/patinfo/memo1", nextMemo); var prepagecnt = 0; var nextpagecnt = 0; model.makeNode("root/temp/prcpdata/sumlist"); copyNodesetType("root/temp/prcpdata/sumlist", "root/main/prcpdata/sumlist", "replace"); model.removeNodeset("root/main/prcpdata/sumlist"); model.makeNode("root/main/prcpdata/sumlist"); model.makeNode("root/main/prcpdata/sumlist2"); //´ÙÀ½ÆäÀÌÁö Ãâ·ÂÇÒ ¾àǰ for (var i = 1 ; i <= getNodesetCount("/root/temp/prcpdata/sumlist"); i++) { var nextpageyn = model.getValue("root/temp/prcpdata/sumlist[" + i + "]/nextpageyn"); if(nextpageyn == "N" || nextpageyn =="") { copyNodesetType("root/main/prcpdata/sumlist", "root/temp/prcpdata/sumlist[" + i + "]", "after"); prepagecnt++; } else if(nextpageyn == "Y") { copyNodesetType("root/main/prcpdata/sumlist2", "root/temp/prcpdata/sumlist[" + i + "]", "after"); nextpagecnt++; } else { } } if(nextpagecnt > 0 ) { if(getNodesetCount("/root/temp/prcpdata/sumlist") > 1) { if(model.getValue("root/temp/prcpdata/sumlist[" + (getNodesetCount("/root/temp/prcpdata/sumlist") - 1) + "]/nextpageyn") == "E") { copyNodesetType("root/main/prcpdata/sumlist2", "root/temp/prcpdata/sumlist[" + (getNodesetCount("/root/temp/prcpdata/sumlist") - 1) + "]", "after"); } } copyNodesetType("root/main/prcpdata/sumlist2", "root/temp/prcpdata/sumlist[" + getNodesetCount("/root/temp/prcpdata/sumlist") + "]", "after"); } else { if(getNodesetCount("/root/temp/prcpdata/sumlist") > 1) { if(model.getValue("root/temp/prcpdata/sumlist[" + (getNodesetCount("/root/temp/prcpdata/sumlist") - 1) + "]/nextpageyn") == "E") { copyNodesetType("root/main/prcpdata/sumlist", "root/temp/prcpdata/sumlist[" + (getNodesetCount("/root/temp/prcpdata/sumlist") - 1) + "]", "after"); } } copyNodesetType("root/main/prcpdata/sumlist", "root/temp/prcpdata/sumlist[" + getNodesetCount("/root/temp/prcpdata/sumlist") + "]", "after"); } //ó¹æÀü¿¡ ȯÀÚ Å°, üÁßÀ» ÀÔ·ÂÇϱâ À§ÇØ Ã¹¹øÂ° °ø¹é ³ëµå »èÁ¦.(2010-01-18) if(model.getValue("root/main/prcpdata/sumlist2[1]/hngnm") == "") { model.removenode("root/main/prcpdata/sumlist2[1]"); } //ó¹æÀü¿¡ ȯÀÚ Å°, üÁßÀ» ÀÔ·ÂÇϱâ À§ÇØ Ã¹¹øÂ° °ø¹é ³ëµå »èÁ¦.(2010-01-18) if(model.getValue("root/main/prcpdata/sumlist[1]/hngnm") == "") { model.removenode("root/main/prcpdata/sumlist[1]"); } //ó¹æÀü¿¡ DURÀÌ Á¸ÀçÇϸé RFADT62202 Á¸ÀçÇÏÁö ¾ÊÀ¸¸é RFADT62200 Ãâ·Â var resn = model.getValue("/root/main/prcpdata/resn/resnnm"); // 20101106_laboru_°æºÏ´ëº´¿ø_ÁֹιøÈ£ µÞÀÚ¸® º°Ç¥ ó¸® var rrgstno = model.getValue("/root/main/prcpdata/patinfo/rrgstno").split("-"); model.setValue("/root/main/prcpdata/patinfo/rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******"); // 20120228_laboru_ÁöÂü¾à À¯¹« Ãâ·Â if(model.getValue("/root/main/prcpdata/sumlist/selfflag") != "" ) { model.makeValue("/root/main/prcpdata/patinfo/selfflag", "(" + model.getValue("/root/main/prcpdata/sumlist/selfflag") + ")"); } // 20120402_laboru_ó¹æÀü¿¡ ÀÎÆ¼ÆÊ ¾àÀÎÁö ¿©ºÎ Ç¥½Ã if(nextpagecnt > 0) { for (var i = 1 ; i <= getNodesetCount("/root/main/prcpdata/sumlist2"); i++) { var tempmedi = ""; if(model.getValue("/root/main/prcpdata/sumlist2[" + i + "]/mediflag") == "M") { tempmedi = "ÀÎÆ¼"; } else if(model.getValue("/root/main/prcpdata/sumlist2[" + i + "]/mediflag") == "P") { tempmedi = "¾à±¹"; } if(tempmedi != "") { model.setValue("/root/main/prcpdata/sumlist2[" + i + "]/engnm", model.getValue("/root/main/prcpdata/sumlist2[" + i + "]/engnm") + " - " + tempmedi); } } } else { for (var i = 1 ; i <= getNodesetCount("/root/main/prcpdata/sumlist"); i++) { var tempmedi = ""; if(model.getValue("/root/main/prcpdata/sumlist[" + i + "]/mediflag") == "M") { tempmedi = "ÀÎÆ¼"; } else if(model.getValue("/root/main/prcpdata/sumlist[" + i + "]/mediflag") == "P") { tempmedi = "¾à±¹"; } if(tempmedi != "") { model.setValue("/root/main/prcpdata/sumlist[" + i + "]/engnm", model.getValue("/root/main/prcpdata/sumlist[" + i + "]/engnm") + " - " + tempmedi); } } } // 20101117_wify_°æºÏ´ëº´¿ø_º¸°í¼­Æû º¯°æ ó¸® // RFADT622000 ==> RFADT622003 // RFADT622001 ==> RFADT622004 // RFADT622002 ==> RFADT622005 if( resn == ""){ if ( nextMemo != "") { if(prepagecnt > 0) { makeReportPreview(0,0,10, 10, "grp_report1"); exeReportPreview("RFADT62203", "XMLSTR","","","true","","","","","","","grp_report1"); } if(nextpagecnt > 0) { makeReportPreview(0,0,10, 10, "grp_report2"); model.removeNodeset("root/main/prcpdata/sumlist"); model.makeNode("root/main/prcpdata/sumlist"); copyNodesetType("root/main/prcpdata/sumlist", "root/main/prcpdata/sumlist2", "replace"); exeReportPreview("RFADT62203", "XMLSTR","","","true","","","","","","","grp_report2"); makeReportPreview(0,0,10, 10, "grp_report3"); exeReportPreview("RFADT62204", "XMLSTR","","","true","","","","","","","grp_report3"); } else { makeReportPreview(0,0,10, 10, "grp_report2"); exeReportPreview("RFADT62204", "XMLSTR","","","true","","","","","","","grp_report2"); } } else { if(prepagecnt > 0) { makeReportPreview(0,0,10, 10, "grp_report1"); exeReportPreview("RFADT62203", "XMLSTR","","","true","","","","","","","grp_report1"); } if(nextpagecnt > 0) { makeReportPreview(0,0,10, 10, "grp_report2"); model.removeNodeset("root/main/prcpdata/sumlist"); model.makeNode("root/main/prcpdata/sumlist"); copyNodesetType("root/main/prcpdata/sumlist", "root/main/prcpdata/sumlist2", "replace"); exeReportPreview("RFADT62203", "XMLSTR","","","true","","","","","","","grp_report2"); } } }else { if ( nextMemo != "") { if(prepagecnt > 0) { makeReportPreview(0,0,10, 10, "grp_report1"); exeReportPreview("RFADT62205", "XMLSTR","","","true","","","","","","","grp_report1"); } if(nextpagecnt > 0) { makeReportPreview(0,0,10, 10, "grp_report2"); model.removeNodeset("root/main/prcpdata/sumlist"); model.makeNode("root/main/prcpdata/sumlist"); copyNodesetType("root/main/prcpdata/sumlist", "root/main/prcpdata/sumlist2", "replace"); exeReportPreview("RFADT62205", "XMLSTR","","","true","","","","","","","grp_report2"); makeReportPreview(0,0,10, 10, "grp_report3"); exeReportPreview("RFADT62204", "XMLSTR","","","true","","","","","","","grp_report3"); } else { makeReportPreview(0,0,10, 10, "grp_report2"); exeReportPreview("RFADT62204", "XMLSTR","","","true","","","","","","","grp_report2"); } } else { if(prepagecnt > 0) { makeReportPreview(0,0,10, 10, "grp_report1"); exeReportPreview("RFADT62205", "XMLSTR","","","true","","","","","","","grp_report1"); } if(nextpagecnt > 0) { makeReportPreview(0,0,10, 10, "grp_report2"); model.removeNodeset("root/main/prcpdata/sumlist"); model.makeNode("root/main/prcpdata/sumlist"); copyNodesetType("root/main/prcpdata/sumlist", "root/main/prcpdata/sumlist2", "replace"); exeReportPreview("RFADT62205", "XMLSTR","","","true","","","","","","","grp_report2"); } } } } model.refresh(); window.close(); } function fNextPagePrnt() { }