// =================================================================================================
// ÀÔ¿ø»çÈÄ½É»ç ¸ÞÀÎȸé(±è»óÁø)
// ¼öÁ¤ÀÌ·Â
// - 2007.03.22 / Á¤ÁÖ¹Ì
// - 2008.06.03 / ±è»óÁø
//==================================================================================================
/* --------------------------------------------------------------------------------------------------
Fucntion Name || Description
-----------------------------------------------------------------------------------------------------
- fInitialize : ȸé ÃʱâÈ
- initCalendar : ±×¸®µå´Þ·Â ÃʱâÈ
--------------------------------
- ÆË¾÷ȸé Function
--------------------------------
- fGetOrderComment : ½É»ç¸Þ¸ð : SPPIZ00700_½É»çCommentÁ¶È¸.xrw È£Ãâ
- fSetLnUnitSpclSpec : ƯÁ¤³»¿ª : SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw
- fSetLnUnitClsoSpclSpec : ƯÁ¤³»¿ª : SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw
- fDiagOrderToothInput : Ä¡½Ä : SPPIZ00600_»óº´¹×ó¹æº°Ä¡½Ä
- fOrderGridInsertCnfmCd : È®ÀÎÄÚµå : SPPIZ01100_È®ÀÎÄÚµåÁ¶È¸
- fOrderRsltSrch : °á°úÁ¶È¸ : SMAER00800_°á°úÁ¶È¸
- fSrchEstmCd : »êÁ¤ÀǹÌÄÚµå : SPPIZ00800_»êÁ¤ÄÚµåÁ¶È¸.xrw
- fGetEmrInformation : Áø·áÁ¤º¸Á¶È¸ : SMMMO02500_ȯÀÚÁø·áÁ¤º¸.xrw
- fGetMemoHistList : ¸Þ¸ðÀÌ·ÂÁ¶È¸ : SPPIZ00300_¸Þ¸ðÀÌ·ÂÁ¶È¸.xrw
- fGetDiagHistList : »óº´ÀÌ·ÂÁ¶È¸ : SMPIZ00100_¿Ü·¡ÀÔ¿ø»óº´ÀÌ·ÂÁ¶È¸.xrw
- fPrcpResnRef :󹿻çÀ¯Á¶È¸ : SPMMO19000_Áߺ¹Ã³¹æ»çÀ¯Á¶È¸
--------------------------------
- »óº´°ü·Ã Function
--------------------------------
- fDiagSeqUp : »óº´¼ø¼ À§·Î
- fDiagSeqDown : »óº´¼ø¼ ¾Æ·¡·Î
- fSortDiagNo : »óº´SORT
- fDiagGridInsertRow : Çà»ðÀÔ
- fDiagGridInsertRowMulti : ÇàÃß°¡(5ÁÙ)
- fDiagGridDeleteRow : Çà»èÁ¦
- fDiagGridDeleteCancel : »èÁ¦Ãë¼Ò
- fSearchDiageCode : »óº´ÄÚµå PopUp Á¶È¸
- fSearchSPPIZ00400 : »óº´ÄÚµå PopUp Á¶È¸È£Ãâ
- fSetDiagCdNm : »óº´ÄÚµå PopUp ¹Ý¿µ
--------------------------------
- ƯÁ¤³»¿ª°ü·Ã Function
--------------------------------
- fRepeatSpclSpec : ƯÁ¤³»¿ª¹Ýº¹
- fSpclGridInsertRow : ƯÁ¤³»¿ª "Çà Ãß°¡"
- fSpclGridDeleteRow : ƯÁ¤³»¿ª "Çà »èÁ¦"
- fSetLnUnitSpclSpec : ÁÙ´ÜÀ§ ƯÁ¤³»¿ª ¼öÁ¤/ÀÔ·Â ==> SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw
- fSetDocRefLnSpclSpec : ¸í¼¼¼´ÜÀ§ ƯÁ¤³»¿ª ¼öÁ¤/ÀÔ·Â ==> SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw
- fOrderGridInsertCmt : ó¹æ Grid ¸¶¿ì½º ¿À¸¥ÂÊ "ó¹æÁÖ¼®ÀÔ·Â" ==> SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw
- fSetLnUnitMemoRefresh : ½É»çComment Á¶È¸ Popup : ÁÙ´ÜÀ§¸Þ¸ð ¼³Á¤ ==> SPPIZ00700_½É»çCommentÁ¶È¸.xrw
- fSetJudgMemoRefresh : ½É»çComment Á¶È¸ Popup : ½É»ç¸Þ¸ð ¼³Á¤ ==> SPPIZ00700_½É»çCommentÁ¶È¸.xrw
- fSetEdiMemoRefresh : ½É»çComment Á¶È¸ Popup : EDI¸Þ¸ð ¼³Á¤ ==> SPPIZ00700_½É»çCommentÁ¶È¸.xrw
- fSetCnfmCdSpclSpec : ƯÁ¤³»¿ª ´õºíŬ¸¯ : È®ÀÎÄÚµå ÁÙ´ÜÀ§ ƯÁ¤³»¿ª ¼öÁ¤/ÀÔ·Â ==> SPPIZ01100_È®ÀÎÄÚµåÁ¶È¸
- fOrderGridInsertCnfmCd : 󹿳»¿ª ¹öưŬ¸¯ : È®ÀÎÄÚµå ÁÙ´ÜÀ§ ƯÁ¤³»¿ª ¼öÁ¤/ÀÔ·Â ==> SPPIZ01100_È®ÀÎÄÚµåÁ¶È¸
- fGetMemoHistList : ¸Þ¸ðÀÌ·Â ¹öưŬ¸¯ : ½É»çÀÚ¸Þ¸ð, edi¸Þ¸ð, JX999Á¶È¸ ÀÔ·Â ==> SPPIZ00300_¸Þ¸ðÀÌ·ÂÁ¶È¸.xrw
- fSetSpclSpecJX999 : ÀúÀåÇÒ¶§ : ±âŸ¸Þ¸ð(JX999)¸¦ ƯÁ¤³»¿ª Çü½Ä¿¡ ¸ÂÃç ¼³Á¤
- fSetJudgEDIMemo : ÀúÀåÇÒ¶§ : ½É»çÀÚ¸Þ¸ð, EDIû±¸¸Þ¸ð¸¦ ƯÁ¤³»¿ª Çü½Ä¿¡ ¸ÂÃç ¼³Á¤ÇÑ´Ù.
--------------------------------
- ó¹æÀÔ·Â(¼ö°¡ÀÔ·Â)
--------------------------------
- fOrderGridInsertRow : ÇàÃß°¡
- fOrderGridCopyRow : Çູ»ç
- fOrderGridDeleteRow : Çà»èÁ¦
- fOrderGridDeleteCancel : »èÁ¦Ãë¼Ò
- fOrderGridAddRow : ó¹æÃß°¡
- fSetSrchCalcScorCd : ½Å±ÔÄÚµå Ãß°¡
- fSetNewCalcScorCd : ½Å±ÔÄÚµå Ãß°¡ÈÄ
- fSetCalcScorAmt : ¼ö°¡ÄÚµåÀÇ ±Ý¾×Á¤º¸¸¦ Ç¥½Ã
- fSetOrderLnNo
_
- fSetTotDrugQtyAmt : ±âÁ¸ÄÚµå ¼öÁ¤ 1ȸ·®/Ƚ¼ö/Àϼö ¼öÁ¤½Ã
- fSetCalcScorAmt : Á¶È¸¼ö°¡ ±Ý¾×Ç¥½Ã
- fSetOrderLnNo : 󹿱׏®µå sort
- fChangeOrderLnNo : ó¹æ, ƯÁ¤ ÁÙ¹øÈ£ ¼ÂÆÃ
- fSortSpclNo : ƯÁ¤±×¸®µå sort
- fSetNewCnfmCd : È®ÀÎÄÚµå, °Ëü°Ë»çÀ§Å¹, ÁØ¿ëÄڵ带 ƯÁ¤³»¿ª¿¡ ÀÚµ¿À¸·Î Ãß°¡
- fSetPayflag : ó¹æ ±Þ¿©±¸ºÐ º¯°æ
-----------------------------------------
- ÀúÀå ¹× ¿Ï·á ÈÄ ÇÁ·Î¼¼½º(ÀúÀå ¹× Á¶È¸)
-----------------------------------------
- fSaveInAftJudg : ÀúÀå(B)
- fGetNextAftJudgTrgtMan : ¿Ï·á(C), ¹Ì½É(A), º¸·ù(N), »èÁ¦(D)
- pidfGetKDRGCode : KDRG 3.2 DRGºÐ·ù¹øÈ£ Á¶È¸
- fSrchNextJudgTrgtManCLBS : ´ÙÀ½ ´ë»óÀÚ Ã£±â
- fSrchNextJudgTrgtManSPEC : ´ÙÀ½ ´ë»óÀÚ Ã£±â(¼±º°½É»çÀÎ °æ¿ì)
- fGetInAftJudgMngt : ´ÙÀ½ ´ë»óÀÚ Á¶È¸(´ë»óÀÚ¿¡¼ ´õºíŬ¸¯ÇßÀ» °æ¿ì...)
- fInitSrchData : ȸéÃʱâÈ (±âÁ¸È¯ÀÚ ½É»çÁß ÇØÁ¦)
- fSetAftJudgTrgtManSrchData : ´ÙÀ½ ´ë»óÀÚ Á¶È¸ÀÌÈÄ
- fSetJudgStatBtnAuth : ½É»ç¿Ï·á¿©ºÎ »óŵû¶ó ¹öư±ÇÇÑ ¼³Á¤(ÇöÀçȯÀÚ ½É»çÁß ¼³Á¤)
- fGetSelectedOrderData : Àç·áÇàÀ§/±Þ¿©/Ç׸ñ±¸ºÐ Radio ¼±ÅÃ
- fGetSelectedPayflag : ±Þ¿©Radio ¼±ÅÃ
- fSetOrderData : ó¹æ Ç׸ñ ±¸ºÐ ¹× ¼±º°½É»ç ó¹æ »ö±ò ±¸ºÐ
- fSetSubtotal : Ç׸ñº° ¼Ò°è(item1º°·Î ±Ý¾×sumÇØ¼ º¸¿©ÁØ´Ù)
- fInitOrderFilter : ó¹æ Grid ÇÊÅÍ¿ë Á¶È¸Á¶°ÇÀ» ÃʱâÈÇÑ´Ù.
--------------------------------
- ±âŸÁ¶È¸
--------------------------------
- fClodSelectByPayflag : ±Þ¿©±¸ºÐº° ó¹æÁ¶È¸
- fOpenSMPIS00500DetailSnglCD : ó¹æº°È¯ÀÚÁ¶È¸(°è»ê)_¼ö°¡ÄÚµå
- fOpenSMPIS00500DetailEdicd : ó¹æº°È¯ÀÚÁ¶È¸(°è»ê)_EDIÄÚµå
- fOpenSMPIS00600Detail : ó¹æº°È¯ÀÚÁ¶È¸(û±¸/»è°¨)
-------------------------------------------------------------------------------------------------- */
// 20100615 ȯ°æÃʱâȸ¦ À§ÇÑ ·Îµù»óÅ ÀúÀå
var gCldihist_refdata = "";
var gCldihist_sizedata = "";
var gClodhist_refdata = "";
var gClodhist_sizedata = "";
var df_tp_size_grp_cldihist = grp_cldihist.attribute("top");
var df_tp_size_grp_clsphist = grp_clsphist.attribute("top");
var df_tp_size_cap_clod = cap_clod.attribute("top");
// ----------------------------------------------------------------
// ȸé open½Ã(¿Í ÃʱâÈ ¹öư Ŭ¸¯½Ã) ȸé ÃʱâÈ ±â´ÉÀ» ¼öÇàÇÑ´Ù.
// ---------------------------------------------------------------
function fInitialize() {
// ó¹æ Grid "EDIÄÚµå"±îÁö Ʋ °íÁ¤
grd_clodhist.frozenCols = grd_clodhist.colRef("basecd");
grd_clsphist.frozenCols = grd_clsphist.colRef("snglcalcscorcd");
// »óº´, ƯÁ¤³»¿ª, ó¹æ GroupÀÇ ÄÁÆ®·Ñ Å©±â¸¦ ÃʱâÈÇÑ´Ù.
cap_message.attribute("left") = "5";
opt_msgspclformat.attribute("left") = "95";
opt_msgspclformat.attribute("width") = "1099";
// »óº´ Grid Å©±â¸¦ ÃʱâÈÇÑ´Ù.
grp_cldihist.attribute("height") = "170";
grd_cldihist.attribute("height") = "142"; // »óº´ GridÀÇ ¼¼·Î ÆøÀ» Ãà¼ÒÇÑ´Ù.
// ó¹æ
cap_clod.attribute("top") = df_tp_size_cap_clod; // "90";
grd_clodhist.attribute("height") = "351"; // "527";
cap_grptemp.visible = false;
grp_predoculist.visible = false; // ÀÌÀü ¸í¼¼¼ ¸ñ·Ï¿ë Group
grp_delclodlist.visible = false; // ó¹æ ÈÞÁöÅë Group
grp_delorderlist.visible = false; // ½É»çº¯°æ ¸ñ·Ï Group
// grp_clsphist.attribute("height") = "632";
// swt_spclmemo.attribute("height") = "608";
// fSetOrderControlSize(); // ó¹æÁ¶È¸ºÎ, ó¹æ Grid¿ë GroupÀÇ ÄÁÆ®·Ñ Å©±â¸¦ ¼³Á¤ÇÑ´Ù.
// fSetDelOrdPreDocuSize(); // ÀÌÀü¸í¼¼¼, ó¹æÈÞÁöÅë, »èÁ¦Ã³¹æ GroupÀÇ ÄÁÆ®·Ñ Å©±â¸¦ ¼³Á¤ÇÑ´Ù.
case_spclspec.selected = false; // true;
case_judgrmemo.selected = false;
case_ediclammemo.selected = false;
// fInitUIControlSize();
// grid¸¦ ÀνºÅϽº¿¡ mappingÈÄ ÀνºÅϽº¿¡ ÇØ´çÇÏ´Â ºóÁÙ 1ÁÙÀÌ »ý±â¹Ç·Î grid ÃʱâÈ
model.removeNodeset("/root/main/list1/cldi");
model.removeNodeset("/root/main/list2/clod");
model.removeNodeset("/root/main/list3/clsp");
model.removeNodeset("/root/main/list4/clbs");
model.removeNodeset("/root/main/list5/clod");
model.removeNodeset("/root/main/list6/delclod");
// ó¹æGrid¿ë Á¶È¸ºÎÀÇ Radio ÃʱⰪÀ» "Àüü"·Î ¼³Á¤ÇÑ´Ù.
model.setValue("/root/hidden/list2/clodsrch/selectedRdoMatrAct", "-");
model.setValue("/root/hidden/list2/clodsrch/selectedRdoPay", "0");
model.setValue("/root/hidden/list2/clodsrch/selectedRdoItem", "-");
// ƯÁ¤³»¿ªGrid¿ë ÇÊÅ͸µ Radio ÃʱⰪ
model.setValue("/root/hidden/list3/selectedUnitFlag", "-");
// -----------------------
// °øÅëÄڵ带 Á¶È¸ÇÑ´Ù.
// -----------------------
// (ZBC001.js) com.ZBCMCODE¿¡¼ ±âÃÊÄÚµå °ªÀ» °¡Á®¿Í¼ Combo ÄÁÆ®·Ñ itemÀ¸·Î ¼³Á¤Çϱâ À§ÇØ »ç¿ëÇÑ´Ù.
zbcfGetCodeList(new Array("P0110" // Áø·á°á°ú(º¸Çè)
, "P0297" // Áø·á°á°ú(»êÀç)
, "P0111" // ÀÔ¿ø°æ·Î
, "P0112" // µµÂø°æ·Î
, "P0117" // ƯÁ¤ÄÚµå
, "P0127" // Á¶Á¤»çÀ¯ÄÚµå
, "P0131" // Ç¥ÁØÄڵ屸ºÐ
, "P0151" // ½É»ç¿Ï·á¿©ºÎ
, "P0291" // Áø·áºÐ¾ß
, "P0287" // û±¸°ú(Àǰú)
, "P0288" // û±¸°ú(Ä¡°ú)
, "P0322" // û±¸¼¼ºÎ°ú
, "P0236" // °ø»ó±¸ºÐ
, "P0465" // ¸í¼¼¼»èÁ¦»çÀ¯
, "P0466" // ¹Ý¼ÛºÎÁ¦±â»çÀ¯
, "P0155" // û±¸±¸ºÐ
, "P0261" // ±Þ¿©Á¾º°
), new Array("/root/init/P0110list", "/root/init/P0297list",
"/root/init/P0111list", "/root/init/P0112list",
"/root/init/P0117list", "/root/init/P0127list",
"/root/init/P0131list", "/root/init/P0151list",
"/root/init/P0291list", "/root/init/P0287list",
"/root/init/P0288list", "/root/init/P0322list",
"/root/init/P0236list", "/root/init/P0465list",
"/root/init/P0466list", "/root/init/P0155list",
"/root/init/P0261list"), false); // minimumÀ» 'false'·Î ¼³Á¤ÇÑ °æ¿ì¿¡´Â
// ÄÚµåÀÇ ¸ðµç¼Ó¼ºÀ» °¡Á®¿Â´Ù.
pamfGetCodeList(new Array("PK043"), new Array("/root/init/PK043list"));
pamfGetCodeList(new Array("PK221"), new Array("/root/init/PK221list"));
// -------------------------------------------------
// Áø·á°ú, ÁÖÄ¡ÀÇ Á¶È¸
// -------------------------------------------------
model.setValue("/root/main/item1/clbs/ioflag", "I");
submit("TRPID20309");
model.makeNode("root/hidden/tmp/orddeptcd");
model.makeNode("root/hidden/tmp/orddeptcd2");
model.makeNode("root/hidden/tmp/orddrid");
model.makeNode("root/hidden/tmp/orddrid2");
model.removeNodeset("root/init/orddeptcd");
model.removeNodeset("root/init/orddeptcd2");
model.removeNodeset("root/init/orddrid");
model.removeNodeset("root/init/orddrid2");
model.makeNode("root/init/orddeptcd");
model.makeNode("root/init/orddeptcd2");
model.makeNode("root/init/orddrid");
model.makeNode("root/init/orddrid2");
model.copyNode("root/init/orddeptcd", "root/hidden/tmp/orddeptcd");
model.copyNode("root/init/orddeptcd2", "root/hidden/tmp/orddeptcd2");
model.copyNode("root/init/orddrid", "root/hidden/tmp/orddrid");
model.copyNode("root/init/orddrid2", "root/hidden/tmp/orddrid2");
model.removeNodeset("root/hidden/tmp/orddeptcd");
model.removeNodeset("root/hidden/tmp/orddeptcd2");
model.removeNodeset("root/hidden/tmp/orddrid");
model.removeNodeset("root/hidden/tmp/orddrid2");
// ----------------------------------------
// EDI°ü·Ã Ä÷³ Ç¥½Ã
// ----------------------------------------
fEdiCheck();
// ----------------------------------------
// »ç¿ëÀÚ¿¡°Ô º¸¿©ÁÙ ÇÊ¿ä¾ø´Â Ä÷³À» ¼û±ä´Ù.
// ----------------------------------------
fColHidden();
// -----------------------------------------------------------------------
// 20100615 ȯ°æÀúÀå Á¶È¸ºÎºÐ ó¸®Àü ·Îµù»óÅ ÀúÀå (ȯ°æÃʱâÈ¿¡¼ »ç¿ë)
// -----------------------------------------------------------------------
// 1. »óº´¸®½ºÆ®
var cldihist_obj = document.controls.item("grd_cldihist");
for ( var i = 0; i < cldihist_obj.cols; i++) {
var refval = cldihist_obj.colAttribute(i, "ref");
gCldihist_refdata += refval + "^";
var sizeval = cldihist_obj.colWidth(i);
gCldihist_sizedata += sizeval + "^";
}
gCldihist_refdata = gCldihist_refdata.substring(0, gCldihist_refdata.length - 1);
gCldihist_sizedata = gCldihist_sizedata.substring(0, gCldihist_sizedata.length - 1);
// 2. 󹿏®½ºÆ®
var clodhist_obj = document.controls.item("grd_clodhist");
for ( var i = 0; i < clodhist_obj.cols; i++) {
var refval = clodhist_obj.colAttribute(i, "ref");
gClodhist_refdata += refval + "^";
var sizeval = clodhist_obj.colWidth(i);
gClodhist_sizedata += sizeval + "^";
}
gClodhist_refdata = gClodhist_refdata.substring(0, gClodhist_refdata.length - 1);
gClodhist_sizedata = gClodhist_sizedata.substring(0, gClodhist_sizedata.length - 1);
// -----------------------------------------------------------------------
// ---------------------------------------------------------------------------------------------
// ȯ°æÀúÀå Á¶È¸ºÎºÐ(ȯ°æÀúÀåµÈ Ä÷³ ref¼ø¼´ë·Î colMove½ÃŲ´Ù.
// ---------------------------------------------------------------------------------------------
model.resetInstanceNode("/root/send/listval/uuee");
model.setValue("/root/send/listval/uuee/scrnid", "SMPID20300"); // SMPID20300_ÀÔ¿ø»çÈĽɻç°ü¸®.
if (submit("TRPID21602")) {
var selrow = "";
var compsnm = "";
var refdata = "";
var sizedata = "";
var grdobj = "";
var refarr = "";
var sizearr = "";
for ( var x = 1; x <= model.getXPathValue("count(/root/hidden/listval/uuee)"); x++) {
compsnm = model.getValue("/root/hidden/listval/uuee[" + x + "]/compsnm");
if (compsnm) { // Grid ID Á¤º¸
refdata = model.getValue("/root/hidden/listval/uuee[" + x + "]/compscnts"); // GridÀÇ
// Ä®·³¸í
sizedata = model.getValue("/root/hidden/listval/uuee[" + x + "]/compssizecnts"); // GridÀÇ
// Ä®·³Size
grdobj = document.controls.item(compsnm);
selrow = grd_cldihist.selectedRow(0); // row ¼±Åà ÈÄ Å¸ÀÌÆ² ºÎºÐ Á¶Á¤½Ã row = 0À¸·Î ¹Ù²î¹Ç·Î selectedRow·Î üũÇÔ
refarr = refdata.split("^");
sizearr = sizedata.split("^");
for ( var i = 0; i < refarr.length; i++) {
var colcnt = grdobj.colref("" + refarr[i] + "");
if (i != colcnt) {
grdobj.colMove(i, colcnt, "before", false);
}
var size = sizearr[i];
grdobj.colWidth(i) = eval(size);
}
grdobj.rebuild();
model.setFocus(compsnm);
grdobj.select(selrow, 1) = true;
grdobj.row = selrow; // ȯ°æÃʱâÈ ÀÌÈÄ row = -1·Î ¼³Á¤µÇ¹Ç·Î
}
}
}
// ó¹æ Á¶È¸ºÎÀÇ ¼ö°¡ÄÚµå¿Í EDIÄÚµå °Ë»ö¿ë Input ÄÁÆ®·Ñ
ipt_calcscorcd.attribute("_chartype") = "upper"; // (tfHelper.js) ´ë¹®ÀÚ·Î
// ÀÔ·ÂÀ» Á¦ÇÑÇÑ´Ù.
ipt_edicd.attribute("_chartype") = "upper";
model.refresh();
// ¿Ï·á ~ »èÁ¦ Btn »öÀ» º¯°æÇÑ´Ù.
btn_end.attribute("color") = "#cc3333"; // cc3333=ºÓÀº»ö
btn_unjudg.attribute("color") = "#cc3333";
btn_rete.attribute("color") = "#cc3333";
btn_del.attribute("color") = "#cc3333";
btn_save.attribute("font-weight") = "bold";
btn_end.attribute("font-weight") = "bold";
btn_unjudg.attribute("font-weight") = "bold";
btn_rete.attribute("font-weight") = "bold";
btn_del.attribute("font-weight") = "bold";
btn_maininit.attribute("font-weight") = "bold";
// -----------------------
// È¸é ±ÇÇÑÀ» ¼³Á¤ÇÑ´Ù.
// -----------------------
fCheckAuth();
// ----------------------
// Popup ¿©ºÎüũ
// ----------------------
if (isPopup()) { // (common.js) ÀÚ½ÅÀÌ ÆË¾÷ÀÎÁö ¾Æ´ÑÁö¸¦ ¸®ÅÏÇÑ´Ù.
btn_closepredocupopup.visible = true; // Popup¿ë ´Ý±â ¹öư
btn_predocu.visible = false; // ÀÌÀü¸í¼¼¼ ¹öư
var clamym = model.getValue("/root/send/item1/clbs/clamym");
var clamdg = model.getValue("/root/send/item1/clbs/clamdg");
var pid = model.getValue("/root/send/item1/clbs/pid");
var pidsn = model.getValue("/root/send/item1/clbs/pidsn");
if (clamym && clamdg && pid && pidsn) {
// --------------------------------------
// »çÈÄ ½É»ç ´ë»óÀÚ¸¦ Á¶È¸ÇÑ ÀÌÈÄÀÇ Ã³¸®
// --------------------------------------
submit("TRPID20301");
fSetAftJudgTrgtManSrchData();
}
} else {
btn_closepredocupopup.visible = false; // Popup¿ë ´Ý±â ¹öư
btn_predocu.visible = true; // ÀÌÀü¸í¼¼¼ ¹öư
// ---------------------------------------------
// PopupÀÌ ¾Æ´Ñ °æ¿ì ´ë»óÀÚ Á¶È¸¸¦ ¹Ù·Î ¶ç¿î´Ù.
// ---------------------------------------------
fGetInAftJudgTrgtManPidSrch();
}
model.setValue("/root/hidden/reselect", "N"); // ÀçÁ¶È¸¿©ºÎ(ÀúÀå¹öưÀ» ´·¯¼ ÀçÁ¶È¸ ÇÒ °æ¿ì)
model.setValue("/root/hidden/orgjudgendyn", ""); // ¿À¸®Áö³¯ ½É»ç»óÅÂ(½É»çÁßÀ̾ú´Ù°¡
// ÇØÁ¦µÇ´Â °æ¿ì ¿ø·¡°ª µ¹·ÁÁÖ±â À§ÇØ
// »ç¿ë)
}
// 20100615 ȯ°æÃʱâÈ
function fClearSetInfo() {
var selrow = "";
var compsnm = "";
var refdata = "";
var sizedata = "";
var grdobj = "";
var refarr = "";
var sizearr = "";
// 1. »óº´±×¸®µå ÃʱâÈ
selrow = grd_cldihist.selectedRow(0); // row ¼±Åà ÈÄ Å¸ÀÌÆ² ºÎºÐ Á¶Á¤½Ã row = 0À¸·Î
// ¹Ù²î¹Ç·Î selectedRow·Î üũÇÔ
compsnm = "grd_cldihist";
refdata = gCldihist_refdata; // Ãʱ⼳Á¤ ´ã¾ÆµÐ ±Û·Î¹ú º¯¼ö¿¡¼ °¡Á®¿Â´Ù. GridÀÇ Ä®·³¸í
sizedata = gCldihist_sizedata; // Ãʱ⼳Á¤ ´ã¾ÆµÐ ±Û·Î¹ú º¯¼ö¿¡¼ °¡Á®¿Â´Ù. GridÀÇ Ä®·³Size
grdobj = document.controls.item(compsnm);
refarr = refdata.split("^");
sizearr = sizedata.split("^");
for ( var i = 0; i < refarr.length; i++) {
var colcnt = grdobj.colref("" + refarr[i] + "");
if (i != colcnt) {
grdobj.colMove(i, colcnt, "before", false);
}
var size = sizearr[i];
grdobj.colWidth(i) = eval(size);
}
grdobj.rebuild();
model.setFocus(compsnm);
grdobj.select(selrow, 1) = true;
grdobj.row = selrow; // ȯ°æÃʱâÈ ÀÌÈÄ row = -1·Î ¼³Á¤µÇ¹Ç·Î
// 2. 󹿱׏®µå ÃʱâÈ
selrow = grd_clodhist.selectedRow(0); // row ¼±Åà ÈÄ Å¸ÀÌÆ² ºÎºÐ Á¶Á¤½Ã row = 0À¸·Î
// ¹Ù²î¹Ç·Î selectedRow·Î üũÇÔ
compsnm = "grd_clodhist";
refdata = gClodhist_refdata; // Ãʱ⼳Á¤ ´ã¾ÆµÐ ±Û·Î¹ú º¯¼ö¿¡¼ °¡Á®¿Â´Ù. GridÀÇ Ä®·³¸í
sizedata = gClodhist_sizedata; // Ãʱ⼳Á¤ ´ã¾ÆµÐ ±Û·Î¹ú º¯¼ö¿¡¼ °¡Á®¿Â´Ù. GridÀÇ Ä®·³Size
grdobj = document.controls.item(compsnm);
refarr = refdata.split("^");
sizearr = sizedata.split("^");
for ( var i = 0; i < refarr.length; i++) {
var colcnt = grdobj.colref("" + refarr[i] + "");
if (i != colcnt) {
grdobj.colMove(i, colcnt, "before", false);
}
var size = sizearr[i];
grdobj.colWidth(i) = eval(size);
}
grdobj.rebuild();
model.setFocus(compsnm);
grdobj.select(selrow, 1) = true;
grdobj.row = selrow; // ȯ°æÃʱâÈ ÀÌÈÄ row = -1·Î ¼³Á¤µÇ¹Ç·Î
}
// 20100615 ȯ°æÀúÀå
function fSaveSetInfo() {
var uueemax = 0;
var uueemod = "";
var compsnm = "";
var refdata = "";
var sizedata = "";
var grdobj = "";
model.resetInstanceNode("/root/send/listval/uuee");
// 1. »óº´±×¸®µå ÀúÀå
compsnm = "grd_cldihist";
uueemax++;
uueemod = "I";
refdata = "";
sizedata = "";
for ( var x = 1; x <= model
.getXPathValue("count(/root/hidden/listval/uuee)"); x++) {
if (model.getValue("/root/hidden/listval/uuee[" + x + "]/compsnm") == compsnm) {
uueemod = "U";
break;
}
}
grdobj = document.controls.item(compsnm);
for ( var i = 0; i < grdobj.cols; i++) {
var refval = grdobj.colAttribute(i, "ref");
refdata += refval + "^";
var sizeval = grdobj.colWidth(i);
sizedata += sizeval + "^";
}
refdata = refdata.substring(0, refdata.length - 1);
sizedata = sizedata.substring(0, sizedata.length - 1);
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/flag", uueemod);
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/scrnid", "SMPID20300");
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/compsnm", compsnm);
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/compscnts", refdata);
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/compsrefcnts", "");
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/compssizecnts", sizedata);
// 2. 󹿱׏®µå ÀúÀå
compsnm = "grd_clodhist";
uueemax++;
uueemod = "I";
refdata = "";
sizedata = "";
for ( var x = 1; x <= model
.getXPathValue("count(/root/hidden/listval/uuee)"); x++) {
if (model.getValue("/root/hidden/listval/uuee[" + x + "]/compsnm") == compsnm) {
uueemod = "U";
break;
}
}
grdobj = document.controls.item(compsnm);
for ( var i = 0; i < grdobj.cols; i++) {
var refval = grdobj.colAttribute(i, "ref");
refdata += refval + "^";
var sizeval = grdobj.colWidth(i);
sizedata += sizeval + "^";
}
refdata = refdata.substring(0, refdata.length - 1);
sizedata = sizedata.substring(0, sizedata.length - 1);
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/flag", uueemod);
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/scrnid", "SMPID20300");
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/compsnm", compsnm);
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/compscnts", refdata);
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/compsrefcnts", "");
model.makeValue("/root/send/listval/uuee[" + uueemax + "]/compssizecnts", sizedata);
if (submit("TXPID21601")) {
messageBox("»ç¿ëÀÚ È¯°æ ÀúÀåÀÌ", "I002"); // /»ç¿ëÀÚ È¯°æ ÀúÀåÀÌ ¿Ï·áµÇ¾ú½À´Ï´Ù.
}
}
// -----------------------------------------
// »ç¿ëÀÚ¿¡°Ô º¸¿©ÁÙ ÇÊ¿ä¾ø´Â Ä÷³Àº ¼û±ä´Ù.
// -----------------------------------------
function fColHidden() {
grd_clodhist.colHidden(grd_clodhist.colRef("toot")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("choiordamt")) = true; // ¼±Åôܰ¡
grd_clodhist.colHidden(grd_clodhist.colRef("choiordtotamt")) = true; // ¼±ÅÃÁø·ásum
grd_clodhist.colHidden(grd_clodhist.colRef("item1")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("item2")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("ediitem")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("totdrugqty")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("baserlapnt")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("baseaddrlapnt")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("pntunitcost")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("hosinresncd")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("rcptunitcost")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("prcpflag")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("rcptcalcamt")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("estmcdnm")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("pynpy1")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("earncls1")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("earncls2")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("earncls3")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("mechfromdd")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("mechtodd")) = true;
grd_clodhist.colHidden(grd_clodhist.colRef("workflag")) = true;
}
// -----------------------------------------------------------------
// submit("TRPID20301") »çÈĽɻç´ë»óÀÚ¸¦ Á¶È¸ÇÑ ÀÌÈÄÀÇ Ã³¸®¸¦ ÇÑ´Ù.
// -----------------------------------------------------------------
function fSetAftJudgTrgtManSrchData() {
// »ó´Ü¿¡ ȯÀÚÁ¤º¸ ±âÀÔÇϱâ
if (!isPopup()) { // (common.js) ÀÚ½ÅÀÌ ÆË¾÷ÀÎÁö ¾Æ´ÑÁö¸¦ ¸®ÅÏÇÑ´Ù.
fSetInPatPamInfo();
}
// ½É»ç¿Ï·á¿©ºÎ »óÅ¿¡ µû¶ó "ÀúÀå / Àç°è»ê / ¿Ï·á / ¹Ì½É / º¸·ù / »èÁ¦" Btn ±ÇÇÑÀ» ¼³Á¤ÇÑ´Ù.
fSetJudgStatBtnAuth();
if (getNodesetCount("/root/main/dupidlist/dupid") > 0) {
var pid = model.getValue("/root/main/item1/clbs/pid");
var duppid = model.getValue("/root/main/dupidlist/dupid/newpid");
if (pid == duppid) {
duppid = model.getValue("/root/main/dupidlist/dupid/oldpid")
}
messageBox("¡Ú¡Ú¡Ú ÇÕ¹øÁ¤º¸ : ÇØ´ç ȯÀÚ´Â " + duppid + " ÃÆ®¹øÈ£¿Í ÇÕ¹øÁ¤º¸°¡ ÀÖÀ¸¸ç, " + "Áø·á°³½ÃÀÏÀÌ µ¿ÀÏÇÑ " + duppid + "ÀÇ ¸í¼¼¼°¡ Á¸ÀçÇÏ´Ï ¹Ýµå½Ã û±¸¿©ºÎ È®ÀÎÇϽñ⠹ٶø´Ï´Ù. ¡Ú¡Ú¡Ú", "I"); // /
// Àá±Ý¼³Á¤µÇ¾îÀÖ´Â »óÅÂÀÔ´Ï´Ù.¼öÁ¤ÇÒ ¼ö ¾ø½À´Ï´Ù.
}
if (model.getValue("/root/main/item1/clbs/clamkey")) {
var clamendyn = model.getValue("/root/main/item1/clbs/clamendyn");
var lockyn = model.getValue("/root/main/item1/clbs/lockyn");
if (lockyn == "Y") {
messageBox("Àá±Ý¼³Á¤µÇ¾îÀÖ´Â »óÅÂÀÔ´Ï´Ù. ¼öÁ¤", "E001"); // / Àá±Ý¼³Á¤µÇ¾îÀÖ´Â »óÅÂÀÔ´Ï´Ù. ¼öÁ¤ÇÒ ¼ö ¾ø½À´Ï´Ù.
}
} else {
// ÇØ´ç ½É»ç´ë»óÀÚ°¡ ¾ø´Â °æ¿ì
return;
}
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
// fSortSpclNo();
// ƯÁ¤ÄÚµå ÁÙ´ÜÀ§ ¿´´ø row°¡ ¸í¼¼¼ ´ÜÀ§ row·Î ¹Ù²î´Â °æ¿ì, ƯÁ¤ÄÚµå °ªÀÌ Ç¥½ÃµÇÁö ¾ÊÀ¸¹Ç·Î ´Ù½Ã È®ÀÎÇÑ´Ù.
// for (var i = 1; i < grd_clsphist.rows; i++) {
// grd_clsphist.cellComboNodeset(i, grd_clsphist.colRef("spclcd")) =
// "/root/init/P0117list/P0117";
// }
// ó¹æ Á¶È¸ºÎ - ÀçÇà/±Þ¿©/Ç׸ñ±¸ºÐ Radio ¼±Åÿ¡ µû¶ó ó¹æ ³»¿ªÀ» º¸¿©ÁØ´Ù.
// fGetSelectedOrderData();
// if (model.getValue("/root/hidden/reselect") == "N") { // ÀúÀåÈÄ ÀçÁ¶È¸°¡ ¾Æ´Ò
// °æ¿ì¸¸..(¼Óµµ°³¼±)
// ó¹æ Ç׸ñ ±¸ºÐ ¹× ¼±º°½É»ç ó¹æ »ö±ò ±¸ºÐ
fSetOrderData();
// }
// Ç׸ñº° ±Ý¾×¼Ò°èÇ¥½Ã 2011.01.04 ±è»óÁøº¸·ù
// fSetSubtotal();
// "ÀúÀå" Btn Ŭ¸¯½Ã¿¡ ÀÎÀû»çÇ×ÀÌ º¯°æµÇ¾ú´ÂÁö ¿©ºÎ¸¦ ¾Ë±â À§ÇØ Á¶È¸ÇÑ Ç׸ñÀ» Àӽ÷ΠÀúÀåÇØµÎ°í ÃßÈÄ¿¡ ºñ±³ÇÑ´Ù.
model.copyNode("/root/hidden/item1/initclbs/clbs", "/root/main/item1/clbs");
model.copyNode("/root/hidden/item1/initmemo/memo", "/root/main/item1/memo");
// "±Þ¿©±¸ºÐ" Á¶È¸À§ÇÑ ±Þ¿©Ã³¹æÀ» Àӽ÷ΠÀúÀåÇØ µÐ´Ù.
model.copyNode("/root/hidden/initclodlist/list2", "/root/main/list2");
// Áø·á°á°ú nodeset (»êÀç:P0297, º¸Çè,º¸È£,ÀÚº¸:P0110)
if (model.getValue("/root/main/item1/clbs/insukindcd") == "41") {
cmb_ordrsltcd.choices.itemset.attribute("nodeset") = "/root/init/P0297list/P0297";
} else {
cmb_ordrsltcd.choices.itemset.attribute("nodeset") = "/root/init/P0110list/P0110";
}
cmb_ordrsltcd.refresh();
// Áø·á°ú ÀÇ»ç °ª¿¡ µû¶ó ¼±Åð¡´ÉÇÑ ÁÖÄ¡ÀÇ nodesetÀ» ¼³Á¤ÇÑ´Ù.
// cmb_orddrid.choices.itemset.attribute("nodeset") =
// "/root/init/orddrid/orddridlist[dp = '"+
// model.getValue("/root/main/item1/clbs/orddeptcd") +"']";
// if (model.getValue("/root/main/item1/clbs/dethyn") == "Y") {
// messageBox("»ç¸Á", "I005"); ///»ç¸Á ȯÀÚÀÔ´Ï´Ù.
// }
// ---------------------------------------------------------------------------------------------------------
// Á¶È¸µÈ ½É»ç´ë»óÀÚÀÇ Æ¯ÀÌ ÀÎÀû»çÇ×, º¸Á¶/¿äÀ² µîÀ» °è»êÇÏ¿© º¸¿©ÁØ´Ù.
fGetPersonalData();
// ---------------------------------------------------------------------------------------------------------
// »óº´ GridÀÇ »óº´¼ø¼¸¦ üũÇϰí, ¸¶Áö¸· ÁÙ¿¡ ÁÙÃß°¡¸¦ ÇÑ´Ù.
// fSortDiagNo(true);
// ȯÀÚÈ£Ãâ½Ã ±âº»ÀûÀ¸·Î ƯÁ¤³»¿ª ÅÇÀ» ¼±ÅÃÇÏ¿© º¸¿©ÁØ´Ù - 20091112 ¹Úâ¿ø -- º´¿øº° Â÷µîÀû¿ëÀ¸·Î º¯°æ
// ȯÀÚÈ£Ãâ½Ã º´¿øº°·Î Â÷º°È ÇØ¼ µð½ºÇ÷¹ÀÌ ÇØÁÜ - 20091117 ¹Úâ¿ø
var dispclsp = model.getValue("/root/main/item1/clbs/dispclsp");
if (dispclsp == "S") { // ƯÁ¤³»¿ª¿ì¼±
btn_spclspec.selected = true;
btn_judgrmemo.selected = false;
btn_ediclammemo.selected = false;
// btn_spclspec.dispatch("DOMActivate");
fGeCaseSelect("case_spclspec", true);
} else if (dispclsp == "E") {
btn_spclspec.selected = false;
btn_judgrmemo.selected = false;
btn_ediclammemo.selected = true;
// btn_ediclammemo.dispatch("DOMActivate");
fGeCaseSelect("case_ediclammemo", false);
} else if (dispclsp == "U") {
btn_spclspec.selected = false;
btn_judgrmemo.selected = true;
btn_ediclammemo.selected = false;
// btn_judgrmemo.dispatch("DOMActivate");
fGeCaseSelect("case_judgrmemo", false);
}
// model.refresh(); // ¹Ø¿¡ refresh ÀÖ¾î¼ »èÁ¦
// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "Çà Ãß°¡"
if (grd_cldihist.rows == 1) {
fDiagGridInsertRow("Y", "N");
}
model.setFocus("grd_cldihist");
grd_cldihist.row = 1;
grd_clodhist.row = 1; // ±×¸®µåÀÇ Ã¹ÁÙºÎÅÍ Ç¥½ÃµÇµµ·Ï Æ÷Ä¿½º¸¦ 0À¸·Î ¼³Á¤ÇÑ´Ù..
// °ø¿©ÀÚÀϰæ¿ì ó¸® - 20091021 ¹Úâ¿ø
var rsvcnt = model.getValue("/root/main/list9/trnpt/trnptcnt");
var rsvname = model.getValue("/root/main/list9/trnpt/rsvname");
var rsvrrgstno = model.getValue("/root/main/list9/trnpt/rsvrrgstno");
if (rsvcnt > "1") { // °Ç¼ö°¡ 2°ÇÀÌ»ó ÀÖ´Â°Ï¿ì ¸Þ¼¼Áö ó¸®
messageBox("À̽İǼö°¡ 2°Ç ÀÌ»óÀÎ °ø¿©ÀÚÀÔ´Ï´Ù ÀÌ½Ä Á¤º¸¸¦ È®ÀÎÇϼ¼¿ä ", "I009");
}
if (rsvcnt == "1") { // °Ç¼ö°¡ 1°ÇÀΰæ¿ì Àû¿ëÇÒ°ÍÀÎÁö Áú¹®
var msg = messageBox("°ø¿©ÀÚÀÔ´Ï´Ù Á¤º¸¸¦ ¼öÇýÀÚ·Î º¯°æ(º¯°æÈÄ ÀúÀåÇØ¾ß Àû¿ë) ", "S001");
if (msg == "6") {
model.setValue("/root/main/item1/clbs/patnm", rsvname);
model.setValue("/root/main/item1/clbs/patrrgstno", rsvrrgstno);
model.refresh();
}
}
// ¸Þ¸ð¿©ºÎ¿¡ µû¸¥ »ö±òºÐ·ù - ¹Úâ¿ø 20091102
var edimemo = model.getValue("/root/main/item1/memo/edimemo");
var usermemo = model.getValue("/root/main/item1/memo/judgmemo");
var edilength = edimemo.length;
var userlength = usermemo.length;
if (edilength > 0) {
btn_ediclammemo.attribute("background-image") = "../../../com/commonweb/images/tab_hide_orange.gif";
} else if (edilength == 0) {
btn_ediclammemo.attribute("class") = "btn_sw"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº» ¹öưÀ¸·Î ¼³Á¤
}
if (userlength > 0) {
btn_judgrmemo.attribute("background-image") = "../../../com/commonweb/images/tab_hide_orange.gif";
} else if (userlength == 0) {
btn_judgrmemo.attribute("class") = "btn_sw"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº» ¹öưÀ¸·Î ¼³Á¤
}
// 20091230 ¿ÏÈÀÇ·á Ç¥½Ã Ãß°¡
var fixrateyn = model.getValue("/root/main/item1/clbs/fixrateyn");
if (fixrateyn == "7" || fixrateyn == "8") {
pm_flag.visible = true;
}
// 20100402 ÁֹιݼÛÀÏ °æ¿ì ¿Â¶óÀÎ ÁֹιøÈ£ È®Àθ޼¼Áö Ãß°¡
if (model.getValue("/root/main/item1/clbs/lockyn") != "Y"
&& getStringLength(model.getValue("/root/main/item1/clbs/realrgstno")) == 13 // ÀÚ¸®¼öüũ
&& model.getValue("/root/main/item1/clbs/realrgstno") != model.getValue("/root/main/item1/clbs/patrrgstno")
&& model.getValue("/root/main/item1/clbs/preresncd").substr(0, 2) == "91") {
var ans = messageBox("¸í¼¼¼»óÀÇ ÁֹιøÈ£¿Í ¿Â¶óÀÎ »óÀÇ ÁֹιøÈ£°¡ »óÀÌÇÕ´Ï´Ù. "
+ "\n\n"
+ "¿Â¶óÀÎ »óÀÇ ÁֹιøÈ£´Â ( "
+ model.getValue("/root/main/item1/clbs/realrgstno").substr(0,6)
+ "-"
+ model.getValue("/root/main/item1/clbs/realrgstno").substr(6, 7) + " ) ÀÔ´Ï´Ù." + "\n\n" + "ÁֹιøÈ£¸¦ º¯°æ ", "S001");
if (ans == 6) { // 6: yes, 7:no, 2:cancel
model.setValue("/root/main/item1/clbs/patrrgstno", model.getValue("/root/main/item1/clbs/realrgstno"));
ipt_patrrgstno.refresh();
}
}
var judgdifamt = model.getValue("/root/main/item1/clbs/judgdifamt");
if (Math.abs(judgdifamt) >= 10000 ) {
messageBox("½É»ç¼öÁ¤Â÷¾×("+opt_judgdifamt.label+")ÀÌ 10,000¿ø ÀÌ»óÀÔ´Ï´Ù.", "I007");
}
var bfafamtdiff = getNodesetCount("/root/main/bfafamtdiff/amtlist");
var payamt = model.getValue("/root/main/bfafamtdiff/amtlist/payamt");
var tot12 = model.getValue("/root/main/bfafamtdiff/amtlist/tot12");
var ownbamt = model.getValue("/root/main/bfafamtdiff/amtlist/ownbamt");
var ownb12 = model.getValue("/root/main/bfafamtdiff/amtlist/ownb12");
var insubamt = model.getValue("/root/main/bfafamtdiff/amtlist/insubamt");
var clam12 = model.getValue("/root/main/bfafamtdiff/amtlist/clam12");
var handcapfund = model.getValue("/root/main/bfafamtdiff/amtlist/handcapfund");
var handcap12 = model.getValue("/root/main/bfafamtdiff/amtlist/handcap12");
var procsubtamt = model.getValue("/root/main/bfafamtdiff/amtlist/procsubtamt");
var subt12 = model.getValue("/root/main/bfafamtdiff/amtlist/subt12");
var suppamt = model.getValue("/root/main/bfafamtdiff/amtlist/suppamt");
var supp12 = model.getValue("/root/main/bfafamtdiff/amtlist/supp12");
var max12 = model.getValue("/root/main/bfafamtdiff/amtlist/max12");
var payownblimamt = model.getValue("/root/main/bfafamtdiff/amtlist/payownblimamt");
if (bfafamtdiff > 0 ) {
messageBox("¿ø¹«»çÈÄÂ÷¾×ÀÌ 10,000¿ø ÀÌ»óÀÔ´Ï´Ù." + "\n" +
"¿ø¹«±Þ¿©ÃѾ×:[" + payamt + "] »çÈı޿©ÃѾ×:[" + tot12 + "]\n" +
"¿ø¹«º»Àκδã¾×:[" + ownbamt + "] »çÈĺ»Àκδã¾×:[" + ownb12 + "]\n" +
"¿ø¹«Ã»±¸¾×:[" + insubamt + "] »çÈÄû±¸¾×:[" + clam12 + "]\n" +
"¿ø¹«Àå¾ÖÀαݾ×:[" + handcapfund + "] »çÈÄÀå¾ÖÀαݾ×:[" + handcap12 + "]\n" +
"¿ø¹«´ëºÒ±Ý:[" + procsubtamt + "] »çÈÄ´ëºÒ±Ý:[" + subt12 + "]\n" +
"¿ø¹«Áö¿ø±Ý:[" + suppamt + "] »çÈÄÁö¿ø±Ý:[" + supp12 + "]\n" +
"¿ø¹«º»Àκδã»óÇѾ×:[" + max12 + "] »çÈĺ»Àκδã»óÇѾ×:[" + payownblimamt + "]\n"
, "I007");
}
model.refresh();
/*
* model.setFocus("grd_cldihist"); grd_cldihist.row = grd_cldihist.rows-1;
* grd_cldihist.col = grd_cldihist.colRef("diagcd");
* grd_cldihist.editCell();
*/
}
// ---------------------------
// »ó´Ü¿¡ ȯÀÚÁ¤º¸ ±âÀÔÇϱâ
// ---------------------------
function fSetInPatPamInfo() {
// emr/prcpmngtweb/xrw/SPMMO08900_ȯÀڱ⺻Á¤º¸¼³Á¤.xrw
var ioflag = model.getValue("/root/main/item1/clbs/ioflag");
var stsioflag = model.getValue("/root/main/item1/clbs/stsioflag");
var pid = model.getValue("/root/main/item1/clbs/pid");
var indd = model.getValue("/root/main/item1/clbs/indd");
var cretno = model.getValue("/root/main/item1/clbs/cretno");
var instcd = model.getValue("/root/main/item1/clbs/instcd");
var ordtodd = model.getValue("/root/main/item1/clbs/ordtodd");
var srchdd = ""
// 20100201 ÀÀ±Þ½Ç ÁÖ°ú±¸ºÐ(C) Ãß°¡
if (stsioflag == "E" || stsioflag == "C") {
ioflag = "E";
srchdd = indd;
} else {
ioflag = "I";
srchdd = ordtodd;
}
if (pid) {
// ÀÔ¿øÈ¯ÀÚ parameter ±¸Á¶ ioflag¢Ëpid¢Ëindd¢Ëcretno¢Ëinstcd¢Ësrchdd
var param = ioflag + "¢Ë" + pid + "¢Ë" + indd + "¢Ë" + cretno + "¢Ë" + instcd + "¢Ë" + srchdd;
setParameter("condparam", param);
// ¿ø¹«¿¡ ȯÀÚÁ¤º¸°¡ ¾ø´Â °æ¿ì ¿¡·¯¸Þ½ÃÁö ȸéÀ» º¸ÀÌÁö ¾Ê°Ô ó¸®ÇÔ
setParameter("errflag", "Y");
modal(
"SPMMO08900",
1,
0,
0,
"",
"",
"",
"left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
var useyn = getParameter("SPMMO08900_rtn_useyn");
if (useyn == "Y") {
setParameter("SPMMO08900_rtn_useyn", "");
} else {
delPatientInfos(); // (common.js) »ó´ÜÀÇ È¯ÀÚÁ¤º¸ »èÁ¦
}
} else {
delPatientInfos(); // (common.js) »ó´ÜÀÇ È¯ÀÚÁ¤º¸ »èÁ¦
}
}
// -----------------------------------------------------------------------------------------
// ½É»ç¿Ï·á¿©ºÎ »óÅ¿¡ µû¶ó "ÀúÀå / Àç°è»ê / ¿Ï·á / ¹Ì½É / º¸·ù / »èÁ¦" Btn ±ÇÇÑÀ» ¼³Á¤ÇÑ´Ù.
// -----------------------------------------------------------------------------------------
function fSetJudgStatBtnAuth() {
// 1. ÆË¾÷ÀÌ ¾Æ´Ñ °æ¿ì "11100000" // RXP±ÇÇÑ
// 2. ½É»çÀü ¸í¼¼¼ ÆË¾÷ "00100000"
// 3. ÀÌÀü ¸í¼¼¼ ÆË¾÷ "11100000"
// 4. ±×¿Ü ÆË¾÷ "10100000"
var xAuth = checkAuth("X"); // 󸮱ÇÇÑ(ÀÔ·Â, ¼öÁ¤, »èÁ¦ µî) - RXP
if (xAuth == true) {
var clamendyn = model.getValue("/root/main/item1/clbs/clamendyn");
var lockyn = model.getValue("/root/main/item1/clbs/lockyn");
if (lockyn == "N") { // û±¸¿Ï·á¿©ºÎ A:»ù»ý¼ºÀü
var userid = getUserId(); // (common.js) ÇöÀç ·Î±×ÀÎÇÑ »ç¿ëÀÚ ¹øÈ£(ID)
if (userid) {
} else {
userid = "12345678";
}
var judgendyn = model.getValue("/root/main/item1/clbs/judgendyn");
// ½É»çÁßÀ̸é...
if (judgendyn == "B") {
if (model.getValue("/root/hidden/reselect") == "N") {
var lastupdtrid = model
.getValue("/root/main/item1/clbs/lastupdtrid");
if (lastupdtrid == userid) {
// rowstat = "ing";
btn_save.disabled = false;
btn_end.disabled = false;
btn_unjudg.disabled = false;
btn_rete.disabled = false;
btn_del.disabled = false;
// btn_cretdel.disabled = false;
messageBox("±âÁ¸¿¡ ½É»çÁßÀ̾ú´ø", "I005"); // /±âÁ¸¿¡ ½É»çÁßÀ̾ú´ø
// ȯÀÚÀÔ´Ï´Ù.
} else {
btn_save.disabled = true;
btn_end.disabled = true;
btn_unjudg.disabled = true;
btn_rete.disabled = true;
btn_del.disabled = true;
// btn_cretdel.disabled = true; // »ý¼º»èÁ¦ Btn
// ½É»çÁßÀΠȯÀÚ ¸Þ½ÃÁö
messageBox("´Ù¸¥ ½É»çÀÚ°¡ ½É»çÁßÀÎ", "I005"); // /´Ù¸¥ ½É»çÀÚ°¡ ½É»çÁßÀÎ
// ȯÀÚÀÔ´Ï´Ù.
}
// -------------------------------------------------
// ¿ø·¡ ½É»ç»óŸ¦ ÀúÀåÇØµÐ´Ù.(½É»çÁßÇØÁ¦¸¦ À§Çؼ)
// -------------------------------------------------
// model.setValue("/root/hidden/orgjudgendyn", judgendyn);
} else {
btn_save.disabled = false;
btn_end.disabled = false;
btn_unjudg.disabled = false;
btn_rete.disabled = false;
btn_del.disabled = false;
// btn_cretdel.disabled = false;
// -------------------------------------------------
// ÀúÀåÈÄÀçÁ¶È¸¿©ºÎ ÃʱâÈ
// -------------------------------------------------
model.setValue("/root/hidden/reselect", "N");
}
}
// ½É»çÁßÀÌ ¾Æ´Ï¶ó¸é
else if (judgendyn != "B") {
// ½É»çÀÚIDÀÌ°í ¹Ì½É(A)ÀÏ °æ¿ì¸¸ ½É»çÁßÀ¸·Î º¯°æ
if (model.getValue("/root/init/item3/judgidyn") == "Y"
&& judgendyn == 'A') {
// "½É»çÁß" »óÅ·Π¼³Á¤ÇÑ´Ù.
var judgendyn = model.getValue("/root/main/item1/clbs/judgendyn");
model.removeNodeset("/root/send/item4");
model.makeValue("/root/send/item4/endclbs/clamym", model.getValue("/root/main/item1/clbs/clamym"));
model.makeValue("/root/send/item4/endclbs/clamdg", model.getValue("/root/main/item1/clbs/clamdg"));
model.makeValue("/root/send/item4/endclbs/pid", model.getValue("/root/main/item1/clbs/pid"));
model.makeValue("/root/send/item4/endclbs/pidsn", model.getValue("/root/main/item1/clbs/pidsn"));
model.makeValue("/root/send/item4/endclbs/judgendyn", "B");
submit("TXPID20302");
model.setValue("/root/main/item1/clbs/judgendyn", "B");
model.setValue("/root/main/item1/clbs/lastupdtrid", userid);
model.refreshpart("/root/main/item1/clbs/judgendyn");
// ´ë»óÀÚÈ¸é »óŵµ update
fSetJudgSaveState("B"); // ½É»ç¿Ï·á¿©ºÎ (P0151) - B: ½É»çÁß
}
// -------------------------------------------------
// ¿ø·¡ ½É»ç»óŸ¦ ÀúÀåÇØÁØ´Ù.(½É»çÁßÇØÁ¦¸¦ À§Çؼ)
// -------------------------------------------------
model.setValue("/root/hidden/orgjudgendyn", judgendyn);
if (judgendyn == "D") { // D: »èÁ¦
btn_save.disabled = true; // ÀúÀå
// 2012.5.23 À̰æ¹Î ½É»ç¿Ï·áÀÏÀÚ°¡ 15ÀÏ ÀÌÈÄ¸é ¿Ï·á¹öư ºñȰ¼ºÈ Ãß°¡.
var judgenddd = model.getValue("/root/hidden/smpid20200/rslt/judgenddd");
judgenddd = judgenddd.toDate();
var bfday15 = getCurrentDate().toDate().getAddDate(-15, 'D');
if (judgenddd < bfday15) {
btn_end.disabled = true; // ¿Ï·á
} else {
btn_end.disabled = false; // ¿Ï·á
}
btn_unjudg.disabled = false; // ¹Ì½É»ç
btn_rete.disabled = false; // º¸·ù
btn_del.disabled = true; // »èÁ¦
// btn_cretdel.disabled = false; // »ý¼º»èÁ¦ Btn
} else if (judgendyn == "C" || judgendyn == "E"
|| judgendyn == "Z") { // C: ½É»ç¿Ï·á, E: ÅëÇÕ¿Ï·á, Z: Àϰý¿Ï·á
btn_save.disabled = false;
btn_end.disabled = false;
btn_unjudg.disabled = false;
btn_rete.disabled = false;
btn_del.disabled = false;
// btn_cretdel.disabled = false;
} else if (judgendyn == "A") { // A: ¹Ì½É»ç
btn_save.disabled = false;
btn_end.disabled = false;
btn_unjudg.disabled = true;
btn_rete.disabled = false;
btn_del.disabled = false;
// btn_cretdel.disabled = false;
} else if (judgendyn == "N") { // N: º¸·ù
btn_save.disabled = false;
btn_end.disabled = false;
btn_unjudg.disabled = false;
btn_rete.disabled = true;
btn_del.disabled = false;
// btn_cretdel.disabled = false;
} else { // B: ½É»çÁß
btn_save.disabled = false;
btn_end.disabled = false;
btn_unjudg.disabled = false;
btn_rete.disabled = false;
btn_del.disabled = false;
// btn_cretdel.disabled = false; // »ý¼º»èÁ¦ Btn
}
} // if (rowstat != "Y")
} // if (clamendyn == "A")
else {
// û±¸¿Ï·á¿©ºÎ A:»ù»ý¼ºÀü ÀÌ ¾Æ´Ñ °æ¿ì
btn_save.disabled = true;
btn_end.disabled = true;
btn_unjudg.disabled = true;
btn_rete.disabled = true;
btn_del.disabled = true;
// btn_cretdel.disabled = true; // »ý¼º»èÁ¦ Btn
}
} // if (xAuth == true)
// À¯Çüº¸Á¶°¡ Á¤»ó(00)ÀÌ ¾Æ´Ò °æ¿ì
var suppkindcd = model.getValue("/root/main/item1/clbs/suppkindcd");
if (suppkindcd != "" && suppkindcd != "00") {
opt_suppkind.attribute("background-color") = "#f7a08b"; // class="color_6" ´ÙÈ«»ö"#cece9c";
opt_payownbrate.attribute("background-color") = "#f7a08b"; // class="color_6" ´ÙÈ«»ö"#cece9c";
} else {
opt_suppkind.attribute("background-color") = "#f2f2f2"; // output_fix Ŭ·¡½ºÀÇ background-color
opt_payownbrate.attribute("background-color") = "#f2f2f2"; // output_fix Ŭ·¡½ºÀÇ background-color
}
// ƯÀÌȯÀÚ ¹öư ¼³Á¤
if (model.getValue("/root/main/item1/clbs/patspcfyn") == "Y") {
btn_patspcfyn.attribute("background-image") = "../../../com/commonweb/images/icon_btn_s.gif"; // ÁÖȲ»ö
} else {
btn_patspcfyn.attribute("background-image") = "../../../com/commonweb/images/icon_btn.gif"; // ÆÄ¶õ»ö
}
// ¼ö¼úȯÀÚÀÇ °æ¿ì ¼ö¼ú(À¯) ¹öưÀÇ »ö»óÀ» ¼³Á¤ÇÑ´Ù.
if (model.getValue("/root/main/item1/clbs/opyn") == "Y") {
btn_opyn.visible = true;
btn_opyn.attribute("class") = "btn5_letter4";
btn_opyn.attribute("color") = "#cc3333"; // #ff0066"; // ÇØ´ç Á¤º¸°¡ ÀÖ´Â °æ¿ì
// ¹öư »ö º¯°æ // cc3333=ºÓÀº»ö
// ºÐ¸¸°£È£±â·Ï Btn
btn_babymom.attribute("left") = "193px";
} else {
btn_opyn.visible = false;
btn_opyn.attribute("class") = "btn2_letter4"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº» ¹öưÀ¸·Î ¼³Á¤
// ºÐ¸¸°£È£±â·Ï Btn
btn_babymom.attribute("left") = "260px";
}
// ºÐ¸¸°£È£±â·Ï ¹öư ¼³Á¤
if (model.getValue("/root/main/item1/clbs/bornbaby") == "Y") {
btn_babymom.visible = true;
btn_babymom.attribute("class") = "btn5_letter6";
btn_babymom.attribute("color") = "#cc3333"; // "#ff0066"; // ÇØ´ç Á¤º¸°¡ ÀÖ´Â
// °æ¿ì ¹öư »ö º¯°æ // cc3333=ºÓÀº»ö
} else {
btn_babymom.visible = false;
btn_babymom.attribute("class") = "btn2_letter6"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº» ¹öưÀ¸·Î
// ¼³Á¤
}
// »óº´ÀÌ·Â ¹öư ¼³Á¤
if (model.getValue("/root/main/item1/clbs/diaghist") == "Y") {
btn_diagHist.attribute("class") = "btn5_letter4";
btn_diagHist.attribute("color") = "#cc3333"; // #ff0066"; // ÇØ´ç Á¤º¸°¡
// ÀÖ´Â °æ¿ì ¹öư »ö º¯°æ //
// cc3333=ºÓÀº»ö
} else {
btn_diagHist.attribute("class") = "btn2_letter4"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº» ¹öưÀ¸·Î
// ¼³Á¤
}
// ¿ø¿Üó¹æ ¹öư ¼³Á¤
var btntop = btn_oprcp.attribute("top");
if (model.getValue("/root/main/item1/clbs/oprcp") == "Y") {
btn_oprcp.attribute("class") = "btn5_letter4";
btn_oprcp.attribute("color") = "#cc3333"; // #ff0066"; // ÇØ´ç Á¤º¸°¡ ÀÖ´Â °æ¿ì
// ¹öư »ö º¯°æ // cc3333=ºÓÀº»ö
btn_oprcp.attribute("top") = btntop;
} else {
btn_oprcp.attribute("class") = "btn2_letter4"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº» ¹öưÀ¸·Î ¼³Á¤
btn_oprcp.attribute("top") = btntop;
}
// ¸Þ¸ðÀÌ·Â ¹öư ¼³Á¤
if (model.getValue("/root/main/item1/clbs/memohist") == "Y") {
btn_memohist.attribute("class") = "btn5_letter4";
btn_memohist.attribute("color") = "#cc3333"; // #ff0066"; // ÇØ´ç Á¤º¸°¡
// ÀÖ´Â °æ¿ì ¹öư »ö º¯°æ //
// cc3333=ºÓÀº»ö
} else {
btn_memohist.attribute("class") = "btn2_letter4"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº» ¹öưÀ¸·Î
// ¼³Á¤
}
// (ƯÁ¤³»¿ª) ¹Ýº¹ ¹öư ¼³Á¤
if (model.getValue("/root/main/item1/memo/judgmemorepeat") == "R") {
btn_judgmemorepeat.attribute("class") = "btn5_letter6";
btn_judgmemorepeat.attribute("color") = "#cc3333"; // #ff0066"; // ÇØ´ç
// Á¤º¸°¡ ÀÖ´Â °æ¿ì ¹öư »ö º¯°æ
// // cc3333=ºÓÀº»ö
} else {
btn_judgmemorepeat.attribute("class") = "btn2_letter6"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº»
// ¹öưÀ¸·Î ¼³Á¤
}
if (model.getValue("/root/main/item1/memo/edimemorepeat") == "R") {
btn_edimemorepeat.attribute("class") = "btn5_letter6";
btn_edimemorepeat.attribute("color") = "#cc3333"; // #ff0066"; // ÇØ´ç
// Á¤º¸°¡ ÀÖ´Â °æ¿ì ¹öư »ö º¯°æ
// // cc3333=ºÓÀº»ö
} else {
btn_edimemorepeat.attribute("class") = "btn2_letter6"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº»
// ¹öưÀ¸·Î ¼³Á¤
}
// ÀÌÀü¸í¼¼¼ ¹öư ¼³Á¤ 20100224 ÀÔ¿øÂÊ ´©¶ôµÇ¾î ÀÖ¾î Ãß°¡
if (model.getValue("/root/main/item1/clbs/predocuyn") == "Y") {
btn_predocu.attribute("class") = "btn5_letter5";
btn_predocu.attribute("color") = "#cc3333"; // ÇØ´ç Á¤º¸°¡ ÀÖ´Â °æ¿ì ¹öư »ö º¯°æ //
// cc3333=ºÓÀº»ö
} else {
btn_predocu.attribute("class") = "btn2_letter5"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº» ¹öưÀ¸·Î
// ¼³Á¤
}
/*
* // ¸Þ¸ð°¡ ÀúÀåµÈ °æ¿ì ¸Þ¸ðÀÌ·Â ¹öưÀÇ »ö»óÀ» ¼³Á¤ÇÑ´Ù. var judgmemo =
* model.getValue("/root/main/item1/memo/judgmemo"); var edimemo =
* model.getValue("/root/main/item1/memo/edimemo"); if (judgmemo || edimemo) {
* btn_memohist.attribute("class") = "btn5_letter4";
* btn_memohist.attribute("color") = "#ff0066"; // ÇØ´ç Á¤º¸°¡ ÀÖ´Â °æ¿ì ¹öư »ö º¯°æ }
* else { btn_memohist.attribute("class") = "btn2_letter4"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ ±âº»
* ¹öưÀ¸·Î ¼³Á¤ }
*/
// °°Àº û±¸¿ù¿¡ µ¿ÀÏÁø·á°ú¸í¼¼¼°¡ Á¸ÀçÇÏ´Â °æ¿ì
if (model.getValue("/root/main/item1/clbs/samedocuyn") == "Y") {
messageBox("µ¿ÀÏû±¸¿ù µ¿ÀÏÁø·á°ú ¸í¼¼¼°¡ Á¸ÀçÇÕ´Ï´Ù.", "I007"); // È®ÀÎÇϽʽÿÀ !
}
// ƯÁ¤ÄÚµå MT015, MT016, MT004 Á¤º¸°¡ ÀÔ·ÂµÈ È¯ÀÚÀÎÁö¸¦ È®ÀÎÇÑ´Ù.
fCheckSpclSpecData();
// 16¼¼¹Ì¸¸, 35¼¼ ÀÌ»ó ÃÊ»ê »ê¸ð Çʼö Áø´Ü üũ
var chk_R = model.getValue("/root/main/list8/clod[snglcalcscorcd='R4351' "
+ "or snglcalcscorcd='R3131' " + "or snglcalcscorcd='R3141' "
+ "or snglcalcscorcd='R4361' " + "or snglcalcscorcd='R4519' "
+ "]/snglcalcscorcd"); // ÃÊ»ê »óº´Ã¼Å©
var patage = parseInt(model.getValue("/root/main/item1/clbs/patage"));
if (chk_R.length > 0 && (patage >= 35 || patage < 16)) {
messageBox("¾î¸° ÃÊÀӺΠ¶Ç´Â °í·ÉÃÊÀÓºÎ", "I009");
}
var clbs_licnsno = model.getValue("/root/main/item1/clbs/licnsno");
var cldi_licnsno = model.getValue("/root/main/list1/cldi[diagseq='1']/licnsno");
var clod_snglcalcscorcd = model.getValue("/root/main/list8/clod[item='0101' or item='0102']/snglcalcscorcd");
var holigbn = model.getValue("/root/main/item1/clbs/holigbn");
var holifromdd = model.getValue("/root/main/item1/clbs/holifromdd");
var holitodd = model.getValue("/root/main/item1/clbs/holitodd");
if (holigbn == "Y" && clod_snglcalcscorcd.length > 0) {
messageBox("Áø·áÀǰ¡ " + holifromdd + " ~ " + holitodd
+ " ±â°£µ¿¾È ÇØ¿Ü ÃâÀåÀÔ´Ï´Ù. Áø·áÀǻ縦 º¯°æÇϼ¼¿ä.", "E");
}
// ÀÚº¸Çѵµ¾× ¹öư ¼³Á¤ 20090327
// ÀÚº¸Çѵµ¾× ÃʰúÀÚ Ã¼Å© : ÀÚº¸È¯ÀÚÀ϶§¸¸ ÀÚº¸¹ß»ý±Ý¾× ¹öư Ȱ¼ºÈ ÃʰúÀÚ´Â ÀÚº¸¹ß»ý±Ý¾× ¹öư »ö±òº¯°æ - 20080923 ¹Úâ¿ø
var insukind = model.getValue("/root/main/item1/clbs/insukindcd");
var suppkind = model.getValue("/root/main/item1/clbs/suppkindcd");
if (insukind == "31" && suppkind == "18" && model.getValue("/root/main/item1/clbs/paylimamt") != "0") {
btn_autolimit.attribute("background-image") = "../../../com/commonweb/images/icon_btn_s.gif"; // ÁÖȲ»ö
} else {
btn_autolimit.attribute("background-image") = "../../../com/commonweb/images/icon_btn.gif"; // ÆÄ¶õ»ö
}
// ÀÚº¸»êÀç º¸ÇèÀ¯Çüº° caption ¼³Á¤ 20090327
if (insukind == "31") {
cap_insdnm.attribute("text") = "»ç°íÀÏÀÚ";
cap_certno.attribute("text") = "Á¢¼ö¹øÈ£";
} else if (insukind == "41") {
cap_insdnm.attribute("text") = "»ç°íÀÏÀÚ";
cap_certno.attribute("text") = "°ü¸®¹øÈ£";
} else {
cap_insdnm.attribute("text") = "°¡ÀÔÀÚ";
cap_certno.attribute("text") = "Áõ¹øÈ£";
}
// »è°¨Ã³¹æ¿©ºÎ¿¡ µû¶ó »è°¨Ã³¹æ¹öư »ö º¯°æ
if (model.getValue("/root/main/item1/clbs/cutprcpyn") == "Y") {
btn_redu.attribute("class") = "btn5_letter4";
btn_redu.attribute("color") = "#cc3333";
} else {
btn_redu.attribute("class") = "btn2_letter4";
}
// 20100317 ȯÀÚº° ¸Þ¼¼Áö ¹öư Ãß°¡ (º°µµ Á¶È¸µÇ´ø°ÍÀ» ±âº»Á¤º¸ Á¶È¸¿¡ Æ÷ÇÔ Ã³¸®)
if (model.getValue("/root/main/item1/clbs/patmsgyn") == "Y") {
img_msg.visible = true;
} else {
img_msg.visible = false;
}
}
// ---------------------------------------------------------------------------
// ó¹æ Çà »èÁ¦ or »èÁ¦Ãë¼Ò ÈÄ¿¡ ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
// ---------------------------------------------------------------------------
function fSortSpclNo() {
if (grd_clsphist.rows > 1) {
for ( var j = 1; j < grd_clsphist.rows; j++) {
grd_clsphist.rowHidden(j) = false;
var rowstatus = grd_clsphist.rowstatus(j);
var spclcd = model.getValue("/root/main/list3/clsp[" + j + "]/spclcd");
var spclspec = model.getValue("/root/main/list3/clsp[" + j + "]/spclspec");
// ƯÁ¤ÄÚµå°ú ƯÁ¤³»¿ªÀÌ ÀԷµÇÁö ¾ÊÀº °æ¿ì
if (rowstatus != 4 && spclcd == "" && spclspec == "") {
// ÁÙÀ» »èÁ¦ÇÑ´Ù.
grd_clsphist.deleteRow(j, false);
j--;
} else {
// JS010(ƯÁ¤ÄÚµå:¾ß°£°¡»ê)ÀÇ hhmmÀÌ ¾ß°£(18~09½Ã)°¡ ¾Æ´Ï¸é ƯÁ¤³»¿ª Grid¿¡ »¡°£»öÀ¸·Î Ç¥½Ã
grd_clsphist.rowStyle(j, "data", "color") = "#000000"; // 000000=°ËÀº»ö
if (spclcd == "JS010") { // JS010 ¾ß°£°¡»ê
var js010chk = false;
if (spclspec.length >= 12) { // ccyymmddhhmm
var ccyymmddhhmm = spclspec.substr(0, 12);
if (isValidDateTime(ccyymmddhhmm, "YYYYMMDDhhmm")) { // (dateHelper.js) À¯È¿ÇÑ ³¯Â¥, ½Ã°£ ÀÎÁö Á¡°Ë
var hhmm = parseInt(spclspec.substr(8, 4), 10); // '09' ¿Í °°Àº Çü½ÄÀ¸·Î ÀÔ·ÂÇÑ °æ¿ì -> 9·Î ó¸®
if (hhmm >= 1800 || hhmm < 900) {
js010chk = true;
}
}
}
if (js010chk == false) {
grd_clsphist.rowStyle(j, "data", "color") = "#ff3333"; // ff3333=ºÓÀº»ö
}
} // if (spclcd == "JS010")
}
}
grd_clsphist.refresh();
grd_clsphist.colsort(grd_clsphist.colRef("unitflag")) = "desc";
grd_clsphist.colsort(grd_clsphist.colRef("spclcd")) = "asc";
grd_clsphist.colsort(grd_clsphist.colRef("edilnno")) = "asc";// "edilnno";
var maxRow = parseInt(grd_clsphist.rows) - 1; // rows´Â ŸÀÌÆ²ºÎºÐ ºÎÅÍ °³¼ö¸¦
// ¼¾´Ù.
var maxCol = parseInt(grd_clsphist.cols) - 1;
grd_clsphist.sort(grd_clsphist.fixedRows, grd_clsphist.fixedCols, maxRow, maxCol) = "usersort";
// Sort µÈ Grid »óÀÇ Data ¼ø¼¿Í Instance Node »óÀÇ Data ¼ø¼¸¦ µ¿ÀÏÇÏ°Ô ¸ÂÃçÁØ´Ù.
grd_clsphist.gridToInstance();
grd_clsphist.row = 0;
// rdo_unitflag.dispatch("xforms-select");
fGetSelectedUnitFlag();
} else { // ŸÀÌÆ²¸¸ ÀÖ´Â °æ¿ì grd_clsphist.rows = 1
var selectedUnitFlag = model
.getValue("/root/hidden/list3/selectedUnitFlag");
if (selectedUnitFlag == "-" || selectedUnitFlag == "M") {
fSpclGridInsertRow(); // ƯÁ¤³»¿ª Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "Çà Ãß°¡"
}
}
}
// -------------------------------------------------------------------------
// ó¹æ Á¶È¸ºÎ - ÀçÇà/±Þ¿©/Ç׸ñ±¸ºÐ Radio ¼±Åÿ¡ µû¶ó ó¹æ ³»¿ªÀ» º¸¿©ÁØ´Ù.
// -------------------------------------------------------------------------
function fGetSelectedOrderData() {
var inpCalcScorCd = model.getValue("/root/hidden/list2/clodsrch/inpCalcScorCd");
var inpEDICd = model.getValue("/root/hidden/list2/clodsrch/inpEDICd");
var selectedRdoMatrAct = model.getValue("/root/hidden/list2/clodsrch/selectedRdoMatrAct");
var selectedRdoPay = model.getValue("/root/hidden/list2/clodsrch/selectedRdoPay");
var selectedRdoItem = model.getValue("/root/hidden/list2/clodsrch/selectedRdoItem");
var pre_ediitem1 = "";
var pre_backcolor = "#f4f4f4"; // datagrid backcoloralternate:#f4f4f4
var insukind = model.getValue("/root/main/Item1/clbs/insukindcd");
insukind = insukind.substr(1, 1);
for ( var i = grd_clodhist.fixedRows; i < grd_clodhist.rows; i++) {
grd_clodhist.rowHidden(i) = false;
if (inpCalcScorCd == "") {
} else if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("snglcalcscorcd")).indexOf(inpCalcScorCd) == -1) { // indexOf: ¹®ÀÚ¿ÀÌ ¾øÀ¸¸é -1
grd_clodhist.rowHidden(i) = true;
}
if (inpEDICd == "") {
} else if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("basecd")).indexOf(inpEDICd) == -1) { // indexOf: ¹®ÀÚ¿ÀÌ ¾øÀ¸¸é -1
grd_clodhist.rowHidden(i) = true;
}
if (selectedRdoMatrAct == "" || selectedRdoMatrAct == "-") { // Àüü
} else if (selectedRdoMatrAct == "1") { // Àç·áÀÎ °æ¿ì
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("matractflag")) == "2" || grd_clodhist.valueMatrix(i, grd_clodhist.colRef("matractflag")) == "3") {
grd_clodhist.rowHidden(i) = true;
}
} else { // ÇàÀ§ÀÎ °æ¿ì (2 : °¡»êÀÖ´Â ÇàÀ§ / 3 : °¡»ê¾ø´Â ÇàÀ§)
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("matractflag")) != "2" && grd_clodhist.valueMatrix(i, grd_clodhist.colRef("matractflag")) != "3") {
grd_clodhist.rowHidden(i) = true;
}
}
if (selectedRdoPay == "" || selectedRdoPay == "-") { // Àüü
} else { // ±Þ¿©±¸ºÐ1(P0104 -:ÇØ´ç»çÇ×¾øÀ½, 0:±Þ¿©, 1:Àü¾×º»Àκδã, 2:ºñ±Þ¿©)
if (selectedRdoPay == "0") {
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("payflag")) != "0" && grd_clodhist.valueMatrix(i, grd_clodhist.colRef("payflag")) != "9") {
grd_clodhist.rowHidden(i) = true;
}
} else {
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("payflag")) != selectedRdoPay) {
grd_clodhist.rowHidden(i) = true;
}
}
}
if (selectedRdoItem == "" || selectedRdoItem == "-") { // Àüü
} else {
// if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("ediitem1"))
// != model.getValue("/root/hidden/list2/clodsrch/selectedRdoItem"))
// {
// 20091222 »êÀçÀ¯Çü ÇÊÅ͸µ ¾ÈµÇ´Â ¿À·ù ¼öÁ¤
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("item1")) != selectedRdoItem) {
grd_clodhist.rowHidden(i) = true;
}
}
if (grd_clodhist.rowHidden(i) == false) {
// Ç׸ñÀÇ Ç× º°·Î Èò»ö/ȸ»ö ±¸ºÐÇ¥½Ã
var ediitem1 = model.getValue("/root/main/list2/clod[" + i + "]/ediitem1");
if (ediitem1 != pre_ediitem1) { // Ç׸ñÀÇ Ç×ÀÌ º¯°æµÈ °æ¿ì
pre_ediitem1 = ediitem1;
if (pre_backcolor == "#f4f4f4") {
pre_backcolor = "#ffffff"; // ¹è°æ»ö ¾øÀ½ // #ffffff = White
} else {
pre_backcolor = "#f4f4f4"; // datagrid
// backcoloralternate:#f4f4f4
}
}
grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("edilnno")) = pre_backcolor;
grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("ediitem1")) = pre_backcolor;
grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("ediitem2")) = pre_backcolor;
}
}
}
// -------------------------------------------------------------------------
// ó¹æ Á¶È¸ºÎ - ±Þ¿©±¸ºÐ Radio ¼±Åÿ¡ µû¶ó ó¹æ ³»¿ªÀ» º¸¿©ÁØ´Ù.
// -------------------------------------------------------------------------
function fGetSelectedPayflag() {
var selectedRdoPay = model.getValue("/root/hidden/list2/clodsrch/selectedRdoPay");
var selectedRdoItem = model.getValue("/root/hidden/list2/clodsrch/selectedRdoItem");
var pre_ediitem1 = "";
var pre_backcolor = "#f4f4f4"; // datagrid backcoloralternate:#f4f4f4
var insukind = model.getValue("/root/main/Item1/clbs/insukindcd");
insukind = insukind.substr(1, 1);
for ( var i = grd_clodhist.fixedRows; i < grd_clodhist.rows; i++) {
grd_clodhist.rowHidden(i) = false;
if (inpCalcScorCd == "") {
} else if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("snglcalcscorcd")).indexOf(inpCalcScorCd) == -1) { // indexOf: ¹®ÀÚ¿ÀÌ ¾øÀ¸¸é -1
grd_clodhist.rowHidden(i) = true;
}
if (inpEDICd == "") {
} else if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("basecd")).indexOf(inpEDICd) == -1) { // indexOf: ¹®ÀÚ¿ÀÌ ¾øÀ¸¸é -1
grd_clodhist.rowHidden(i) = true;
}
if (selectedRdoMatrAct == "" || selectedRdoMatrAct == "-") { // Àüü
} else if (selectedRdoMatrAct == "1") { // Àç·áÀÎ °æ¿ì
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("matractflag")) == "2" || grd_clodhist.valueMatrix(i, grd_clodhist.colRef("matractflag")) == "3") {
grd_clodhist.rowHidden(i) = true;
}
} else { // ÇàÀ§ÀÎ °æ¿ì (2 : °¡»êÀÖ´Â ÇàÀ§ / 3 : °¡»ê¾ø´Â ÇàÀ§)
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("matractflag")) != "2" && grd_clodhist.valueMatrix(i, grd_clodhist.colRef("matractflag")) != "3") {
grd_clodhist.rowHidden(i) = true;
}
}
if (selectedRdoPay == "" || selectedRdoPay == "-") { // Àüü
} else { // ±Þ¿©±¸ºÐ1(P0104 -:ÇØ´ç»çÇ×¾øÀ½, 0:±Þ¿©, 1:Àü¾×º»Àκδã, 2:ºñ±Þ¿©)
if (selectedRdoPay == "9") {
if (insukind == "3" || insukind == "4") {
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("payflag")) != "9") {
grd_clodhist.rowHidden(i) = true;
}
} else {
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("payflag")) != "8") {
grd_clodhist.rowHidden(i) = true;
}
}
} else {
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("payflag")) != selectedRdoPay) {
grd_clodhist.rowHidden(i) = true;
}
}
}
if (selectedRdoItem == "" || selectedRdoItem == "-") { // Àüü
} else {
if (grd_clodhist.valueMatrix(i, grd_clodhist.colRef("item1")) != selectedRdoItem) {
grd_clodhist.rowHidden(i) = true;
}
}
}
}
// -------------------------------------------
// ó¹æ Ç׸ñ ±¸ºÐ ¹× ¼±º°½É»ç ó¹æ »ö±ò ±¸ºÐ
// -------------------------------------------
function fSetOrderData() {
model.resetInstanceNode("/root/hidden/list2/cloditem1");
// 20100305 ÃʱâÈ Ãß°¡
grd_clodhist.initStyle("color");
grd_clodhist.initStyle("background-color");
for ( var i = 1; i <= grd_cldihist.rows; i++) {
var col_vcode = grd_cldihist.colRef("vcode");
var col_diagcd = grd_cldihist.colRef("diagcd");
var srchnm = grd_cldihist.valueMatrix(i, col_diagcd).substr(0, 2);
var t_vcode = grd_cldihist.valueMatrix(i, col_vcode);
var rowno, rn = 0;
rowno = grd_cldihist.findRow(srchnm,grd_cldihist.fixedrows ,col_diagcd, true, false);
if (t_vcode != "V252" && t_vcode != "V193") {
while( rowno > 0){
var s_vcode = grd_cldihist.valueMatrix(rowno, col_vcode );
var t_diagcd = grd_cldihist.valueMatrix(rowno, col_diagcd).substr(0, 2);
if (rowno != i && t_diagcd != "" && t_vcode != "" && srchnm == t_diagcd && t_vcode == s_vcode ) {
grd_cldihist.cellStyle("background-color", rowno, grd_cldihist.colRef("rowstat"), rowno, grd_cldihist.colRef("workflag")) = "#ffff9c"; //#ffff9c=¿¬Çѳë¶û
}
rowno = grd_cldihist.findRow(srchnm,rowno + 1 ,col_diagcd, true, false);
}
}
var srchnm2 = grd_cldihist.valueMatrix(i, col_diagcd).substr(0, 3);
rn = grd_cldihist.findRow(srchnm2,grd_cldihist.fixedrows ,col_diagcd, true, false);
while( rn > 0){
var t_diagcd = grd_cldihist.valueMatrix(rn, col_diagcd).substr(0, 3);
if (rn != i && srchnm2 == t_diagcd && t_diagcd != "") {
grd_cldihist.cellStyle("background-color", rn, grd_cldihist.colRef("rowstat"), rn, grd_cldihist.colRef("workflag")) = "#ffff9c"; //#ffff9c=¿¬Çѳë¶û
}
rn = grd_cldihist.findRow(srchnm2 ,rn + 1 ,col_diagcd, true, false);
}
// »óº´±×¸®µå ÇØ´ç»óº´º¸´Ù Å« 5´ÜÀÌ»óÀÇ ¼¼ºÎ»óº´ÀÌ ÀÖ´Â °æ¿ì Ç¥½ÃÇØÁØ´Ù.
if (model.getValue("/root/main/list1/cldi[" + i + "]/kcd6chk") == "Y") {
grd_cldihist.cellStyle("background-color", i, grd_cldihist.colRef("rowstat"), i, grd_cldihist.colRef("workflag")) = "#0000ff"; // #0000ff=ÆÄ¶û
// Á¾·á»óº´À» Ç¥½ÃÇÑ´Ù.
} else if (model.getValue("/root/main/list1/cldi[" + i + "]/endyn") == "Y") {
grd_cldihist.cellStyle("background-color", i, grd_cldihist.colRef("rowstat"), i, grd_cldihist.colRef("workflag")) = "#ff0000"; // #ff0000=»¡°
}
}
var pre_item1 = "";
var pre_backcolor = "#f4f4f4"; // datagrid backcoloralternate:#f4f4f4
for ( var i = 1; i <= grd_clodhist.rows; i++) { // ó¹æ °³¼ö¸¸Å µ¹¸é¼
// ¼±º°½É»ç ó¹æ »ö±ò ±¸ºÐ
var spcljudgyn = model.getValue("/root/main/list2/clod[" + i + "]/spcljudgyn");
if (spcljudgyn == "Y") {
grd_clodhist.rowStyle(i, "data", "color") = "#ff3333"; // ff3333=ºÓÀº»ö
} else {
grd_clodhist.rowStyle(i, "data", "color") = "#000000"; // 000000=°ËÀº»ö
}
if (grd_clodhist.rowHidden(i) == false) {
// Ç׸ñÀÇ Ç× º°·Î Èò»ö/ȸ»ö ±¸ºÐÇ¥½Ã
var item1 = model.getValue("/root/main/list2/clod[" + i + "]/ediitem1");
if (item1 != pre_item1) { // Ç׸ñÀÇ Ç×ÀÌ º¯°æµÈ °æ¿ì
pre_item1 = item1;
if (pre_backcolor == "#f4f4f4") {
pre_backcolor = "#ffffff"; // ¹è°æ»ö ¾øÀ½ // #ffffff = White
} else {
pre_backcolor = "#f4f4f4"; // datagrid
// backcoloralternate:#f4f4f4
}
}
grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("edilnno")) = pre_backcolor;
grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("ediitem1")) = pre_backcolor;
grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("ediitem2")) = pre_backcolor;
}
// Á¶Á¤»çÀ¯ÄÚµå ÀÔ·ÂµÈ Ã³¹æ »ö±ò ±¸ºÐ
var adjtresncd = model.getValue("/root/main/list2/clod[" + i + "]/adjtresncd");
if (adjtresncd != "" && adjtresncd != "-") {
// ó¹æ Grid ¹è°æ»öÀ» ¼³Á¤ÇÑ´Ù. - ½É»ç»çÀ¯ÀÖ´Â row (īŰ»ö)
fOrderBkColorResn(i);
}
// ´Ü°¡¿À·ù, °è»êÂø¿ÀÀΠ󹿻ö±ò ±¸ºÐ : ½É»çÀÚ¿¡°Ô ¾Ë·ÁÁÖ±â À§ÇÔ 2009-03-20
if (model.getValue("/root/main/list2/clod[" + i + "]/erroramtyn") == "Y") {
grd_clodhist.rowStyle(i, "data", "background-color") = "#ffff9c"; // ffff9c=¿¬Çѳë¶û
}
// --------------------------------------------------------------------------
// 2008-08-25 ±è»óÁø. ÁÙ´ÜÀ§ ƯÁ¤³»¿ª »ö±ò±¸ºÐ ÀÏ´Ü »«´Ù ³ªÁß¿¡ ¿ÀÇ ÈÄ Ã³¸®
// --------------------------------------------------------------------------
/*
* // ÁÙ´ÜÀ§ ƯÁ¤³»¿ª ÀÔ·ÂµÈ Ã³¹æ »ö±ò ±¸ºÐ var lnunitspclspecyn =
* model.getValue("/root/main/list2/clod["+ i +"]/lnunitspclspecyn"); if
* (lnunitspclspecyn) { var jx999cnt = 0; var nonjx999cnt = 0; // JX999°¡
* ¾Æ´Ñ ƯÁ¤³»¿ªÄÚµåÀÇ ¼ö for (var j = 1; j < grd_clsphist.rows; j++) { if
* (grd_clsphist.rowstatus(j) != 4) { var spclLnNo =
* model.getValue("/root/main/list3/clsp["+ j +"]/edilnno"); if
* (spclLnNo == model.getValue("/root/main/list2/clod["+ i
* +"]/edilnno")) { var spclcd =
* model.getValue("/root/main/list3/clsp["+ j +"]/spclcd"); if (spclcd ==
* "JX999") { // JX999ÀÎ °æ¿ì jx999cnt++; } else if (spclcd != "JT001") { //
* JX999µµ, È®ÀÎÄڵ嵵 ¾Æ´Ñ °æ¿ì nonjx999cnt++; } } } }
*
* if (jx999cnt > 0) { if (nonjx999cnt == 0) { // JX999¸¸ ÀÖ´Â °æ¿ì
* grd_clodhist.cellStyle("background-color", i,
* grd_clodhist.colRef("lnunitspclspecyn")) = "#f7a08b"; //
* class="color_6" ´ÙÈ«»ö } else { // JX999 + ´Ù¸¥ Äڵ嵵 ÀÖ´Â °æ¿ì
* grd_clodhist.cellStyle("background-color", i,
* grd_clodhist.colRef("lnunitspclspecyn")) = "#b5a5d1"; // ¿¬ÇÑ º¸¶ó»ö } }
* else { // JX999°¡ ¾ø´Â °æ¿ì grd_clodhist.cellStyle("background-color", i,
* grd_clodhist.colRef("lnunitspclspecyn")) = "#ffffff"; // #ffffff =
* White } } else { grd_clodhist.cellStyle("background-color", i,
* grd_clodhist.colRef("lnunitspclspecyn")) = "#ffffff"; // #ffffff =
* White }
*/
// --------------------------------------------------------------------------
// 2008-10-29 ±è»óÁø. Ç׸ñ±¸ºÐ item ±½°ÔÇ¥½Ã ÁÖ¼®Ã³¸®ÇÔ. ¼Óµµ¹®Á¦
// --------------------------------------------------------------------------
/*
* // Ç׸ñ±¸ºÐ Á¶È¸ºÎ Radio¿¡ ÇØ´çÇϴ ó¹æÀÌ ÀÖ´ÂÁö ¿©ºÎ¸¦ È®ÀÎÇÑ´Ù. var item1 =
* model.getValue("/root/main/list2/clod["+ i +"]/item1"); if (item1) {
* var path = "/root/hidden/list2/cloditem1/ediitem1_"+ item1; var node =
* instance1.selectSingleNode(path); if (node != null) {
* model.setValue(path, item1); } }
*/
}
// --------------------------------------------------------------------------
// 2008-10-29 ±è»óÁø. Ç׸ñ±¸ºÐ item ±½°ÔÇ¥½Ã ÁÖ¼®Ã³¸®ÇÔ. ¼Óµµ¹®Á¦
// --------------------------------------------------------------------------
/*
* if (grd_clodhist.rows > 1) { // ŸÀÌÆ²¸¸ ÀÖ´Â °æ¿ì grd_clodhist.rows = 1
* rdo_item1.item(0).attribute("font-weight") = "bold"; // "Àüü" Ç׸ñÀº default
* ·Î ±½°Ô Ç¥½ÃÇÑ´Ù. } else { rdo_item1.item(0).attribute("font-weight") =
* "normal"; } // ó¹æ Á¶È¸ºÎ Ç׸ñ±¸ºÐ Radio¿¡¼ ÇØ´ç ó¹æÀÌ ÀÖ´Â itemÀ» ±½°Ô Ç¥½ÃÇÑ´Ù. var
* itemRadioList =
* instance1.selectSingleNode("/root/hidden/list2/cloditem1"); var itemNode =
* itemRadioList.childNodes; for (var i = 1; i < itemNode.length; i++) { var
* item1 = itemNode.item(i).value; if (item1) {
* rdo_item1.item(i).attribute("font-weight") = "bold"; } else {
* rdo_item1.item(i).attribute("font-weight") = "normal"; } }
*/
}
// -------------------------------------------
// Ç׸ñº° ±Ý¾×¼Ò°è(item1º°·Î ±Ý¾×sum)
// -------------------------------------------
function fSetSubtotal() {
// ****************************************************************************************************************
// Ç׸ñº°¼Ò°è subtotal ±è»óÁø 20101223
// ****************************************************************************************************************
// #ffff0| ¹àÀº³ë¶û
// #d9e3fe ¿¶ÀºÆÄ¶û
// #eeddff ¿¶Àºº¸¶ó
// #b9fcf8 ¹àÀºÇÏ´Ã
// #cefcfa ¿¶ÀºÇÏ´Ã
grd_clodhist.subtotalposition = "below";
grd_clodhist.subtotal("sum", grd_clodhist.colRef("item1"), grd_clodhist.colRef("amt"), "format:(-)#,###; roundmode:round; roundposition:0","background-color:#cefcfa; color:#0000ff;font-weight:bold; ", grd_clodhist.colRef("hngnm"), "", false);
grd_clodhist.subtotal("sum", grd_clodhist.colRef("item1"), grd_clodhist.colRef("ediamt"), "format:(-)#,###; roundmode:round; roundposition:0","background-color:#cefcfa; color:#0000ff;font-weight:bold; ", grd_clodhist.colRef("hngnm"), "Ç׸ñº°¼Ò°è", false);
var fild1 = "0";
var fild2 = "0";
for ( var i = grd_clodhist.fixedRows; i <= grd_clodhist.rows; i++) {
fild1 = grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm"));
if (fild1 == "Ç׸ñº°¼Ò°è" && fild2 != "") {
if (fild2 == "01") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "ÁøÂû·á ¼Ò°è";
} else if (fild2 == "02") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "ÀÔ¿ø·á ¼Ò°è";
} else if (fild2 == "03") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "Åõ¾à·á ¼Ò°è";
} else if (fild2 == "04") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "ÁÖ»ç·á ¼Ò°è";
} else if (fild2 == "05") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "¸¶Ãë·á ¼Ò°è";
} else if (fild2 == "06") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "ÀÌÇÐ·á ¼Ò°è";
} else if (fild2 == "07") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "Á¤½Å·á ¼Ò°è";
} else if (fild2 == "08") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "¼ö¼ú·á ¼Ò°è";
} else if (fild2 == "09") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "°Ë»ç·á ¼Ò°è";
} else if (fild2 == "10") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "¹æ»ç¼± ¼Ò°è";
} else if (fild2 == "SS") {
grd_clodhist.valueMatrix(i, grd_clodhist.colRef("hngnm")) = "Ư¼ö ¼Ò°è";
}
}
fild2 = grd_clodhist.valueMatrix(i, grd_clodhist.colRef("item1"));
}
}
// Á¶È¸µÈ ½É»ç´ë»óÀÚÀÇ Æ¯ÀÌ ÀÎÀû»çÇ×, º¸Á¶/¿äÀ² µîÀ» °è»êÇÏ¿© º¸¿©ÁØ´Ù.
function fGetPersonalData() {
// ÀÎÀû»çÇ× Å¸ÀÌÆ² ¿· output
var srchrslt = "";
// 2008-06-23 neverdie À±¿µ¿Á¼±»ý´Ô ¿äû (»ç¸ÁȯÀÚ ¸Þ½ÃÁö ¸·¾ÆÁÖ¼¼¿ä)
// if (model.getValue("/root/main/item1/clbs/dethyn") == "Y") {
// srchrslt = " [»ç¸ÁȯÀÚÀÔ´Ï´Ù.]";
// }
// ÁßÁõ¹× Èñ±ÍÁ¤º¸°¡ ¸ðµÎ´Ù Á¸ÀçÇÒ¶§¿¡´Â ÄÞº¸¿¡ µî·Ï¾Ï¿ì¼±À¸·Î º¸¿©ÁØ´Ù. - 20091123 ¹Úâ¿ø
// ÁßÁõ µî·ÏÁ¤º¸¸¦ À¯Çü¿¡ ¸Â°Ô º¸¿©ÁØ´Ù - 20091021 ¹Úâ¿ø
var suppkind = model.getValue("/root/main/item1/clbs/suppkindcd");
var rooamsgcnt = getNodesetCount("/root/main/rarecancermsglist/rarecancermsg[rgstkindcd!='00']/msg");
var sdoamsgcnt = getNodesetCount("/root/main/rarecancermsglist/rarecancermsg[rgstkindcd='00']/msg");
var rooamsg = model.getXPathValue("/root/main/rarecancermsglist/rarecancermsg[rgstkindcd!='00']/msg");
var sdoamsg = model.getXPathValue("/root/main/rarecancermsglist/rarecancermsg[rgstkindcd='00']/msg");
var rooamsgtooth = model.getXPathValue("/root/main/rarecancermsglist/rarecancermsg[rgstkindcd!='00' and rgstkindcd!='01']/msg");
if ((rooamsgcnt > 0) && (sdoamsgcnt > 0)) {
cmb_rarecancermsg.visible = true;
// µî·Ï¾Ï º¸Á¶À¯ÇüÀϰæ¿ì(06.µî·Ï¾Ï, 11.°¡Á¤°£È£µî·Ï¾Ï, 32.Â÷»óÀ§1Á¾, 40.Â÷»óÀ§2Á¾µî·Ï¾Ï
if (suppkind == "06" || suppkind == "11" || suppkind == "32" || suppkind == "40") {
model.makeValue("/root/hidden/rarecancermsg/msg", sdoamsg);
} else if (suppkind == "87" || suppkind == "88" || suppkind == "89") {
model.makeValue("/root/hidden/rarecancermsg/msg", rooamsgtooth, true);
} else {
model.makeValue("/root/hidden/rarecancermsg/msg", rooamsg, true);
}
} else if (rooamsgcnt > 0) {
if (suppkind == "87" || suppkind == "88" || suppkind == "89") {
if (rooamsgcnt == 1) {
srchrslt += rooamsgtooth; // Èñ±Íµî·Ï¹øÈ£
} else {
cmb_rarecancermsg.visible = true;
model.makeValue("/root/hidden/rarecancermsg/msg", rooamsgtooth, true);
}
} else {
if (rooamsgcnt == 1) {
srchrslt += rooamsg; // Èñ±Íµî·Ï¹øÈ£
} else {
cmb_rarecancermsg.visible = true;
model.makeValue("/root/hidden/rarecancermsg/msg", rooamsg, true);
}
}
} else if (sdoamsgcnt > 0) {
if (sdoamsgcnt == 1) {
srchrslt += sdoamsg; // ÁßÁõµî·ÏÁ¤º¸
} else {
cmb_rarecancermsg.visible = true;
model.makeValue("/root/hidden/rarecancermsg/msg", sdoamsg, true);
}
}
model.setValue("/root/hidden/item1/clbs/srchrslt", srchrslt);
model.refreshpart("/root/hidden/item1/clbs/srchrslt");
// º¸Á¶À¯ÇüID°ú ¿äÀ²%·Î combo ÀÇ value
var suppkindcd = model.getValue("/root/main/item1/clbs/suppkindcd");
var payownbrate = model.getValue("/root/main/item1/clbs/payownbrate");
var supprate = suppkindcd + "/" + payownbrate; // º¸Á¶À¯ÇüID°ú ¿äÀ²%·Î combo ÀÇ
// value
model.setValue("/root/hidden/item1/clbs/patsupprate", supprate);
cmb_supprate.refresh();
cmb_rarecancermsg.refresh();
cmb_prockindflag.refresh();
}
// "½É»çÀúÀå" »óÅ·Π´ë»óÀÚ È¸é °»½Å
function fSetJudgSaveState(judgendyn) {
var trgtManWindow = getChildWindow("SMPID20200"); // SMPID20200_ÀÔ¿ø»çÈĽɻç´ë»óÀÚÁ¶È¸.xrw
if (trgtManWindow != null) {
var selectedRow = model.getValue("/root/hidden/smpid20200/rslt/selectedRow");
if (selectedRow) {
var trgtmanlist = trgtManWindow.instance1.selectSingleNode("/root/main/list1/clbs");
if (trgtmanlist == null) { // Á¶È¸µÈ ´ë»óÀÚ ¸ñ·ÏÀÌ ¾ø´Â °æ¿ì
// messageBox("Á¶È¸µÈ ½É»ç´ë»óÀÚ ¸ñ·ÏÀÌ", "I004"); ///Á¶È¸µÈ ½É»ç´ë»óÀÚ ¸ñ·ÏÀÌ ¾ø½À´Ï´Ù.
// return;
} else {
var userid = getUserId(); // (common.js) ÇöÀç ·Î±×ÀÎÇÑ »ç¿ëÀÚ ¹øÈ£(ID)
if (userid) {
} else {
userid = "12345678";
}
var clamkey = model.getValue("/root/main/item1/clbs/clamkey");
for ( var i = 1; i < trgtManWindow.grd_clbsmast.rows; i++) {
if (clamkey == trgtManWindow.model.getValue("/root/main/list1/clbs[" + i + "]/clamkey")) {
trgtManWindow.model.setValue("/root/main/list1/clbs[" + i + "]/judgendyn", judgendyn);
trgtManWindow.model.setValue("/root/main/list1/clbs[" + i + "]/lastupdtrid", userid);
}
}
trgtManWindow.javascript.fSetWorkStatCnt(); // ÃѰǼö¿Í ±âŸ ½É»ç»óÅ¿¡ µû¸¥
// cnt¸¦ Ç¥½ÃÇÑ´Ù.
trgtManWindow.grd_clbsmast.refresh();
}
}
}
}
// ---------------------------------
// ÀúÀå ¹öưÀ» ´©¸£¸é
// ---------------------------------
function fSaveInAftJudg(judgendyn) {
// »óº´±×¸®µå¿¡¼ editmodeÀλóÅ¿¡¼ F7 ´ÜÃàŰ ´©·¶À» °æ¿ì ¿¡·¯¹ß»ý¹æÁö À§ÇÔ. Àý´ë Áö¿ìÁö ¸»°Í.
model.setFocus("grd_clodhist");
model.removeNodeset("/root/send/item2");
model.removeNodeset("/root/send/item3"); // ÀúÀå ¿À·ù°¡ ³ °æ¿ì ´Ù½Ã "ÀúÀå" Btn ´©¸£¸é
// »õ·Î ¸Þ¸ð ³»¿ªÀÌ »ý¼ºµÇ¾î¾ß ÇϹǷÎ
model.removeNodeset("/root/send/item4");
model.removeNodeset("/root/send/list1");
model.removeNodeset("/root/send/list2");
model.removeNodeset("/root/send/list3");
model.removeNodeset("/root/send/item5");
var selectedRow = model.getValue("/root/hidden/smpid20200/rslt/selectedRow"); // ´ë»óÀÚ È¸é¿¡¼
// ¼±ÅÃÇß´ø ÁÙ
var clamym = model.getValue("/root/main/item1/clbs/clamym");
var clamdg = model.getValue("/root/main/item1/clbs/clamdg");
var pid = model.getValue("/root/main/item1/clbs/pid");
var pidsn = model.getValue("/root/main/item1/clbs/pidsn");
var workflag = model.getValue("/root/main/item1/clbs/workflag");
var isValidCheck = true;
var cutprcpyn = "";
var trgtManWindow = getChildWindow("SMPID20200"); // SMPID20200_ÀÔ¿ø»çÈĽɻç´ë»óÀÚÁ¶È¸.xrw
if (trgtManWindow != null) {
cutprcpyn = trgtManWindow.model.getValue("/root/send/item1/cutprcpsel"); // 20100302
// Ãß°¡
}
if (clamym) {
var saveNoMsg = "";
var saveOkMsg = "[°è»ê]";
// CLBS ÀúÀåÀü Á¡°Ë
if (fCheckSaveInAftJudgCLBS()) {
// --------------------------
// KDRG 3.2 DRGºÐ·ù¹øÈ£ Á¶È¸
// --------------------------
// pidfGetKDRGCode();
// ÀÎÀû»çÇ×
var initclbs = instance1.selectNodesXml("/root/hidden/item1/initclbs/clbs");
var currentclbs = instance1.selectNodesXml("/root/main/item1/clbs");
var insukind = model.getValue("/root/main/item1/clbs/insukindcd");
if ((initclbs == currentclbs) && (insukind != "31")) {
saveNoMsg = "[ÀÎÀû»çÇ×] ";
// ÀÎÀû»çÇ× º¯°æÀÌ ¾ø´Â °æ¿ì¿¡µµ send data¿¡ ¼³Á¤ÇÑ´Ù.
model.copyNode("/root/send/item1/clbs", "/root/main/item1/clbs");
model.makeValue("/root/send/item1/clbs/clbsupdateyn", "N"); // ÀÎÀû»çÇ×
// ÀúÀå¿©ºÎ
} else {
saveOkMsg = "[ÀÎÀû»çÇ×] ";
model.copyNode("/root/send/item1/clbs", "/root/main/item1/clbs");
model.makeValue("/root/send/item1/clbs/clbsupdateyn", "Y"); // ÀÎÀû»çÇ×
// ÀúÀå¿©ºÎ
// ------------------------------------------------------------------------------
// Àç°è»êÇÒ Ç׸ñÀÌ º¯°æµÈ °æ¿ì üũ(ÀÔ¿ø)
// ------------------------------------------------------------------------------
// 1. °ø»ó±¸ºÐ
var init_offcharm = model.getValue("/root/hidden/item1/initclbs/clbs/offcharm");
var current_offcharm = model.getValue("/root/main/item1/clbs/offcharm");
if (init_offcharm != current_offcharm) {
model.makeValue("/root/send/item1/clbs/recalcyn", "Y"); // ÀúÀå ½Ã¿¡ Àç°è»êÇÒÁö ¿©ºÎ¸¦ ¼³Á¤ÇÔ
}
}
// ½É»ç»óŸ¦ 'ÀúÀå' ¶Ç´Â '½É»ç¿Ï·á' »óÅ·ΠÀúÀåÇÑ´Ù.
model.makeValue("/root/send/item1/clbs/judgendyn", judgendyn); // »çÈĽɻç-½É»ç¿Ï·á¿©ºÎ (P0151) - B:½É»çÁß,C: ½É»ç¿Ï·á
} else {
isValidCheck = false;
}
// ½É»ç¸Þ¸ð
var initmemo = instance1.selectNodesXml("/root/hidden/item1/initmemo/memo");
var currentmemo = instance1.selectNodesXml("/root/main/item1/memo");
if (initmemo != currentmemo) {
// ½É»çÀÚ¸Þ¸ð, EDIû±¸¸Þ¸ð¸¦ ƯÁ¤³»¿ª Çü½Ä¿¡ ¸ÂÃç ¼³Á¤ÇÑ´Ù.
var judgmemo = model.getValue("/root/main/item1/memo/judgmemo").getTrim();
var judgmemorepeat = model.getValue("/root/main/item1/memo/judgmemorepeat");
var edimemo = model.getValue("/root/main/item1/memo/edimemo").getTrim();
var edimemorepeat = model.getValue("/root/main/item1/memo/edimemorepeat");
var noChange = true;
if (judgmemo != model.getValue("/root/hidden/item1/initmemo/memo/judgmemo").getTrim()) {
fSetJudgEDIMemo(judgmemo, "Y");
noChange = false; // ½É»çÀڸ޸𰡠º¯°æµÈ °æ¿ìÀÓ
} else if (judgmemo != "" && judgmemorepeat != model.getValue("/root/hidden/item1/initmemo/memo/judgmemorepeat")) {
fSetJudgEDIMemo(judgmemo, "Y");
noChange = false; // ½É»çÀÚ¸Þ¸ð ¹Ýº¹ ¼³Á¤ÀÌ º¯°æµÈ °æ¿ìÀÓ
}
if (edimemo != model.getValue("/root/hidden/item1/initmemo/memo/edimemo").getTrim()) {
fSetJudgEDIMemo(edimemo, "N");
noChange = false; // EDIû±¸¸Þ¸ð°¡ º¯°æµÈ °æ¿ìÀÓ
} else if (edimemo != "" && edimemorepeat != model.getValue("/root/hidden/item1/initmemo/memo/edimemorepeat")) {
fSetJudgEDIMemo(edimemo, "N");
noChange = false; // EDIû±¸¸Þ¸ð ¹Ýº¹ ¼³Á¤ÀÌ º¯°æµÈ °æ¿ìÀÓ
}
if (noChange == false) {
saveOkMsg += "[½É»ç¸Þ¸ð] ";
} else {
saveNoMsg += "[½É»ç¸Þ¸ð] ";
}
} else {
saveNoMsg += "[½É»ç¸Þ¸ð] ";
}
// CLDI ÀúÀåÀü Á¡°Ë
if (fCheckSaveInAftJudgInfoCLDI()) {
// »óº´
var licnsflag = "";
var licnsno = "";
var diagseq = "";
for ( var j = grd_cldihist.fixedRows; j < grd_cldihist.rows; j++) {
diagseq = grd_cldihist.valueMatrix(j, grd_cldihist.colRef("diagseq"));
licnsflag = grd_cldihist.valueMatrix(j, grd_cldihist.colRef("licnsflag"));
licnsno = grd_cldihist.valueMatrix(j, grd_cldihist.colRef("licnsno"));
if (grd_cldihist.rowstatus(j) == 4 && diagseq.substr(0, 1) == "D") {
model.setValue("/root/main/list1/cldi[" + j + "]/diagseq", diagseq.substr(1, diagseq.length));
}
if ((diagseq == "1" && grd_cldihist.rowstatus(j) == 0) && (licnsflag == "" || licnsflag == "-" || licnsno == "-" || licnsno == "-")) {
grd_cldihist.rowstatus(j) = 2;
}
}
var updtdata = getGridUpdateData(grd_cldihist); // (tfHelper.js) ±×¸®µå
// ¾÷µ¥ÀÌÆ® µ¥ÀÌÅÍ ¹Ýȯ, ¾÷µ¥ÀÌÆ®
// Á¤º¸°¡ ¾øÀ»°æ¿ì "" ¹Ýȯ
if (updtdata) {
model.makeValue("/root/send/list1/cldi", updtdata);
}
if (updtdata != "" && grd_cldihist.rows > 1) { // ŸÀÌÆ² ºÎºÐÀ¸·Î ÀÎÇØ data°¡
// ¾ø¾îµµ rows = 1 ÀÓ.
//
·Î ÀÎÇØ
// ºóÁÙÀÌ Á¦°ÅµÈ °æ¿ì¿¡µµ delete 󸮸¦ ÇϹǷÎ
// Grid »ó¿¡ µ¥ÀÌÅͰ¡ ÀÖ´ÂÁö¸¦ È®ÀÎÇÑ´Ù.
saveOkMsg += "[»óº´] ";
} else {
saveNoMsg += "[»óº´] ";
}
} else {
isValidCheck = false;
}
// CLSP ÀúÀåÀü Á¡°Ë
if (fCheckSaveInAftJudgInfoCLSP()) {
var updtdata = getGridUpdateData(grd_clsphist); // (tfHelper.js) ±×¸®µå
// ¾÷µ¥ÀÌÆ® µ¥ÀÌÅÍ ¹Ýȯ, ¾÷µ¥ÀÌÆ®
// Á¤º¸°¡ ¾øÀ»°æ¿ì "" ¹Ýȯ
if (updtdata) {
model.makeValue("/root/send/list3/clsp", updtdata);
}
if (updtdata != "" && grd_clsphist.rows > 1) {
saveOkMsg += "[ƯÁ¤³»¿ª] ";
} else {
saveNoMsg += "[ƯÁ¤³»¿ª] ";
}
} else {
isValidCheck = false;
}
// CLOD ÀúÀåÀü Á¡°Ë
if (fCheckSaveInAftJudgInfoCLOD()) {
// ó¹æ
var updtdata = getGridUpdateData(grd_clodhist); // (tfHelper.js) ±×¸®µå
// ¾÷µ¥ÀÌÆ® µ¥ÀÌÅÍ ¹Ýȯ, ¾÷µ¥ÀÌÆ®
// Á¤º¸°¡ ¾øÀ»°æ¿ì "" ¹Ýȯ
if (updtdata) {
model.makeValue("/root/send/list2/clod", updtdata);
}
if (updtdata != "" && (grd_clodhist.rows > 1 || grd_delclod.rows > 1)) {
saveOkMsg += "[ó¹æ] ";
model.makeValue("/root/send/item1/clbs/recalcyn", "Y"); // ÀúÀå ½Ã¿¡ Àç°è»êÇÒÁö ¿©ºÎ¸¦ ¼³Á¤ÇÔ
} else {
saveNoMsg += "[ó¹æ] ";
}
} else {
isValidCheck = false;
}
// PIFHIUNC Àçû±¸ Â÷¾×¹ß»ý»çÀ¯ Á¡°Ë....
if (fCheckSaveReClamChangeAmt()) {
var resncd = fSetReClamChgAmtResncd();
if (resncd) {
saveOkMsg += "[Àçû±¸ Â÷¾×¹ß»ý»çÀ¯] ";
} else {
saveNoMsg += "[Àçû±¸ Â÷¾×¹ß»ý»çÀ¯] ";
}
}
// 2011-03-23 ÀúÀå½Ã ¹«Á¶°Ç Àç°è»ê ÇÑ´Ù.
// 2014-11-10 DRG ȯÀÚ´Â Àç°è»ê ´ë»ó¿¡¼ Á¦¿ÜÇÑ´Ù. (LEJ)
var drgyn = model.getValue("/root/main/item1/clbs/drgyn");
if (drgyn == 'Y') {
model.makeValue("/root/send/item1/clbs/recalcyn", "N"); // ÀúÀå ½Ã¿¡ Àç°è»êÇÒÁö ¿©ºÎ¸¦ ¼³Á¤ÇÔ
} else {
model.makeValue("/root/send/item1/clbs/recalcyn", "Y"); // ÀúÀå ½Ã¿¡ Àç°è»êÇÒÁö ¿©ºÎ¸¦ ¼³Á¤ÇÔ
}
if (btn_end.disabled == true
&& model.getValue("/root/main/item1/clbs/judgendyn") == "D") {
messageBox("¹öưÀÌ ºñȰ¼ºÈ À̰ųª ½É»çÀÏ·Î ºÎÅÍ 15ÀÏÀÌ °æ°ú µÈ °æ¿ì ¿Ï·á ÇÒ ¼ö", "I004");
return false;
}
// ÁßÁõ, »êÁ¤Æ¯·Ê ¿©ºÎ üũ
if (fGetDiagSpclcdCheck() == false) {
return false;
} else {
}
if (isValidCheck) {
if (saveOkMsg) {
if (model.getValue("/root/send/list3/clsp")) {
// ƯÁ¤³»¿ª »èÁ¦»óÅ °ª ¼³Á¤Àº submitÀ» º¸³»±â Àü¿¡ ÇÑ´Ù.
for ( var j = grd_clsphist.fixedRows; j < grd_clsphist.rows; j++) {
var spclLnNo = model.getValue("/root/main/list3/clsp[" + j + "]/seqno");
if (spclLnNo.substr(0, 1) == "D") {
model.setValue("/root/main/list3/clsp[" + j + "]/seqno", spclLnNo.substr(1, spclLnNo.length));
}
}
// ±âŸ¸Þ¸ð(JX999)¸¦ ƯÁ¤³»¿ª Çü½Ä¿¡ ¸ÂÃç ¼³Á¤
fSetSpclSpecJX999();
var updtdata = getGridUpdateData(grd_clsphist);
model.makeValue("/root/send/list3/clsp", updtdata);
}
if (submit("TXPID20301")) {
model.resetInstanceNode("/root/hidden/item1/initclbs/clbs");
grd_cldihist.clearStatus(); // submit() ¼º°øÇÏ¸é ±×¸®µåÀÇ i,u,d »óÅÂ
// Á¦°Å
grd_clsphist.clearStatus(); // submit() ¼º°øÇÏ¸é ±×¸®µåÀÇ i,u,d »óÅÂ
// Á¦°Å
grd_clodhist.clearStatus();
grd_delclod.clearStatus();
if (judgendyn == "B") { // »çÈĽɻç-½É»ç¿Ï·á¿©ºÎ (P0151) - B: ½É»çÁß, C:
// ½É»ç¿Ï·á
// ÀúÀå ÈÄ °á°ú¸¦ ´Ù½Ã Á¶È¸Çϱâ À§ÇØ
model.resetInstanceNode("/root/hidden/smpid20200/rslt");
model.setValue("/root/hidden/smpid20200/rslt/clamym", clamym);
model.setValue("/root/hidden/smpid20200/rslt/clamdg", clamdg);
model.setValue("/root/hidden/smpid20200/rslt/pid", pid);
model.setValue("/root/hidden/smpid20200/rslt/pidsn", pidsn);
model.setValue("/root/hidden/smpid20200/rslt/popupcallyn", "Y");
// ´ë»óÀÚÁ¶È¸ ȸ鿡¼ ¼±ÅÃÇß´ø ȯÀÚÀÇ Row¸¦ ±â¾ïÇØ µÎ°í, pre/next´ë»óÁ¶È¸ ¹öư¿¡¼
// ÀÌÀü, ÀÌÈÄ ´ë»óÀÚ¸¦ Á¶È¸ÇÑ´Ù.
model.setValue("/root/hidden/smpid20200/rslt/selectedRow", selectedRow);
// ÀúÀåÈÄ ÀçÁ¶È¸ ¿©ºÎ
model.setValue("/root/hidden/reselect", "Y");
model.setValue("/root/hidden/smpid20200/rslt/cutprcpyn", cutprcpyn); // 20100302 Ãß°¡
// 1) "ÀúÀå" ÀÌÈÄ¿¡ ÇöÀç ´ë»óÀÚ Á¤º¸¸¦ ´Ù½Ã Á¶È¸ÇÑ´Ù.
fGetInAftJudgMngt();
fSetJudgSaveState("B"); // ½É»ç¿Ï·á¿©ºÎ (P0151) - B: ½É»çÁß
}
// C: ½É»ç¿Ï·áÀÇ °æ¿ì, ÀúÀå ÈÄ °á°ú¸¦ ´Ù½Ã Á¶È¸Çϱâ À§ÇØ
return "true";
}
} else if (saveNoMsg) {
// if (judgendyn == "C") { // »çÈĽɻç-½É»ç¿Ï·á¿©ºÎ (P0151) - B: ½É»çÁß, C:
// ½É»ç¿Ï·á
if (judgendyn != "B") { // »çÈĽɻç-½É»ç¿Ï·á¿©ºÎ (P0151) - B: ½É»çÁß, C: ½É»ç¿Ï·á
return "false";
}
}
} else { // isValidCheck == false
// »óº´
for ( var j = grd_cldihist.fixedRows; j < grd_cldihist.rows; j++) {
if (grd_cldihist.rowstatus(j) == 4) {
var diagseq = model.getValue("/root/main/list1/cldi[" + j + "]/diagseq");
model.setValue("/root/main/list1/cldi[" + j + "]/diagseq", "D" + diagseq);
}
}
if (grd_clsphist.rows == 1) {
fSpclGridInsertRow(); // ƯÁ¤³»¿ª ÁÙÃß°¡
}
}
} else {
messageBox("º¯°æµÈ Á¤º¸¸¦ ÀúÀåÇÒ »çÈÄ½É»ç ´ë»óÀÚ°¡", "I004"); // /º¯°æµÈ Á¤º¸¸¦ ÀúÀåÇÒ »çÈĽɻç
// ´ë»óÀÚ°¡ ¾ø½À´Ï´Ù.
}
}
// CLBS Å×ÀÌºí¿¡ ÀúÀåÇÒ Á¤º¸°¡ ¿Ã¹Ù¸¥Áö È®ÀÎÇÑ´Ù.
function fCheckSaveInAftJudgCLBS() {
if (model.getValue("/root/main/item1/clbs/clamym") == "") {
messageBox("û±¸³â¿ùÀÌ", "I004"); // /û±¸ÀÏÀÚ°¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/clamdg") == "") {
messageBox("û±¸Â÷¼ö°¡", "I004"); // /û±¸Â÷¼ö°¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/pid") == "") {
messageBox("µî·Ï¹øÈ£°¡", "I004"); // /µî·Ï¹øÈ£°¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/patnm") == "") {
messageBox("ȯÀÚÀ̸§ÀÌ", "I004"); // /ȯÀÚÀ̸§ÀÌ ¾ø½À´Ï´Ù
return false;
}
var patrrgstno = model.getValue("/root/main/item1/clbs/patrrgstno");
if (patrrgstno.length != 13) {
messageBox("ÁֹιøÈ£°¡", "E016"); // /ÁֹιøÈ£°¡ À¯È¿ÇÏÁö ¾Ê½À´Ï´Ù.
return false;
}
/*
* if (isResidentNo(model.getValue("/root/main/item1/clbs/patrrgstno")) ==
* false) { // (utilHelper.js) À¯È¿ÇÑ ÁֹιøÈ£ÀÎÁö Á¡°ËÇÑ´Ù. messageBox("ÁֹιøÈ£°¡", "E016");
* ///ÁֹιøÈ£°¡ À¯È¿ÇÏÁö ¾Ê½À´Ï´Ù. return false; }
*/
if (model.getValue("/root/main/item1/clbs/patrrgstno") == "") {
messageBox("ÁֹιøÈ£°¡", "I004"); // /ÁֹιøÈ£°¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/insukindcd") == "") {
messageBox("º¸ÇèÀ¯ÇüÀÌ", "I004"); // /º¸ÇèÀ¯ÇüÀÌ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/suppkindcd") == "") {
messageBox("º¸Á¶À¯ÇüÀÌ", "I004"); // º¸Á¶À¯ÇüÀÌ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/payownbrate") == "") {
messageBox("¿Ã¹Ù¸¥ º¸Á¶À¯ÇüÀ»", "C002"); // /¿Ã¹Ù¸¥ º¸Á¶À¯ÇüÀ» ¼±ÅÃÇϽʽÿÀ.
return false;
}
if (model.getValue("/root/main/item1/clbs/ordfildcd") == "") {
messageBox("Áø·áºÐ¾ß°¡", "I004"); // /Áø·áºÐ¾ß°¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/orddeptcd") == "") {
messageBox("Áø·á°ú°¡", "I004"); // /Áø·á°ú°¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/orddrid") == "") {
messageBox("ÁÖÄ¡Àǰ¡", "I004"); // /ÁÖÄ¡Àǰ¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/arvpathcd") == "") {
messageBox("µµÂø°æ·Î°¡", "I004"); // /µµÂø°æ·Î°¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/inpathcd") == "") {
messageBox("ÀÔ¿ø°æ·Î°¡", "I004"); // /ÀÔ¿ø°æ·Î°¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/ordrsltcd") == "") {
messageBox("Áø·á°á°ú°¡", "I004"); // /Áø·á°á°ú°¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/insdnm") == "") {
// messageBox("°¡ÀÔÀÚ°¡", "I004"); ///°¡ÀÔÀÚ°¡ ¾ø½À´Ï´Ù
// return false;
}
if (model.getValue("/root/main/item1/clbs/insuno") == "") {
messageBox("Á¶ÇÕ±âÈ£°¡", "I004"); // /Á¶ÇÕ±âÈ£°¡ ¾ø½À´Ï´Ù
return false;
}
if (model.getValue("/root/main/item1/clbs/insunm") == "") {
// messageBox("Á¶ÇÕ¸íĪÀÌ", "I004"); ///Á¶ÇÕ¸íĪÀÌ ¾ø½À´Ï´Ù
// return false;
}
if (!model.getValue("/root/main/item1/clbs/insukindcd") == "31") {
if (model.getValue("/root/main/item1/clbs/certno") == "") {
// messageBox("Áõ¹øÈ£°¡", "I004"); ///Áõ¹øÈ£°¡ ¾ø½À´Ï´Ù
// return false;
}
}
return true;
}
// CLDI Å×ÀÌºí¿¡ ÀúÀåÇÒ Á¤º¸°¡ ¿Ã¹Ù¸¥Áö È®ÀÎÇÑ´Ù.
function fCheckSaveInAftJudgInfoCLDI() {
// ¸ÕÀú ºó ÁÙÀ» »èÁ¦ÇÑ´Ù.
var delcldiCheck = false;
for ( var i = 1; i < grd_cldihist.rows; i++) {
var rowstatus = grd_cldihist.rowstatus(i);
var diagcd = model.getValue("/root/main/list1/cldi[" + i + "]/diagcd");
// var ordfromdd = model.getValue("/root/main/list1/cldi["+ i
// +"]/ordfromdd");
// »óº´ÄÚµå¿Í Áø·á°³½ÃÀÏÀÌ ÀԷµÇÁö ¾ÊÀº °æ¿ì
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
// if (diagcd == "" && ordfromdd == "") {
if (diagcd == "") {
// ÁÙÀ» »èÁ¦ÇÑ´Ù.
grd_cldihist.deleteRow(i, false);
i--;
delcldiCheck = true;
}
}
}
// 2008-07-30 ±è»óÁø
// ÀÌ¹Ì »óº´À» ¼öÁ¤ÇÒ¶§ SORT¸¦ ´Ù Ç߱⶧¹®¿¡ ´Ù½Ã ÇØÁÙ Çʿ䰡 ¾ø´Ù.
// ºóÁÙÀ» »èÁ¦ÇÑ °æ¿ì »óº´¼ø¼¸¦ ´Ù½Ã ºÎ¿©ÇÑ´Ù.
/*
* if (delcldiCheck) { var seq = 1; for (var i = 1; i < grd_cldihist.rows;
* i++) { var rowstatus = grd_cldihist.rowstatus(i); if (rowstatus != 4) {
* model.setValue("/root/main/list1/cldi["+ i +"]/diagseq", seq++); } } }
*/
// ÀúÀåÇÒ Á¤º¸¸¦ üũÇÑ´Ù.
var cldiList = instance1.selectSingleNode("/root/main/list1"); // root/main/list1
if (cldiList == null) {
return false;
}
var cldiNode = cldiList.childNodes; // root/main/list1/cldi
if (cldiNode.length == 0) {
messageBox("»óº´ÀÌ ÀԷµÇÁö", "E007"); // /»óº´ÀÌ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.
return false;
} else {
for ( var i = 1; i <= cldiNode.length; i++) {
var diagcd = model.getValue("/root/main/list1/cldi[" + i + "]/diagcd");
var toot = model.getValue("/root/main/list1/cldi[" + i + "]/toot");
if (diagcd == "") {
// messageBox("»óº´ÄÚµå ¶Ç´Â Áø·á°³½ÃÀÏÀÌ ÀԷµÇÁö", "E007"); ///»óº´Äڵ尡 ÀԷµÇÁö
// ¾Ê¾Ò½À´Ï´Ù.
// return false;
model.removeNode("/root/main/list1/cldi[" + i + "]");
grd_cldihist.refresh();
} else {
var diagseq = model.getValue("/root/main/list1/cldi[" + i + "]/diagseq");
for ( var j = 1; j < i; j++) {
var prediagseq = model.getValue("/root/main/list1/cldi[" + j + "]/diagseq");
var prediagcd = model.getValue("/root/main/list1/cldi[" + j + "]/diagcd");
var pretoot = model.getValue("/root/main/list1/cldi[" + j + "]/toot");
if (grd_cldihist.rowstatus(i) != 4) {
// Áߺ¹µÈ »óº´ NO°¡ ÀÖ´Â °æ¿ì
if (diagseq == prediagseq) {
messageBox("»óº´¼ø¼ '" + diagseq + "'°¡", "E006"); // /»óº´¼ø¼ '***'°¡ Áߺ¹µÇ¾ú½À´Ï´Ù.
return false;
}
// Áߺ¹µÈ »óº´Äڵ尡 ÀÖ´Â °æ¿ì
if (diagcd == prediagcd && toot == pretoot) {
messageBox("»óº´ÄÚµå '" + diagcd + "'°¡", "E006"); // /»óº´ÄÚµå '***'°¡ Áߺ¹µÇ¾ú½À´Ï´Ù.
return false;
}
}
}
if (model.getValue("/root/main/list1/cldi[" + i + "]/toot") == "") { // Ä¡½ÄÀÌ ÀԷµÇÁö ¾ÊÀº °æ¿ì
model.setValue("/root/main/list1/cldi[" + i + "]/toot", "-");
}
}
}
}
return true;
}
// CLSP Å×ÀÌºí¿¡ ÀúÀåÇÒ Á¤º¸°¡ ¿Ã¹Ù¸¥Áö È®ÀÎÇÑ´Ù.
function fCheckSaveInAftJudgInfoCLSP() {
// ¸ÕÀú ºó ÁÙÀ» »èÁ¦ÇÑ´Ù.
for ( var i = 1; i < grd_clsphist.rows; i++) {
var rowstatus = grd_clsphist.rowstatus(i);
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
var spclspec = model.getValue("/root/main/list3/clsp[" + i + "]/spclspec");
// ƯÁ¤ÄÚµå°ú ƯÁ¤³»¿ªÀÌ ÀԷµÇÁö ¾ÊÀº °æ¿ì
if (rowstatus != 4 && spclcd == "" && spclspec == "") {
// ÁÙÀ» »èÁ¦ÇÑ´Ù.
grd_clsphist.deleteRow(i, false);
i--;
}
}
// ÀúÀåÇÒ Á¤º¸¸¦ üũÇÑ´Ù.
var clspList = instance1.selectSingleNode("/root/main/list3"); // root/main/list3
if (clspList == null) {
return false;
}
var clspNode = clspList.childNodes; // root/main/list3/clsp
for ( var i = 1; i <= clspNode.length; i++) {
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
var spclspec = model.getValue("/root/main/list3/clsp[" + i + "]/spclspec");
if (spclcd == "" || spclspec == "") {
// 2009-01-29
// messageBox("ƯÁ¤ÄÚµå ¶Ç´Â Æ¯Á¤³»¿ªÀÌ ÀԷµÇÁö", "E007"); ///ƯÁ¤ÄÚµå ¶Ç´Â Æ¯Á¤³»¿ªÀÌ ÀԷµÇÁö
// ¾Ê¾Ò½À´Ï´Ù.
model.removeNode("/root/main/list3/clsp[" + i + "]");
grd_clsphist.refresh();
// return false;
} else if (spclcd == "MX999" || spclcd == "MT015" || spclcd == "MT016" || spclcd == "MT004") {
for ( var j = 1; j < i; j++) {
var prespclcd = model.getValue("/root/main/list3/clsp[" + j
+ "]/spclcd");
// Áߺ¹µÈ ¸í¼¼¼ ´ÜÀ§ ƯÁ¤Äڵ尡 ÀÖ´Â °æ¿ì
if (grd_clsphist.rowstatus(i) != 4 && spclcd == prespclcd) {
messageBox("¸í¼¼¼ ´ÜÀ§ ƯÁ¤ÄÚµå '" + spclcd + "'°¡", "E006"); // /¸í¼¼¼ ´ÜÀ§ ƯÁ¤ÄÚµå '***'°¡ Áߺ¹µÇ¾ú½À´Ï´Ù.
return false;
}
}
}
}
return true;
}
// CLOD Å×ÀÌºí¿¡ ÀúÀåÇÒ Á¤º¸°¡ ¿Ã¹Ù¸¥Áö È®ÀÎÇÑ´Ù.
function fCheckSaveInAftJudgInfoCLOD() {
// ¸ÕÀú ºó ÁÙÀ» »èÁ¦ÇÑ´Ù.
for ( var i = 1; i < grd_clodhist.rows; i++) {
var rowstatus = grd_clodhist.rowstatus(i);
var seqno = model.getValue("/root/main/list2/clod[" + i + "]/seqno");
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + i + "]/snglcalcscorcd");
var basecd = model.getValue("/root/main/list2/clod[" + i + "]/basecd");
var drugqty = model.getValue("/root/main/list2/clod[" + i + "]/drugqty");
var edidrugqty = model.getValue("/root/main/list2/clod[" + i + "]/edidrugqty");
var tims = model.getValue("/root/main/list2/clod[" + i + "]/tims");
var dayno = model.getValue("/root/main/list2/clod[" + i + "]/dayno");
var edidayno = model.getValue("/root/main/list2/clod[" + i + "]/edidayno");
var ordfromdd = model.getValue("/root/main/list2/clod[" + i + "]/ordfromdd");
var ordtodd = model.getValue("/root/main/list2/clod[" + i + "]/ordtodd");
// ó¹æÀϷùøÈ£°¡ ºÎ¿©µÇÁö ¾Ê°í,
// ¼ö°¡ÄÚµå, EDIÄÚµå, Åõ¿©·®, Ƚ¼ö, Àϼö, Áø·áÁ¾·áÀÏÀÚ°¡ ÀԷµÇÁö ¾ÊÀº °æ¿ì
if (rowstatus != 4 && seqno == "" && snglcalcscorcd == "" && basecd == "" && drugqty == "" && tims == "" && dayno == "" && edidrugqty == "" && edidayno == "" && ordtodd == "") {
// ÁÙÀ» »èÁ¦ÇÑ´Ù.
grd_clodhist.deleteRow(i, false);
i--;
}
}
// ÀúÀåÇÒ Á¤º¸¸¦ üũÇÑ´Ù.
// ó¹æ Grid
var clodList = instance1.selectSingleNode("/root/main/list2"); // root/main/list2
if (clodList == null) {
return false;
}
var clodNode = clodList.childNodes; // root/main/list2/clod
for ( var i = 1; i <= clodNode.length; i++) {
var seqno = model.getValue("/root/main/list2/clod[" + i + "]/seqno");
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + i + "]/snglcalcscorcd");
var basecd = model.getValue("/root/main/list2/clod[" + i + "]/basecd");
var drugqty = model.getValue("/root/main/list2/clod[" + i + "]/drugqty");
var edidrugqty = model.getValue("/root/main/list2/clod[" + i + "]/edidrugqty");
var tims = model.getValue("/root/main/list2/clod[" + i + "]/tims");
var dayno = model.getValue("/root/main/list2/clod[" + i + "]/dayno");
var edidayno = model.getValue("/root/main/list2/clod[" + i + "]/edidayno");
var ordfromdd = model.getValue("/root/main/list2/clod[" + i + "]/ordfromdd");
var ordtodd = model.getValue("/root/main/list2/clod[" + i + "]/ordtodd");
if (snglcalcscorcd != "" && basecd != "") {
if (ordfromdd == "" || ordtodd == "") {
messageBox("¼ö°¡ÄÚµå '" + snglcalcscorcd + "'ÀÇ Ã³¹æÀÏÀÚ Á¤º¸°¡", "I004"); // /¼ö°¡ÄÚµå '***'ÀÇ Ã³¹æÀÏÀÚ Á¤º¸°¡ ¾ø½À´Ï´Ù.
return false;
} else if (drugqty == "" || tims == "" || dayno == ""
|| edidrugqty == "" || edidayno == "") {
messageBox("¼ö°¡ÄÚµå '" + snglcalcscorcd + "'ÀÇ Åõ¿©·® Á¤º¸°¡", "I004"); // /¼ö°¡ÄÚµå '***'ÀÇ Åõ¿©·® Á¤º¸°¡ ¾ø½À´Ï´Ù.
return false;
}
}
}
return true;
}
// PIFHIUNC Àçû±¸ ÀúÀå½Ã Â÷¾×ÀÌ ¹ß»ýÇß´ÂÁö üũ
function fCheckSaveReClamChangeAmt() {
// if (model.getValue("/root/send/item1/clbs/recalcyn") == "Y") {
if (model.getValue("/root/main/item1/clbs/clamflagcd") == "1" && model.getValue("/root/send/item1/clbs/recalcyn") == "Y") {
return true;
} else {
return false;
}
}
// 1) "ÀúÀå" ÀÌÈÄ¿¡ ÇöÀç ´ë»óÀÚ Á¤º¸¸¦ ´Ù½Ã Á¶È¸ÇÑ´Ù.
// 2) ´ë»óÀÚÁ¶È¸ ȸ鿡¼ ¼±ÅÃÇÑ È¯ÀÚÀÇ pid¸¦ ±âÁØÀ¸·Î ÀÌÀü, ÀÌÈÄ ´ë»óÀÚ¸¦ Á¶È¸ÇÑ´Ù.
function fGetInAftJudgMngt() {
var popupcallyn = model.getValue("/root/hidden/smpid20200/rslt/popupcallyn");
var clamym = model.getValue("/root/hidden/smpid20200/rslt/clamym");
var clamdg = model.getValue("/root/hidden/smpid20200/rslt/clamdg");
var pid = model.getValue("/root/hidden/smpid20200/rslt/pid");
var pidsn = model.getValue("/root/hidden/smpid20200/rslt/pidsn");
var workflag = model.getValue("/root/hidden/smpid20200/rslt/workflag");
var selectedRow = model.getValue("/root/hidden/smpid20200/rslt/selectedRow");
var cutprcpyn = model.getValue("/root/hidden/smpid20200/rslt/cutprcpyn");
var judgenddd = model.getValue("/root/hidden/smpid20200/rslt/judgenddd");
var cretno = model.getValue("/root/hidden/smpid20200/rslt/cretno");
if (clamym && clamdg && pid && pidsn) {
var rslt = fInitSrchData(); // ȸéÀ» ÃʱâÈÇÑ´Ù.
if (rslt == false) { // ¼öÁ¤»çÇ× ÀúÀåÀÌ ¿Ï·áµÇÁö ¾Ê¾Æ ÃʱâÈÇÒ ¼ö ¾ø´Â °æ¿ì
return false;
}
model.makeValue("/root/send/item1/clbs/clamym", clamym);
model.makeValue("/root/send/item1/clbs/clamdg", clamdg);
model.makeValue("/root/send/item1/clbs/pid", pid);
model.makeValue("/root/send/item1/clbs/pidsn", pidsn);
model.makeValue("/root/send/item1/clbs/workflag", workflag);
model.makeValue("/root/send/item1/clbs/popupcallyn", popupcallyn);
model.makeValue("/root/send/item1/clbs/ioflag", "I");
model.makeValue("/root/send/item1/clbs/cretno", cretno);
// ´ë»óÀÚÁ¶È¸ ȸ鿡¼ ¼±ÅÃÇß´ø ȯÀÚÀÇ Row¸¦ ±â¾ïÇØ µÎ°í, pre/next´ë»óÁ¶È¸ ¹öư¿¡¼ ÀÌÀü, ÀÌÈÄ ´ë»óÀÚ¸¦ Á¶È¸ÇÑ´Ù.
model.setValue("/root/hidden/smpid20200/rslt/selectedRow", selectedRow);
// 20100302 »è°¨Á¶È¸ ¿©ºÎ
if (cutprcpyn != "") {
model.makeValue("/root/send/item1/clbs/cutviewyn", "Y");
} else {
model.makeValue("/root/send/item1/clbs/cutviewyn", "N");
}
// var s;
// var d = new Date();
// s += " ¼¹ö½ÃÀÛ : " + d.getMinutes() + "ºÐ " + d.getSeconds() + "ÃÊ " +
// d.getMilliseconds();
submit("TRPID20301");
fDiagGridInsertRow("Y", "N"); // »óº´¸¶Áö¸· ±×¸®µå¿¡ ÇÑÁÙÃß°¡(); 20090918 Á¤½Â¿ì
// var d = new Date();
// s += " ¼¹öÁ¾·á : " + d.getMinutes() + "ºÐ " + d.getSeconds() + "ÃÊ " +
// d.getMilliseconds();
// pid°¡ º¯°æµÇ¾ú´Âµ¥ Á¶È¸Ã¢À» ¿©´Â °æ¿ì ±âÁ¸ Á¶È¸µÈ data Ãʱâȸ¦ À§ÇØ ÀúÀåÇØµÐ´Ù.
model.setValue("/root/hidden/smpid20200/rslt/oldPid", model.getValue("/root/main/item1/clbs/pid"));
model.setValue("/root/hidden/smpid20200/rslt/judgenddd", judgenddd);
// submit("TRPID20301") »çÈÄ ½É»ç ´ë»óÀÚ¸¦ Á¶È¸ÇÑ ÀÌÈÄÀÇ Ã³¸®¸¦ ÇÑ´Ù.
fSetAftJudgTrgtManSrchData();
cmb_orddrid.refresh();
// alert(s);
// rdo_unitflag.dispatch("xforms-select"); //20090915 Á¤½Â¿ì JT001 Á¦¿Ü ±â´É Ãß°¡
fGetSelectedUnitFlag();
// fDiagGridInsertRowMulti(); //20090917 Á¤½Â¿ì ´ë»óÀÚ ¼±Åýà ÀÚµ¿À¸·Î »óº´ 5ÁÙ °¡Á®¿À±â Ãß°¡
// model.refresh(); // cmb_orddrid.choices.itemset.attribute("nodeset")
// º¯°æ »çÇ×À» Àû¿ëÇϱâ À§ÇØ
// 20100302 »è°¨ÆË¾÷ Ãß°¡
var cutpopwindow = getChildWindow("SMPIS00600");
if (cutpopwindow != null) {
cutpopwindow.close();
}
if (model.getValue("/root/main/item1/clbs/cutprcpyn") == "Y") {
if (cutprcpyn == "2") {
setParameter("openflag", 'O');
setParameter("pid", pid);
open("SMPIS00600", "", "50", "50", "SMPIS00600", "", "");
}
}
}
}
// 1) ½É»ç´ë»óÀÚ Á¶È¸ PopupÀ» È£ÃâÇϱâ Àü
// 2) ÀÌÀü, ÀÌÈÄ ´ë»óÀÚ¸¦ Á¶È¸Çϱâ Àü
/*
* 1.ÀúÀå¹öư Ŭ¸¯ fGetInAftJudgMngt -> fInitSrchData 2.ÀÌÀü,´ÙÀ½¸í¼¼¼ ¹öưŬ¸¯
* fGetInAftJudgMngt -> fSaveInAftJudg -> fInitSrchData 3.¿Ï·á,¹Ì½É,º¸·ù,»èÁ¦ ¹öưŬ¸¯
* fGetInAftJudgMngt -> fSaveInAftJudg -> fInitSrchData 4.ÀÌÀü¸í¼¼¼ ´õºíŬ¸¯½Ã È¸é ¶°ÀÖ´Â °æ¿ì
* fActivatePreDocuWindow -> fInitSrchData 5.½É»çÀü¸í¼¼¼ Ŭ¸¯ fActivatePreDocuWindow ->
* fInitSrchData 6.µî·Ï¹øÈ£ ¿£ÅÍ fInitSrchData 7.µî·Ï¹øÈ£ value-changed fInitSrchData
* 8.ȯÀÚÁ¶È¸ ¹öưŬ¸¯ fInitSrchData 9.Á¾·á½Ã fInitSrchData
*
* ½É»çÁßÇØÁ¦ÇؾßÇÏ´Â °æ¿ì!! ¼öÁ¤ÀüÃ¼Å©ÇØ¾ßÇÏ´Â °æ¿ì!! /root/hidden/changecheckyn
*
* 6.µî·Ï¹øÈ£ ¿£ÅÍ 7.µî·Ï¹øÈ£ value-changed 8.ȯÀÚÁ¶È¸¹öư Ŭ¸¯ 9.Á¾·á½Ã 2.ÀÌÀü,´ÙÀ½¸í¼¼¼¹öư Ŭ¸¯
*/
function fInitSrchData() {
// ±âÁ¸ Á¶È¸ ³»¿ª Áß ¼öÁ¤ »çÇ×ÀÌ ÀÖ´Â °æ¿ì ÀúÀåÇÒ °ÍÀÎÁö¸¦ ¹°¾îº»´Ù.
var clamym = model.getValue("/root/main/item1/clbs/clamym");
var clamdg = model.getValue("/root/main/item1/clbs/clamdg");
var pid = model.getValue("/root/main/item1/clbs/pid");
var pidsn = model.getValue("/root/main/item1/clbs/pidsn");
if (clamym) {
var judgendyn = model.getValue("/root/main/item1/clbs/judgendyn");
if (judgendyn == "B") {
var clamendyn = model.getValue("/root/main/item1/clbs/clamendyn");
var lockyn = model.getValue("/root/main/item1/clbs/lockyn");
if (lockyn == "N") { // û±¸¿Ï·á¿©ºÎ A:»ù»ý¼ºÀü
if (btn_save.disabled == false || btn_unjudg.disabled == false) {
var rslt = fCheckChangeSave();
if (rslt == false) { // ÀúÀåÀÌ ¿Ï·áµÇÁö ¾Ê¾Æ ÃʱâÈÇÒ ¼ö ¾ø´Â °æ¿ì
return false;
} else {
// µ¿ÀÏȯÀÚ ÀúÀå ÈÄ ÀçÁ¶È¸°¡ ¾Æ´Ñ°æ¿ì¿¡¸¸ '½É»çÁß' »óÅÂ ÇØÁ¦¸¦ ÇÑ´Ù.
if (model.getValue("/root/hidden/reselect") == "N") {
// "½É»çÁß" »óŸ¦ ÇØÁ¦ÇÑ´Ù. ¿ø·¡ ½É»ç»óÅ·Πº¯°æÇÑ´Ù.
var judgendyn = "";
if (model.getValue("/root/hidden/orgjudgendyn") == "") {
judgendyn = "A";
} else {
judgendyn = model.getValue("/root/hidden/orgjudgendyn");
}
model.removeNodeset("/root/send/item4");
model.makeValue("/root/send/item4/endclbs/clamym", clamym);
model.makeValue("/root/send/item4/endclbs/clamdg", clamdg);
model.makeValue("/root/send/item4/endclbs/pid", pid);
model.makeValue("/root/send/item4/endclbs/pidsn", pidsn);
model.makeValue("/root/send/item4/endclbs/judgendyn", judgendyn);
submit("TXPID20302");
// ´ë»óÀÚÁ¶È¸ ½É»ç»óÅ º¯°æ
fSetJudgSaveState(judgendyn);
}
}
}
}
}
}
// »óº´, ƯÁ¤³»¿ª, ó¹æ GroupÀÇ ÄÁÆ®·Ñ Å©±â¸¦ ÃʱâÈÇÑ´Ù.
fInitUIControlSize();
// ´ë»óÀÚ È¸é°ú ÀÌÀü¸í¼¼¼ ȸéÀ» Á¦¿ÜÇÑ ÀÚ½ÄâÀ» ´Ý´Â´Ù.
var judgWindow1 = getChildWindow("SMPID20200"); // SMPID20200_ÀÔ¿ø»çÈĽɻç´ë»óÀÚÁ¶È¸.xrw
var judgWindow2 = getChildWindow("SMPID20300"); // SMPID20300_ÀÔ¿ø»çÈĽɻç°ü¸®.xrw
var judgWindow3 = getChildWindow("SMPID20500"); // SMPID20500_¿Ü·¡»çÈĽɻç°ü¸®.xrw
if (judgWindow1 == null && judgWindow2 == null && judgWindow3 == null) {
var childCnt = window.children.length;
for ( var i = childCnt; i > 0; i--) {
var child = window.children.item(i - 1);
if (window.children.item(i - 1).window.type != "modal") {
window.children.item(i - 1).close();
}
}
} else {
var childCnt = window.children.length;
for ( var i = childCnt; i > 0; i--) {
var isClose = "true";
var child = window.children.item(i - 1);
var curWinID = child.model.getValue("/root/properties/uid/myself");
if (judgWindow1 != null) {
var judgWinID = judgWindow1.model.getValue("/root/properties/uid/myself");
if (curWinID == judgWinID) {
isClose = "false";
}
}
if (judgWindow2 != null) {
var judgWinID = judgWindow2.model.getValue("/root/properties/uid/myself");
if (curWinID == judgWinID) {
isClose = "false";
}
}
if (judgWindow3 != null) {
var judgWinID = judgWindow3.model.getValue("/root/properties/uid/myself");
if (curWinID == judgWinID) {
isClose = "false";
}
}
if (isClose != "false") {
if (window.children.item(i - 1).window.type != "modal") {
window.children.item(i - 1).close();
}
}
}
}
delPatientInfos(); // (common.js) »ó´ÜÀÇ È¯ÀÚÁ¤º¸ »èÁ¦
model.resetInstanceNode("/root/main/item1/clbs");
model.resetInstanceNode("/root/main/item1/memo");
model.resetInstanceNode("/root/main/item2/incd");
model.removeNodeset("/root/main/item3/supp");
model.removeNodeset("/root/main/list1/cldi");
model.removeNodeset("/root/main/list2/clod");
model.removeNodeset("/root/main/list3/clsp");
model.resetInstanceNode("/root/main/item5/mech");
model.removeNodeset("/root/main/list4/clbs");
model.removeNodeset("/root/main/list5/clod");
model.removeNodeset("/root/main/list6/delclod");
model.removeNodeset("/root/hidden/rarecancermsg"); // ÁßÁõ ¹× Èñ±Í¹øÈ£ ÃʱâÈ
// 20091123 ¹Úâ¿ø
cmb_rarecancermsg.visible = false;
fSetJudgStatBtnAuth(); // ½É»ç¿Ï·á¿©ºÎ »óÅ¿¡ µû¶ó "ÀúÀå / Àç°è»ê / ¿Ï·á / ¹Ì½É / º¸·ù / »èÁ¦" Btn
// ±ÇÇÑÀ» ¼³Á¤ÇÑ´Ù.
/*
* // ºÐ¸¸°£È£±â·Ï Btn btn_babymom.attribute("class") = "btn2_letter6"; // Ç¥ÁØ¿¡¼ Á¤ÇÑ
* ±âº» ¹öưÀ¸·Î ¼³Á¤ btn_babymom.attribute("left") = "193px"; btn_babymom.visible =
* true; // ¼ö¼ú(À¯) Btn btn_opyn.attribute("class") = "btn2_letter4"; // Ç¥ÁØ¿¡¼
* Á¤ÇÑ ±âº» ¹öưÀ¸·Î ¼³Á¤ btn_opyn.visible = true;
*/
model.resetInstanceNode("/root/send");
model.resetInstanceNode("/root/hidden/item1/clbs"); // hiddenÀ» ¸ðµÎ ÃʱâÈÇϸé
// childrenÀÇ wid »èÁ¦µÊ
model.resetInstanceNode("/root/hidden/item1/initclbs/clbs");
model.resetInstanceNode("/root/hidden/item1/initmemo/memo");
model.resetInstanceNode("/root/hidden/list1");
// /// model.resetInstanceNode("/root/hidden/list2/clodsrch");
model.resetInstanceNode("/root/hidden/list2/cloditem1");
model.resetInstanceNode("/root/hidden/list3");
model.resetInstanceNode("/root/hidden/item5/clod");
model.resetInstanceNode("/root/hidden/smpic00200/judgsrch"); // SMPIC00200_¼ö°¡Á¶È¸
model.resetInstanceNode("/root/hidden/smpic00200/rslt");
model.resetInstanceNode("/root/hidden/smpid20200/cond"); // SMPID20200_ÀÔ¿ø»çÈĽɻç´ë»óÀÚÁ¶È¸
model.resetInstanceNode("/root/hidden/smpid20200/rslt");
model.resetInstanceNode("/root/hidden/smpid20300/cond"); // SMPID20300_ÀÔ¿ø»çÈĽɻç°ü¸®
model.resetInstanceNode("/root/hidden/smpid20500/cond"); // SMPID20500_¿Ü·¡»çÈĽɻç°ü¸®
model.resetInstanceNode("/root/hidden/sppid21300/cond"); // SPPID21300_½É»çÀüÈÄÂ÷¾×Á¶È¸
model.resetInstanceNode("/root/hidden/sppid21600/cond"); // SPPID21600_¼¼ºÎ°è»ê³»¿ªÁ¶È¸
model.resetInstanceNode("/root/hidden/sppid21700/cond"); // SPPID21700_¿ø¿Üó¹æÁ¶È¸
model.resetInstanceNode("/root/hidden/smpiz00100/cond"); // SMPIZ00100_¿Ü·¡ÀÔ¿ø»óº´ÀÌ·ÂÁ¶È¸
model.resetInstanceNode("/root/hidden/smpiz00100/rslt");
model.resetInstanceNode("/root/hidden/sppiz00200/cond/clsp"); // SPPIZ00200_÷ºÎ¹°ÀÚ·á°ü¸®
model.resetInstanceNode("/root/hidden/sppiz00200/rslt/clsp");
model.resetInstanceNode("/root/hidden/sppiz00300/rslt"); // SPPIZ00300_¸Þ¸ðÀÌ·ÂÁ¶È¸
model.resetInstanceNode("/root/hidden/sppiz00400/cond"); // SPPIZ00400_»óº´ÄÚµåÁ¶È¸
model.resetInstanceNode("/root/hidden/sppiz00400/rslt");
model.resetInstanceNode("/root/hidden/sppiz00500/cond"); // SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®
model.resetInstanceNode("/root/hidden/sppiz00500/rslt");
model.resetInstanceNode("/root/hidden/sppiz00600/cond"); // SPPIZ00600_»óº´¹×ó¹æº°Ä¡½Ä
model.resetInstanceNode("/root/hidden/sppiz00600/rslt");
model.resetInstanceNode("/root/hidden/sppiz00700/cond"); // SPPIZ00700_½É»çCommentÁ¶È¸
model.resetInstanceNode("/root/hidden/sppiz00700/rslt");
model.resetInstanceNode("/root/hidden/sppiz00800/cond"); // SPPIZ00800_»êÁ¤ÄÚµåÁ¶È¸
model.resetInstanceNode("/root/hidden/sppiz00800/rslt");
model.resetInstanceNode("/root/hidden/sppiz01000/cond"); // SPPIZ01000_½É»ç¼öÁ¤»çÀ¯°ü¸®
model.resetInstanceNode("/root/hidden/sppiz01000/rslt");
model.resetInstanceNode("/root/hidden/sppiz01100/cond"); // SPPIZ01100_È®ÀÎÄÚµåÁ¶È¸
model.resetInstanceNode("/root/hidden/sppiz01100/rslt");
model.resetInstanceNode("/root/hidden/sppiz01300/cond"); // SPPIZ01300_¼ö¼úÁ¤º¸Á¶È¸
model.resetInstanceNode("/root/hidden/sppiz01400/cond"); // SPPIZ01400_ƯÁ¤³»¿ªÄÚµå»ó¼¼Á¶È¸
model.resetInstanceNode("/root/hidden/sppiz01400/rslt");
model.resetInstanceNode("/root/hidden/smpmc01300/cond"); // SMPMC01300_ƯÀÌȯÀÚ°ü¸®
model.resetInstanceNode("/root/hidden/smpmc01300/rslt");
// model.resetInstanceNode("/root/hidden/sppmb01500/cond"); //
// SPPMB01500_º¸ÇèÀÚ±âÈ£Á¶È¸
model.resetInstanceNode("/root/hidden/sppmc02500/cond"); // SPPMC02500_ȯÀÚÁ¶È¸
model.resetInstanceNode("/root/hidden/smmnn00700/cond"); // SPPIZ01200_ºÐ¸¸½Å»ý¾ÆÁ¤º¸°ü¸®
model.resetInstanceNode("/root/hidden/sppid22800/cond"); // SPPID22800_Àçû±¸Â÷¾×¹ß»ý»çÀ¯°ü¸®
model.resetInstanceNode("/root/hidden/sppid22800/rslt");
model.resetInstanceNode("/root/hidden/sppid23100/cond"); // SPPID23100_±Þºñº¯°æ°ü¸®
model.resetInstanceNode("/root/hidden/sppid23100/rslt");
// ƯÁ¤³»¿ªGrid¿ë ÇÊÅ͸µ Radio ÃʱⰪ
model.setValue("/root/hidden/list3/selectedUnitFlag", "-");
// ó¹æ Á¶È¸ºÎ Ç׸ñ±¸ºÐ Radio itemÀÇ ±½Àº Ç¥½Ã¸¦ Ãë¼ÒÇÑ´Ù.
var itemRadioList = instance1
.selectSingleNode("/root/hidden/list2/cloditem1");
var itemNode = itemRadioList.childNodes;
for ( var i = 0; i < itemNode.length; i++) {
rdo_item1.item(i).attribute("font-weight") = "normal";
}
// ó¹æGrid ¹è°æ»öÀ» ÃʱâÈÇÑ´Ù.
grd_clodhist.rebuildStyle();
grd_cldihist.rebuildStyle();
// ó¹æ Grid ÇÊÅÍ¿ë Á¶È¸Á¶°ÇÀ» ÃʱâÈÇÑ´Ù.
fInitOrderFilter();
cmb_orddeptcd.choices.itemset.attribute("nodeset") = "/root/init/orddeptcd2/orddeptcdlist";
cmb_orddrid.choices.itemset.attribute("nodeset") = "/root/init/orddrid2/orddridlist";
// 20091230 ¿ÏÈÀÇ·á Ç¥½Ã »èÁ¦
pm_flag.visible = false;
return true;
}
// »èÁ¦ or »èÁ¦Ãë¼Ò ÈÄ or ó¹æGrid¿¡¼ ±×·ì/¼ö°¡/EDIÄڵ带 ÀÔ·ÂÇÑ ÀÌÈÄ¿¡ ÁÙ¹øÈ£¸¦ ´Ù½Ã ºÎ¿©ÇÑ´Ù.
function fSetOrderLnNo() {
var row = grd_clodhist.row;
var seqno = model.getValue("/root/main/list2/clod[" + row + "]/seqno");
var ediitem1 = model.getValue("/root/main/list2/clod[" + row + "]/ediitem1");
var ediitem2 = model.getValue("/root/main/list2/clod[" + row + "]/ediitem2");
var grupcalcscorcd = model.getValue("/root/main/list2/clod[" + row + "]/grupcalcscorcd");
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd");
var estmmncd = model.getValue("/root/main/list2/clod[" + row + "]/estmmncd");
// sort Àü row À§Ä¡¸¦ ±â¾ïÇÑ´Ù.
var rowNum = grd_clodhist.topRow - grd_clodhist.row;
// ¼ö°¡Äڵ尡 ¾ø´Â row¸¦ »èÁ¦Çϰí, Á¤·ÄÇϰí, ÁÙ¹øÈ£¸¦ ´Ù½Ã ºÎ¿©ÇÑ´Ù.
// 2008-09-01
// fDelEmptyGridOrderData();
// Ç×,¸ñ,±×·ìÄÚµå,ÀçÇà¿¡ µû¶ó Á¤·ÄÇÑ´Ù.
grd_clodhist.colsort(grd_clodhist.colRef("ediitem1")) = "asc"; // Ç×
grd_clodhist.colsort(grd_clodhist.colRef("ediitem2")) = "asc"; // ¸ñ
grd_clodhist.colsort(grd_clodhist.colRef("grupcalcscorcd")) = "asc"; // ±×·ìÄÚµå
grd_clodhist.colsort(grd_clodhist.colRef("grupseqno")) = "asc"; // ±×·ì Á¤·Ä¼ø¹ø
grd_clodhist.colsort(grd_clodhist.colRef("snglcalcscorcd")) = "asc"; // ½Ì±ÛÄÚµå
grd_clodhist.colsort(grd_clodhist.colRef("edicd")) = "asc"; // EDIÄÚµå
var maxRow = parseInt(grd_clodhist.rows); // rows´Â ŸÀÌÆ²ºÎºÐ ºÎÅÍ °³¼ö¸¦ ¼¾´Ù
var maxCol = parseInt(grd_clodhist.cols);
grd_clodhist.sort(grd_clodhist.fixedRows, grd_clodhist.fixedCols, maxRow, maxCol) = "usersort";
// Sort µÈ Grid »óÀÇ Data ¼ø¼¿Í Instance Node »óÀÇ Data ¼ø¼¸¦ µ¿ÀÏÇÏ°Ô ¸ÂÃçÁØ´Ù.
grd_clodhist.gridToInstance();
// ÁÙ¹øÈ£¸¦ º¯°æÇÑ´Ù.
// fChangeOrderLnNo();
var row = grd_clodhist.findRow(seqno, 0, grd_clodhist.colRef("seqno"), false, true);
grd_clodhist.select(row, 1) = true;
grd_clodhist.row = row;
grd_clodhist.topRow = row + rowNum;
/*
* for (var i = grd_clodhist.rows; i > 0; i--) { if
* (model.getValue("/root/main/list2/clod["+ i +"]/seqno") == seqno) { if
* (model.getValue("/root/main/list2/clod["+ i +"]/ediitem1") == ediitem1) {
* if (model.getValue("/root/main/list2/clod["+ i +"]/ediitem2") ==
* ediitem2) { if (model.getValue("/root/main/list2/clod["+ i
* +"]/grupcalcscorcd") == grupcalcscorcd) { if
* (model.getValue("/root/main/list2/clod["+ i +"]/snglcalcscorcd") ==
* snglcalcscorcd) { if (model.getValue("/root/main/list2/clod["+ i
* +"]/estmmncd") == estmmncd) { grd_clodhist.select(i, 1) = true;
* grd_clodhist.row = i;
*
* grd_clodhist.topRow = i + rowNum; break; } } } } } } }
*/
}
// ÁÙ¹øÈ£¸¦ º¯°æÇÑ´Ù.
function fChangeOrderLnNo() {
/*
* // ÁÙ¹øÈ£¿Í ¼ö°¡Äڵ尡 µ¿ÀÏÇÑ Æ¯Á¤³»¿ªÀÇ ÁÙ¹øÈ£ºÎÅÍ º¯°æÇÑ´Ù. for (var i = grd_clodhist.fixedRows;
* i < grd_clodhist.rows; i++) { // ù ÁÙºÎÅÍ var clodLnno =
* model.getValue("/root/main/list2/clod["+ i +"]/initlnno"); if
* (model.getValue("/root/main/list2/clod["+ i +"]/cnfmcd") ||
* model.getValue("/root/main/list2/clod["+ i +"]/lnunitspclspecyn")) { //
* È®ÀÎÄÚµå 'JT001'ÀÌ ÀԷµǰųª ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ÀÔ·ÂµÈ °æ¿ì for (var j = grd_clsphist.fixedRows;
* j < grd_clsphist.rows; j++) { var spclLnNo =
* model.getValue("/root/main/list3/clsp["+ j +"]/oldedilnno"); if (spclLnNo ==
* "") { // ÀÔ·ÂµÈ ÁÙ¹øÈ£°¡ ¾ø´Â °æ¿ì Á¦¿Ü } else if (spclLnNo == "0") { // ¸íÀÏ·Ã ´ÜÀ§´Â Á¦¿Ü }
* else if (spclLnNo == clodLnno) { var clspstatus =
* grd_clsphist.rowstatus(j); if (clspstatus == 0 || clspstatus == 2) { // 0 :
* new, 2 : update if (spclLnNo != i) { // ±âÁ¸ ÁÙ¹øÈ£¿Í »õ ÁÙ¹øÈ£°¡ ´Ù¸¥ °æ¿ì
* grd_clsphist.rowstatus(j) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù. } }
* model.setValue("/root/main/list3/clsp["+ j +"]/edilnno", i); } } } // ó¹æ
* GridÀÇ ÁÙ¹øÈ£¸¦ º¯°æÇÑ´Ù. model.setValue("/root/main/list2/clod["+ i +"]/edilnno",
* i);
*
* var initlnno = model.getValue("/root/main/list2/clod["+ i +"]/initlnno");
* if (initlnno != i) { // DB¿¡ ÀúÀåµÈ ÁÙ¹øÈ£¿Í ´Ù¸¥ ÁÙ¹øÈ£·Î ¹Ù²ï °æ¿ì // ó¹æÀÇ ¼öÁ¤µÈ row »óŸ¦
* Ç¥½ÃÇÑ´Ù. // fSetOrderChangeRowStat(i); var rowstatus =
* grd_clodhist.rowstatus(i); if (rowstatus == 1 || rowstatus == 3) { // 1 :
* insert, 3 : insert & new } else { grd_clodhist.rowstatus(i) = 2; // 2 :
* update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù. } } }
*
* for (var i = grd_clodhist.fixedRows; i < grd_clodhist.rows; i++) {
* model.setValue("/root/main/list2/clod["+ i +"]/initlnno",
* model.getValue("/root/main/list2/clod["+ i +"]/edilnno")); } for (var j =
* grd_clsphist.fixedRows; j < grd_clsphist.rows; j++) {
* model.setValue("/root/main/list3/clsp["+ j +"]/oldedilnno",
* model.getValue("/root/main/list3/clsp["+ j +"]/edilnno")); }
*/
}
// 1. grd_clodhist : xforms_Value_changed : ±×·ìÄÚµå, ½Ì±ÛÄÚµå, ediÄÚµå,ÇÑ±Û ¼öÁ¤½Ã
// 2. grd_clodhist : xfomrs_value_changed : fromdd¼öÁ¤½Ã Àϼö¾ø´Â °æ¿ì±âÁ¸ ÁÙ¹øÈ£ ¾ø´Â °æ¿ì
// 3. grd_clodhist : xfomrs_value_changed : todd¼öÁ¤½Ã Àϼöº¯°æµÇ¾î ±âÁ¸ ÁÙ¹øÈ£ ¾ø´Â °æ¿ì
// 4. grd_clodhist : xfomrs_value_changed : todd¼öÁ¤½Ã fromdd¾ø¾î¼ fromddº¯°æµÇ¾î ±âÁ¸ ÁÙ¹øÈ£
// ¾ø´Â °æ¿ì
// 4. grd_clodhist : xfomrs_value_changed : dayno¼öÁ¤½Ã ±âÁ¸ ÁÙ¹øÈ£ ¾ø´Â °æ¿ì
// ¼ö°¡Äڵ带 Á¶È¸ÇÑ ÈÄ Ã³¹æÀ¸·Î Çà Ãß°¡¸¦ ÇÑ´Ù.
function fSetSrchCalcScorCd() {
var col = grd_clodhist.col;
var row = grd_clodhist.row;
var calcscorcd = "";
model.resetInstanceNode("/root/hidden/smpic00200/judgsrch"); // SMPIC00200_¼ö°¡Á¶È¸¿¡ Àü´ÞÇÒ Á¶°Ç°ª
model.resetInstanceNode("/root/send/item5/mech"); // submit("TRPID20303")¿ë
model.makeValue("/root/send/item5/mech/unitcostupdateyn", "N"); // ´Ü°¡º¯°æ¿©ºÎ
model.makeValue("/root/send/item5/mech/ediupdateyn", "N"); // ediº¯°æ¿©ºÎ
var cnfmcd = model.getValue("/root/main/list2/clod[" + row + "]/cnfmcd");
var lnunitspclspecyn = model.getValue("/root/main/list2/clod[" + row + "]/lnunitspclspecyn");
if (cnfmcd || lnunitspclspecyn) {
var ans = messageBox("ÀÔ·ÂµÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀ» »èÁ¦Çϰí Äڵ带 º¯°æ", "S001"); // /ÀÔ·ÂµÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀ» »èÁ¦Çϰí Äڵ带 º¯°æÇϽ÷Á¸é ¿¹(Yes)\n¾Æ´Ï¸é ¾Æ´Ï¿À(No)
if (ans == 6) { // 6: yes, 7:no, 2:cancel
model.resetInstanceNode("/root/main/list2/clod[" + row + "]/cnfmcd");
model.resetInstanceNode("/root/main/list2/clod[" + row + "]/lnunitspclspecyn");
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#ffffff"; // #ffffff = White
var edilnno = model.getValue("/root/main/list2/clod[" + row + "]/edilnno");
var clspgridrow;
for ( var j = 1; j < grd_clsphist.rows; j++) {
var spclLnNo = model.getValue("/root/main/list3/clsp[" + j + "]/edilnno");
if (spclLnNo == edilnno) {
// ƯÁ¤³»¿ª Grid¿¡¼ »èÁ¦
var rowstatus = grd_clsphist.rowstatus(j);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 :
// insert & new
model.resetInstanceNode("/root/main/list3/clsp[" + j + "]/spclcd");
model.resetInstanceNode("/root/main/list3/clsp[" + j + "]/spclspec");
// grd_clsphist.deleteRow(j, false); // ÇØ´ç ¶óÀÎÀ» Grid¿¡¼
// »èÁ¦ÇÑ´Ù.
// j--;
} else { // 0 : new, 2 : update
grd_clsphist.rowstatus(j) = 4; // 4 : delete »óÅ·Πstat¸¦
// º¯°æÇÑ´Ù.
}
}
}
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
} else if (ans == 7 || ans == 2) { // 6: yes, 7:no, 2:cancel
// ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
return; // ÀÔ·ÂµÈ Äڵ忡 º¯°æÀÌ ¾ø°Å³ª Äڵ带 »èÁ¦ÇÑ °æ¿ìÀÓ
}
}
if (col == grd_clodhist.colRef("grupcalcscorcd")) { // ±×·ìÄÚµå
var grupcalcscorcd = model.getValue("/root/main/list2/clod[" + row
+ "]/grupcalcscorcd");
if (grupcalcscorcd == "") {
// ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
return; // ÀÔ·ÂµÈ Äڵ忡 º¯°æÀÌ ¾ø°Å³ª Äڵ带 »èÁ¦ÇÑ °æ¿ìÀÓ
}
model.setValue("/root/hidden/smpic00200/judgsrch/con4_search2",grupcalcscorcd); // SMPIC00200_¼ö°¡Á¶È¸ ¿ë
model.makeValue("/root/send/item5/mech/grupcalcscorcd", grupcalcscorcd); // submit("TRPID20303")
// ¿ë
model.makeValue("/root/send/item5/mech/snglcalcscorcd", "");
model.makeValue("/root/send/item5/mech/basecd", "");
calcscorcd = grupcalcscorcd;
} else if (col == grd_clodhist.colRef("snglcalcscorcd")) { // ¼ö°¡ÄÚµå
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd");
if (snglcalcscorcd == "") {
// ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
return; // ÀÔ·ÂµÈ Äڵ忡 º¯°æÀÌ ¾ø°Å³ª Äڵ带 »èÁ¦ÇÑ °æ¿ìÀÓ
}
model.setValue("/root/hidden/smpic00200/judgsrch/con4_search2", snglcalcscorcd); // SMPIC00200_¼ö°¡Á¶È¸ ¿ë
model.makeValue("/root/send/item5/mech/snglcalcscorcd", snglcalcscorcd); // submit("TRPID20303")
// ¿ë
model.makeValue("/root/send/item5/mech/grupcalcscorcd", "");
model.makeValue("/root/send/item5/mech/basecd", "");
calcscorcd = snglcalcscorcd;
} else if (col == grd_clodhist.colRef("basecd")) { // EDIÄÚµå
var basecd = model.getValue("/root/main/list2/clod[" + row + "]/basecd");
if (basecd == "") {
// ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
return; // ÀÔ·ÂµÈ Äڵ忡 º¯°æÀÌ ¾ø°Å³ª Äڵ带 »èÁ¦ÇÑ °æ¿ìÀÓ
}
model.setValue("/root/hidden/smpic00200/judgsrch/con4_search2", basecd); // SMPIC00200_¼ö°¡Á¶È¸
// ¿ë
model.makeValue("/root/send/item5/mech/basecd", basecd); // submit("TRPID20303")
// ¿ë
model.makeValue("/root/send/item5/mech/grupcalcscorcd", "");
model.makeValue("/root/send/item5/mech/snglcalcscorcd", "");
calcscorcd = basecd;
}
else if (col == grd_clodhist.colRef("hngnm")) { // Çѱ۸í
var hngnm = model.getValue("/root/main/list2/clod[" + row + "]/hngnm");
if (hngnm == "") {
// ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
return; // ÀÔ·ÂµÈ Äڵ忡 º¯°æÀÌ ¾ø°Å³ª Äڵ带 »èÁ¦ÇÑ °æ¿ìÀÓ
}
model.setValue("/root/hidden/smpic00200/judgsrch/con4_search2", hngnm); // SMPIC00200_¼ö°¡Á¶È¸
// ¿ë
model.makeValue("/root/send/item5/mech/basecd", ""); // submit("TRPID20303")
// ¿ë
model.makeValue("/root/send/item5/mech/grupcalcscorcd", "");
model.makeValue("/root/send/item5/mech/snglcalcscorcd", "");
}
var ordfromdd = model.getValue("/root/main/list2/clod[" + row + "]/ordfromdd");
var ordtodd = model.getValue("/root/main/list2/clod[" + row + "]/ordtodd");
/*
* // 2009-01-12 ÀÔ¿øÈ¯ÀÚ ÀǾàǰ°ü¸®·á´Â ÀÔ¿øÀÏÀÚ·Î Á¶È¸ÇÑ´Ù. var ioflag =
* model.getValue("/root/main/item1/clbs/ioflag"); if (ioflag == "I" &&
* calcscorcd.substr(0, 2) == "AL") { var indd =
* model.getValue("/root/main/item1/clbs/indd"); ordfromdd = indd; ordtodd =
* indd; model.setValue("/root/main/list2/clod["+ row +"]/ordfromdd", indd);
* model.setValue("/root/main/list2/clod["+ row +"]/ordtodd", indd); } else { }
*/
if (isValidDateTime(ordfromdd)) { // (dateHelper.js) À¯È¿ÇÑ ³¯Â¥, ½Ã°£ ÀÎÁö Á¡°Ë
if (!isValidDateTime(ordtodd)) {
model.setValue("/root/main/list2/clod[" + row + "]/ordtodd", ordfromdd);
model.setValue("/root/main/list2/clod[" + row + "]/orddd", ordfromdd);
ordtodd = ordfromdd;
}
} else {
// ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
messageBox("󹿽ÃÀÛÀÏ & Á¾·áÀÏÀº", "I003"); // /󹿽ÃÀÛÀÏ & Á¾·áÀÏÀº ÇʼöÀÔ·ÂÀÔ´Ï´Ù.
return;
}
var dayno = getDateInterval(ordfromdd, ordtodd); // (dateHelper.js) µÎ
// ÀÏÀÚ»çÀÌÀÇ Â÷¸¦ ÀÏ´ÜÀ§·Î ¹Ýȯ
if (dayno < 0) {
messageBox("ó¹æÁ¾·áÀÏÀÚ°¡ 󹿽ÃÀÛÀÏÀÚ º¸´Ù ÀÌÀü ³¯Â¥", "E008"); // /ó¹æÁ¾·áÀÏÀÚ°¡ 󹿽ÃÀÛÀÏÀÚ º¸´Ù ÀÌÀü
// ³¯Â¥ÀÔ´Ï´Ù.
return;
} else if (dayno > 365) {
messageBox("ó¹æÀÏÀÌ À߸ø", "E005"); // /ó¹æÀÏÀÌ À߸ø ¼±ÅõǾú½À´Ï´Ù.
return;
}
model.makeValue("/root/send/item5/mech/indd", model.getValue("/root/main/item1/clbs/indd"));
model.makeValue("/root/send/item5/mech/ordfromdd", ordfromdd);
model.makeValue("/root/send/item5/mech/ordtodd", ordtodd);
model.makeValue("/root/send/item5/mech/insukind", model.getValue("/root/main/item1/clbs/insukindcd"));
model.makeValue("/root/send/item5/mech/suppkind", model.getValue("/root/main/item1/clbs/suppkindcd"));
var orddeptcd = model.getValue("/root/main/list2/clod[" + row + "]/orddeptcd");
if (orddeptcd) {
model.makeValue("/root/send/item5/mech/orddeptcd", orddeptcd);
} else {
model.makeValue("/root/send/item5/mech/orddeptcd", model.getValue("/root/main/item1/clbs/orddeptcd"));
}
var orddrid = model.getValue("/root/main/list2/clod[" + row + "]/orddrid");
if (orddrid) {
model.makeValue("/root/send/item5/mech/orddrid", orddrid);
} else {
model.makeValue("/root/send/item5/mech/orddrid", model.getValue("/root/main/item1/clbs/orddrid"));
}
var drugqty = model.getValue("/root/main/list2/clod[" + row + "]/drugqty");
if (drugqty == "") {
drugqty = "1";
}
model.makeValue("/root/send/item5/mech/drugqty", drugqty);
var tims = model.getValue("/root/main/list2/clod[" + row + "]/tims");
if (tims == "") {
tims = "1";
}
model.makeValue("/root/send/item5/mech/tims", tims);
var dayno = model.getValue("/root/main/list2/clod[" + row + "]/dayno");
if (dayno == "") {
dayno = "1";
}
model.makeValue("/root/send/item5/mech/dayno", dayno);
model.makeValue("/root/send/item5/mech/adjtresncd", model.getValue("/root/main/list2/clod[" + row + "]/adjtresncd"));
model.makeValue("/root/send/item5/mech/undersixageyn", model.getValue("/root/main/item1/clbs/undersixageyn"));
model.makeValue("/root/send/item5/mech/mechage", model.getValue("/root/main/item1/clbs/mechage"));
model.makeValue("/root/send/item5/mech/hosinresncd", model.getValue("/root/main/list2/clod[" + row + "]/hosinresncd"));
model.makeValue("/root/send/item5/mech/payflag", model.getValue("/root/main/list2/clod[" + row + "]/payflag"));
model.makeValue("/root/send/item5/mech/clbsordfromdd", model.getValue("/root/main/item1/clbs/ordfromdd"));
model.makeValue("/root/send/item5/mech/ioflag", model.getValue("/root/main/item1/clbs/ioflag"));
model.makeValue("/root/send/item5/mech/clamflagcd", model.getValue("/root/main/item1/clbs/clamflagcd"));
model.makeValue("/root/send/item5/mech/mode", "n");
model.makeValue("/root/send/item5/mech/pid", model.getValue("/root/main/item1/clbs/pid")); // 20100125 Ãß°¡
model.makeValue("/root/send/item5/mech/clamdeptcd", model.getValue("/root/main/item1/clbs/clamdeptcd")); // 20100724 Ãß°¡
var clodlength;
// if (!col == grd_clodhist.colRef("hngnm")) { // Çѱ۸íÀÎ °æ¿ì´Â ¼ö°¡¸¦ ¹Ù·Î Á¶È¸ÇÏÁö ¾Ê°í
// ¼ö°¡Á¶È¸ popupâÀ» ¶ç¿î´Ù.
if (col == grd_clodhist.colRef("hngnm")) { // 20100112 not Á¶°ÇÀÌ ¿Ö °É¸®ÀÖÀ»±î¿ä?
clodlength = 0;
} else {
if (submit("TRPID20303")) {
var clodSelect = instance1.selectSingleNode("/root/main/item5"); // root/main/item5
var clod = clodSelect.childNodes; // root/main/item5/mech
clodlength = clod.length;
} else {
clodlength = 0;
}
}
// ÀÔ·ÂÇÑ Äڵ忡 ´ëÇØ Á¶È¸µÈ °á°ú°¡ ¾ø°Å³ª, ÇϳªÀÇ EDIÄڵ忡 ¿©·¯ ¼ö°¡Äڵ尡 Á¸ÀçÇÒ ¶§
if ((clodlength == 0)
|| (col == grd_clodhist.colRef("basecd") && clodlength > 1)) {
// °Ë»öµÈ °á°ú°¡ ¿©·¯ ¼ö°¡ÄÚµåÀÎ °æ¿ì À̸¦ ÃʱâÈÇÏ°í ¼ö°¡Á¶È¸ Popup â¿¡¼ »õ·Î °á°ú¸¦ ¾ò´Â´Ù.
model.resetInstanceNode("/root/main/item5");
// insukindcd¸¦ SMPIC00200_¼ö°¡Á¶È¸ ȸ鿡¼ »ç¿ëÇÏ´Â Á¶°Ç°ªÀ¸·Î º¯°æÇÑ´Ù.
var insukindcd = model.getValue("/root/main/item1/clbs/insukindcd");
if (insukindcd == "11") {
model.setValue("/root/hidden/smpic00200/judgsrch/con5_insu", "insu");
} else if (insukindcd == "21" || insukindcd == "22") {
model.setValue("/root/hidden/smpic00200/judgsrch/con5_insu", "proc");
} else if (insukindcd == "31") {
model.setValue("/root/hidden/smpic00200/judgsrch/con5_insu", "autm");
} else if (insukindcd == "41") {
model.setValue("/root/hidden/smpic00200/judgsrch/con5_insu", "indus");
} else {
model.setValue("/root/hidden/smpic00200/judgsrch/con5_insu", "insu");
}
// SMPIC00200_¼ö°¡Á¶È¸ ȸéÀÇ ±×·ì,½Ì±Û combo Á¶°Ç°ª ¼³Á¤
if (col == grd_clodhist.colRef("grupcalcscorcd")) {
model.setValue("/root/hidden/smpic00200/judgsrch/con2_gsflag", "G");
} else if (col == grd_clodhist.colRef("snglcalcscorcd")) {
model.setValue("/root/hidden/smpic00200/judgsrch/con2_gsflag", "S");
}
// SMPIC00200_¼ö°¡Á¶È¸ ȸéÀÇ °Ë»öÁ¶°Ç combo Á¶°Ç°ª ¼³Á¤
if (col == grd_clodhist.colRef("basecd")) {
model.setValue("/root/hidden/smpic00200/judgsrch/con3_search1", "edicd");
} else if (col == grd_clodhist.colRef("hngnm")) {
model.setValue("/root/hidden/smpic00200/judgsrch/con3_search1", "hngnm");
} else {
model.setValue("/root/hidden/smpic00200/judgsrch/con3_search1", "calcscorcd");
}
// 󹿽ÃÀÛÀÏÀ» ¼ö°¡Á¶È¸ ±âÁØÀÏÀÚ·Î ¼³Á¤
if (ordfromdd) {
model.setValue("/root/hidden/smpic00200/judgsrch/con1_dd", ordfromdd);
}
model.setValue("/root/hidden/smpic00200/judgsrch/con_ordinptflag",
"PAM"); // 20100113 ó¹æÀԷ±¸ºÐÀÌ ÀԷ°¡´ÉÀ¸·Î µÈ ¼ö°¡µµ Á¶È¸Çϱâ À§Çؼ Ãß°¡
model.removeNodeset("/root/hidden/smpic00200/rslt/mech"); // SMPIC00200_¼ö°¡Á¶È¸ ¿¡¼ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
model.removeNodeset("/root/hidden/smpic00200/rslt/picmmech"); // SMPIC00200_¼ö°¡Á¶È¸ ¿¡¼ ¼±ÅÃµÈ °á°ú°¡copyNodeµÇ´Â °æ·ÎÀÓ
modal("SMPIC00200", "1", "10", "10", "SMPIC00200","root/hidden/smpic00200", "/root/temp", "", ""); // SMPIC00200_¼ö°¡Á¶È¸.xrw
var mechSelect = instance1.selectSingleNode("/root/temp/mech");
if (mechSelect == null) { // ¼±ÅÃÇÑ Äڵ尡 ¾ø´Â °æ¿ì
model.setValue("/root/main/list2/clod[" + row + "]/grupcalcscorcd", model.getValue("/root/hidden/item5/clod/grupcalcscorcd"));
model.setValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd", model.getValue("/root/hidden/item5/clod/snglcalcscorcd"));
model.setValue("/root/main/list2/clod[" + row + "]/basecd", model.getValue("/root/hidden/item5/clod/basecd"));
messageBox("¼ö°¡Á¶È¸ ȸ鿡¼ ¼±ÅÃÇÑ °á°ú°¡", "I004"); // /¼ö°¡Á¶È¸ ȸ鿡¼ ¼±ÅÃÇÑ °á°ú°¡
// ¾ø½À´Ï´Ù.
return;
}
// SMPIC00200_¼ö°¡Á¶È¸ ȸ鿡¼ º¸³½ °á°ú °ª¿¡ ´ëÇÑ Ã³¸®
model.makeNode("/root/hidden/smpic00200/rslt/mech");
model.makeNode("/root/hidden/smpic00200/rslt/picmmech");
model.copyNode("/root/hidden/smpic00200/rslt/mech", "/root/temp/mech");
model.copyNode("/root/hidden/smpic00200/rslt/picmmech", "/root/temp/picmmech");
model.removeNodeset("/root/temp"); // SMPIC00200_¼ö°¡Á¶È¸ ¿¡¼ ¼±ÅÃµÈ °á°ú°¡ Á÷Á¢
// Àü´ÞµÇ´Â °æ·ÎÀÓ
if (model.getValue("/root/hidden/smpic00200/rslt/mech/ordinptflag") != "A" && model.getValue("/root/hidden/smpic00200/rslt/mech/ordinptflag") != "I" // 20100120
// ±è¿ë¹Î
// ÀԷ°¡´ÉÇÑ
// ¼ö°¡
// Á¦¿Ü
) { // ó¹æÀԷ±¸ºÐ(Äڵ屺 P0141) A: °¡´É
model.setValue("/root/main/list2/clod[" + row + "]/grupcalcscorcd", model.getValue("/root/hidden/item5/clod/grupcalcscorcd"));
model.setValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd", model.getValue("/root/hidden/item5/clod/snglcalcscorcd"));
model.setValue("/root/main/list2/clod[" + row + "]/basecd", model.getValue("/root/hidden/item5/clod/basecd"));
messageBox("ó¹æÀÌ ºÒ°¡ÇÑ ÄÚµå", "E008"); // /ó¹æÀÌ ºÒ°¡ÇÑ ÄÚµåÀÔ´Ï´Ù.
return;
}
if (model.getValue("/root/hidden/smpic00200/rslt/mech/grupsnglflag") != "S") { // ±×·ìÄÚµåÀÎ
// °æ¿ìÀÇ
// ±×·ìÄڵ忡
// ¼ÓÇÏ´Â
// ½Ì±ÛÄڵ带
// Á¶È¸ÇÔ.
model.makeValue("/root/send/item5/mech/grupcalcscorcd", model.getValue("/root/hidden/smpic00200/rslt/mech/calcscorcd"));
model.resetInstanceNode("/root/send/item5/mech/snglcalcscorcd");
model.resetInstanceNode("/root/send/item5/mech/basecd");
model.resetInstanceNode("/root/send/item5/mech/estmmncd");
// model.resetInstanceNode("/root/send/item5/mech/toot");
submit("TRPID20303");
} else { // ½Ì±ÛÄڵ带 ¼±ÅÃÇßÀ» ¶§
model.resetInstanceNode("/root/send/item5/mech/grupcalcscorcd");
model.makeValue("/root/send/item5/mech/snglcalcscorcd", model.getValue("/root/hidden/smpic00200/rslt/picmmech/picmmech_calcscorcd"));
model.resetInstanceNode("/root/send/item5/mech/basecd");
model.resetInstanceNode("/root/send/item5/mech/estmmncd");
// model.resetInstanceNode("/root/send/item5/mech/toot");
submit("TRPID20303");
}
}
// ¼ö°¡Á¶È¸ ÀÌÈÄ ½Å±Ôó¹æ Ãß°¡Ã³¸®
fSetNewCalcScorCd();
// ////////////////
}
// ¼ö°¡Á¶È¸ ÀÌÈÄ ½Å±Ôó¹æ Ãß°¡Ã³¸®
function fSetNewCalcScorCd() {
var row = grd_clodhist.row;
// SMPIC00200_¼ö°¡Á¶È¸ ȸ鿡¼ ¼±ÅÃÇÑ ±×·ìÄڵ忡 ´ëÇØ Á¶È¸ÇÑ °á°ú °ª¿¡ ´ëÇÑ Ã³¸®
var clodSelect = instance1.selectSingleNode("/root/main/item5"); // root/main/item5
if (clodSelect != null) {
var clod = clodSelect.childNodes; // root/main/item5/mech
if (clod.length == 0) {
// ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
messageBox("ó¹æÀÌ ºÒ°¡ÇÑ ÄÚµåÀÔ´Ï´Ù. ¼ö°¡Á¶È¸ ȸ鿡¼ ¼±ÅÃÇÑ ±×·ìÄڵ忡 ´ëÇØ Á¶È¸ÇÑ °á°ú°¡", "I004"); // /ó¹æÀÌ
// ºÒ°¡ÇÑ
// ÄÚµåÀÔ´Ï´Ù.
// ¼ö°¡Á¶È¸
// ȸ鿡¼
// ¼±ÅÃÇÑ
// ±×·ìÄڵ忡
// ´ëÇØ
// Á¶È¸ÇÑ
// °á°ú°¡
// ¾ø½À´Ï´Ù.
return;
}
// Á¶È¸ÇÑ ¼ö°¡ÄÚµåÀÇ ±Ý¾×Á¤º¸¸¦ Ç¥½ÃÇÑ´Ù.
fSetCalcScorAmt(clod, "new");
// ¼ö°¡Äڵ尡 º¯°æµÇ¸é Ä¡½ÄÀ» ÃʱâȽÃŲ´Ù.
model.resetInstanceNode("/root/main/list2/clod[" + row + "]/toot");
// fSetOrderLnNo();
// »õ·Î ÀÔ·ÂµÈ ¼ö°¡Äڵ尡 ó¹æ Grid¿¡ »ðÀÔ ¶Ç´Â ¼öÁ¤µÇ¾úÀ¸¹Ç·Î ó¹æ ÇÊÅ͸µÀÌ ¼±ÅõǾîÀÖ´Â °æ¿ì, ÇØ´ç Row¸¸ Ç¥½ÃµÇµµ·Ï
// ÇÑ´Ù.
// 2008-10-28
// fGetSelectedOrderData();
// ó¹æ Ç׸ñ ±¸ºÐ ¹× ¼±º°½É»ç ó¹æ »ö±ò ±¸ºÐ
// fSetOrderData();
// º¯°æÀÏÀÚ¸¦ °»½ÅÇÑ´Ù.
// fChkUpdtdd(); // 20100120 ¿Ö Àüü³»¿ªÀ» ´Ù½Ã º¯°æÇÏ´ÂÁö.. ÀÏ´Ü»èÁ¦ (¼Óµµµµ ¿À·¡°É¸®°í ·ÎÁ÷È®ÀÎ ÇÊ¿ä)
// È®ÀÎÄڵ尡 Ãß°¡µÈ °æ¿ì ƯÁ¤³»¿ª Grid¿¡µµ JT001À» Ãß°¡ÇÑ´Ù.
fSetNewCnfmCd();
} else {
// ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
messageBox("ó¹æÀÌ ºÒ°¡ÇÑ ÄÚµåÀÔ´Ï´Ù. ¼ö°¡Á¶È¸ ȸ鿡¼ ¼±ÅÃÇÑ ±×·ìÄڵ忡 ´ëÇØ Á¶È¸ÇÑ °á°ú°¡", "I004"); // /ó¹æÀÌ
// ºÒ°¡ÇÑ
// ÄÚµåÀÔ´Ï´Ù.
// ¼ö°¡Á¶È¸
// ȸ鿡¼
// ¼±ÅÃÇÑ
// ±×·ìÄڵ忡
// ´ëÇØ
// Á¶È¸ÇÑ
// °á°ú°¡
// ¾ø½À´Ï´Ù.
return;
}
}
// º¯°æµÈ Åõ¿©·®, Ƚ¼ö, Àϼö¿¡ µû¶ó ÃÑÅõ¿©·®, ±Ý¾×À» Àç°è»êÇÑ´Ù.
function fSetTotDrugQtyAmt() {
var i = grd_clodhist.row;
var col = grd_clodhist.col;
model.resetInstanceNode("/root/send/item5/mech"); // submit("TRPID20303")
// ¿ë
model.makeValue("/root/send/item5/mech/unitcostupdateyn", "N"); // ´Ü°¡º¯°æ¿©ºÎ
model.makeValue("/root/send/item5/mech/ediupdateyn", "N"); // ediº¯°æ¿©ºÎ
var drugqty = model.getValue("/root/main/list2/clod[" + i + "]/drugqty");
if (drugqty == "" || drugqty == "0") {
model.setValue("/root/main/list2/clod[" + i + "]/drugqty", "1");
}
var tims = model.getValue("/root/main/list2/clod[" + i + "]/tims");
if (tims == "" || tims == "0") {
model.setValue("/root/main/list2/clod[" + i + "]/tims", "1");
}
var dayno = model.getValue("/root/main/list2/clod[" + i + "]/dayno");
if (dayno == "" || dayno == "0") {
model.setValue("/root/main/list2/clod[" + i + "]/dayno", "1");
}
// -------------------------------------------
// 20100205 Ãß°¡ (±âÁ¸ Á¶°ÇÀ» EDI Á¶È¸¸¦ ±âº»À¸·Î º¯°æÇÏ¿© ¼öÁ¤½Ã 1ÀÏ·® º¯°æ¾ÈµÇ´Â ¿À·ù ¶§¹®¿¡ Ãß°¡
// -------------------------------------------
var dayno = model.getValue("/root/main/list2/clod[" + i + "]/edidrugqty");
if (dayno == "" || dayno == "0") {
model.setValue("/root/main/list2/clod[" + i + "]/edidrugqty", "1");
}
var dayno = model.getValue("/root/main/list2/clod[" + i + "]/edidayno");
if (dayno == "" || dayno == "0") {
model.setValue("/root/main/list2/clod[" + i + "]/edidayno", "1");
}
if (col == grd_clodhist.colRef("edidrugqty")) { // edi1ȸÅõ¿©·®ÀÌ º¯°æµÈ °æ¿ì
model.setValue("/root/main/list2/clod[" + i + "]/drugqty", model.getValue("/root/main/list2/clod[" + i + "]/edidrugqty"));
col = grd_clodhist.colRef("drugqty");
} else if (col == grd_clodhist.colRef("edidayno")) { // ediÀϼö°¡ º¯°æµÈ °æ¿ì
model.setValue("/root/main/list2/clod[" + i + "]/dayno", model.getValue("/root/main/list2/clod[" + i + "]/edidayno"));
col = grd_clodhist.colRef("dayno");
}
// -------------------------------------------
var sDrugqty = model.getValue("/root/main/list2/clod[" + i + "]/drugqty");
var sTims = model.getValue("/root/main/list2/clod[" + i + "]/tims");
var sDayno = model.getValue("/root/main/list2/clod[" + i + "]/dayno");
var sUnitcost = model.getValue("/root/main/list2/clod[" + i + "]/unitcost");
var sEdiDrugqty = model.getValue("/root/main/list2/clod[" + i
+ "]/edidrugqty");
var sEdiDayno = model.getValue("/root/main/list2/clod[" + i + "]/edidayno");
var drugqty = parseFloat(sDrugqty);
var tims = parseInt(sTims);
var dayno = parseInt(sDayno);
var unitcost = parseFloat(sUnitcost);
var edidrugqty = parseFloat(sEdiDrugqty);
var edidayno = parseInt(sEdiDayno);
if (col == grd_clodhist.colRef("drugqty")) { // 1ȸÅõ¿©·®ÀÌ º¯°æµÈ °æ¿ì
if (sDrugqty == "" || drugqty <= 0) {
fCancelClodStatusChng(); // ó¹æÀÌÀü»óÅ º¹±¸
return false;
}
} else if (col == grd_clodhist.colRef("tims")) { // Ƚ¼ö°¡ º¯°æµÈ °æ¿ì
if (sTims == "" || tims <= 0) {
fCancelClodStatusChng(); // ó¹æÀÌÀü»óÅ º¹±¸
return false;
}
} else if (col == grd_clodhist.colRef("dayno")) { // Àϼö°¡ º¯°æµÈ °æ¿ì
if (sDayno == "" || dayno <= 0) {
fCancelClodStatusChng(); // ó¹æÀÌÀü»óÅ º¹±¸
return false;
}
} else if (col == grd_clodhist.colRef("unitcost")) { // ´Ü°¡ º¯°æµÈ °æ¿ì(Ãß°¡Ã»±¸ÀÎ
// °æ¿ì¸¸ ÇØ´ç)
if (sUnitcost == "" || unitcost <= 0) {
fCancelClodStatusChng(); // ó¹æÀÌÀü»óÅ º¹±¸
return false;
} else {
model.makeValue("/root/send/item5/mech/unitcostupdateyn", "Y"); // ´Ü°¡º¯°æ¿©ºÎ
}
} else if (col == grd_clodhist.colRef("edidrugqty")) { // edi1ȸÅõ¿©·®ÀÌ º¯°æµÈ °æ¿ì
if (sEdiDrugqty == "" || edidrugqty <= 0) {
fCancelClodStatusChng(); // ó¹æÀÌÀü»óÅ º¹±¸
return false;
} else {
model.makeValue("/root/send/item5/mech/ediupdateyn", "Y"); // ediº¯°æ¿©ºÎ
}
} else if (col == grd_clodhist.colRef("edidayno")) { // ediÀϼö°¡ º¯°æµÈ °æ¿ì
if (sEdiDayno == "" || edidayno <= 0) {
fCancelClodStatusChng(); // ó¹æÀÌÀü»óÅ º¹±¸
return false;
} else {
model.makeValue("/root/send/item5/mech/ediupdateyn", "Y"); // ediº¯°æ¿©ºÎ
}
}
var ordfromdd = model
.getValue("/root/main/list2/clod[" + i + "]/ordfromdd");
var ordtodd = model.getValue("/root/main/list2/clod[" + i + "]/ordtodd");
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + i
+ "]/snglcalcscorcd");
if (ordfromdd == "" || ordtodd == "" || snglcalcscorcd == "") {
return false;
}
var dayno = getDateInterval(ordfromdd, ordtodd); // (dateHelper.js) µÎ
// ÀÏÀÚ»çÀÌÀÇ Â÷¸¦ ÀÏ´ÜÀ§·Î ¹Ýȯ
if (dayno < 0) {
return false;
} else if (dayno > 365) {
return false;
}
model.makeValue("/root/send/item5/mech/indd", model.getValue("/root/main/item1/clbs/indd"));
model.makeValue("/root/send/item5/mech/ordfromdd", ordfromdd);
model.makeValue("/root/send/item5/mech/ordtodd", ordtodd);
model.makeValue("/root/send/item5/mech/drugqty", sDrugqty);
model.makeValue("/root/send/item5/mech/tims", sTims);
model.makeValue("/root/send/item5/mech/dayno", sDayno);
model.makeValue("/root/send/item5/mech/unitcost", sUnitcost);
model.makeValue("/root/send/item5/mech/edidrugqty", sEdiDrugqty);
model.makeValue("/root/send/item5/mech/edidayno", sEdiDayno);
var grupcalcscorcd = model.getValue("/root/main/list2/clod[" + i
+ "]/grupcalcscorcd");
if (grupcalcscorcd != "" && grupcalcscorcd != "-") {
model.makeValue("/root/send/item5/mech/grupcalcscorcd", grupcalcscorcd);
} else {
model.resetInstanceNode("/root/send/item5/mech/grupcalcscorcd");
}
model.makeValue("/root/send/item5/mech/snglcalcscorcd", snglcalcscorcd);
model.resetInstanceNode("/root/send/item5/mech/basecd");
model.makeValue("/root/send/item5/mech/insukind", model.getValue("/root/main/item1/clbs/insukindcd"));
model.makeValue("/root/send/item5/mech/suppkind", model.getValue("/root/main/item1/clbs/suppkindcd"));
var orddeptcd = model.getValue("/root/main/list2/clod[" + i + "]/orddeptcd");
if (orddeptcd) {
model.makeValue("/root/send/item5/mech/orddeptcd", orddeptcd);
} else {
model.makeValue("/root/send/item5/mech/orddeptcd", model.getValue("/root/main/item1/clbs/orddeptcd"));
}
var orddrid = model.getValue("/root/main/list2/clod[" + i + "]/orddrid");
if (orddrid) {
model.makeValue("/root/send/item5/mech/orddrid", orddrid);
} else {
model.makeValue("/root/send/item5/mech/orddrid", model.getValue("/root/main/item1/clbs/orddrid"));
}
var estmmncd = model.getValue("/root/main/list2/clod[" + i + "]/estmmncd");
if (estmmncd != "" && estmmncd != "-") {
model.makeValue("/root/send/item5/mech/estmmncd", estmmncd);
}
model.makeValue("/root/send/item5/mech/adjtresncd", model.getValue("/root/main/list2/clod[" + i + "]/adjtresncd"));
model.makeValue("/root/send/item5/mech/undersixageyn", model.getValue("/root/main/item1/clbs/undersixageyn"));
model.makeValue("/root/send/item5/mech/mechage", model.getValue("/root/main/item1/clbs/mechage"));
model.makeValue("/root/send/item5/mech/hosinresncd", model.getValue("/root/main/list2/clod[" + i + "]/hosinresncd"));
model.makeValue("/root/send/item5/mech/payflag", model.getValue("/root/main/list2/clod[" + i + "]/payflag"));
model.makeValue("/root/send/item5/mech/clbsordfromdd", model.getValue("/root/main/item1/clbs/ordfromdd"));
model.makeValue("/root/send/item5/mech/ioflag", model.getValue("/root/main/item1/clbs/ioflag"));
model.makeValue("/root/send/item5/mech/clamflagcd", model.getValue("/root/main/item1/clbs/clamflagcd"));
// if (col == grd_clodhist.colRef("drugqty")) { // Åõ¿©·®ÀÌ º¯°æµÈ °æ¿ì
/*
* if (model.getValue("/root/main/list2/clod["+ i +"]/seqno") == "") { //
* EDIȯ»êÄ¡, À§Å¹Áø·á Àû¿ë model.makeValue("/root/send/item5/mech/mode", "n"); }
* else { model.makeValue("/root/send/item5/mech/mode", "u"); }
*/
model.makeValue("/root/send/item5/mech/mode", "u");
submit("TRPID20303");
var clodSelect = instance1.selectSingleNode("/root/main/item5"); // root/main/item5
var clod = clodSelect.childNodes; // root/main/item5/mech
if (clod.length == 1) {
// Á¶È¸ÇÑ ¼ö°¡ÄÚµåÀÇ ±Ý¾×Á¤º¸¸¦ Ç¥½ÃÇÑ´Ù.
fSetCalcScorAmt(clod, "update");
// ±âÁ¸¿¡ ÁÙ¹øÈ£°¡ ºÎ¿©¾ÈµÈ °æ¿ì
} else {
// [20070618] Á¶È¸µÈ °á°ú°¡ ¾øÀ» ¶§?
if (col == grd_clodhist.colRef("drugqty")) { // Åõ¿©·®ÀÌ º¯°æµÈ °æ¿ì
// ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
} else if (col == grd_clodhist.colRef("tims")) { // Ƚ¼ö°¡ º¯°æµÈ °æ¿ì ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
}
// Àϼö°¡ ¹Ù²ï °æ¿ì fromdd / todd ³¯Â¥ ¿ª½Ã ¿øÀ§Ä¡°¡ µÇÁö ¾ÊÀ¸¹Ç·Î º¹±¸ÇÏÁö ¾Ê´Â´Ù.
else if (col == grd_clodhist.colRef("dayno")) { // Àϼö°¡ º¯°æµÈ °æ¿ì ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
fCancelClodStatusChng();
;
}
messageBox("Á¶È¸µÈ ó¹æ °è»ê ³»¿ªÀÌ", "I004"); // /Á¶È¸µÈ ó¹æ °è»ê ³»¿ªÀÌ ¾ø½À´Ï´Ù
}
return true;
}
// -----------------------------
// EDI°ü·Ã Ä÷³ Ç¥½Ã
// -----------------------------
function fEdiCheck() {
// 20100128 edi °ü·Ã Ä÷³ Á¶È¸±âÁØÀ¸·Î º¯°æ (Àç¿øºñ±³·Î º¯°æ)
if (model.getValue("/root/hidden/edicheck") == "Y") {
grd_clodhist.colHidden(grd_clodhist.colRef("edicd")) = false; // EDIÄÚµå
grd_clodhist.colHidden(grd_clodhist.colRef("unitcost")) = false; // ´Ü°¡
grd_clodhist.colHidden(grd_clodhist.colRef("drugqty")) = false; // 1ȸ·®
grd_clodhist.colHidden(grd_clodhist.colRef("dayno")) = false; // Àϼö
grd_clodhist.colHidden(grd_clodhist.colRef("amt")) = false; // ±Ý¾×
grd_clodhist.colHidden(grd_clodhist.colRef("druglimitamt")) = false; // ¾àÁ¦»óÇѰ¡
grd_clodhist.colHidden(grd_clodhist.colRef("limitdiffamt")) = false; // ¾àÁ¦»óÇÑÂ÷¾×
} else {
grd_clodhist.colHidden(grd_clodhist.colRef("edicd")) = true; // EDIÄÚµå
grd_clodhist.colHidden(grd_clodhist.colRef("unitcost")) = true; // ´Ü°¡
grd_clodhist.colHidden(grd_clodhist.colRef("drugqty")) = true; // 1ȸ·®
grd_clodhist.colHidden(grd_clodhist.colRef("dayno")) = true; // Àϼö
grd_clodhist.colHidden(grd_clodhist.colRef("amt")) = true; // ±Ý¾×
grd_clodhist.colHidden(grd_clodhist.colRef("druglimitamt")) = true; // ¾àÁ¦»óÇѰ¡
grd_clodhist.colHidden(grd_clodhist.colRef("limitdiffamt")) = true; // ¾àÁ¦»óÇÑÂ÷¾×
}
}
// -----------------------------
// ó¹æ "Çà Ãß°¡"
// -----------------------------
function fOrderGridInsertRow() {
var clodrow = grd_clodhist.row;
var preediitem1 = model.getValue("/root/main/list2/clod[" + clodrow + "]/ediitem1");
var prematractflag = model.getValue("/root/main/list2/clod[" + clodrow + "]/matractflag");
var prepayflag = model.getValue("/root/main/list2/clod[" + clodrow + "]/payflag");
grd_clodhist.insertRow(clodrow++, "below", true, true); // ó¹æ Grid¿¡ Çà »ðÀÔ
model.setValue("/root/main/list2/clod[" + clodrow + "]/ediitem1", preediitem1);
model.setValue("/root/main/list2/clod[" + clodrow + "]/matractflag", prematractflag);
model.setValue("/root/main/list2/clod[" + clodrow + "]/payflag", prepayflag);
model.setValue("/root/main/list2/clod[" + clodrow + "]/snglcalcscorcd", model.getValue("/root/hidden/list2/clodsrch/inpCalcScorCd"));
model.setValue("/root/main/list2/clod[" + clodrow + "]/basecd", model.getValue("/root/hidden/list2/clodsrch/inpEDICd"));
var ordfromdd = model.getValue("/root/main/item1/clbs/ordfromdd");
model.setValue("/root/main/list2/clod[" + clodrow + "]/ordfromdd", ordfromdd);
model.setValue("/root/main/list2/clod[" + clodrow + "]/ordtodd", ordfromdd);
grd_clodhist.row = clodrow;
var newcd = model.getValue("/root/hidden/list2/clodstat/cmbAdjtresncd");
if (newcd) {
model.setValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd", newcd);
// ó¹æ Grid ¹è°æ»öÀ» ¼³Á¤ÇÑ´Ù. - Ãß°¡/¼öÁ¤µÈ row
fOrderBkColorNew(clodrow);
} else {
newcd = fSetAdjtResnCd();
if (newcd == "" || newcd == "-") {
grd_clodhist.deleteRow(clodrow, true); // ó¹æ Grid¿¡¼ ÇØ´ç ¶óÀÎÀ» »èÁ¦ÇÑ´Ù.
}
}
}
// --------------------------
// ó¹æ "ó¹æÃß°¡"
// --------------------------
function fOrderGridAddRow() {
var clodrow = grd_clodhist.row;
var preediitem1 = model.getValue("/root/hidden/list2/clodsrch/selectedRdoItem");
var prematractflag = model.getValue("/root/hidden/list2/clodsrch/selectedRdoMatrAct");
var prepayflag = model.getValue("/root/hidden/list2/clodsrch/selectedRdoPay");
if (preediitem1 == "-") {
}
if (prematractflag == "-") {
}
grd_clodhist.addRow(true, true); // ó¹æ Grid¿¡ Çà Ãß°¡
clodrow = grd_clodhist.row;
model.setValue("/root/main/list2/clod[" + clodrow + "]/ediitem1", preediitem1);
model.setValue("/root/main/list2/clod[" + clodrow + "]/matractflag", prematractflag);
model.setValue("/root/main/list2/clod[" + clodrow + "]/payflag", prepayflag);
model.setValue("/root/main/list2/clod[" + clodrow + "]/snglcalcscorcd", model.getValue("/root/hidden/list2/clodsrch/inpCalcScorCd"));
model.setValue("/root/main/list2/clod[" + clodrow + "]/basecd", model.getValue("/root/hidden/list2/clodsrch/inpEDICd"));
var indd = model.getValue("/root/main/item1/clbs/indd");
model.setValue("/root/main/list2/clod[" + clodrow + "]/ordfromdd", indd);
grd_clodhist.row = clodrow;
var newcd = model.getValue("/root/hidden/list2/clodstat/cmbAdjtresncd");
if (newcd) {
model.setValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd", newcd);
// ó¹æ Grid ¹è°æ»öÀ» ¼³Á¤ÇÑ´Ù. - Ãß°¡/¼öÁ¤µÈ row
fOrderBkColorNew(clodrow);
} else {
newcd = fSetAdjtResnCd();
if (newcd == "" || newcd == "-") {
grd_clodhist.deleteRow(clodrow, true); // ó¹æ Grid¿¡¼ ÇØ´ç ¶óÀÎÀ» »èÁ¦ÇÑ´Ù.
}
}
}
// ---------------------------
// ó¹æ "Çà º¹»ç"
// ---------------------------
function fOrderGridCopyRow() {
var clodrow = grd_clodhist.row;
grd_clodhist.insertRow(clodrow++, "below", true, true); // ó¹æ Grid¿¡ Çà »ðÀÔ
model.copyNode("/root/main/list2/clod[" + clodrow + "]", "/root/main/list2/clod[" + (clodrow - 1) + "]");
model.resetInstanceNode("/root/main/list2/clod[" + clodrow + "]/rowstat");
model.resetInstanceNode("/root/main/list2/clod[" + clodrow + "]/cnfmcd");
model.resetInstanceNode("/root/main/list2/clod[" + clodrow + "]/lnunitspclspecyn");
// seqno ¼ÂÆÃ
model.setValue("/root/main/list2/clod[" + clodrow + "]/seqno", model.getValue("/root/main/item1/clbs/maxseqno"));
model.setValue("/root/main/item1/clbs/maxseqno", parseInt(model.getValue("/root/main/item1/clbs/maxseqno")) + 1);
model.setValue("/root/main/list2/clod[" + clodrow + "]/edilnno", "0");
grd_clodhist.refresh();
var newcd = model.getValue("/root/hidden/list2/clodstat/cmbAdjtresncd");
if (newcd) {
model.setValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd", newcd);
} else {
newcd = model.getValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd");
if (newcd) {
model.setValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd", newcd);
} else {
newcd = fSetAdjtResnCd();
if (newcd == "" || newcd == "-") {
grd_clodhist.deleteRow(clodrow, true); // ó¹æ Grid¿¡¼ ÇØ´ç ¶óÀÎÀ» »èÁ¦ÇÑ´Ù.
return;
}
}
}
// ó¹æ Grid ŸÀÌÆ²À» ÀÌ¿ëÇØ¼ sorting ÇÑ °æ¿ì ÁÙ¹øÈ£°¡ ÇöÀç Á¤·ÄµÈ ¼ø¼´ë·Î ºÎ¿©µÇ¹Ç·Î ´Ù½Ã sortÇÏ¿© ó¸®ÇÑ´Ù.
fSetOrderLnNo();
// ó¹æ Ç׸ñ ±¸ºÐ ¹× ¼±º°½É»ç ó¹æ »ö±ò ±¸ºÐ
// fSetOrderData();
// ó¹æ Á¶È¸ºÎ - ÀçÇà/±Þ¿©/Ç׸ñ±¸ºÐ Radio ¼±Åÿ¡ µû¶ó ó¹æ ³»¿ªÀ» º¸¿©ÁØ´Ù.
// / fGetSelectedOrderData();
}
// -----------------------------
// ó¹æ "Çà »èÁ¦"
// -----------------------------
function fOrderGridDeleteRow() {
if (grd_clodhist.selectedRows == 1) { // ÇÑÁÙÀ» »èÁ¦ÇÏ´Â °æ¿ì
// ó¹æ GridÀÇ ÀϺ¯¹øÈ£¿Í ¼ö°¡ÄÚµå
var clodrow = grd_clodhist.row;
var clodSeqno = model.getValue("/root/main/list2/clod[" + clodrow + "]/seqno");
if (clodSeqno) {
var newcd = model.getValue("/root/hidden/list2/clodstat/cmbAdjtresncd");
if (newcd) {
model.setValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd", newcd);
} else {
newcd = model.getValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd");
if (newcd == "") {
newcd = fSetAdjtResnCd();
if (newcd == "" || newcd == "-") {
return;
}
}
}
}
// ÇØ´ç ƯÁ¤³»¿ªÀ» »èÁ¦ÇÑ´Ù.
if (model.getValue("/root/main/list2/clod[" + clodrow + "]/cnfmcd") || model.getValue("/root/main/list2/clod[" + clodrow + "]/lnunitspclspecyn")) {
// È®ÀÎÄÚµå 'JT001'ÀÌ ÀԷµǰųª ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ÀÔ·ÂµÈ °æ¿ì
for ( var j = 1; j < grd_clsphist.rows; j++) {
var spclClodseqno = model.getValue("/root/main/list3/clsp[" + j + "]/clodseqno");
if (spclClodseqno == clodSeqno) { // ±âÁ¸¿¡ ÀÌ¹Ì »èÁ¦µÈ ƯÁ¤³»¿ªµµ ÇÔ²² »èÁ¦Çؼ, "»èÁ¦Ãë¼Ò" ¶§¿¡µµ °°ÀÌ º¹±¸µÇ°í, ´Ù½Ã »ç¿ëÀÚ°¡ ÇÊ¿ä¾ø´Â ³»¿ªÀ» »èÁ¦Çϵµ·Ï ÇÑ´Ù.
var clodstatus = grd_clodhist.rowstatus(clodrow);
if (clodstatus != 1 && clodstatus != 3) {
grd_clsphist.rowstatus(j) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
} else {
grd_clsphist.deleteRow(j, false);
}
}
}
}
// ±âÁ¸ÀÔ·ÂµÈ Ã³¹æ»èÁ¦½Ã ÈÞÁöÅë¿¡ ´ã´Â´Ù.
var clodstatus = grd_clodhist.rowstatus(clodrow);
if (clodstatus != 1 && clodstatus != 3) {
// ó¹æ Grid¿¡¼ Çà »èÁ¦ / ó¹æÈÞÁöÅë Grid¿¡ Çà »ðÀÔ
var delclodrow = grd_delclod.rows - 1;
grd_delclod.insertRow(delclodrow++, true); // ó¹æÈÞÁöÅë Grid¿¡ Çà »ðÀÔ
model.copyNode("/root/main/list6/delclod[" + delclodrow + "]", "/root/main/list2/clod[" + clodrow + "]"); // desc, sorce
if (clodstatus == 0 || clodstatus == 2) { // 0 : new, 2 : update
grd_delclod.rowstatus(grd_delclod.row) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
} else {
grd_delclod.rowstatus(grd_delclod.row) = 0;
}
}
grd_delclod.refresh();
grd_clodhist.rowstatus(clodrow) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
grd_clodhist.rowHidden(clodrow) = true; // deleteµÈ°ÍÀº rowHidden ½ÃŲ´Ù.
grd_clodhist.row = clodrow;
} // if (grd_clodhist.selectedRows == 1) // ÇÑÁÙ »èÁ¦
else if (grd_clodhist.selectedRows > 1) { // ¿©·¯ÁÙÀ» »èÁ¦ÇÏ´Â °æ¿ì
// ½É»ç»çÀ¯, Á¶Á¤»çÀ¯, ¼öÁ¤»çÀ¯ ÀÔ·Â
var clodrow = grd_clodhist.row;
var newcd = model.getValue("/root/hidden/list2/clodstat/cmbAdjtresncd");
if (newcd == "") {
var oldcd = model.getValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd");
model.resetInstanceNode("/root/hidden/sppiz01000");
model.setValue("/root/hidden/sppiz01000/cond/cdcls", "aftin");
model.setValue("/root/hidden/sppiz01000/cond/cdid", oldcd);
modal("SPPIZ01000", "1", "550", "450", "SPPIZ01000", "/root/hidden/sppiz01000/cond", "/root/hidden/sppiz01000/cond", "", ""); // SPPIZ01000_½É»ç¼öÁ¤»çÀ¯°ü¸®.xrw
newcd = model.getValue("/root/hidden/sppiz01000/rslt/cdid");
newdesc = model.getValue("/root/hidden/sppiz01000/rslt/adjtresndesc");
if (newcd == "" || newcd == "-") {
return;
}
}
for ( var i = 0; i < grd_clodhist.selectedRows; i++) {
var clodrow = grd_clodhist.selectedrow(i);
if (clodrow > 0) { // ŸÀÌÆ² ºÎºÐ¿¡ setValue ÇÏ°Ô µÇ¾î ¿¡·¯ ¹ß»ýÇÔ
var seqno = model.getValue("/root/main/list2/clod[" + clodrow + "]/seqno");
if (newcd != model.getValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd")) {
if (grd_clodhist.rowStatus(clodrow) == 0) { // 0 : new, 2 : update
grd_clodhist.rowStatus(clodrow) = 2;
}
}
model.setValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd", newcd);
model.setValue("/root/main/list2/clod[" + clodrow + "]/adjtresndesc", newdesc);
// ÇØ´ç ƯÁ¤³»¿ªÀ» »èÁ¦ÇÑ´Ù.
if (model.getValue("/root/main/list2/clod[" + clodrow + "]/cnfmcd") || model.getValue("/root/main/list2/clod[" + clodrow + "]/lnunitspclspecyn")) {
// È®ÀÎÄÚµå 'JT001'ÀÌ ÀԷµǰųª ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ÀÔ·ÂµÈ °æ¿ì
for ( var j = 1; j < grd_clsphist.rows; j++) {
var spcClodseqno = model.getValue("/root/main/list3/clsp[" + j + "]/clodseqno");
if (spcClodseqno == "") { // ÀÔ·ÂµÈ ÁÙ¹øÈ£°¡ ¾ø´Â °æ¿ì Á¦¿Ü
} else if (spcClodseqno == "0") { // ¸íÀÏ·Ã ´ÜÀ§´Â Á¦¿Ü
} else if (spcClodseqno == seqno) { // ±âÁ¸¿¡ ÀÌ¹Ì »èÁ¦µÈ ƯÁ¤³»¿ªµµ ÇÔ²² »èÁ¦Çؼ, "»èÁ¦Ãë¼Ò" ¶§¿¡µµ °°ÀÌ º¹±¸µÇ°í, ´Ù½Ã »ç¿ëÀÚ°¡ ÇÊ¿ä¾ø´Â ³»¿ªÀ» »èÁ¦Çϵµ·Ï ÇÑ´Ù.
grd_clsphist.rowstatus(j) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
}
}
// ±âÁ¸ÀÔ·ÂµÈ Ã³¹æ»èÁ¦½Ã ÈÞÁöÅë¿¡ ´ã´Â´Ù.
var clodstatus = grd_clodhist.rowstatus(clodrow);
if (clodstatus != 1 && clodstatus != 3) {
var delclodrow = grd_delclod.rows - 1;
grd_delclod.insertRow(delclodrow++, true); // ó¹æÈÞÁöÅë Grid¿¡ Çà »ðÀÔ
model.copyNode("/root/main/list6/delclod[" + delclodrow + "]", "/root/main/list2/clod[" + clodrow + "]"); // desc, sorce
var clodstatus = grd_clodhist.rowstatus(clodrow);
if (clodstatus == 0 || clodstatus == 2) { // 0 : new, 2 : update
grd_delclod.rowstatus(grd_delclod.row) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
} else {
grd_delclod.rowstatus(grd_delclod.row) = 0;
}
}
if (model.getValue("/root/main/list2/clod[" + clodrow + "]/updtdd")) {
updtdd = model.getValue("/root/main/list2/clod[" + clodrow + "]/updtdd");
}
grd_clodhist.rowstatus(clodrow) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
grd_clodhist.rowHidden(clodrow) = true; // deleteµÈ°ÍÀº rowHidden ½ÃŲ´Ù.
}
}
grd_delclod.refresh();
} // if (grd_clodhist.selectedRows > 1) // ¿©·¯ÁÙ »èÁ¦
}
// -------------------------------
// ó¹æ "»èÁ¦ Ãë¼Ò"
// -------------------------------
function fOrderGridDeleteCancel() {
var delclodrow = grd_delclod.row;
var delseqno = model.getValue("/root/main/list6/delclod[" + delclodrow + "]/seqno");
var delclodCalcscorcd = model.getValue("/root/main/list6/delclod[" + delclodrow + "]/snglcalcscorcd");
var isSpclChange = false; // ƯÁ¤³»¿ª ÁÙ¹øÈ£µµ º¯°æµÈ °æ¿ì, ó¹æ ÁÙ¹øÈ£¿¡ ¸ÂÃç Æ¯Á¤³»¿ª ÁÙ¹øÈ£°¡ ¸ðµÎ º¯°æµÈ
// ´ÙÀ½ ´Ù½Ã Á¤·ÄÇÑ´Ù.
if (model.getValue("/root/main/list6/delclod[" + delclodrow + "]/cnfmcd") || model.getValue("/root/main/list6/delclod[" + delclodrow + "]/lnunitspclspecyn")) {
var clsprow = grd_clsphist.findRow(delseqno, 1, grd_clsphist.colRef("clodseqno"), false, true);
grd_clsphist.rowstatus(clsprow) = 0;
isSpclChange = true;
}
var clodrow = grd_clodhist.findRow(delseqno, 1, grd_clodhist.colRef("seqno"), false, true);
grd_clodhist.rowstatus(clodrow) = 0;
grd_clodhist.rowHidden(clodrow) = false;
grd_delclod.deleteRow(delclodrow, true); // ó¹æÈÞÁöÅë Grid¿¡¼ ÇØ´ç ¶óÀÎÀ» »èÁ¦ÇÑ´Ù.
fSetOrderLnNo();
if (isSpclChange) { // ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ÀÔ·ÂµÈ °æ¿ì ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
}
grd_clsphist.refresh();
grd_clodhist.refresh();
grd_delclod.refresh();
}
// È®ÀÎÄÚµå, ºÐ¾÷¿¹¿ÜÄÚµå °Ëü°Ë»çÀ§Å¹, ÁØ¿ëÄڵ带 ƯÁ¤³»¿ª¿¡ ÀÚµ¿À¸·Î Ãß°¡ÇÑ´Ù.
function fSetNewCnfmCd() {
var isClspChange = false;
for ( var i = 1; i < grd_clodhist.rows; i++) {
var rowstatus = grd_clodhist.rowstatus(i);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
// 1.È®ÀÎÄÚµå : JT001 : È®ÀÎÄÚµå : X(5) : ¿©·¯°³ ¹ß»ý½Ã '/' ·Î ±¸ºÐ
// 2.ºÐ¾÷¿¹¿ÜÄÚµå : JS002 : ºÐ¾÷¿¹¿ÜÄÚµå : 9(2)
// 3.°Ëü°Ë»çÀ§Å¹ : JS005 : ¼öʱâ°ü±âÈ£/°Ë»çÀÇ·ÚÀÏ(ccccyymmdd) : 9(8)/cyymmdd
// À§Å¹°è¾à󱸺ÐÄÚµå(-:ÇØ´ç¾øÀ½,1:°Ëü°Ë»çÀ§Å¹,2:½Ã¼³°øµ¿ÀÌ¿ë,3:°³¹æº´¿øÁø·á,4:À§Å¹Áø·á)
// 4.ÁØ¿ëÄÚµå : JS009 : ÁØ¿ë¸í : X(700)
var seqno = model.getValue("/root/main/list2/clod[" + i + "]/seqno");
var cnfmcd = model.getValue("/root/main/list2/clod[" + i + "]/cnfmcd");
var basecd = model.getValue("/root/main/list2/clod[" + i + "]/basecd");
var hosinresncd = model.getValue("/root/main/list2/clod[" + i + "]/hosinresncd");
var trustinstno = model.getValue("/root/main/item5/mech/trustinstno");
var clamspclcd = model.getValue("/root/main/item5/mech/clamspclcd");
var okmsg = ""
var spclcd = "";
var cdnm = "";
var spclspec = "";
var spclformat = "";
var detldesc = "";
if (cnfmcd) {
okmsg = "È®ÀÎÄÚµå";
spclcd = "JT001";
cdnm = "È®ÀÎÄÚµå";
spclspec = cnfmcd;
spclformat = "X(5)";
detldesc = "Áø·áÇàÀ§¿¡ ´ëÇÑ Ãß°¡±â¼ú »çÇ×À» ±¸ºÐÇÏ´Â ÄÚµå·Î¼ È®ÀÎÄڵ尡 ¿©·¯°³ ¹ß»ýÇÒ °æ¿ì '/'·Î ±¸ºÐÇÏ¿© ±âÀç";
}
/*
* else if (hosinresncd != "" && hosinresncd != '00' && hosinresncd !=
* '-'){ okmsg = "ºÐ¾÷¿¹¿ÜÄÚµå"; spclcd = "JS002"; cdnm = "ºÐ¾÷¿¹¿ÜÄÚµå";
* spclspec = hosinresncd; spclformat = "9(2)"; detldesc = "ÀǾàºÐ¾÷
* ¿¹¿Ü»çÇ× ¹ß»ýÀ¸·Î ÀÇ·á±â°ü¿¡¼ ¿ø³» Á¶Á¦/Åõ¾àÀÌ ÀÌ·ç¾îÁø °æ¿ì ÇØ´ç ¿¹¿Ü±¸ºÐÄڵ带 ±âÀçÇϰí, ¿ø¿Ü󹿹ßÇà±â¿¡¼
* ÅðÀ广ÁöÀǾàǰ ¿ø¿Üó¹æ½Ã ÇØ´çÀǾàǰÀÇ »ç¿ëÀå·Áºñ¸¦ û±¸ÇÒ °æ¿ì ±¸ºÐÄÚµå 99¸¦ ±âÀç"; }
*/
else if (trustinstno != "" && clamspclcd == "1") {
okmsg = "°Ëü°Ë»çÀ§Å¹";
spclcd = "JS005";
cdnm = "°Ëü°Ë»çÀ§Å¹";
spclspec = trustinstno + "/" + model.getValue("/root/main/list2/clod[" + i + "]/ordfromdd");
spclformat = "9(8)/ccyymmdd";
detldesc = "¼öʱâ°ü¿¡ °Ëü°Ë»ç¸¦ ÀÇ·ÚÇÑ °æ¿ì ¼öʱâ°ü±âÈ£¿Í °Ë»çÀÇ·ÚÀÏÀ» ±âÀç";
} else if (basecd == "JJJJJJ") {
okmsg = "ÁØ¿ë¸í";
spclcd = "JS009";
cdnm = "ÁØ¿ë¸í";
spclspec = model.getValue("/root/main/list2/clod[" + i + "]/hngnm");
spclformat = "X(700)";
detldesc = "»ó´ë°¡Ä¡Á¡¼öÇ¥¿¡ ºÐ·ùµÇÁö ¾ÊÀº Ç׸ñÀ» »ó´ë°¡Ä¡Á¡¼öÇ¥»óÀÇ ºñ½ÁÇÑ Áø·áÇàÀ§·Î ÁØ¿ëÇÏ¿© 'JJJJJJ'ÄÚµå·Î û±¸½Ã Áø·áÇàÀ§¸í°ú »êÃâ½ÄÀ» ±âÀçÇϰí, ÇÑÀÇ»çÀÇ ÀÓÀÇó¹æ û±¸½Ã¿¡´Â ÀÓÀÇ Ã³¹æ¸íÀ» ±âÀç";
}
if (okmsg) {
var isFind = false;
var edilnno = model.getValue("/root/main/list2/clod[" + i + "]/edilnno");
if (edilnno == "" || edilnno == "0") {
if (isFind == false) { // ±âÁ¸¿¡ ¾ø¾ú´ø °æ¿ì
var clsprow = grd_clsphist.rows - 1; // ƯÁ¤³»¿ª Grid °¡Àå
// ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
grd_clsphist.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/unitflag", "J");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/edilnno", edilnno);
// CLSP Å×À̺íÀÇ calcscorcd Ä÷³¿¡ CLOD Å×À̺íÀÇ basecd Ä÷³ °ª ³Ö¾îÁÖ±â·Î
// º¯°æÇÔ
model.setValue("/root/main/list3/clsp[" + clsprow + "]/snglcalcscorcd", model.getValue("/root/main/list2/clod[" + i + "]/snglcalcscorcd"));
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclcd", spclcd);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/cdnm", cdnm);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclspec", spclspec);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclformat", spclformat);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/detldesc", detldesc);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldedilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clodseqno", seqno);
model.setValue("/root/main/list2/clod[" + i + "]/lnunitspclspecyn", "*");
grd_clsphist.row = clsprow;
isClspChange = true;
}
model.setValue("/root/hidden/list3/msgspclformat", cdnm + " - " + spclcd + " / " + "ÀÔ·ÂÄڵ峻¿ª : " + spclspec + " / ±âÀçÇü½Ä : " + spclformat);
model.refreshpart("/root/hidden/list3/msgspclformat");
}
}
}
}
// Ãß°¡µÈ ó¹æÀÌ ½Ì±ÛÄÚµåÀÎ °æ¿ì ¼ö°¡¸¶½ºÅÍ / ±×·ìÄÚµåÀÎ °æ¿ì ±×·ì¸¶½ºÅÍ¿¡ ÀÔ·ÂµÈ È®ÀÎÄڵ带 ÀÚµ¿¹ß»ý½ÃŲ °æ¿ì
if (isClspChange == true) {
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
grd_clsphist.refresh();
grd_clodhist.refresh();
}
}
// ƯÁ¤³»¿ª Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "Çà Ãß°¡"
function fSpclGridInsertRow() {
// ƯÁ¤³»¿ª Grid »ó¿¡¼ Á÷Á¢ ÇàÀ» Ãß°¡ÇÏ´Â °æ¿ì : ¸í¼¼¼´ÜÀ§ ƯÁ¤³»¿ª¸¸À» Ãß°¡ÇÒ ¼ö ÀÖ´Ù.
// ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÇ °æ¿ì, ó¹æ Grid¿¡¼ 'T' Ä÷³À» ´õºíŬ¸¯ÇÏ¿© ƯÁ¤³»¿ª »ó¼¼°ü¸® PopupÀ» ÅëÇØ ÀÔ·ÂÇÑ´Ù.
var clsprow = grd_clsphist.rows - 1; // ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
grd_clsphist.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/unitflag", "M");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/edilnno", "0"); // ±¸ºÐ, ÁÙ¹øÈ£, ¼öÁ¤»óÅÂ, ƯÁ¤³»¿ªÄÚµå ¼øÀ¸·Î sort ó¸® ÇϹǷÎ
grd_clsphist.row = clsprow;
}
// ƯÁ¤³»¿ª Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "Çà »èÁ¦"
function fSpclGridDeleteRow() {
// ¿©·¯ row¸¦ µ¿½Ã¿¡ ¼±ÅÃÇÏ°í »èÁ¦ÇÏ´Â ±â´ÉÀ» ºÎ¿©ÇÑ´Ù.
for ( var i = 0; i < grd_clsphist.selectedRows; i++) {
var row = grd_clsphist.selectedrow(i);
// var row = grd_clsphist.row;
// ÁÙ¹øÈ£°¡ ºÎ¿©µÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ »èÁ¦µÈ °æ¿ì, ó¹æGridÀÇ 'T' Ä÷³ÀÇ "*" ¸¦ »èÁ¦ÇÑ´Ù.
var clodseqno = model.getValue("/root/main/list3/clsp[" + row + "]/clodseqno");
if (clodseqno != "" && clodseqno != "0") { // ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÇ °æ¿ì
var spclcd = model.getValue("/root/main/list3/clsp[" + row + "]/spclcd");
if (spclcd == "JT001") { // È®ÀÎÄڵ带 »èÁ¦ÇÑ °æ¿ì
for ( var j = 1; j < grd_clodhist.rows; j++) {
var seqno = model.getValue("/root/main/list2/clod[" + j + "]/seqno");
if (clodseqno == seqno) {
model.resetInstanceNode("/root/main/list2/clod[" + j + "]/cnfmcd");
j = grd_clodhist.rows;
}
}
} else {
var isSameLn = false;
for ( var j = 1; j < grd_clsphist.rows; j++) {
var clspclodseqno = model.getValue("/root/main/list3/clsp[" + j + "]/clodseqno");
var spclcd = model.getValue("/root/main/list3/clsp[" + j + "]/spclcd");
if (clspclodseqno == "") { // ÀÔ·ÂµÈ ÁÙ¹øÈ£°¡ ¾ø´Â °æ¿ì Á¦¿Ü
} else if (clspclodseqno == "0") { // ¸íÀÏ·Ã ´ÜÀ§´Â Á¦¿Ü
} else if (clspclodseqno == clodseqno && j != row
&& grd_clsphist.rowstatus(j) != 4
&& spclcd != "JT001") {
isSameLn = true; // °°Àº ÁÙ¹øÈ£¿¡ ¿©·¯°³ÀÇ Æ¯Á¤³»¿ªÀÌ ÀÖ´Â °æ¿ìÀÓ
j = grd_clsphist.rows;
}
}
if (isSameLn == false) { // µ¿ÀÏÇÑ ÁÙ¹øÈ£ÀÇ Æ¯Á¤³»¿ªÀÌ ¾ø´Â °æ¿ì
for ( var j = 1; j < grd_clodhist.rows; j++) {
var seqno = model.getValue("/root/main/list2/clod[" + j + "]/seqno");
if (seqno == clodseqno) {
model.resetInstanceNode("/root/main/list2/clod[" + j + "]/lnunitspclspecyn");
grd_clodhist.cellStyle("background-color", j, grd_clodhist.colRef("lnunitspclspecyn")) = "#ffffff"; // #ffffff = White
j = grd_clodhist.rows;
}
}
}
}
}
var unitflag = model.getValue("/root/main/list3/clsp[" + row + "]/unitflag");
var rowstatus = grd_clsphist.rowstatus(row);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
model.resetInstanceNode("/root/main/list3/clsp[" + row + "]/spclcd");
model.resetInstanceNode("/root/main/list3/clsp[" + row + "]/spclspec");
// grd_clsphist.deleteRow(row, false); // ÇØ´ç ¶óÀÎÀ» Grid¿¡¼ »èÁ¦ÇÑ´Ù.
} else { // 0 : new, 2 : update
grd_clsphist.rowstatus(row) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
model.setValue("/root/main/list3/clsp[" + row + "]/insntstat", "D");
}
if (unitflag == "M") { // ¸í¼¼¼ ´ÜÀ§ ƯÁ¤³»¿ªÀÇ °æ¿ì
// ƯÁ¤ÄÚµå MT015, MT016, MT004 Á¤º¸°¡ ÀÔ·ÂµÈ È¯ÀÚÀÎÁö¸¦ È®ÀÎÇÑ´Ù.
fCheckSpclSpecData();
}
}
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
model.resetInstanceNode("/root/hidden/list3/msgspclformat");
model.refreshpart("/root/hidden/list3/msgspclformat");
grd_clodhist.refresh();
grd_clsphist.refresh();
}
//ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀ» ¼öÁ¤/ÀÔ·ÂÇÑ´Ù.
function fSetLnUnitSpclSpec() { // 'T' ÇÊµå ´õºíŬ¸¯½Ã È£ÃâÇÑ´Ù.
model.removeNodeset("/root/hidden/sppiz00500/rslt"); // SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸® ¿¡¼ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
model.removeNodeset("/root/hidden/sppiz00500/cond");
var row = grd_clodhist.row;
// ó¹æ Grid¿¡¼ ÁÙ¹øÈ£°¡ ºÎ¿©µÈ °æ¿ì
var seqno = model.getValue("/root/main/list2/clod[" + row + "]/seqno");
var edilnno = model.getValue("/root/main/list2/clod[" + row + "]/edilnno");
// CLSP Å×À̺íÀÇ calcscorcd Ä÷³¿¡ CLOD Å×À̺íÀÇ basecd Ä÷³ °ª ³Ö¾îÁÖ±â·Î º¯°æÇÔ
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd");
if (seqno != "0") {
var lnunitspclspecyn = model.getValue("/root/main/list2/clod[" + row + "]/lnunitspclspecyn");
if (lnunitspclspecyn == "") {
model.makeValue("/root/hidden/sppiz00500/cond/flag", "I");
model.makeValue("/root/hidden/sppiz00500/cond/snglcalcscorcd", snglcalcscorcd);
model.makeValue("/root/hidden/sppiz00500/cond/edilnno", "0");
model.makeValue("/root/hidden/sppiz00500/cond/clodseqno", seqno);
model.makeNode("/root/hidden/sppiz00500/cond/spclcd");
model.makeNode("/root/hidden/sppiz00500/cond/detldesc");
model.makeNode("/root/hidden/sppiz00500/cond/spclspec");
model.makeNode("/root/hidden/sppiz00500/cond/spclformat");
model.makeNode("/root/hidden/sppiz00500/cond/rownum");
model.makeNode("/root/hidden/sppiz00500/cond/cdnm");
model.makeValue("/root/hidden/sppiz00500/cond/unitflag", "J");
} else { // ±âÁ¸¿¡ ÀÔ·ÂµÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ÀÖ´Â °æ¿ì
var rowcnt = 1;
var setrow = 0;
for (var i = 1; i < grd_clsphist.rows; i++) {
var spcClodseqno = model.getValue("/root/main/list3/clsp[" + i + "]/clodseqno");
if (spcClodseqno == seqno) {
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
if (spclcd != "" && spclcd != "JT001" && grd_clsphist.rowstatus(i) != 4) { // È®ÀÎÄڵ尡 ¾Æ´Ñ °æ¿ì
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/flag", "");
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/rownum", i);
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/snglcalcscorcd", model.getValue("/root/main/list3/clsp[" + i + "]/snglcalcscorcd"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/clodseqno", model.getValue("/root/main/list3/clsp[" + i + "]/clodseqno"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/edilnno", model.getValue("/root/main/list3/clsp[" + i + "]/edilnno"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/spclcd", spclcd);
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/spclspec", model.getValue("/root/main/list3/clsp[" + i + "]/spclspec"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/spclformat", model.getValue("/root/main/list3/clsp[" + i + "]/spclformat"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/cdnm", model.getValue("/root/main/list3/clsp[" + i + "]/cdnm"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/detldesc", model.getValue("/root/main/list3/clsp[" + i + "]/detldesc"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/oldspclcd", spclcd);
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/oldspclspec", model.getValue("/root/main/list3/clsp[" + i + "]/spclspec"));
// ƯÁ¤³»¿ª »ó¼¼ ȸ鿡 º¸¿©Á٠ƯÁ¤³»¿ª ¼±ÅÃ
setrow = i; // ÁÙ´ÜÀ§ÀÇ °æ¿ì °¡Àå ¸¶Áö¸· row·Î ¼³Á¤ÇÑ´Ù.
rowcnt = rowcnt + 1;
}
}
}
model.makeValue("/root/hidden/sppiz00500/cond/flag", "");
model.makeValue("/root/hidden/sppiz00500/cond/snglcalcscorcd", snglcalcscorcd);
model.makeValue("/root/hidden/sppiz00500/cond/clodseqno", seqno);
model.makeValue("/root/hidden/sppiz00500/cond/edilnno", edilnno);
model.makeValue("/root/hidden/sppiz00500/cond/spclcd", model.getValue("/root/main/list3/clsp[" + setrow + "]/spclcd"));
model.makeValue("/root/hidden/sppiz00500/cond/detldesc", model.getValue("/root/main/list3/clsp[" + setrow + "]/detldesc"));
model.makeValue("/root/hidden/sppiz00500/cond/spclspec", model.getValue("/root/main/list3/clsp[" + setrow + "]/spclspec"));
model.makeValue("/root/hidden/sppiz00500/cond/spclformat", model.getValue("/root/main/list3/clsp[" + setrow + "]/spclformat"));
model.makeValue("/root/hidden/sppiz00500/cond/rownum", setrow);
model.makeValue("/root/hidden/sppiz00500/cond/cdnm", model.getValue("/root/main/list3/clsp[" + setrow + "]/cdnm"));
model.makeValue("/root/hidden/sppiz00500/cond/unitflag", "J");
}
modal("SPPIZ00500", "1", "10", "10", "SPPIZ00500", "/root/hidden/sppiz00500", "/root/hidden/clsp", "", ""); // SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw
var rsltcnt = getNodesetCount("/root/hidden/sppiz00500/rslt/list");
// ó¸® °Ç¼ö
if (rsltcnt > 0) {
for (var i = rsltcnt; i > 0; i--) {
var flag = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/flag");
var rownum = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/rownum");
var newspclcd = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/spclcd");
var newcdnm = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/cdnm");
var newspclspec = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/spclspec");
var newspclformat = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/spclformat ");
var newdetldesc = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/detldesc");
// ƯÁ¤ÄÚµå Ãß°¡ÀÎ °æ¿ì
if (flag == "I") {
var clsprow = grd_clsphist.rows - 1; // ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸·
// ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
grd_clsphist.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/unitflag", "J");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clodseqno", seqno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/edilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/snglcalcscorcd", snglcalcscorcd);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclcd", newspclcd);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/cdnm", newcdnm);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclspec", newspclspec);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclformat", newspclformat);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/detldesc", newdetldesc);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldedilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldspclcd", "");
model.setValue("/root/hidden/list3/msgspclformat", "ƯÁ¤³»¿ªÄÚµå: " + newspclcd + " / ƯÁ¤³»¿ª¸íĪ: " + newcdnm + " / ±âÀç³»¿ª: " + newspclspec + " / ±âÀçÇü½Ä: " + newspclformat);
// ƯÁ¤ÄÚµå º¯°æÀÎ °æ¿ì
} else if (flag == "U") {
model.setValue("/root/main/list3/clsp[" + rownum + "]/snglcalcscorcd", snglcalcscorcd);
model.setValue("/root/main/list3/clsp[" + rownum + "]/spclcd", newspclcd);
model.setValue("/root/main/list3/clsp[" + rownum + "]/cdnm", newcdnm);
model.setValue("/root/main/list3/clsp[" + rownum + "]/spclspec", newspclspec);
model.setValue("/root/main/list3/clsp[" + rownum + "]/spclformat", newspclformat);
model.setValue("/root/main/list3/clsp[" + rownum + "]/detldesc", newdetldesc);
grd_clsphist.refresh();
// ƯÁ¤ÄÚµå, ƯÁ¤³»¿ªÀÌ º¯°æµÇ¾ú°Å³ª »èÁ¦µÈ ƯÁ¤Äڵ带 Á¶È¸ÇÏ¿© "È®ÀÎ"À» ¼±ÅÃÇÑ °æ¿ì
var oldspclcd = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/oldspclcd");
var oldspclspec = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/oldspclspec");
var rowstatus = grd_clsphist.rowstatus(rownum);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clsphist.rowstatus(rownum) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
// }
model.setValue("/root/hidden/list3/msgspclformat", "ƯÁ¤³»¿ªÄÚµå: " + newspclcd + " / ƯÁ¤³»¿ª¸íĪ: " + newcdnm + " / ±âÀç³»¿ª: " + newspclspec + " / ±âÀçÇü½Ä: " + newspclformat);
// ƯÁ¤ÄÚµå »èÁ¦ÀÎ °æ¿ì
} else if (flag == "D" && rownum != "") {
// ƯÁ¤³»¿ª Grid¿¡¼ »èÁ¦
var rowstatus = grd_clsphist.rowstatus(rownum);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
grd_clsphist.deleteRow(rownum, false); // ÇØ´ç ¶óÀÎÀ» Grid¿¡¼ »èÁ¦ÇÑ´Ù.
} else { // 0 : new, 2 : update
grd_clsphist.rowstatus(rownum) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
grd_clsphist.row = rownum;
model.setValue("/root/hidden/list3/msgspclformat", "ÀÔ·ÂµÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ¾ø½À´Ï´Ù.");
} // ƯÁ¤ ÄÚµå »óÅ µû¸¥ if end
} // for end
var cnt = 0;
var jx999cnt = 0;
var nonjx999cnt = 0; // JX999°¡ ¾Æ´Ñ ƯÁ¤³»¿ªÄÚµåÀÇ ¼ö
for (var i = 1; i < grd_clsphist.rows; i++) {
if (grd_clsphist.rowstatus(i) != 4) {
var spclClodseqno = model.getValue("/root/main/list3/clsp[" + i + "]/clodseqno");
if (spclClodseqno == seqno) {
cnt++;
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
if (spclcd == "JX999") { // JX999ÀÎ °æ¿ì
jx999cnt++;
} else if (spclcd != "JT001") { // JX999µµ, È®ÀÎÄڵ嵵 ¾Æ´Ñ °æ¿ì
nonjx999cnt++;
}
}
}
}
if (cnt > 0) {
model.setValue("/root/main/list2/clod[" + row + "]/lnunitspclspecyn", "*");
if (jx999cnt > 0) {
if (nonjx999cnt == 0) { // JX999¸¸ ÀÖ´Â °æ¿ì
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#f7a08b"; // class="color_6" ´ÙÈ«»ö
} else { // JX999 + ´Ù¸¥ Äڵ嵵 ÀÖ´Â °æ¿ì
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#b5a5d1"; // ¿¬ÇÑ º¸¶ó»ö
}
} else {
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#ffffff"; // #ffffff = White
}
} else {
model.resetInstanceNode("/root/main/list2/clod[" + row + "]/lnunitspclspecyn");
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#ffffff"; // #ffffff= White
}
} // ó¸® °Ç¼ö if end
// model.refresh();
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
grd_clodhist.refresh();
grd_clsphist.refresh();
fSaveClspList();
} else {
messageBox("ÁÙ¹øÈ£°¡ ºÎ¿©µÇÁö ¾Ê¾ÒÀ¸¸ç ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ", "I004"); // /ÁÙ¹øÈ£°¡ ºÎ¿©µÇÁö ¾Ê¾ÒÀ¸¸ç
// ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ
// ¾ø½À´Ï´Ù.
}
}
// ¸í¼¼¼´ÜÀ§ ƯÁ¤³»¿ªÀ» ¼öÁ¤/ÀÔ·Â
function fSetDocRefLnSpclSpec() { // ƯÁ¤³»¿ª GridÀÇ row ´õºíŬ¸¯½Ã È£ÃâÇÑ´Ù.
model.removeNodeset("/root/hidden/sppiz00500/rslt"); // SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®
// ¿¡¼ ¼±ÅÃµÈ °á°ú°¡
// copyNodeµÇ´Â °æ·ÎÀÓ
model.removeNodeset("/root/hidden/sppiz00500/cond");
var row = grd_clsphist.row;
var clodseqno = model.getValue("/root/main/list3/clsp[" + row + "]/clodseqno");
var edilnno = model.getValue("/root/main/list3/clsp[" + row + "]/edilnno");
var snglcalcscorcd = model.getValue("/root/main/list3/clsp[" + row + "]/snglcalcscorcd");
var unitflag = model.getValue("/root/main/list3/clsp[" + row + "]/unitflag");
if (unitflag == "J") {
// »èÁ¦»óÅÂÀÎ °æ¿ì ó¹æGrid¿¡¼ ÀÔ·Â,¼öÁ¤Àº °¡´ÉÇÏÁö¸¸ ƯÁ¤³»¿ªGrid¿¡¼´Â ÆíÁýÇÒ ¼ö ¾ø´Ù.
var rowstatus = grd_clsphist.rowstatus(row);
if (rowstatus == 4) { // 4 : delete
messageBox("»èÁ¦µÈ ƯÁ¤³»¿ªÀº ¼öÁ¤ÇÒ ¼ö", "I004"); // /»èÁ¦µÈ ƯÁ¤³»¿ªÀº ¼öÁ¤ÇÒ ¼ö ¾ø½À´Ï´Ù.
return;
}
}
var rowcnt = 1;
for (var i = 1; i < grd_clsphist.rows; i++) {
var spclclodseqno = model.getValue("/root/main/list3/clsp[" + i + "]/clodseqno");
if (spclclodseqno == clodseqno) {
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
if (spclcd != "" && spclcd != "JT001" && grd_clsphist.rowstatus(i) != 4) { // È®ÀÎÄڵ尡 ¾Æ´Ñ °æ¿ì
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/flag", "");
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/rownum", i);
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/snglcalcscorcd", model.getValue("/root/main/list3/clsp[" + i + "]/snglcalcscorcd"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/clodseqno", model.getValue("/root/main/list3/clsp[" + i + "]/clodseqno"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/edilnno", model.getValue("/root/main/list3/clsp[" + i + "]/edilnno"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/spclcd", spclcd);
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/spclspec", model.getValue("/root/main/list3/clsp[" + i + "]/spclspec"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/spclformat", model.getValue("/root/main/list3/clsp[" + i + "]/spclformat"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/cdnm", model.getValue("/root/main/list3/clsp[" + i + "]/cdnm"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/detldesc", model.getValue("/root/main/list3/clsp[" + i + "]/detldesc"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/oldspclcd", spclcd);
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/oldspclspec", model.getValue("/root/main/list3/clsp[" + i + "]/spclspec"));
rowcnt = rowcnt + 1;
}
}
}
model.makeValue("/root/hidden/sppiz00500/cond/flag", "");
model.makeValue("/root/hidden/sppiz00500/cond/snglcalcscorcd", snglcalcscorcd);
model.makeValue("/root/hidden/sppiz00500/cond/edilnno", clodseqno);
model.makeValue("/root/hidden/sppiz00500/cond/edilnno", edilnno);
model.makeValue("/root/hidden/sppiz00500/cond/spclcd", model.getValue("/root/main/list3/clsp[" + row + "]/spclcd"));
model.makeValue("/root/hidden/sppiz00500/cond/detldesc", model.getValue("/root/main/list3/clsp[" + row + "]/detldesc"));
model.makeValue("/root/hidden/sppiz00500/cond/spclspec", model.getValue("/root/main/list3/clsp[" + row + "]/spclspec"));
model.makeValue("/root/hidden/sppiz00500/cond/spclformat", model.getValue("/root/main/list3/clsp[" + row + "]/spclformat"));
model.makeValue("/root/hidden/sppiz00500/cond/rownum", row);
model.makeValue("/root/hidden/sppiz00500/cond/cdnm", model.getValue("/root/main/list3/clsp[" + row + "]/cdnm"));
model.makeValue("/root/hidden/sppiz00500/cond/unitflag", unitflag);
modal("SPPIZ00500", "1", "10", "10", "SPPIZ00500", "/root/hidden/sppiz00500", "/root/hidden/clsp", "", ""); // SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw
var rsltcnt = getNodesetCount("/root/hidden/sppiz00500/rslt/list");
// ó¸® °Ç¼ö
if (rsltcnt > 0) {
for (var i = rsltcnt; i > 0; i--) {
var flag = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/flag");
var rownum = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/rownum");
var newspclcd = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/spclcd");
var newcdnm = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/cdnm");
var newspclspec = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/spclspec");
var newspclformat = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/spclformat ");
var newdetldesc = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/detldesc");
if (flag == "I") {
// ƯÁ¤ÄÚµå Ãß°¡ÀÎ °æ¿ì
var clsprow = grd_clsphist.rows - 1; // ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
grd_clsphist.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/unitflag", unitflag);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clodseqno", clodseqno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/edilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/snglcalcscorcd", snglcalcscorcd);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclcd", newspclcd);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/cdnm", newcdnm);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclspec", newspclspec);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclformat", newspclformat);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/detldesc", newdetldesc);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldedilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldspclcd", "");
model.setValue("/root/hidden/list3/msgspclformat", "ƯÁ¤³»¿ªÄÚµå: " + newspclcd + " / ƯÁ¤³»¿ª¸íĪ: " + newcdnm + " / ±âÀç³»¿ª: " + newspclspec + " / ±âÀçÇü½Ä: " + newspclformat);
} else if (flag == "U") {
// ƯÁ¤ÄÚµå º¯°æÀÎ °æ¿ì
model.setValue("/root/main/list3/clsp[" + rownum + "]/snglcalcscorcd", snglcalcscorcd);
model.setValue("/root/main/list3/clsp[" + rownum + "]/spclcd", newspclcd);
model.setValue("/root/main/list3/clsp[" + rownum + "]/cdnm", newcdnm);
model.setValue("/root/main/list3/clsp[" + rownum + "]/spclspec", newspclspec);
model.setValue("/root/main/list3/clsp[" + rownum + "]/spclformat", newspclformat);
model.setValue("/root/main/list3/clsp[" + rownum + "]/detldesc", newdetldesc);
grd_clsphist.refresh();
// ƯÁ¤ÄÚµå, ƯÁ¤³»¿ªÀÌ º¯°æµÇ¾ú°Å³ª »èÁ¦µÈ ƯÁ¤Äڵ带 Á¶È¸ÇÏ¿© "È®ÀÎ"À» ¼±ÅÃÇÑ °æ¿ì
var oldspclcd = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/oldspclcd");
var oldspclspec = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/oldspclspec");
// if (oldspclcd != newspclcd || oldspclspec != newspclspec ||
// grd_clsphist.rowstatus(row) == 4) {
var rowstatus = grd_clsphist.rowstatus(rownum);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clsphist.rowstatus(rownum) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
// }
model.setValue("/root/hidden/list3/msgspclformat", "ƯÁ¤³»¿ªÄÚµå: " + newspclcd + " / ƯÁ¤³»¿ª¸íĪ: " + newcdnm + " / ±âÀç³»¿ª: " + newspclspec + " / ±âÀçÇü½Ä: " + newspclformat);
} else if (flag == "D" && rownum != "") {
// ƯÁ¤ÄÚµå »èÁ¦ÀÎ °æ¿ì
var rowstatus = grd_clsphist.rowstatus(rownum);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
grd_clsphist.deleteRow(rownum, false); // ÇØ´ç ¶óÀÎÀ» Grid¿¡¼ »èÁ¦ÇÑ´Ù.
} else { // 0 : new, 2 : update
grd_clsphist.rowstatus(rownum) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
grd_clsphist.row = rownum;
model.setValue("/root/hidden/list3/msgspclformat", "ÀÔ·ÂµÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ¾ø½À´Ï´Ù.");
} // ƯÁ¤ ÄÚµå »óÅ µû¸¥ if end
} // for end
if (unitflag == "M") { // ¸í¼¼¼ ´ÜÀ§
// ƯÁ¤ÄÚµå MT015, MT016, MT004 Á¤º¸°¡ ÀÔ·ÂµÈ È¯ÀÚÀÎÁö¸¦ È®ÀÎÇÑ´Ù.
fCheckSpclSpecData();
} else { // ÁÙ´ÜÀ§ÀÎ °æ¿ì
var cnt = 0;
var jx999cnt = 0;
var nonjx999cnt = 0; // JX999°¡ ¾Æ´Ñ ƯÁ¤³»¿ªÄÚµåÀÇ ¼ö
for (var i = 1; i < grd_clsphist.rows; i++) {
if (grd_clsphist.rowstatus(i) != 4) {
var spclClodseqno = model.getValue("/root/main/list3/clsp[" + i + "]/clodseqno");
if (spclClodseqno == clodseqno) {
cnt++;
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
if (spclcd == "JX999") { // JX999ÀÎ °æ¿ì
jx999cnt++;
} else if (spclcd != "JT001") { // JX999µµ, È®ÀÎÄڵ嵵 ¾Æ´Ñ °æ¿ì
nonjx999cnt++;
}
}
}
}
if (cnt > 0) {
for (var j = 1; j < grd_clodhist.rows; j++) {
var seqno = model.getValue("/root/main/list2/clod[" + j + "]/seqno");
if (seqno == clodseqno) {
model.setValue("/root/main/list2/clod[" + j + "]/lnunitspclspecyn", "*");
if (jx999cnt > 0) {
if (nonjx999cnt == 0) { // JX999¸¸ ÀÖ´Â °æ¿ì
grd_clodhist.cellStyle("background-color", j, grd_clodhist.colRef("lnunitspclspecyn")) = "#f7a08b"; // class="color_6" ´ÙÈ«»ö
} else { // JX999 + ´Ù¸¥ Äڵ嵵 ÀÖ´Â °æ¿ì
grd_clodhist.cellStyle("background-color", j, grd_clodhist.colRef("lnunitspclspecyn")) = "#b5a5d1"; // ¿¬ÇÑ º¸¶ó»ö
}
} else {
grd_clodhist.cellStyle("background-color", j, grd_clodhist.colRef("lnunitspclspecyn")) = "#ffffff"; // #ffffff = White
}
j = grd_clodhist.rows;
}
}
} else {
for (var j = 1; j < grd_clodhist.rows; j++) {
var seqno = model.getValue("/root/main/list2/clod[" + j + "]/seqno");
if (seqno == clodseqno) {
model.resetInstanceNode("/root/main/list2/clod[" + j + "]/lnunitspclspecyn");
grd_clodhist.cellStyle("background-color", j, grd_clodhist.colRef("lnunitspclspecyn")) = "#ffffff"; // #ffffff = White
j = grd_clodhist.rows;
}
}
}
}
// model.refresh();
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
grd_clsphist.refresh();
grd_clodhist.refresh();
fSaveClspList();
} // ó¸® °Ç¼ö if end
}
// È®ÀÎÄÚµå ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀ» ¼öÁ¤/ÀÔ·Â
function fSetCnfmCdSpclSpec() {
var row = grd_clsphist.row;
model.removeNodeset("root/hidden/sppiz01100/rslt");
model.setValue("/root/hidden/sppiz01100/cond/code", model.getValue("/root/main/list3/clsp[" + row + "]/spclspec"));
modal("SPPIZ01100", "1", "10", "10", "SPPIZ01100", "/root/hidden/sppiz01100", "/root/init/sppiz01100", "", ""); // SPPIZ01100_È®ÀÎÄÚµåÁ¶È¸
if (instance1.selectSingleNode("root/hidden/sppiz01100/rslt")) {
var cnfmcd = model.getValue("root/hidden/sppiz01100/rslt/code");
var clodseqno = model.getValue("/root/main/list3/clsp[" + row + "]/clodseqno");
for ( var j = 1; j < grd_clodhist.rows; j++) {
var seqno = model.getValue("/root/main/list2/clod[" + j + "]/seqno");
if (seqno == clodseqno) {
model.setValue("/root/main/list2/clod[" + j + "]/cnfmcd", cnfmcd);
j = grd_clodhist.rows;
}
}
var rowstatus = grd_clsphist.rowstatus(row);
if (cnfmcd) {
model.setValue("/root/main/list3/clsp[" + row + "]/spclspec", cnfmcd);
model.setValue("/root/hidden/list3/msgspclformat", "È®ÀÎÄÚµå - JT001 / ÀÔ·ÂÄڵ峻¿ª : " + cnfmcd + " / ±âÀçÇü½Ä : X(5)");
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clsphist.rowstatus(row) = 2; // 2 : update »óÅ·Πstat¸¦
// º¯°æÇÑ´Ù.
}
} else {
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
model.resetInstanceNode("/root/main/list3/clsp[" + row + "]/spclcd");
model.resetInstanceNode("/root/main/list3/clsp[" + row + "]/spclspec");
// grd_clsphist.deleteRow(row, false); // ÇØ´ç ¶óÀÎÀ» Grid¿¡¼ »èÁ¦ÇÑ´Ù.
} else {
grd_clsphist.rowstatus(row) = 4;
model.setValue("/root/main/list3/clsp[" + row + "]/insntstat", "D");
}
model.setValue("/root/hidden/list3/msgspclformat",
"ÀÔ·ÂµÈ È®ÀÎÄÚµå ³»¿ªÀÌ ¾ø½À´Ï´Ù.");
}
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
grd_clodhist.refresh();
grd_clsphist.refresh();
fSaveClspList();
}
}
// ó¹æ Grid ¸¶¿ì½º ¿À¸¥ÂÊ "È®ÀÎÄÚµåÀÔ·Â" / ó¹æ Grid È®ÀÎÄÚµå ÇÊµå ¹öư Ŭ¸¯ ½Ã
function fOrderGridInsertCnfmCd() {
var row = grd_clodhist.row;
var seqno = model.getValue("/root/main/list2/clod[" + row + "]/seqno");
if (seqno != "0") {
model.removeNodeset("root/hidden/sppiz01100/rslt");
model.setValue("/root/hidden/sppiz01100/cond/code", model.getValue("/root/main/list2/clod[" + row + "]/cnfmcd"));
modal("SPPIZ01100", "1", "10", "10", "SPPIZ01100", "/root/hidden/sppiz01100", "/root/init/sppiz01100", "", ""); // SPPIZ01100_È®ÀÎÄÚµåÁ¶È¸
if (instance1.selectSingleNode("root/hidden/sppiz01100/rslt")) {
var cnfmcd = model.getValue("root/hidden/sppiz01100/rslt/code");
model.setValue("/root/main/list2/clod[" + row + "]/cnfmcd", cnfmcd);
if (cnfmcd) {
var isFind = false;
for (var j = 1; j < grd_clsphist.rows; j++) {
var spcClodseqno = model.getValue("/root/main/list3/clsp[" + j + "]/clodseqno");
if (spcClodseqno == seqno) {
var spclcd = model.getValue("/root/main/list3/clsp[" + j + "]/spclcd");
if (spclcd == "JT001") {
model.setValue("/root/main/list3/clsp[" + j + "]/snglcalcscorcd", model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd"));
model.setValue("/root/main/list3/clsp[" + j + "]/spclcd", "JT001");
model.setValue("/root/main/list3/clsp[" + j + "]/cdnm", "È®ÀÎÄÚµå");
model.setValue("/root/main/list3/clsp[" + j + "]/spclspec", cnfmcd);
model.setValue("/root/main/list3/clsp[" + j + "]/spclformat", "X(5)");
model.setValue("/root/main/list3/clsp[" + j + "]/detldesc", "Áø·áÇàÀ§¿¡ ´ëÇÑ Ãß°¡±â¼ú »çÇ×À» ±¸ºÐÇÏ´Â ÄÚµå·Î¼ È®ÀÎÄڵ尡 ¿©·¯°³ ¹ß»ýÇÒ °æ¿ì '/'·Î ±¸ºÐÇÏ¿© ±âÀç");
var rowstatus = grd_clsphist.rowstatus(j);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clsphist.rowstatus(j) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
isFind = true;
}
}
}
if (isFind == false) { // ±âÁ¸¿¡ È®ÀÎÄڵ尡 ¾ø¾ú´ø °æ¿ì
var clsprow = grd_clsphist.rows - 1; // ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
grd_clsphist.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/unitflag", "J");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/edilnno", "0");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clodseqno", seqno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/snglcalcscorcd", model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd"));
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclcd", "JT001");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/cdnm", "È®ÀÎÄÚµå");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclspec", cnfmcd);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclformat", "X(5)");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/detldesc", "Áø·áÇàÀ§¿¡ ´ëÇÑ Ãß°¡±â¼ú »çÇ×À» ±¸ºÐÇÏ´Â ÄÚµå·Î¼ È®ÀÎÄڵ尡 ¿©·¯°³ ¹ß»ýÇÒ °æ¿ì '/'·Î ±¸ºÐÇÏ¿© ±âÀç");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldedilnno", "0");
grd_clsphist.row = clsprow;
grd_clsphist.refresh();
}
model.setValue("/root/hidden/list3/msgspclformat", "È®ÀÎÄÚµå - JT001 / ÀÔ·ÂÄڵ峻¿ª : " + cnfmcd + " / ±âÀçÇü½Ä : X(5)");
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
grd_clsphist.refresh();
grd_clodhist.refresh();
}
}
}
}
// ƯÁ¤³»¿ª ¹Ýº¹
function fRepeatSpclSpec() {
for ( var i = 0; i < grd_clsphist.selectedRows; i++) {
var row = grd_clsphist.selectedrow(i);
if (row > 0) { // ƯÁ¤³»¿ª Grid ÇÊÅ͸µ Àû¿ë½Ã row = 0 À¸·Î ¼³Á¤ÇÏ¿© ŸÀÌÆ² ºÎºÐ¿¡ setValue ÇÏ°Ô µÇ¾î ¿¡·¯ ¹ß»ýÇÔ
var repeat = model.getValue("/root/main/list3/clsp[" + row + "]/rowstat"); // ƯÁ¤³»¿ª ¹Ýº¹ ¼³Á¤ rowstat ='R'
var seqno = model.getValue("/root/main/list3/clsp[" + row + "]/seqno");
// JX999 ÀúÀå º¸³¾¶§´Â ±âÁ¸Ã³·³ seqno ¾øÀÌ º¸³»¾ß »èÁ¦°¡ Á¤»óÀûÀ¸·Î µÊ
if (repeat == "R") {
if (seqno) { // seqno °ªÀÌ ÀÖÀ¸¸é DB¿¡ ÀúÀåµÈ »óÅÂÀÓ
repeat = "U";
} else {
repeat = "";
}
} else {
repeat = "R";
}
model.setValue("/root/main/list3/clsp[" + row + "]/rowstat", repeat);
var rowstatus = grd_clsphist.rowstatus(row);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clsphist.rowstatus(row) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
}
}
// model.refresh();
model.refreshpart("/root/main/list3/clsp");
}
// ¼ö°¡ÄÚµå º¹»ç
function fSnglGridCopyCol() {
if (grd_clodhist.selectedRows == 1) { // ÇÑÁÙ
var row = grd_clodhist.row;
var col = grd_clodhist.colRef("snglcalcscorcd");
var clip = grd_clodhist.labelMatrix(row, col);
window.clipBoardData = clip;
}
}
// EDIÄÚµå º¹»ç
function fEdiGridCopyCol() {
if (grd_clodhist.selectedRows == 1) { // ÇÑÁÙ
var row = grd_clodhist.row;
var col = grd_clodhist.colRef("basecd");
var clip = grd_clodhist.labelMatrix(row, col);
window.clipBoardData = clip;
}
}
// ó¹æ¸í º¹»ç
function fHngnmGridCopyCol() {
if (grd_clodhist.selectedRows == 1) { // ÇÑÁÙ
var row = grd_clodhist.row;
var col = grd_clodhist.colRef("hngnm");
var clip = grd_clodhist.labelMatrix(row, col);
window.clipBoardData = clip;
}
}
//----------------------------------------
//ó¹æ Grid ¸¶¿ì½º ¿À¸¥ÂÊ "ó¹æÁÖ¼®ÀÔ·Â"
//----------------------------------------
function fOrderGridInsertCmt() {
// º¯°æ: ƯÁ¤³»¿ª »ó¼¼ °ü¸®¸¦ JX999·Î ¼³Á¤ÇÏ¿© º¸¿©ÁØ´Ù.
model.removeNodeset("/root/hidden/sppiz00500/rslt"); // SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®
// ¿¡¼ ¼±ÅÃµÈ °á°ú°¡
// copyNodeµÇ´Â °æ·ÎÀÓ
model.removeNodeset("/root/hidden/sppiz00500/cond");
var row = grd_clodhist.row;
// ó¹æ Grid¿¡¼ ÁÙ¹øÈ£°¡ ºÎ¿©µÈ °æ¿ì
var seqno = model.getValue("/root/main/list2/clod[" + row + "]/seqno");
var edilnno = model.getValue("/root/main/list2/clod[" + row + "]/edilnno");
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd");
if (seqno != "" && seqno != "0") {
var lnunitspclspecyn = model.getValue("/root/main/list2/clod[" + row + "]/lnunitspclspecyn");
if (lnunitspclspecyn == "") {
model.makeValue("/root/hidden/sppiz00500/cond/flag", "I");
model.makeValue("/root/hidden/sppiz00500/cond/snglcalcscorcd", snglcalcscorcd);
model.makeValue("/root/hidden/sppiz00500/cond/clodseqno", seqno);
model.makeValue("/root/hidden/sppiz00500/cond/edilnno", edilnno);
model.makeValue("/root/hidden/sppiz00500/cond/spclcd", "JX999");
model.makeValue("/root/hidden/sppiz00500/cond/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
model.makeNode("/root/hidden/sppiz00500/cond/spclspec");
model.makeValue("/root/hidden/sppiz00500/cond/spclformat", "X(700)");
model.makeNode("/root/hidden/sppiz00500/cond/rownum");
model.makeValue("/root/hidden/sppiz00500/cond/cdnm", "±âŸ³»¿ª");
model.makeValue("/root/hidden/sppiz00500/cond/unitflag", "J");
} else { // ±âÁ¸¿¡ ÀÔ·ÂµÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ÀÖ´Â °æ¿ì
var rowcnt = 1;
var setrow = 0;
for (var i = 1; i < grd_clsphist.rows; i++) {
var spclClodseqno = model.getValue("/root/main/list3/clsp[" + i + "]/clodseqno");
if (spclClodseqno == seqno) {
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
if (spclcd != "" && spclcd != "JT001" && grd_clsphist.rowstatus(i) != 4) { // È®ÀÎÄڵ尡 ¾Æ´Ñ °æ¿ì
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/flag", "");
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/rownum", i);
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/snglcalcscorcd", model.getValue("/root/main/list3/clsp[" + i + "]/snglcalcscorcd"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/clodseqno", model.getValue("/root/main/list3/clsp[" + i + "]/clodseqno"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/edilnno", model.getValue("/root/main/list3/clsp[" + i + "]/edilnno"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/spclcd", spclcd);
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/spclspec", model.getValue("/root/main/list3/clsp[" + i + "]/spclspec"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/spclformat", model.getValue("/root/main/list3/clsp[" + i + "]/spclformat"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/cdnm", model.getValue("/root/main/list3/clsp[" + i + "]/cdnm"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/detldesc", model.getValue("/root/main/list3/clsp[" + i + "]/detldesc"));
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/oldspclcd", spclcd);
model.makeValue("/root/hidden/sppiz00500/cond/list[" + rowcnt + "]/oldspclspec", model.getValue("/root/main/list3/clsp[" + i + "]/spclspec"));
// ƯÁ¤³»¿ª »ó¼¼ ȸ鿡 º¸¿©Á٠ƯÁ¤³»¿ª ¼±ÅÃ
if (spclcd == "JX999") {
setrow = i; // ÁÙ´ÜÀ§ÀÇ °æ¿ì °¡Àå ¸¶Áö¸· row·Î ¼³Á¤ÇÑ´Ù.
}
rowcnt = rowcnt + 1;
}
}
}
if (setrow > 0) {
model.makeValue("/root/hidden/sppiz00500/cond/flag", "");
model.makeValue("/root/hidden/sppiz00500/cond/snglcalcscorcd", snglcalcscorcd);
model.makeValue("/root/hidden/sppiz00500/cond/clodseqno", seqno);
model.makeValue("/root/hidden/sppiz00500/cond/edilnno", edilnno);
model.makeValue("/root/hidden/sppiz00500/cond/spclcd", model.getValue("/root/main/list3/clsp[" + setrow + "]/spclcd"));
model.makeValue("/root/hidden/sppiz00500/cond/detldesc", model.getValue("/root/main/list3/clsp[" + setrow + "]/detldesc"));
model.makeValue("/root/hidden/sppiz00500/cond/spclspec", model.getValue("/root/main/list3/clsp[" + setrow + "]/spclspec"));
model.makeValue("/root/hidden/sppiz00500/cond/spclformat", model.getValue("/root/main/list3/clsp[" + setrow + "]/spclformat"));
model.makeValue("/root/hidden/sppiz00500/cond/rownum", setrow);
model.makeValue("/root/hidden/sppiz00500/cond/cdnm", model.getValue("/root/main/list3/clsp[" + setrow + "]/cdnm"));
model.makeValue("/root/hidden/sppiz00500/cond/unitflag", "J");
} else { // ±âÁ¸¿¡ ÀÔ·ÂµÈ JX999°¡ ¾ø´Â °æ¿ì
model.makeValue("/root/hidden/sppiz00500/cond/flag", "I");
model.makeValue("/root/hidden/sppiz00500/cond/snglcalcscorcd", snglcalcscorcd);
model.makeValue("/root/hidden/sppiz00500/cond/clodseqno", seqno);
model.makeValue("/root/hidden/sppiz00500/cond/edilnno", edilnno);
model.makeValue("/root/hidden/sppiz00500/cond/spclcd", "JX999");
model.makeValue("/root/hidden/sppiz00500/cond/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
model.makeNode("/root/hidden/sppiz00500/cond/spclspec");
model.makeValue("/root/hidden/sppiz00500/cond/spclformat", "X(700)");
model.makeNode("/root/hidden/sppiz00500/cond/rownum");
model.makeValue("/root/hidden/sppiz00500/cond/cdnm", "±âŸ³»¿ª");
model.makeValue("/root/hidden/sppiz00500/cond/unitflag", "J");
}
}
modal("SPPIZ00500", "1", "10", "10", "SPPIZ00500", "/root/hidden/sppiz00500", "/root/hidden/clsp", "", ""); // SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw
var rsltcnt = getNodesetCount("/root/hidden/sppiz00500/rslt/list");
// ó¸® °Ç¼ö
if (rsltcnt > 0) {
for (var i = rsltcnt; i > 0; i--) {
var flag = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/flag");
var rownum = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/rownum");
var newspclcd = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/spclcd");
var newcdnm = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/cdnm");
var newspclspec = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/spclspec");
var newspclformat = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/spclformat ");
var newdetldesc = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/detldesc");
// ƯÁ¤ÄÚµå Ãß°¡ÀÎ °æ¿ì
if (flag == "I") {
var clsprow = grd_clsphist.rows - 1; // ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸·
// ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
grd_clsphist.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/unitflag", "J");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clodseqno", seqno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/edilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/snglcalcscorcd", snglcalcscorcd);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclcd", newspclcd);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/cdnm", newcdnm);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclspec", newspclspec);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclformat", newspclformat);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/detldesc", newdetldesc);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldedilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldspclcd", "");
model.setValue("/root/hidden/list3/msgspclformat", "ƯÁ¤³»¿ªÄÚµå: " + newspclcd + " / ƯÁ¤³»¿ª¸íĪ: " + newcdnm + " / ±âÀç³»¿ª: " + newspclspec + " / ±âÀçÇü½Ä: " + newspclformat);
// ƯÁ¤ÄÚµå º¯°æÀÎ °æ¿ì
} else if (flag == "U") {
model.setValue("/root/main/list3/clsp[" + rownum + "]/snglcalcscorcd", snglcalcscorcd);
model.setValue("/root/main/list3/clsp[" + rownum + "]/spclcd", newspclcd);
model.setValue("/root/main/list3/clsp[" + rownum + "]/cdnm", newcdnm);
model.setValue("/root/main/list3/clsp[" + rownum + "]/spclspec", newspclspec);
model.setValue("/root/main/list3/clsp[" + rownum + "]/spclformat", newspclformat);
model.setValue("/root/main/list3/clsp[" + rownum + "]/detldesc", newdetldesc);
// model.refresh();
grd_clsphist.refresh();
// ƯÁ¤ÄÚµå, ƯÁ¤³»¿ªÀÌ º¯°æµÇ¾ú°Å³ª »èÁ¦µÈ ƯÁ¤Äڵ带 Á¶È¸ÇÏ¿© "È®ÀÎ"À» ¼±ÅÃÇÑ °æ¿ì
var oldspclcd = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/oldspclcd");
var oldspclspec = model.getValue("/root/hidden/sppiz00500/rslt/list[" + i + "]/oldspclspec");
var rowstatus = grd_clsphist.rowstatus(rownum);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clsphist.rowstatus(rownum) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
model.setValue("/root/hidden/list3/msgspclformat", "ƯÁ¤³»¿ªÄÚµå: " + newspclcd + " / ƯÁ¤³»¿ª¸íĪ: " + newcdnm + " / ±âÀç³»¿ª: " + newspclspec + " / ±âÀçÇü½Ä: " + newspclformat);
// ƯÁ¤ÄÚµå »èÁ¦ÀÎ °æ¿ì
} else if (flag == "D" && rownum != "") {
// ƯÁ¤³»¿ª Grid¿¡¼ »èÁ¦
var rowstatus = grd_clsphist.rowstatus(rownum);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 :
// insert & new
grd_clsphist.deleteRow(rownum, false); // ÇØ´ç ¶óÀÎÀ» Grid¿¡¼
// »èÁ¦ÇÑ´Ù.
} else { // 0 : new, 2 : update
grd_clsphist.rowstatus(rownum) = 4; // 4 : delete »óÅ·Î
// stat¸¦ º¯°æÇÑ´Ù.
}
grd_clsphist.row = rownum;
model.setValue("/root/hidden/list3/msgspclformat", "ÀÔ·ÂµÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ¾ø½À´Ï´Ù.");
} // ƯÁ¤ ÄÚµå »óÅ µû¸¥ if end
} // for end
var cnt = 0;
var jx999cnt = 0;
var nonjx999cnt = 0; // JX999°¡ ¾Æ´Ñ ƯÁ¤³»¿ªÄÚµåÀÇ ¼ö
for ( var i = 1; i < grd_clsphist.rows; i++) {
if (grd_clsphist.rowstatus(i) != 4) {
var spclLnNo = model.getValue("/root/main/list3/clsp[" + i + "]/edilnno");
if (spclLnNo == edilnno) {
cnt++;
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
if (spclcd == "JX999") { // JX999ÀÎ °æ¿ì
jx999cnt++;
} else if (spclcd != "JT001") { // JX999µµ, È®ÀÎÄڵ嵵 ¾Æ´Ñ °æ¿ì
nonjx999cnt++;
}
}
}
}
if (cnt > 0) {
model.setValue("/root/main/list2/clod[" + row + "]/lnunitspclspecyn", "*");
if (jx999cnt > 0) {
if (nonjx999cnt == 0) { // JX999¸¸ ÀÖ´Â °æ¿ì
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#f7a08b"; // class="color_6" ´ÙÈ«»ö
} else { // JX999 + ´Ù¸¥ Äڵ嵵 ÀÖ´Â °æ¿ì
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#b5a5d1"; // ¿¬ÇÑ º¸¶ó»ö
}
} else {
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#ffffff"; // #ffffff = White
}
} else {
model.resetInstanceNode("/root/main/list2/clod[" + row + "]/lnunitspclspecyn");
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#ffffff"; // #ffffff = White
}
} // ó¸® °Ç¼ö if end
// model.refresh();
model.refreshpart("/root/hidden/list3/msgspclformat");
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
grd_clsphist.refresh();
grd_clodhist.refresh();
fSaveClspList();
} else {
messageBox("ÁÙ¹øÈ£°¡ ºÎ¿©µÇÁö ¾Ê¾ÒÀ¸¸ç ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ", "I004"); // /ÁÙ¹øÈ£°¡ ºÎ¿©µÇÁö ¾Ê¾ÒÀ¸¸ç
// ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ
// ¾ø½À´Ï´Ù.
}
}
function fOrderGridInsertAllCmt() {
// ±âÁ¸: ó¹æ Ç׿¡ µû¶ó ½É»çComment Á¶È¸ ¿¬°á
// º¯°æ: ƯÁ¤³»¿ª »ó¼¼ °ü¸®¸¦ JX999·Î ¼³Á¤ÇÏ¿© º¸¿©ÁØ´Ù.
model.removeNodeset("/root/hidden/sppiz00500/rslt"); // SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸® ¿¡¼ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
model.removeNodeset("/root/hidden/sppiz00500/cond");
var grid_obj = document.controls.item("grd_clodhist");
var grid_obj_clsp = document.controls.item("grd_clsphist");
for (var k=0; k < grid_obj.selectedRows; k++ ) {
var row = grid_obj.selectedRow(k);
var seqno = grid_obj.valueMatrix(row, grid_obj.colref("seqno"));
var edilnno = grid_obj.valueMatrix(row, grid_obj.colref("edilnno"));
if (seqno != "" && seqno != "0") {
} else {
messageBox("ÁÙ¹øÈ£°¡ ºÎ¿©µÇÁö ¾Ê¾ÒÀ¸¸ç ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ", "I004"); ///ÁÙ¹øÈ£°¡ ºÎ¿©µÇÁö ¾Ê¾ÒÀ¸¸ç ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ¾ø½À´Ï´Ù.
return;
}
}
var rowcnt = 1;
var setrow = 0;
for (var k=0; k < grid_obj.selectedRows; k++ ) {
var row = grid_obj.selectedRow(k);
// ó¹æ Grid¿¡¼ ÁÙ¹øÈ£°¡ ºÎ¿©µÈ °æ¿ì
var seqno = model.getValue("/root/main/list2/clod["+ row +"]/seqno");
var edilnno = model.getValue("/root/main/list2/clod["+ row +"]/edilnno");
var snglcalcscorcd = model.getValue("/root/main/list2/clod["+ row +"]/snglcalcscorcd");
//if (seqno != "" && seqno != "0") {
var lnunitspclspecyn = model.getValue("/root/main/list2/clod["+ row +"]/lnunitspclspecyn");
if (lnunitspclspecyn == "") {
model.makeValue("/root/hidden/sppiz00500/cond/flag", "I");
model.makeValue("/root/hidden/sppiz00500/cond/snglcalcscorcd", snglcalcscorcd);
model.makeValue("/root/hidden/sppiz00500/cond/edilnno", edilnno);
model.makeValue("/root/hidden/sppiz00500/cond/clodseqno", seqno);
model.makeValue("/root/hidden/sppiz00500/cond/spclcd", "JX999");
model.makeValue("/root/hidden/sppiz00500/cond/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
model.makeNode("/root/hidden/sppiz00500/cond/spclspec");
model.makeValue("/root/hidden/sppiz00500/cond/spclformat", "X(700)");
model.makeNode("/root/hidden/sppiz00500/cond/rownum");
model.makeValue("/root/hidden/sppiz00500/cond/cdnm", "±âŸ³»¿ª");
model.makeValue("/root/hidden/sppiz00500/cond/unitflag", "J");
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/flag", "I");
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/rownum", "");
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/snglcalcscorcd", snglcalcscorcd);
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/clodseqno", seqno);
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/edilnno", edilnno);
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/spclcd", "JX999");
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/spclspec", "");
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/spclformat", "X(700)");
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/cdnm", "±âŸ³»¿ª");
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
rowcnt = rowcnt+1;
} else { // ±âÁ¸¿¡ ÀÔ·ÂµÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ÀÖ´Â °æ¿ì
for (var i = 1; i < grid_obj_clsp.rows; i++) {
var spcClodseqno = model.getValue("/root/main/list3/clsp["+ i +"]/clodseqno");
var spcClsoyn = model.getValue("/root/main/list3/clsp["+ i +"]/clsoyn"); //¿ø¿ÜƯÁ¤¿©ºÎ
if (spcClodseqno == seqno && spcClsoyn == "N") {
var spclcd = model.getValue("/root/main/list3/clsp["+ i +"]/spclcd");
if (spclcd != "" && spclcd != "JT001" && grid_obj_clsp.rowstatus(i) != 4) { // È®ÀÎÄڵ尡 ¾Æ´Ñ °æ¿ì
model.makeValue("/root/hidden/sppiz00500/cond/flag", "U");
model.makeValue("/root/hidden/sppiz00500/cond/snglcalcscorcd", model.getValue("/root/main/list3/clsp["+ i +"]/snglcalcscorcd"));
model.makeValue("/root/hidden/sppiz00500/cond/edilnno", model.getValue("/root/main/list3/clsp["+ i +"]/edilnno"));
model.makeValue("/root/hidden/sppiz00500/cond/clodseqno", model.getValue("/root/main/list3/clsp["+ i +"]/clodseqno"));
model.makeValue("/root/hidden/sppiz00500/cond/spclcd", spclcd);
model.makeValue("/root/hidden/sppiz00500/cond/detldesc", model.getValue("/root/main/list3/clsp["+ i +"]/detldesc"));
model.makeValue("/root/hidden/sppiz00500/cond/spclspec", model.getValue("/root/main/list3/clsp["+ i +"]/spclspec"));
model.makeValue("/root/hidden/sppiz00500/cond/spclformat", "X(700)");
model.makeValue("/root/hidden/sppiz00500/cond/rownum", i);
model.makeValue("/root/hidden/sppiz00500/cond/cdnm", model.getValue("/root/main/list3/clsp["+ i +"]/cdnm"));
model.makeValue("/root/hidden/sppiz00500/cond/unitflag", model.getValue("/root/main/list3/clsp["+ i +"]/unitflag"));
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/flag", "U");
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/rownum", i);
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/snglcalcscorcd", model.getValue("/root/main/list3/clsp["+ i +"]/snglcalcscorcd"));
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/clodseqno", model.getValue("/root/main/list3/clsp["+ i +"]/clodseqno"));
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/edilnno", model.getValue("/root/main/list3/clsp["+ i +"]/edilnno"));
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/spclcd", spclcd);
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/spclspec", model.getValue("/root/main/list3/clsp["+ i +"]/spclspec"));
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/spclformat", model.getValue("/root/main/list3/clsp["+ i +"]/spclformat"));
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/cdnm", model.getValue("/root/main/list3/clsp["+ i +"]/cdnm"));
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/detldesc", model.getValue("/root/main/list3/clsp["+ i +"]/detldesc"));
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/oldspclcd", spclcd);
model.makeValue("/root/hidden/sppiz00500/cond/list["+ rowcnt +"]/oldspclspec", model.getValue("/root/main/list3/clsp["+ i +"]/spclspec"));
// ƯÁ¤³»¿ª »ó¼¼ ȸ鿡 º¸¿©Á٠ƯÁ¤³»¿ª ¼±ÅÃ
if (spclcd == "JX999") {
setrow = i; // ÁÙ´ÜÀ§ÀÇ °æ¿ì °¡Àå ¸¶Áö¸· row·Î ¼³Á¤ÇÑ´Ù.
}
rowcnt = rowcnt+1;
}
}
}
}
}
modal("SPPIZ00500", "1", "10", "10", "SPPIZ00500", "/root/hidden/sppiz00500", "/root/hidden/clsp", "", ""); // SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw
var rsltcnt = getNodesetCount("/root/hidden/sppiz00500/rslt/list");
// ó¸® °Ç¼ö
if (rsltcnt > 0) {
for (var i = rsltcnt; i > 0; i--) {
var flag = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/flag");
var rownum = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/rownum");
var newspclcd = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/spclcd");
var newcdnm = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/cdnm");
var newspclspec = model.getValue("/root/hidden/sppiz00500/rslt/list[last()]/spclspec");
var newspclformat = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/spclformat ");
var newdetldesc = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/detldesc");
var newclodseqno = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/clodseqno");
var newsnglcalcscorcd = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/snglcalcscorcd");
var newedilnno = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/edilnno");
// ƯÁ¤ÄÚµå Ãß°¡ÀÎ °æ¿ì
if (flag == "I") {
var clsprow = grid_obj_clsp.rows - 1; // ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
grid_obj_clsp.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp["+ clsprow +"]/unitflag", "J");
model.setValue("/root/main/list3/clsp["+ clsprow +"]/clodseqno", newclodseqno);
model.setValue("/root/main/list3/clsp["+ clsprow +"]/edilnno", newedilnno);
model.setValue("/root/main/list3/clsp["+ clsprow +"]/snglcalcscorcd", newsnglcalcscorcd);
model.setValue("/root/main/list3/clsp["+ clsprow +"]/spclcd", newspclcd);
model.setValue("/root/main/list3/clsp["+ clsprow +"]/cdnm", newcdnm);
model.setValue("/root/main/list3/clsp["+ clsprow +"]/spclspec", newspclspec);
model.setValue("/root/main/list3/clsp["+ clsprow +"]/spclformat", newspclformat);
model.setValue("/root/main/list3/clsp["+ clsprow +"]/detldesc", newdetldesc);
model.setValue("/root/main/list3/clsp["+ clsprow +"]/oldedilnno", newedilnno);
model.setValue("/root/main/list3/clsp["+ clsprow +"]/oldspclcd", "");
model.setValue("/root/main/list3/clsp["+ clsprow +"]/clsoyn", "N"); //¿ø¿Üó¹æ¿©ºÎ
model.setValue("/root/hidden/list3/msgspclformat", "ÄÚµå: "+ newspclcd +" / ¸íĪ: "+ newcdnm +" / ³»¿ª: "+ newspclspec +" / Çü½Ä: "+ newspclformat);
model.setValue("/root/main/list2/clod[seqno="+ newclodseqno +"]/lnunitspclspecyn", "*");
var srow = grid_obj.findRow(newclodseqno, grid_obj.fixedrows, grid_obj.colRef("seqno"), false, true);
if (newspclcd == "JX999") { // JX999ÀÎ °æ¿ì
grid_obj.cellStyle("background-color", srow, grid_obj.colRef("lnunitspclspecyn")) = "#f7a08b"; // class="color_6" ´ÙÈ«»ö
}
else if (newspclcd != "JT001") { // JX999µµ, È®ÀÎÄڵ嵵 ¾Æ´Ñ °æ¿ì
grid_obj.cellStyle("background-color", srow, grid_obj.colRef("lnunitspclspecyn")) = "#b5a5d1"; // ¿¬ÇÑ º¸¶ó»ö
}
// ƯÁ¤ÄÚµå º¯°æÀÎ °æ¿ì
} else if (flag == "U") {
model.setValue("/root/main/list3/clsp["+ rownum +"]/snglcalcscorcd", newsnglcalcscorcd);
model.setValue("/root/main/list3/clsp["+ rownum +"]/spclcd", newspclcd);
model.setValue("/root/main/list3/clsp["+ rownum +"]/cdnm", newcdnm);
model.setValue("/root/main/list3/clsp["+ rownum +"]/spclspec", newspclspec);
model.setValue("/root/main/list3/clsp["+ rownum +"]/spclformat", newspclformat);
model.setValue("/root/main/list3/clsp["+ rownum +"]/detldesc", newdetldesc);
//model.refresh();
grid_obj_clsp.refresh();
// ƯÁ¤ÄÚµå, ƯÁ¤³»¿ªÀÌ º¯°æµÇ¾ú°Å³ª »èÁ¦µÈ ƯÁ¤Äڵ带 Á¶È¸ÇÏ¿© "È®ÀÎ"À» ¼±ÅÃÇÑ °æ¿ì
var oldspclcd = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/oldspclcd");
var oldspclspec = model.getValue("/root/hidden/sppiz00500/rslt/list["+ i +"]/oldspclspec");
var rowstatus = grid_obj_clsp.rowstatus(rownum);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grid_obj_clsp.rowstatus(rownum) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
model.setValue("/root/hidden/list3/msgspclformat", "ÄÚµå: "+ newspclcd +" / ¸íĪ: "+ newcdnm +" / ³»¿ª: "+ newspclspec +" / Çü½Ä: "+ newspclformat);
// ƯÁ¤ÄÚµå »èÁ¦ÀÎ °æ¿ì
} else if (flag == "D" && rownum != "" ) {
// ƯÁ¤³»¿ª Grid¿¡¼ »èÁ¦
var rowstatus = grid_obj_clsp.rowstatus(rownum);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
grid_obj_clsp.deleteRow(rownum, false); // ÇØ´ç ¶óÀÎÀ» Grid¿¡¼ »èÁ¦ÇÑ´Ù.
} else { // 0 : new, 2 : update
grid_obj_clsp.rowstatus(rownum) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
grid_obj_clsp.row = rownum;
model.setValue("/root/hidden/list3/msgspclformat", "ÀÔ·ÂµÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ¾ø½À´Ï´Ù.");
} // ƯÁ¤ ÄÚµå »óÅ µû¸¥ if end
} // for end
} // ó¸® °Ç¼ö if end
//model.refresh();
model.refreshpart("/root/hidden/list3/msgspclformat");
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
grid_obj_clsp.refresh();
grid_obj.refresh();
fSaveClspList();
// } else {
//
// }
}
function fSetClodCellStyle(objnm,srchnm,colno,caseSense,fullMatch) {
var obj = document.controls.item(objnm);
if (caseSense == null || caseSense == "") {caseSense = false;}
if (fullMatch == null || fullMatch == "") {caseSense = false;}
var rowno = obj.findRow(srchnm, obj.fixedrows, colno, caseSense, fullMatch);
while( rowno > 0){
alert(rowno);
rowno = obj.findRow(srchnm, rowno + 1, colno, caseSense, fullMatch) ;
}
}
// SPPIZ00700_½É»çCommentÁ¶È¸.xrw È£Ãâ - ó¹æÁÖ¼®ÀÇ °æ¿ì ó¹æÇ׸ñÀÇ Ç×À» Àü´ÞÇÑ´Ù.
function fGetOrderComment(memoflag, memocls, ediitem1) {
model.resetInstanceNode("/root/hidden/sppiz00700/rslt");
model.resetInstanceNode("/root/hidden/sppiz00700/cond");
model.setValue("/root/hidden/sppiz00700/cond/memoflag", memoflag);
model.setValue("/root/hidden/sppiz00700/cond/memocls", memocls);
model.setValue("/root/hidden/sppiz00700/cond/ediitem1", ediitem1);
modal("SPPIZ00700", "1", "10", "10", "SPPIZ00700", "/root/hidden/sppiz00700", "/root/send/sppiz00700", "", ""); // SPPIZ00700_½É»çCommentÁ¶È¸.xrw
}
// SPPIZ00700_½É»çCommentÁ¶È¸.xrw È£Ãâ
function fGetJudgEdiComment(memoflag, memocls) {
model.resetInstanceNode("/root/hidden/sppiz00700/rslt");
model.resetInstanceNode("/root/hidden/sppiz00700/cond");
model.setValue("/root/hidden/sppiz00700/cond/memoflag", memoflag);
model.setValue("/root/hidden/sppiz00700/cond/memocls", memocls);
modal("SPPIZ00700", "1", "10", "10", "SPPIZ00700", "/root/hidden/sppiz00700", "/root/send/sppiz00700", "", ""); // SPPIZ00700_½É»çCommentÁ¶È¸.xrw
}
// ½É»çComment Á¶È¸ Popup¿¡¼ ¼±ÅÃÇÑ ÁÙ´ÜÀ§¸Þ¸ð¸¦ ¼³Á¤ÇÑ´Ù.
// SPPIZ00700_½É»çCommentÁ¶È¸.xrw ¿¡¼ opener.javascript.fSetLnUnitMemoRefresh(); ÇüÅ·Î
// È£ÃâÇÑ´Ù.
function fSetLnUnitMemoRefresh() {
var row = grd_clodhist.row;
var seqno = model.getValue("/root/main/list2/clod[" + row + "]/seqno");
var edilnno = model.getValue("/root/main/list2/clod[" + row + "]/edilnno");
var workflag = 1;
var clspgridrow;
for ( var j = 1; j < grd_clsphist.rows; j++) {
var spclClodseqno = model.getValue("/root/main/list3/clsp[" + j
+ "]/clodseqno");
if (spclClodseqno == seqno) {
var oldspclcd = model.getValue("/root/main/list3/clsp[" + j
+ "]/spclcd");
if (oldspclcd == "JX999") {
// ±âÁ¸ "JX999"¸¦ ¼öÁ¤ÇÑ´Ù.
workflag = 2;
clspgridrow = j; // ƯÁ¤³»¿ª GridÀÇ ÇØ´ç row¸¦ ±â¾ïÇÑ´Ù.
j = grd_clsphist.rows;
}
}
}
var newspclspec = model.getValue("/root/hidden/sppiz00700/rslt/memo");
if (newspclspec) {
var nonjx999cnt = 0; // JX999°¡ ¾Æ´Ñ ƯÁ¤³»¿ªÄÚµåÀÇ ¼ö
for ( var i = 1; i < grd_clsphist.rows; i++) {
if (grd_clsphist.rowstatus(i) != 4) {
var spclClodseqno = model.getValue("/root/main/list3/clsp[" + i + "]/clodseqno");
if (spclClodseqno == seqno) {
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
if (spclcd != "JX999" && spclcd != "JT001") { // JX999µµ,È®ÀÎÄڵ嵵 ¾Æ´Ñ °æ¿ì
nonjx999cnt++;
i = grd_clsphist.rows; // JX999 ¿ÜÀÇ ´Ù¸¥ ƯÁ¤³»¿ªÄڵ尡 Á¸ÀçÇÏ´ÂÁö ¿©ºÎ¸¸ üũÇÏ¸é µÇ¹Ç·Î
}
}
}
}
if (nonjx999cnt == 0) { // JX999¸¸ ÀÖ´Â °æ¿ì
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#f7a08b"; // class="color_6" ´ÙÈ«»ö
} else { // JX999 + ´Ù¸¥ Äڵ嵵 ÀÖ´Â °æ¿ì
grd_clodhist.cellStyle("background-color", row, grd_clodhist.colRef("lnunitspclspecyn")) = "#b5a5d1"; // ¿¬ÇÑ º¸¶ó»ö
}
model.setValue("/root/main/list2/clod[" + row + "]/lnunitspclspecyn",
"*");
if (workflag == 1) { // Ãß°¡
var clsprow = grd_clsphist.rows - 1; // ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
grd_clsphist.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/unitflag", "J");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clodseqno", seqno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/edilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/snglcalcscorcd", model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd"));
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclcd", "JX999");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/cdnm", "±âŸ³»¿ª");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclspec", newspclspec);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclformat", "X(700)");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldedilnno", edilnno);
grd_clsphist.row = clsprow;
} else { // ¼öÁ¤
// ±âÁ¸ º¯°æµÈ °æ¿ì
model.setValue("/root/main/list3/clsp[" + clspgridrow + "]/snglcalcscorcd", model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd"));
model.setValue("/root/main/list3/clsp[" + clspgridrow + "]/spclcd", "JX999");
model.setValue("/root/main/list3/clsp[" + clspgridrow + "]/cdnm", "±âŸ³»¿ª");
model.setValue("/root/main/list3/clsp[" + clspgridrow + "]/spclspec", newspclspec);
model.setValue("/root/main/list3/clsp[" + clspgridrow + "]/spclformat", "X(700)");
model.setValue("/root/main/list3/clsp[" + clspgridrow + "]/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
var rowstatus = grd_clsphist.rowstatus(clspgridrow);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert &
// new
} else {
grd_clsphist.rowstatus(clspgridrow) = 2; // 2 : update »óÅ·Î
// stat¸¦ º¯°æÇÑ´Ù.
}
grd_clsphist.row = clspgridrow;
}
model.setValue("/root/hidden/list3/msgspclformat", "ƯÁ¤³»¿ªÄÚµå: JX999 / ƯÁ¤³»¿ª¸íĪ: ±âŸ³»¿ª / ±âÀç³»¿ª : " + newspclspec + " / ±âÀçÇü½Ä : X(700)");
} else {
model.setValue("/root/hidden/list3/msgspclformat", "ÀÔ·ÂµÈ Ã³¹æÁÖ¼®(ÁÙ´ÜÀ§ ±âŸƯÁ¤³»¿ª)ÀÌ ¾ø½À´Ï´Ù.");
}
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
// model.refresh();
model.refreshpart("/root/hidden/list3/msgspclformat");
grd_clsphist.refresh();
grd_clcohist.refresh();
}
// °á°úÁ¶È¸
function fOrderRsltSrch() {
if (grp_dropdownmenu.visible == true) {
grp_dropdownmenu.visible = false;
}
var clamkey = model.getValue("/root/main/item1/clbs/clamkey");
if (clamkey) { // Á¶È¸µÈ ½É»ç´ë»óÀÚ°¡ ÀÖÀ¸¸é
var trgtManWindow = getChildWindow("SMAER00800"); // SMAER00800_°á°úÁ¶È¸
if (trgtManWindow != null) {
trgtManWindow.close();
}
// ast/examcureweb/xrw/SMAER00800_°á°úÁ¶È¸.xrw
model.makeValue("/root/hidden/smaer00800/cond/srchdate1", model.getValue("/root/main/item1/clbs/indd"));
model.makeValue("/root/hidden/smaer00800/cond/srchdate2", getCurrentDate()); // (dateHelper.js)ÇöÀ糯¥ ¹Ýȯ
model.makeValue("/root/hidden/smaer00800/cond/srchpid", model.getValue("/root/main/item1/clbs/pid"));
model.makeValue("/root/hidden/smaer00800/cond/wardcd", ""); // model.getValue("/root/main/item1/iteminfo/wardcd"));
model.makeValue("/root/hidden/smaer00800/cond/roomcd", ""); // model.getValue("/root/main/item1/iteminfo/roomcd"));
model.makeValue("/root/hidden/smaer00800/cond/listflag", "P");
model.makeValue("/root/hidden/smaer00800/cond/deptcd", model.getValue("/root/main/item1/clbs/orddeptcd"));
model.makeNode("/root/hidden/smaer00800/cond/drid");
model.makeNode("/root/hidden/smaer00800/cond/chkcheck");
model.makeValue("/root/hidden/smaer00800/cond/chkcheck1", "A");
model.makeValue("/root/hidden/smaer00800/cond/chkcheck2", "B");
model.makeValue("/root/hidden/smaer00800/cond/chkcheck3", "C");
model.makeValue("/root/hidden/smaer00800/cond/chkcheck4", "D");
model.makeValue("/root/hidden/smaer00800/cond/chkcheck5", "E");
model.makeValue("/root/hidden/smaer00800/cond/chkcheck6", "F");
model.makeValue("/root/hidden/smaer00800/cond/chkcheck7", "G");
model.makeNode("/root/hidden/smaer00800/cond/chkcheck8");
model.makeNode("/root/hidden/smaer00800/cond/tabflag");
model.makeNode("/root/hidden/smaer00800/cond/mdlcd");
model.makeNode("/root/hidden/smaer00800/cond/examgubun");
model.makevalue("/root/hidden/smaer00800/cond/srchflag", "B");
model.makeNode("/root/hidden/smaer00800/cond/hlaflag"); // 20100604 Ãß°¡µÊ
model.makeNode("/root/hidden/smaer00800/cond/prntfrmflag"); // 20100723 Ãß°¡µÊ
// modal("SMAER00800", "1", "10", "10", "SMAER00800",
// "/root/hidden/smaer00800/cond", "/root/send/data/singdata", "", "");
// // SMAER00800_°á°úÁ¶È¸
open("SMAER00800", "1", "10", "10", "SMAER00800", "/root/hidden/smaer00800/cond", "/root/send/data/singdata", "", ""); // SMAER00800_°á°úÁ¶È¸
}
}
// º¸ÇèÀÎÁ¤±âÁØ
function fOrderInsuRcogBase(isAll) {
var calcscorcd = grd_clodhist.valueMatrix(grd_clodhist.row, grd_clodhist.colRef("snglcalcscorcd"));
model.setValue("root/hidden/sppiz01600/cond/calcscorcd", calcscorcd);
// SPPIZ01600_º¸ÇèÀÎÁ¤±âÁØÁ¶È¸ ÆË¾÷ ¿¬°á (¼±ÅÃµÈ rowÀÇ Ã³¹æÄڵ带 ³Ñ°ÜÁØ´Ù.)
modal("SPPIZ01600", 1,150, 150, "SPPIZ01600", "/root/hidden/sppiz01600/cond/calcscorcd", "/root/send/item3/calcscorcd", "", "");
}
// ¼ö°¡Á¶È¸
function fOrderCalcScorSrch(isAll) {
// ¼ö°¡Á¶È¸Ã¢ÀÌ ¾Æ´Ñ ¼ö°¡°ü¸®Ã¢À¸·Î ±³Ã¼ (calcscorcd : ¼ö°¡ÄÚµå, judgflag : ¼ö°¡°ü¸®¿¡¼ ÀÚº¸,ÀϹÝ,±¹Á¦¸¦
// º¸¿©ÁÖµµ·Ï Çϱâ À§ÇÔ)
model.removeNodeset("/root/hidden/smpic00100/cond");
model.makeValue("/root/hidden/smpic00100/cond/calcscorcd", grd_clodhist.valueMatrix(grd_clodhist.row, grd_clodhist.colRef("snglcalcscorcd")));
model.makeValue("/root/hidden/smpic00100/cond/judgflag", "Y");
modal("SMPIC00100", "1", "10", "10", "SMPIC00100", "/root/hidden/smpic00100/cond", "/root/temp/item6", "", "");
}
// ¾àǰÆí¶÷
function fOrderDrugHBook() {
model.removeNodeset("/root/hidden/smadb01900/cond");
model.makeValue("/root/hidden/smadb01900/cond/calcscorcd", grd_clodhist.valueMatrix(grd_clodhist.row, grd_clodhist.colRef("snglcalcscorcd")));
modal("SMADB01900", 1, 150, 150, "SMADB01900", "/root/hidden/smadb01900/cond/calcscorcd", "/root/hidden/receivedata/srchdrugcd", "", "");
}
// »ó¼¼°è»ê³»¿ª Popup È£Ãâ
function fOrderCalcDetail(isAll) {
model.resetInstanceNode("/root/hidden/sppid21600/cond");
model.setValue("/root/hidden/sppij00400/cond/pid", model.getValue("/root/main/item1/clbs/pid"));
model.setValue("/root/hidden/sppij00400/cond/indd", model.getValue("/root/main/item1/clbs/indd"));
model.setValue("/root/hidden/sppij00400/cond/cretno", model.getValue("/root/main/item1/clbs/cretno"));
model.setValue("/root/hidden/sppij00400/cond/mskind", model.getValue("/root/main/item1/clbs/mskind"));
model.setValue("/root/hidden/sppij00400/cond/insukind", model.getValue("/root/main/item1/clbs/insukindcd"));
model.setValue("/root/hidden/sppij00400/cond/insukindnm", model.getValue("/root/main/item1/clbs/insukindnm"));
model.setValue("/root/hidden/sppij00400/cond/suppkind", model.getValue("/root/main/item1/clbs/suppkindcd"));
model.setValue("/root/hidden/sppij00400/cond/suppkindnm", model.getValue("/root/main/item1/clbs/suppkindnm"));
model.setValue("/root/hidden/sppij00400/cond/ownbrate", model.getValue("/root/main/item1/clbs/payownbrate"));
model.setValue("/root/hidden/sppij00400/cond/ordfromdd", model.getValue("/root/main/item1/clbs/ordfromdd"));
model.setValue("/root/hidden/sppij00400/cond/ordtodd", model.getValue("/root/main/item1/clbs/ordtodd"));
model.setValue("/root/hidden/sppij00400/cond/ordtype", model.getValue("/root/main/item1/clbs/stsioflag"));
model.setValue("/root/hidden/sppij00400/cond/brateflag", model.getValue("/root/main/item1/clbs/ioflag"));
model.setValue("/root/hidden/sppij00400/cond/insufromdd", model.getValue("/root/main/item1/clbs/iphsfromdd"));
model.setValue("/root/hidden/sppij00400/cond/insutodd", model.getValue("/root/main/item1/clbs/iphstodd"));
model.setValue("/root/hidden/sppij00400/cond/selectedRdoItem", "");
model.setValue("/root/hidden/sppij00400/cond/srchflag", "ALL"); // Àüü±âÁذ˻öÀ϶§´Â "ALL"
model.setValue("/root/hidden/sppij00400/cond/selyn", "Y"); // Á¶È¸¸¸ÇÒ°æ¿ì "Y"
model.setValue("/root/hidden/sppij00400/cond/cpyn", model
.getValue("/root/main/item1/clbs/cpyn")); // CP¿©ºÎ
model.setValue("/root/hidden/sppij00400/cond/ediflag", "N"); // EDIÁ¶È¸¿©ºÎ - 20090810 ¹Úâ¿ø
model.setValue("/root/hidden/sppij00400/cond/edicd", "-"); // EDIÄÚµå - 20090810 ¹Úâ¿ø
if (isAll == "" || isAll != true) { // ó¹æGrid ´õºíŬ¸¯ ½Ã ÇØ´çÄڵ带 È£ÃâÇÑ´Ù.
if (model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/grupcalcscorcd")) {
model.setValue("/root/hidden/sppij00400/cond/grupsnglflag", "G");
model.setValue("/root/hidden/sppij00400/cond/calcscorcd", model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/grupcalcscorcd"));
} else {
model.setValue("/root/hidden/sppij00400/cond/grupsnglflag", "S");
model.setValue("/root/hidden/sppij00400/cond/calcscorcd", model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/snglcalcscorcd"));
}
model.setValue("/root/hidden/sppij00400/cond/ordfromdd", model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/ordfromdd"));
model.setValue("/root/hidden/sppij00400/cond/ordtodd", model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/ordtodd"));
model.setValue("/root/hidden/sppij00400/cond/srchflag", "");
}
// modal("SPPIJ00400", "1", "10", "10", "SPPIJ00400",
// "/root/hidden/sppij00400/cond", "", "", ""); // SPPIJ00400_ÀÔ¿ø¼¼ºÎ°è»ê³»¿ª.xrw
modal("SPPIJ00400", "", "10", "10", "SPPIJ00400", "/root/hidden/sppij00400/cond");
// }
}
// »ó¼¼°è»ê³»¿ª Popup È£Ãâ
function fOrderCalcDetailEDI(isAll) {
model.resetInstanceNode("/root/hidden/sppid21600/cond");
model.setValue("/root/hidden/sppij00400/cond/pid", model.getValue("/root/main/item1/clbs/pid"));
model.setValue("/root/hidden/sppij00400/cond/indd", model.getValue("/root/main/item1/clbs/indd"));
model.setValue("/root/hidden/sppij00400/cond/cretno", model.getValue("/root/main/item1/clbs/cretno"));
model.setValue("/root/hidden/sppij00400/cond/mskind", model.getValue("/root/main/item1/clbs/mskind"));
model.setValue("/root/hidden/sppij00400/cond/insukind", model.getValue("/root/main/item1/clbs/insukindcd"));
model.setValue("/root/hidden/sppij00400/cond/insukindnm", model.getValue("/root/main/item1/clbs/insukindnm"));
model.setValue("/root/hidden/sppij00400/cond/suppkind", model.getValue("/root/main/item1/clbs/suppkindcd"));
model.setValue("/root/hidden/sppij00400/cond/suppkindnm", model.getValue("/root/main/item1/clbs/suppkindnm"));
model.setValue("/root/hidden/sppij00400/cond/ownbrate", model.getValue("/root/main/item1/clbs/payownbrate"));
model.setValue("/root/hidden/sppij00400/cond/ordfromdd", model.getValue("/root/main/item1/clbs/ordfromdd"));
model.setValue("/root/hidden/sppij00400/cond/ordtodd", model.getValue("/root/main/item1/clbs/ordtodd"));
model.setValue("/root/hidden/sppij00400/cond/ordtype", model.getValue("/root/main/item1/clbs/stsioflag"));
model.setValue("/root/hidden/sppij00400/cond/brateflag", model.getValue("/root/main/item1/clbs/ioflag"));
model.setValue("/root/hidden/sppij00400/cond/insufromdd", model.getValue("/root/main/item1/clbs/iphsfromdd"));
model.setValue("/root/hidden/sppij00400/cond/insutodd", model.getValue("/root/main/item1/clbs/iphstodd"));
model.setValue("/root/hidden/sppij00400/cond/selectedRdoItem", "");
model.setValue("/root/hidden/sppij00400/cond/srchflag", "G"); // Àüü±âÁذ˻öÀ϶§´Â// "ALL"
model.setValue("/root/hidden/sppij00400/cond/selyn", "Y"); // Á¶È¸¸¸ÇÒ°æ¿ì "Y"
model.setValue("/root/hidden/sppij00400/cond/cpyn", model.getValue("/root/main/item1/clbs/cpyn")); // CP¿©ºÎ
model.setValue("/root/hidden/sppij00400/cond/ediflag", "Y"); // EDIÁ¶È¸¿©ºÎ - 20090810 ¹Úâ¿ø
model.setValue("/root/hidden/sppij00400/cond/edicd", model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/basecd")); // EDIÄÚµå - 20090810 ¹Úâ¿ø
if (isAll == "" || isAll != true) { // ó¹æGrid ´õºíŬ¸¯ ½Ã ÇØ´çÄڵ带 È£ÃâÇÑ´Ù.
if (model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/grupcalcscorcd")) {
model.setValue("/root/hidden/sppij00400/cond/grupsnglflag", "G");
model.setValue("/root/hidden/sppij00400/cond/calcscorcd", model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/grupcalcscorcd"));
} else {
model.setValue("/root/hidden/sppij00400/cond/grupsnglflag", "S");
model.setValue("/root/hidden/sppij00400/cond/calcscorcd", model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/snglcalcscorcd"));
}
model.setValue("/root/hidden/sppij00400/cond/ordfromdd", model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/ordfromdd"));
model.setValue("/root/hidden/sppij00400/cond/ordtodd", model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/ordtodd"));
model.setValue("/root/hidden/sppij00400/cond/srchflag", "");
}
modal("SPPIJ00400", "1", "10", "10", "SPPIJ00400","/root/hidden/sppij00400/cond", "", "", ""); // SPPIJ00400_ÀÔ¿ø¼¼ºÎ°è»ê³»¿ª.xrw
// }
}
// ó¹æ Grid ¹è°æ»öÀ» ¼³Á¤ÇÑ´Ù. - Ãß°¡/¼öÁ¤µÈ row
function fOrderBkColorNew(clodrow) {
grd_clodhist.cellStyle("background-color", clodrow, grd_clodhist.colRef("rowstat")) = "#ffff9c"; // ½Å±Ôó¹æ ³ë¶õ¹è°æ // ffff9c=¿¬Çѳë¶û
}
// ó¹æ Grid ¹è°æ»öÀ» ¼³Á¤ÇÑ´Ù. - ½É»ç»çÀ¯ ÀÖ´Â row
function fOrderBkColorResn(i) {
// grd_clodhist.cellStyle("background-color", i,
// grd_clodhist.colRef("rowstat")) = "#cece9c"; // ½É»ç»çÀ¯ ÀÖ´Â °æ¿ì ³ì»ö¹è°æ cece9c=īŰ»ö
grd_clodhist.cellStyle("background-color", i, grd_clodhist
.colRef("rowstat")) = "#ffff9c"; // ½É»ç»çÀ¯ ÀÖ´Â °æ¿ì ³ë¶õ¹è°æ //
// ffff9c=¿¬Çѳë¶û
}
// ó¹æ Grid ¹è°æ»öÀ» ¼³Á¤ÇÑ´Ù. - ¹è°æ»ö ¾ø´Â row
function fOrderBkColorNone(i) {
grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("rowstat")) = "#ffffff"; // ¹è°æ»ö ¾øÀ½ // #ffffff = White
}
// /////////////////////////////////////////////////////////////////////////
// ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
function fCancelClodStatusChng() {
var row = grd_clodhist.row;
model.setValue("/root/main/list2/clod[" + row + "]/adjtresncd", model.getValue("/root/hidden/item5/clod/adjtresncd"));
model.setValue("/root/main/list2/clod[" + row + "]/ordfromdd", model.getValue("/root/hidden/item5/clod/ordfromdd"));
model.setValue("/root/main/list2/clod[" + row + "]/ordtodd", model.getValue("/root/hidden/item5/clod/ordtodd"));
model.setValue("/root/main/list2/clod[" + row + "]/orddd", model.getValue("/root/hidden/item5/clod/orddd"));
model.setValue("/root/main/list2/clod[" + row + "]/updtdd", model.getValue("/root/hidden/item5/clod/updtdd"));
model.setValue("/root/main/list2/clod[" + row + "]/grupcalcscorcd", model.getValue("/root/hidden/item5/clod/grupcalcscorcd"));
model.setValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd", model.getValue("/root/hidden/item5/clod/snglcalcscorcd"));
model.setValue("/root/main/list2/clod[" + row + "]/basecd", model.getValue("/root/hidden/item5/clod/basecd"));
model.setValue("/root/main/list2/clod[" + row + "]/hngnm", model.getValue("/root/hidden/item5/clod/hngnm"));
model.setValue("/root/main/list2/clod[" + row + "]/drugqty", model.getValue("/root/hidden/item5/clod/drugqty"));
model.setValue("/root/main/list2/clod[" + row + "]/tims", model.getValue("/root/hidden/item5/clod/tims"));
model.setValue("/root/main/list2/clod[" + row + "]/dayno", model.getValue("/root/hidden/item5/clod/dayno"));
model.setValue("/root/main/list2/clod[" + row + "]/edidrugqty", model.getValue("/root/hidden/item5/clod/edidrugqty"));
model.setValue("/root/main/list2/clod[" + row + "]/edidayno", model.getValue("/root/hidden/item5/clod/edidayno"));
model.setValue("/root/main/list2/clod[" + row + "]/unitcost", model.getValue("/root/hidden/item5/clod/unitcost"));
grd_clodhist.rowstatus(grd_clodhist.row) = parseInt(model.getValue("/root/hidden/item5/clod/rowstatus"));
}
// º¯°æÀÏÀÚ¸¦ °»½ÅÇÑ´Ù.
function fChkUpdtdd() {
var clbsfromdd = model.getValue("/root/main/item1/clbs/ordfromdd");
var clbstodd = model.getValue("/root/main/item1/clbs/ordtodd");
if (isValidDateTime(clbsfromdd) && isValidDateTime(clbstodd)) { // (dateHelper.js)
// À¯È¿ÇÑ ³¯Â¥,
// ½Ã°£ ÀÎÁö Á¡°Ë
for ( var i = 1; i < grd_clodhist.rows; i++) {
var mechfromdd = model.getValue("/root/main/list2/clod[" + i
+ "]/mechfromdd");
if (isValidDateTime(mechfromdd)) { // (dateHelper.js) À¯È¿ÇÑ ³¯Â¥, ½Ã°£ ÀÎÁö
// Á¡°Ë
// ¼ö°¡½ÃÀÛÀÏÀÚ°¡ CLBS Áø·á½ÃÀÛÀÏÀÚ~Áø·áÁ¾·áÀÏÀÚ »çÀÌÀÎ °æ¿ì (¼ö°¡°¡ º¯°æµÈ °æ¿ì)
if (mechfromdd >= clbsfromdd && mechfromdd <= clbstodd) {
// ¼ö°¡ÄÚµå, ¼ö°¡½ÃÀÛÀÏÀÚ°¡ °°Àº °æ¿ì ÃÖÃÊÁø·áÀÏÀÚ¸¦ ºñ±³ÇÑ´Ù.
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + i + "]/snglcalcscorcd");
var ordfromdd = model.getValue("/root/main/list2/clod[" + i + "]/ordfromdd");
for ( var j = 1; j < grd_clodhist.rows; j++) {
var m_fromdd = model.getValue("/root/main/list2/clod[" + j + "]/mechfromdd");
var calcscorcd = model.getValue("/root/main/list2/clod[" + j + "]/snglcalcscorcd");
if (snglcalcscorcd == calcscorcd && mechfromdd == m_fromdd) {
var o_fromdd = model.getValue("/root/main/list2/clod[" + j + "]/ordfromdd");
if (ordfromdd > o_fromdd) {
ordfromdd = o_fromdd;
}
}
}
// ÃÖÃÊÁø·áÀÏÀÚ¸¦ º¯°æÀÏÀÚ·Î ¼³Á¤ÇÑ´Ù.
for ( var j = 1; j < grd_clodhist.rows; j++) {
var m_fromdd = model.getValue("/root/main/list2/clod[" + j + "]/mechfromdd");
var calcscorcd = model.getValue("/root/main/list2/clod[" + j + "]/snglcalcscorcd");
var clodordfromdd = model.getValue("/root/main/list2/clod[" + j + "]/ordfromdd");
if (snglcalcscorcd == calcscorcd && mechfromdd == m_fromdd) {
var updtdd = model.getValue("/root/main/list2/clod[" + j + "]/updtdd");
if (updtdd != ordfromdd) {
model.setValue("/root/main/list2/clod[" + j + "]/updtdd", clodordfromdd);
grd_clodhist.cellStyle("background-color", j, grd_clodhist.colRef("updtdd")) = "#c8e67b"; // class="color_9" Çü±¤³ì»ö
// ó¹æÀÇ ¼öÁ¤µÈ row »óŸ¦ Ç¥½ÃÇÑ´Ù.
// fSetOrderChangeRowStat(i);
var rowstatus = grd_clodhist.rowstatus(j);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clodhist.rowstatus(j) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
}
}
}
} // if (mechfromdd >= clbsfromdd && mechfromdd <= clbstodd)
} // if (isValidDateTime(mechfromdd))
} // for (var i = 1; i < grd_clodhist.rows; i++)
} // if (isValidDateTime(clbsfromdd) && isValidDateTime(clbstodd))
}
// Á¶È¸ÇÑ ¼ö°¡ÄÚµåÀÇ ±Ý¾×Á¤º¸¸¦ Ç¥½ÃÇÑ´Ù.
function fSetCalcScorAmt(clod, mode) {
for ( var i = 1; i <= clod.length; i++) { // ½Ì±Û ¼ö°¡ÄÚµå °³¼ö ¸¸Å
var row = grd_clodhist.row;
if (mode == "new") {
model.setValue("/root/main/list2/clod[" + row + "]/grupsnglflag", model.getValue("/root/main/item5/mech[" + i + "]/grupsnglflag")); // ±×·ì½Ì±Û±¸ºÐ
model.setValue("/root/main/list2/clod[" + row + "]/grupseqno", model.getValue("/root/main/item5/mech[" + i + "]/grupseqno")); // ±×·ì Á¤·Ä¼ø¹ø
model.setValue("/root/main/list2/clod[" + row + "]/grupcalcscorcd", model.getValue("/root/main/item5/mech[" + i + "]/grupcalcscorcd"));
model.setValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd", model.getValue("/root/main/item5/mech[" + i + "]/snglcalcscorcd"));
model.setValue("/root/main/list2/clod[" + row + "]/orddeptcd", model.getValue("/root/main/item5/mech[" + i + "]/orddeptcd"));
model.setValue("/root/main/list2/clod[" + row + "]/orddrid", model.getValue("/root/main/item5/mech[" + i + "]/orddrid"));
model.setValue("/root/main/list2/clod[" + row + "]/matractflag", model.getValue("/root/main/item5/mech[" + i + "]/matractflag"));
model.setValue("/root/main/list2/clod[" + row + "]/item", model.getValue("/root/main/item5/mech[" + i + "]/item"));
model.setValue("/root/main/list2/clod[" + row + "]/payflag", model.getValue("/root/main/item5/mech[" + i + "]/payflag"));
model.setValue("/root/main/list2/clod[" + row + "]/pynpy1", model.getValue("/root/main/item5/mech[" + i + "]/pynpy1"));
model.setValue("/root/main/list2/clod[" + row + "]/earncls1", model.getValue("/root/main/item5/mech[" + i + "]/earncls1"));
model.setValue("/root/main/list2/clod[" + row + "]/earncls2", model.getValue("/root/main/item5/mech[" + i + "]/earncls2"));
model.setValue("/root/main/list2/clod[" + row + "]/earncls3", model.getValue("/root/main/item5/mech[" + i + "]/earncls3"));
model.setValue("/root/main/list2/clod[" + row + "]/ediitem1", model.getValue("/root/main/item5/mech[" + i + "]/ediitem1"));
model.setValue("/root/main/list2/clod[" + row + "]/ediitem2", model.getValue("/root/main/item5/mech[" + i + "]/ediitem2"));
model.setValue("/root/main/list2/clod[" + row + "]/ediitem", model.getValue("/root/main/item5/mech[" + i + "]/ediitem"));
model.setValue("/root/main/list2/clod[" + row + "]/cnfmcd", model.getValue("/root/main/item5/mech[" + i + "]/cnfmcd"));
model.setValue("/root/main/list2/clod[" + row + "]/orddd", model.getValue("/root/main/item5/mech[" + i + "]/orddd"));
model.setValue("/root/main/list2/clod[" + row + "]/calcappyn", model.getValue("/root/main/item5/mech[" + i + "]/calcappyn"));
// ½Å±ÔÀÔ·ÂµÈ Ã³¹æÀº edilnno´Â 0, seqno´Â ÃÖÁ¾¹øÈ£¸¦ ¼ÂÆÃÇϰí maxseqno¿¡ ÃÖÁ¾°ªÀ» +1ÇÑ´Ù.
model.setValue("/root/main/list2/clod[" + row + "]/edilnno", "0");
model.setValue("/root/main/list2/clod[" + row + "]/seqno", model.getValue("/root/main/item1/clbs/maxseqno"));
model.setValue("/root/main/item1/clbs/maxseqno", parseInt(model.getValue("/root/main/item1/clbs/maxseqno")) + 1);
}
model.setValue("/root/main/list2/clod[" + row + "]/mechfromdd", model.getValue("/root/main/item5/mech[" + i + "]/mechfromdd"));
model.setValue("/root/main/list2/clod[" + row + "]/mechtodd", model.getValue("/root/main/item5/mech[" + i + "]/mechtodd"));
model.setValue("/root/main/list2/clod[" + row + "]/unitcost", model.getValue("/root/main/item5/mech[" + i + "]/unitcost"));
model.setValue("/root/main/list2/clod[" + row + "]/drugqty", model.getValue("/root/main/item5/mech[" + i + "]/drugqty"));
model.setValue("/root/main/list2/clod[" + row + "]/tims", model.getValue("/root/main/item5/mech[" + i + "]/tims"));
model.setValue("/root/main/list2/clod[" + row + "]/daydrugqty", model.getValue("/root/main/item5/mech[" + i + "]/daydrugqty"));
model.setValue("/root/main/list2/clod[" + row + "]/dayno", model.getValue("/root/main/item5/mech[" + i + "]/dayno"));
model.setValue("/root/main/list2/clod[" + row + "]/totdrugqty", model.getValue("/root/main/item5/mech[" + i + "]/totdrugqty"));
model.setValue("/root/main/list2/clod[" + row + "]/amt", model.getValue("/root/main/item5/mech[" + i + "]/amt"));
model.setValue("/root/main/list2/clod[" + row + "]/basecd", model.getValue("/root/main/item5/mech[" + i + "]/basecd"));
model.setValue("/root/main/list2/clod[" + row + "]/baserlapnt", model.getValue("/root/main/item5/mech[" + i + "]/baserlapnt"));
model.setValue("/root/main/list2/clod[" + row + "]/baseaddrlapnt", model.getValue("/root/main/item5/mech[" + i + "]/baseaddrlapnt"));
model.setValue("/root/main/list2/clod[" + row + "]/estmcls", model.getValue("/root/main/item5/mech[" + i + "]/estmcls"));
model.setValue("/root/main/list2/clod[" + row + "]/estmmncd", model.getValue("/root/main/item5/mech[" + i + "]/estmmncd"));
model.setValue("/root/main/list2/clod[" + row + "]/pntunitcost", model.getValue("/root/main/item5/mech[" + i + "]/pntunitcost"));
model.setValue("/root/main/list2/clod[" + row + "]/hosinresncd", model.getValue("/root/main/item5/mech[" + i + "]/hosinresncd"));
model.setValue("/root/main/list2/clod[" + row + "]/ordfromdd", model.getValue("/root/main/item5/mech[" + i + "]/ordfromdd"));
model.setValue("/root/main/list2/clod[" + row + "]/ordtodd", model.getValue("/root/main/item5/mech[" + i + "]/ordtodd"));
model.setValue("/root/main/list2/clod[" + row + "]/edicdflag", model.getValue("/root/main/item5/mech[" + i + "]/edicdflag"));
model.setValue("/root/main/list2/clod[" + row + "]/edicd", model.getValue("/root/main/item5/mech[" + i + "]/edicd"));
model.setValue("/root/main/list2/clod[" + row + "]/ediunitcost", model.getValue("/root/main/item5/mech[" + i + "]/ediunitcost"));
model.setValue("/root/main/list2/clod[" + row + "]/edidrugqty", model.getValue("/root/main/item5/mech[" + i + "]/edidrugqty"));
model.setValue("/root/main/list2/clod[" + row + "]/edidayno", model.getValue("/root/main/item5/mech[" + i + "]/edidayno"));
model.setValue("/root/main/list2/clod[" + row + "]/rcptunitcost", model.getValue("/root/main/item5/mech[" + i + "]/rcptunitcost"));
model.setValue("/root/main/list2/clod[" + row + "]/prcpflag", model.getValue("/root/main/item5/mech[" + i + "]/prcpflag"));
model.setValue("/root/main/list2/clod[" + row + "]/ediamt", model.getValue("/root/main/item5/mech[" + i + "]/ediamt"));
model.setValue("/root/main/list2/clod[" + row + "]/rcptcalcamt", model.getValue("/root/main/item5/mech[" + i + "]/rcptcalcamt"));
model.setValue("/root/main/list2/clod[" + row + "]/estmcd", model.getValue("/root/main/item5/mech[" + i + "]/estmcd"));
model.setValue("/root/main/list2/clod[" + row + "]/hngnm", model.getValue("/root/main/item5/mech[" + i + "]/hngnm"));
model.setValue("/root/main/list2/clod[" + row + "]/edihospaddamt", model.getValue("/root/main/item5/mech[" + i + "]/edihospaddamt"));
model.setValue("/root/main/list2/clod[" + row + "]/ediaddamt", model.getValue("/root/main/item5/mech[" + i + "]/ediaddamt"));
model.setValue("/root/main/list2/clod[" + row + "]/paytotamt", model.getValue("/root/main/item5/mech[" + i + "]/paytotamt"));
model.setValue("/root/main/list2/clod[" + row + "]/ownbamt", model.getValue("/root/main/item5/mech[" + i + "]/ownbamt"));
model.setValue("/root/main/list2/clod[" + row + "]/clamamt", model.getValue("/root/main/item5/mech[" + i + "]/clamamt"));
model.setValue("/root/main/list2/clod[" + row + "]/choiordamt", model.getValue("/root/main/item5/mech[" + i + "]/choiordamt"));
model.setValue("/root/main/list2/clod[" + row + "]/edihospaddtotamt", model.getValue("/root/main/item5/mech[" + i + "]/edihospaddtotamt"));
model.setValue("/root/main/list2/clod[" + row + "]/ediaddtotamt", model.getValue("/root/main/item5/mech[" + i + "]/ediaddtotamt"));
model.setValue("/root/main/list2/clod[" + row + "]/choiordtotamt", model.getValue("/root/main/item5/mech[" + i + "]/choiordtotamt"));
model.setValue("/root/main/list2/clod[" + row + "]/totordamt", model.getValue("/root/main/item5/mech[" + i + "]/totordamt"));
model.setValue("/root/main/list2/clod[" + row + "]/ownbtotamt", model.getValue("/root/main/item5/mech[" + i + "]/ownbtotamt"));
model.setValue("/root/main/list2/clod[" + row + "]/ordnm", model.getValue("/root/main/item5/mech[" + i + "]/ordnm"));
model.setValue("/root/main/list2/clod[" + row + "]/estmcdnm", model.getValue("/root/main/item5/mech[" + i + "]/estmcdnm"));
model.setValue("/root/main/list2/clod[" + row + "]/adjtresncd", model.getValue("/root/main/item5/mech[" + i + "]/adjtresncd"));
if (model.getValue("/root/main/item5/mech[" + i + "]/updtdd") != "" && model.getValue("/root/main/item5/mech[" + i + "]/updtdd") != "-")
model.setValue("/root/main/list2/clod[" + row + "]/updtdd", model.getValue("/root/main/item5/mech[" + i + "]/updtdd"));
model.setValue("/root/main/list2/clod[" + row + "]/druglimitamt", model.getValue("/root/main/item5/mech[" + i + "]/druglimitamt"));
model.setValue("/root/main/list2/clod[" + row + "]/limitdiffamt", model.getValue("/root/main/item5/mech[" + i + "]/limitdiffamt"));
model.setValue("/root/main/list2/clod[" + row + "]/edidruglimitamt", model.getValue("/root/main/item5/mech[" + i + "]/edidruglimitamt"));
model.setValue("/root/main/list2/clod[" + row + "]/edilimitdiffamt", model.getValue("/root/main/item5/mech[" + i + "]/edilimitdiffamt"));
// Çà Ãß°¡ ÈÄ ½Ì±ÛÄÚµå Á¶È¸ ÈÄ¿¡ ´ÙÀ½ ÁÙÀ» ÀÚµ¿À¸·Î ÇÑÁÙ Ãß°¡ÇÔ.
if (i < clod.length) {
grd_clodhist.insertRow(row++, "below", false);
}
}
grd_clodhist.refresh();
}
// ÀÔ·ÂÇÑ »êÁ¤ÀǹÌÄڵ忡 ÇØ´çÇÏ´Â »êÁ¤Äڵ带 Á¶È¸ÇÑ´Ù.
function fSrchEstmCd() {
model.removeNodeset("/root/hidden/sppiz00800/rslt");
model.makeNode("/root/hidden/sppiz00800/rslt/clcd");
model.resetInstanceNode("/root/hidden/sppiz00800/cond");
var row = grd_clodhist.row;
var estmcls = model.getValue("/root/main/list2/clod[" + row + "]/estmcls");
var insukindcd = model.getValue("/root/main/item1/clbs/insukindcd");
if (insukindcd == "") {
messageBox("½É»ç´ë»óÀÚÀÇ º¸ÇèÀ¯ÇüÀÌ", "I004"); // /½É»ç´ë»óÀÚÀÇ º¸ÇèÀ¯ÇüÀÌ ¾ø½À´Ï´Ù
return false;
}
model.setValue("/root/hidden/sppiz00800/cond/insukind", insukindcd);
model.setValue("/root/hidden/sppiz00800/cond/estmcls", estmcls);
model.setValue("/root/hidden/sppiz00800/cond/estmmncd", model.getValue("/root/main/list2/clod[" + row + "]/estmmncd"));
model.setValue("/root/hidden/sppiz00800/cond/todd", model.getValue("/root/main/list2/clod[" + row + "]/ordtodd"));
modal("SPPIZ00800", "", "10", "10", "SPPIZ00800", "/root/hidden/sppiz00800/cond", "/root/hidden/cond"); // SPPIZ00800_»êÁ¤ÄÚµåÁ¶È¸.xrw
if (model.getValue("/root/hidden/sppiz00800/rslt/clcd/estmcd")) {
var estmmncd = model.getValue("/root/hidden/sppiz00800/rslt/clcd/estmmncd");
var oldestmmncd = model.getValue("/root/main/list2/clod[" + row + "]/estmmncd");
if (estmmncd == "0000" && oldestmmncd == "") {
} else {
if (estmmncd != oldestmmncd) {
var adjtresncd = model.getValue("/root/main/list2/clod[" + row + "]/adjtresncd");
var cmbAdjtresncd = "";
if (adjtresncd == "" || adjtresncd == "-") { // ½É»ç(Á¶Á¤)»çÀ¯°¡
// ÀԷµÇÁö ¾ÊÀº °æ¿ì
cmbAdjtresncd = model.getValue("/root/hidden/list2/clodstat/cmbAdjtresncd");
if (cmbAdjtresncd) {
model.setValue("/root/main/list2/clod[" + row + "]/adjtresncd", cmbAdjtresncd);
} else {
var newcd = fSetAdjtResnCd();
if (newcd == "" || newcd == "-") {
return;
}
}
}
fSetOrderChangeRowStat(row); // ó¹æÀÇ ¼öÁ¤µÈ row »óŸ¦ Ç¥½ÃÇÑ´Ù.
} else {
return;
}
var oldestmcd = model.getValue("/root/main/list2/clod[" + row + "]/estmcd");
var oldestmcdnm = model.getValue("/root/main/list2/clod[" + row + "]/estmcdnm");
model.setValue("/root/main/list2/clod[" + row + "]/estmmncd", estmmncd);
model.setValue("/root/main/list2/clod[" + row + "]/estmcd", model.getValue("/root/hidden/sppiz00800/rslt/clcd/estmcd"));
model.setValue("/root/main/list2/clod[" + row + "]/estmcdnm", model.getValue("/root/hidden/sppiz00800/rslt/clcd/estmcdnm"));
var rslt = fSetEstmCd();
row = grd_clodhist.row;
if (rslt == false) {
model.setValue("/root/main/list2/clod[" + row + "]/estmmncd", oldestmmncd);
model.setValue("/root/main/list2/clod[" + row + "]/estmcd", oldestmcd);
model.setValue("/root/main/list2/clod[" + row + "]/estmcdnm", oldestmcdnm);
} else {
if (row != -1 && estmmncd == "0000") { // sort ÀÌÈÄ¿¡ ¼±ÅÃµÈ row°¡ ÀÖ°í
estmmncd = "";
model.setValue("/root/main/list2/clod[" + row + "]/estmmncd", estmmncd);
model.setValue("/root/main/list2/clod[" + row + "]/estmcd", "");
model.setValue("/root/main/list2/clod[" + row + "]/estmcdnm", "");
}
}
}
}
if (row == -1) { // sort ÀÌÈÄ¿¡ ¼±ÅÃµÈ row°¡ ¾øÀ½
return false;
}
var estmmncd = model.getValue("/root/main/list2/clod[" + row + "]/estmmncd");
var msg = "»êÁ¤ºÐ·ù [" + estmcls + "] ";
if (estmmncd) {
msg += "»êÁ¤ÀǹÌÄÚµå: " + estmmncd;
} else {
model.setValue("/root/hidden/list3/msgspclformat", msg + " ÀÔ·ÂµÈ »êÁ¤ÀǹÌÄڵ尡 ¾ø½À´Ï´Ù.");
return true;
}
var estmcd = model.getValue("/root/hidden/sppiz00800/rslt/clcd/estmcd");
var estmcdnm = model.getValue("/root/hidden/sppiz00800/rslt/clcd/estmcdnm");
if (estmcd) {
msg += " / »êÁ¤ÄÚµå: " + estmcd;
}
if (estmcdnm) {
msg += " / ¸íĪ: " + estmcdnm;
}
var addmthd = model.getValue("/root/hidden/sppiz00800/rslt/clcd/addmthd");
if (addmthd) {
msg += " // °è»ê¹æ¹ý: [" + addmthd + "] ";
msg += model.getValue("/root/hidden/sppiz00800/rslt/clcd/pnt");
msg += " / " + model.getValue("/root/hidden/sppiz00800/rslt/clcd/amt");
msg += " / " + model.getValue("/root/hidden/sppiz00800/rslt/clcd/rate");
} else {
msg += " // Á¶È¸µÈ »êÁ¤Äڵ尡 ¾ø½À´Ï´Ù.";
}
model.setValue("/root/hidden/list3/msgspclformat", msg);
model.refreshpart("/root/hidden/list3/msgspclformat");
return true;
}
// ¼ö°¡ÄÚµåÀÇ estmcls(»êÁ¤ºÐ·ù)¿¡ µû¶ó ¼±Åð¡´ÉÇÑ 5ÀÚ¸®ÀÇ estmmncd(»êÁ¤ÀǹÌ), ÀÌ¿¡ ÇØ´çÇÏ´Â 3ÀÚ¸®ÀÇ estmcd(»êÁ¤ÄÚµå)¸¦
// Á¶È¸ÇÏ°í ±Ý¾×À» Àç°è»êÇÑ´Ù.
function fSetEstmCd() {
var row = grd_clodhist.row;
model.resetInstanceNode("/root/send/item5/mech"); // submit("TRPID20303")
// ¿ë
var ordfromdd = model.getValue("/root/main/list2/clod[" + row + "]/ordfromdd");
var ordtodd = model.getValue("/root/main/list2/clod[" + row + "]/ordtodd");
if (ordfromdd == "" || ordtodd == "") {
messageBox("󹿽ÃÀÛÀÏ & Á¾·áÀÏÀº", "I003"); // /󹿽ÃÀÛÀÏ & Á¾·áÀÏÀº ÇʼöÀÔ·ÂÀÔ´Ï´Ù.
return false;
}
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd");
if (snglcalcscorcd == "") {
messageBox("¼ö°¡Äڵ尡 ÀԷµÇÁö", "E007"); // /¼ö°¡Äڵ尡 ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.
return false;
}
model.makeValue("/root/send/item5/mech/snglcalcscorcd", snglcalcscorcd);
model.makeValue("/root/send/item5/mech/insukind", model.getValue("/root/main/item1/clbs/insukindcd"));
model.makeValue("/root/send/item5/mech/suppkind", model.getValue("/root/main/item1/clbs/suppkindcd"));
var orddeptcd = model.getValue("/root/main/list2/clod[" + row + "]/orddeptcd");
if (orddeptcd) {
model.makeValue("/root/send/item5/mech/orddeptcd", orddeptcd);
} else {
model.makeValue("/root/send/item5/mech/orddeptcd", model.getValue("/root/main/item1/clbs/orddeptcd"));
}
var orddrid = model.getValue("/root/main/list2/clod[" + row + "]/orddrid");
if (orddrid) {
model.makeValue("/root/send/item5/mech/orddrid", orddrid);
} else {
model.makeValue("/root/send/item5/mech/orddrid", model.getValue("/root/main/item1/clbs/orddrid"));
}
model.makeValue("/root/send/item5/mech/ordfromdd", ordfromdd);
model.makeValue("/root/send/item5/mech/ordtodd", ordtodd);
var estmmncd = model.getValue("/root/main/list2/clod[" + row + "]/estmmncd");
if (estmmncd != "-") {
model.makeValue("/root/send/item5/mech/estmmncd", estmmncd);
} else {
messageBox("»êÁ¤ÀǹÌÄڵ尡 ÀԷµÇÁö", "E007"); // /»êÁ¤ÀǹÌÄڵ尡 ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.
return false;
}
var drugqty = model.getValue("/root/main/list2/clod[" + row + "]/drugqty");
if (drugqty == "") {
drugqty = "1";
}
model.makeValue("/root/send/item5/mech/drugqty", drugqty);
var tims = model.getValue("/root/main/list2/clod[" + row + "]/tims");
if (tims == "") {
tims = "1";
}
model.makeValue("/root/send/item5/mech/tims", tims);
var dayno = model.getValue("/root/main/list2/clod[" + row + "]/dayno");
if (dayno == "") {
dayno = "1";
}
model.makeValue("/root/send/item5/mech/dayno", dayno);
model.makeValue("/root/send/item5/mech/adjtresncd", model.getValue("/root/main/list2/clod[" + row + "]/adjtresncd"));
model.makeValue("/root/send/item5/mech/undersixageyn", model.getValue("/root/main/item1/clbs/undersixageyn"));
model.makeValue("/root/send/item5/mech/mechage", model.getValue("/root/main/item1/clbs/mechage"));
model.makeValue("/root/send/item5/mech/ioflag", model.getValue("/root/main/item1/clbs/ioflag"));
model.makeValue("/root/send/item5/mech/clamflagcd", model.getValue("/root/main/item1/clbs/clamflagcd"));
model.makeValue("/root/send/item5/mech/mode", "u");
submit("TRPID20303");
var clodSelect = instance1.selectSingleNode("/root/main/item5"); // root/main/item5
var clod = clodSelect.childNodes; // root/main/item5/mech
if (clod.length == 1) {
var mechfromdd = model.getValue("/root/main/item5/mech/mechfromdd");
var mechtodd = model.getValue("/root/main/item5/mech/mechtodd");
if (mechfromdd && mechtodd) {
// Á¶È¸ÇÑ ¼ö°¡ÄÚµåÀÇ ±Ý¾×Á¤º¸¸¦ Ç¥½ÃÇÑ´Ù.
fSetCalcScorAmt(clod, "update");
// ±âÁ¸¿¡ ÁÙ¹øÈ£°¡ ºÎ¿©¾ÈµÈ °æ¿ì
// ó¹æ Grid ŸÀÌÆ²À» ÀÌ¿ëÇØ¼ sorting ÇÑ °æ¿ì ÁÙ¹øÈ£°¡ ÇöÀç Á¤·ÄµÈ ¼ø¼´ë·Î ºÎ¿©µÇ¹Ç·Î ´Ù½Ã sortÇÏ¿©
// ó¸®ÇÑ´Ù.
// 2008-11-24
// fSetOrderLnNo();
// ó¹æ Ç׸ñ ±¸ºÐ ¹× ¼±º°½É»ç ó¹æ »ö±ò ±¸ºÐ
// fSetOrderData();
} else {
// À߸øµÈ »êÁ¤ÄÚµå ¼±ÅÃÀ¸·Î ÇØ´ç eidcd°¡ ¾ø´Â °æ¿ì
messageBox("»êÁ¤Äڵ尡 ¿Ã¹Ù¸£Áö ¾Ê°Å³ª Á¶È¸µÈ ó¹æ °è»ê ³»¿ªÀÌ", "I004"); // /»êÁ¤Äڵ尡 ¿Ã¹Ù¸£Áö ¾Ê°Å³ª Á¶È¸µÈ ó¹æ °è»ê ³»¿ªÀÌ ¾ø½À´Ï´Ù
return false;
}
} else {
// [20070618] Á¶È¸µÈ °á°ú°¡ ¾øÀ» ¶§?
messageBox("Á¶È¸µÈ ó¹æ °è»ê ³»¿ªÀÌ", "I004"); // /Á¶È¸µÈ ó¹æ °è»ê ³»¿ªÀÌ ¾ø½À´Ï´Ù
return false;
}
return true;
}
// ¼ö°¡Äڵ尡 ¾øÀ¸¸ç DB¿¡ ÀúÀåµÈ ³»¿ëÀÌ ¾Æ´Ñ °æ¿ì ÇØ´ç ÁÙÀ» »èÁ¦ÇÑ´Ù.
function fDelEmptyGridOrderData() {
for ( var i = grd_clodhist.fixedRows; i < grd_clodhist.rows; i++) { // ù ÁÙºÎÅÍ
var rowstatus = grd_clodhist.rowstatus(i);
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + i + "]/snglcalcscorcd");
var ediamt = model.getValue("/root/main/list2/clod[" + i + "]/ediamt");
if (rowstatus != 4 && snglcalcscorcd && ediamt) { // 4 : delete »èÁ¦ »óŰ¡ ¾Æ´Ï¸é¼ ¼ö°¡Äڵ尡 ÀÔ·ÂµÇ°í ±Ý¾×ÀÌ °è»êµÈ »óÅÂÀÓ
} else if (rowstatus == 1 || rowstatus == 3) { // ¼ö°¡ÄÚµå ¾øÀ¸¸ç DB¿¡ ÀúÀåµÈ ³»¿ëÀÌ ¾Æ´Ñ °æ¿ì
grd_clodhist.deleteRow(i, false); // ÁÙÀ» »èÁ¦ÇÑ´Ù.
i--;
}
}
grd_clodhist.refresh();
}
// ó¹æÀÇ ¼öÁ¤µÈ row »óŸ¦ Ç¥½ÃÇÑ´Ù.
function fSetOrderChangeRowStat(clodrow) {
var clodstatus = grd_clodhist.rowstatus(clodrow);
if (clodstatus == 1 || clodstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clodhist.rowstatus(clodrow) = 2; // 2 : update
// ó¹æ Grid ¹è°æ»öÀ» ¼³Á¤ÇÑ´Ù. - Ãß°¡/¼öÁ¤µÈ row
fOrderBkColorNew(clodrow);
}
}
// /////////////////////////////////////////////////////////////////////////
// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "»óº´¼ø¼ À§·Î"
function fDiagSeqUp() {
var rowstatus = grd_cldihist.rowstatus(grd_cldihist.row);
if (rowstatus == 4) { // 4 : delete
return;
}
var diagseq = parseInt(model.getValue("/root/main/list1/cldi["+ grd_cldihist.row + "]/diagseq")); // ¼±ÅÃµÈ ÁÙÀÇ NO
if (diagseq > 1) { // ù¹øÂ° ÁÙÀÌ ¾Æ´Ñ °æ¿ì
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagseq", --diagseq);
if (rowstatus == 0 || rowstatus == 2) {
grd_cldihist.rowstatus(grd_cldihist.row) = 2; // 2 : update
}
// ¹Ù·Î À§ »óº´¼ø¼¿Í Áߺ¹µÇ´Â °æ¿ì
var nextrow = grd_cldihist.row - 1;
var nextdiagseq = model.getValue("/root/main/list1/cldi[" + nextrow + "]/diagseq");
if (diagseq == nextdiagseq) {
model.setValue("/root/main/list1/cldi[" + nextrow + "]/diagseq", ++diagseq);
rowstatus = grd_cldihist.rowstatus(nextrow);
if (rowstatus == 0 || rowstatus == 2) {
grd_cldihist.rowstatus(nextrow) = 2; // 2 : update
}
}
// 20100329 MT002 ÀÔ·Âüũ
if (model.getValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagseq") == "1"
&& model.getValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/vcode") != ""
&& model.getValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagkindcd") != "R") {
fSetDiagMT002(model.getValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/vcode"));
}
fSortDiagNo(false);
}
}
// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "»óº´¼ø¼ ¾Æ·¡·Î"
function fDiagSeqDown() {
var rowstatus = grd_cldihist.rowstatus(grd_cldihist.row);
if (rowstatus == 4) { // 4 : delete
return;
}
// »èÁ¦ »óŰ¡ ¾Æ´Ñ ¸¶Áö¸· ÁÙÀ» ã´Â´Ù.
var lastRow = grd_cldihist.rows - 1;
for ( var i = 1; i < grd_cldihist.rows; i++) {
if (grd_cldihist.rowstatus(i) == 4) { // delete
lastRow = i - 1;
i = grd_cldihist.rows;
}
}
var diagseq = parseInt(model.getValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagseq")); // ¼±ÅÃµÈ ÁÙÀÇ NO
if (diagseq < lastRow) { // ¸¶Áö¸· ÁÙÀÌ ¾Æ´Ñ °æ¿ì
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagseq", ++diagseq);
if (rowstatus == 0 || rowstatus == 2) {
grd_cldihist.rowstatus(grd_cldihist.row) = 2; // 2 : update
}
// ¹Ù·Î ¾Æ·¡ »óº´¼ø¼¿Í Áߺ¹µÇ´Â °æ¿ì
var nextrow = grd_cldihist.row + 1;
var nextdiagseq = model.getValue("/root/main/list1/cldi[" + nextrow + "]/diagseq");
if (diagseq == nextdiagseq) {
model.setValue("/root/main/list1/cldi[" + nextrow + "]/diagseq", --diagseq);
rowstatus = grd_cldihist.rowstatus(nextrow);
if (rowstatus == 0 || rowstatus == 2) {
grd_cldihist.rowstatus(nextrow) = 2; // 2 : update
}
}
// 20100329 MT002 ÀÔ·Âüũ
if (model.getValue("/root/main/list1/cldi[" + nextrow + "]/diagseq") == "1"
&& model.getValue("/root/main/list1/cldi[" + nextrow + "]/vcode") != ""
&& model.getValue("/root/main/list1/cldi[" + nextrow + "]/diagkindcd") != "R") {
fSetDiagMT002(model.getValue("/root/main/list1/cldi[" + nextrow + "]/vcode"));
}
fSortDiagNo(false);
}
}
// "»óº´¼ø¼ À§·Î/¾Æ·¡·Î" ¼ø¼ º¯°æ ÈÄ¿¡ »óº´ ¼ø¼ NO¿¡ µû¶ó sorting ÀÛ¾÷
function fSortDiagNo(isNumbering) {
var delcnt = 0;
for ( var i = 1; i < grd_cldihist.rows; i++) {
grd_cldihist.rowHidden(i) = false;
}
if (isNumbering == false) {
var maxRow = parseInt(grd_cldihist.rows) - 1; // rows´Â ŸÀÌÆ²ºÎºÐ ºÎÅÍ °³¼ö¸¦ ¼¾´Ù
grd_cldihist.sort(1, grd_cldihist.colRef("diagseq"), maxRow, grd_cldihist.colRef("diagseq")) = "asc"; // ŸÀÌÆ²À» Á¦¿ÜÇÑ data ºÎºÐÀÇ Ã¹ ÁÙÀÇ row = 1 / col = 3 : no
// Sort µÈ Grid »óÀÇ Data ¼ø¼¿Í Instance Node »óÀÇ Data ¼ø¼¸¦ µ¿ÀÏÇÏ°Ô ¸ÂÃçÁØ´Ù.
grd_cldihist.gridToInstance();
}
var cldino = 1;
for ( var i = 1; i < grd_cldihist.rows; i++) {
if (grd_cldihist.rowstatus(i) != 4) { // delete
var diagseq = model.getValue("/root/main/list1/cldi[" + i + "]/diagseq");
if (grd_cldihist.rowstatus(i) == 0 && diagseq != cldino) {
grd_cldihist.rowstatus(i) = 2; // 2 : update
}
model.setValue("/root/main/list1/cldi[" + i + "]/diagseq", cldino++);
} else {
delcnt++;
}
}
var maxRow = parseInt(grd_cldihist.rows) - 1; // rows´Â ŸÀÌÆ²ºÎºÐ ºÎÅÍ °³¼ö¸¦ ¼¾´Ù
grd_cldihist.sort(1, grd_cldihist.colRef("diagseq"), maxRow, grd_cldihist .colRef("diagseq")) = "asc"; // ŸÀÌÆ²À» Á¦¿ÜÇÑ data ºÎºÐÀÇ Ã¹ ÁÙÀÇ row = 1 / col = 3 : no
if (delcnt > 0) {
grd_cldihist.sort(1, grd_cldihist.colRef("diagseq"), maxRow - delcnt, grd_cldihist.colRef("diagseq")) = "asc"; // ŸÀÌÆ²À» Á¦¿ÜÇÑ data ºÎºÐÀÇ Ã¹ ÁÙÀÇ row = 1 / col = 3 : no
}
// Sort µÈ Grid »óÀÇ Data ¼ø¼¿Í Instance Node »óÀÇ Data ¼ø¼¸¦ µ¿ÀÏÇÏ°Ô ¸ÂÃçÁØ´Ù.
grd_cldihist.gridToInstance();
var rowstatus;
for ( var i = 1; i < grd_cldihist.rows; i++) {
rowstatus = grd_cldihist.rowstatus(i);
if (rowstatus > 3) { // »èÁ¦»óÅÂ
grd_cldihist.rowHidden(i) = true;
} else {
grd_cldihist.rowHidden(i) = false;
}
}
}
// »ç¿ëÀÚ°¡ ÀÔ·ÂÇÑ ¼ýÀÚ¸¦ ±âÁØÀ¸·Î »óº´¼ø¼ ºÎ¿©
function fChangeDiagNo() {
var row = grd_cldihist.row;
if (grd_cldihist.rowstatus(row) != 1 && grd_cldihist.rowstatus(row) != 3) { // 1 : insert, 3 : insert & new
grd_cldihist.rowstatus(row) = 2; // 2 : update
}
var newseq = model.getValue("/root/main/list1/cldi[" + row + "]/diagseq");
var oldseq = model.getValue("/root/hidden/list1/cldi/oldseq");
var vcode = model.getValue("/root/main/list1/cldi[" + row + "]/vcode");
var diagkindcd = model.getValue("/root/main/list1/cldi[" + row + "]/diagkindcd");
if (newseq) {
newseq = parseInt(model.getValue("/root/main/list1/cldi[" + row + "]/diagseq"), 10); // '09' ¿Í °°Àº Çü½ÄÀ¸·Î ÀÔ·ÂÇÑ °æ¿ì -> 9·Î ó¸®
// »èÁ¦»óŰ¡ ¾Æ´Ñ Áߺ¹µÈ ¹øÈ£°¡ ÀÖ´ÂÁö üũÇÑ´Ù.
var sameRow = 0;
for ( var i = 1; i < grd_cldihist.rows; i++) {
var diagseq = model.getValue("/root/main/list1/cldi[" + i + "]/diagseq");
if (row != i && diagseq == newseq) {
sameRow = i;
i = grd_cldihist.rows;
}
}
if (sameRow > 0) { // Áߺ¹µÈ »óº´¼ø¼ÀÇ row°¡ ÀÖÀ½
if (newseq < oldseq) { // ÀÌÀüº¸´Ù ¾Õ¹øÈ£¸¦ ÀÔ·ÂÇÑ °æ¿ì
for ( var j = sameRow; j < row; j++) {
var rowstatus = grd_cldihist.rowstatus(j);
if (rowstatus != 4) {
var curseq = parseInt(model.getValue("/root/main/list1/cldi[" + j + "]/diagseq"), 10);
if (rowstatus != 1 && rowstatus != 3) {
if (model.getValue("/root/main/list1/cldi[" + j + "]/diagseq") != (curseq + 1)) {
grd_cldihist.rowstatus(j) = 2;
}
}
model.setValue("/root/main/list1/cldi[" + j + "]/diagseq", curseq + 1);
}
}
} else { // ÀÌÀüº¸´Ù µÞ¹øÈ£¸¦ ÀÔ·ÂÇÑ °æ¿ì
for ( var j = row + 1; j <= sameRow; j++) {
var rowstatus = grd_cldihist.rowstatus(j);
if (rowstatus != 4) {
var curseq = parseInt(model.getValue("/root/main/list1/cldi[" + j + "]/diagseq"), 10);
if (rowstatus != 1 && rowstatus != 3) {
if (model.getValue("/root/main/list1/cldi[" + j + "]/diagseq") != (curseq - 1)) {
grd_cldihist.rowstatus(j) = 2;
}
}
model.setValue("/root/main/list1/cldi[" + j + "]/diagseq", curseq - 1);
}
}
}
fSortDiagNo(false);
fDiagGridInsertRow("Y", "N"); // »óº´¸¶Áö¸· ±×¸®µå¿¡ ÇÑ row Ãß°¡ 20090918 Á¤½Â¿ì
// 20100329 MT002 ÀÔ·Âüũ
if (newseq == "1" && oldseq != "1" && vcode != "" && diagkindcd != "R") {
fSetDiagMT002(vcode);
}
} else { // Áߺ¹µÈ »óº´¼ø¼ÀÇ row°¡ ¾ø´Â °æ¿ì
fSortDiagNo(false); // ÇöÀç ºÎ¿©µÈ ¼ø¹øÀ¸·Î sort ÈÄ
fDiagGridInsertRow("Y", "N"); // »óº´¸¶Áö¸· ±×¸®µå¿¡ ÇÑ 20090918 Á¤½Â¿ì
}
} else { // ¼ø¹øÀ» »èÁ¦ÇÑ °æ¿ì
model.setValue("/root/main/list1/cldi[" + row + "]/diagseq", oldseq);
grd_cldihist.rowstatus(row) = model
.getValue("/root/hidden/list1/cldi/oldrowstat");
// model.refresh();
fDiagGridInsertRow("Y", "N"); // »óº´¸¶Áö¸· ±×¸®µå¿¡ ÇÑ 20090918 Á¤½Â¿ì
grd_cldihist.refresh();
}
}
// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "Çà »ðÀÔ"
function fDiagGridInsertRow(addyn, selectyn) {
var iInsertRow = 0;
if (grd_cldihist.rows == 1 || addyn == "Y") {
iInsertRow = grd_cldihist.row;
grd_cldihist.addRow(true, false);
} else {
iInsertRow = grd_cldihist.row;
grd_cldihist.insertRow(iInsertRow, "below", true);
}
var nowRow = 0;
nowRow = grd_cldihist.row;
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagkindcd", "C");
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagseq",grd_cldihist.row);
// û±¸°ú, Áø·á°³½ÃÀÏÀº ÁÖ»óº´À» ±âÁØÀ¸·Î ºÎ¿©ÇÑ´Ù.
var clamdeptcd = model.getValue("/root/main/list1/cldi/clamdeptcd");
if (clamdeptcd == "") { // ÁÖ»óº´ÀÇ Áø·á°ú°¡ ÀԷµÇÁö ¾ÊÀº °æ¿ì ÀÎÀû»çÇ×ÀÇ Ã»±¸°ú¸¦ ÀÔ·ÂÇÑ´Ù.
clamdeptcd = model.getValue("/root/main/item1/clbs/clamdeptcd");
}
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/clamdeptcd", clamdeptcd);
var ordfromdd = model.getValue("/root/main/list1/cldi/ordfromdd");
if (ordfromdd) {
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/ordfromdd", ordfromdd);
} else {
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/ordfromdd", model.getValue("/root/main/item1/clbs/ordfromdd"));
}
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/toot", "-");
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/vcode", ""); // 20100308 Ãß°¡
// »óº´ÀÌ·ÂÁ¶È¸¿¡¼ È£ÃâµÈ °æ¿ì°¡ ¾Æ´Ï¸é
if (selectyn != "Y") {
fSortDiagNo(true);
}
// edit mode ¼³Á¤À§ÇѰÍÀÓ Àý´ë Áö¿ìÁö ¸»°Í.
grd_cldihist.refresh();
if (addyn != "Y") {
grd_cldihist.row = nowRow;
grd_cldihist.col = grd_cldihist.colRef("diagcd");
// grd_cldihist.dispatch("onentercell");
fGetGrdCldihistEditCell();
}
}
// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "Çà Ãß°¡(5ÁÙ)"
function fDiagGridInsertRowMulti() {
for ( var i = 1; i <= 5; i++) {
grd_cldihist.insertRow(grd_cldihist.rows - 1, "below", false);
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagkindcd", "C");
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagseq", grd_cldihist.row);
// û±¸°ú, Áø·á°³½ÃÀÏÀº ÁÖ»óº´À» ±âÁØÀ¸·Î ºÎ¿©ÇÑ´Ù.
var clamdeptcd = model.getValue("/root/main/list1/cldi/clamdeptcd");
if (clamdeptcd == "") { // ÁÖ»óº´ÀÇ Áø·á°ú°¡ ÀԷµÇÁö ¾ÊÀº °æ¿ì ÀÎÀû»çÇ×ÀÇ Ã»±¸°ú¸¦ ÀÔ·ÂÇÑ´Ù.
clamdeptcd = model.getValue("/root/main/item1/clbs/clamdeptcd");
}
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/clamdeptcd", clamdeptcd);
var ordfromdd = model.getValue("/root/main/list1/cldi/ordfromdd");
if (ordfromdd) {
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/ordfromdd", ordfromdd);
} else {
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/ordfromdd", model.getValue("/root/main/item1/clbs/ordfromdd"));
}
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/toot", "-");
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/vcode", ""); // 20100308 Ãß°¡
}
grd_cldihist.refresh();
fSortDiagNo(true);
// edit mode ¼³Á¤À§ÇѰÍÀÓ Àý´ë Áö¿ìÁö ¸»°Í.
grd_cldihist.refresh();
grd_cldihist.row = grd_cldihist.rows - 5;
grd_cldihist.col = grd_cldihist.colRef("diagcd");
// grd_cldihist.dispatch("onentercell");
fGetGrdCldihistEditCell()
}
// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "Çà »èÁ¦"
function fDiagGridDeleteRow() {
// ¿©·¯ row¸¦ µ¿½Ã¿¡ ¼±ÅÃÇÏ°í »èÁ¦ÇÏ´Â ±â´ÉÀ» ºÎ¿©ÇÑ´Ù.
for ( var i = 0; i < grd_cldihist.selectedRows; i++) {
var row = grd_cldihist.selectedrow(i);
var rowstatus = grd_cldihist.rowstatus(row);
if (rowstatus == 4) { // 4 : delete
// return;
} else if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 :
// insert & new
model.resetInstanceNode("/root/main/list1/cldi[" + row + "]/diagcd");
model.resetInstanceNode("/root/main/list1/cldi[" + row + "]/diagnm");
model.resetInstanceNode("/root/main/list1/cldi[" + row + "]/diagengnm");
grd_cldihist.deleteRow(row, false); // ÇØ´ç ¶óÀÎÀ» Grid¿¡¼ »èÁ¦ÇÑ´Ù.
} else { // 0 : new, 2 : update
model.setValue("/root/main/list1/cldi[" + row + "]/diagseq", "D" + row);
grd_cldihist.rowstatus(row) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
}
fSortDiagNo(true);
}
// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "»èÁ¦ Ãë¼Ò"
function fDiagGridDeleteCancel() {
// ¿©·¯ row¸¦ µ¿½Ã¿¡ ¼±ÅÃÇÏ°í »èÁ¦Ãë¼ÒÇÏ´Â ±â´ÉÀ» ºÎ¿©ÇÑ´Ù.
for ( var i = 0; i < grd_cldihist.selectedRows; i++) {
var row = grd_cldihist.selectedrow(i);
var rowstatus = grd_cldihist.rowstatus(row);
if (rowstatus == 4) { // 4 : delete
grd_cldihist.rowstatus(row) = 0 // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
}
fSortDiagNo(true);
}
// »óº´Äڵ带 Á¶È¸ÇÏ¿© ÇØ´ç Á¤º¸¸¦ Ç¥½ÃÇϰųª »óº´ÄÚµå Á¶È¸¿ë PopupÀ» È£ÃâÇÑ´Ù.
function fSearchDiageCode() {
var row = grd_cldihist.row;
var diagcd = model.getValue("/root/main/list1/cldi[" + row + "]/diagcd");
if (diagcd) {
model.removeNodeset("/root/hidden/sppiz00400/rslt");
model.resetInstanceNode("/root/hidden/sppiz00400/cond");
model.setValue("/root/hidden/sppiz00400/cond/basedd", getCurrentDate()); // (dateHelper.js) ÇöÀ糯¥ ¹Ýȯ
model.setValue("/root/hidden/sppiz00400/cond/diagcd", diagcd);
model.setValue("/root/hidden/sppiz00400/cond/diagnm", "");
model.setValue("/root/hidden/sppiz00400/cond/selectedrdodiagkind", "1");
submit("TRPID20306",false); // ÀÔ·ÂµÈ »óº´ÄÚµå·Î emr.mrtmicd10 Å×À̺íÀ» Á¶È¸ÇÑ´Ù.
var rsltList = instance1
.selectSingleNode("/root/hidden/sppiz00400/rslt");
if (rsltList != null && rsltList.length == 0) {
// Á¶È¸µÈ °á°ú°¡ 1°ÇÀ̸é
fSetDiagCdNm();
// ´ÙÀ½Ä¿¡ ÀÚµ¿ Æ÷Ä¿½º 2008-11-26
row++;
grd_cldihist.row = row;
grd_cldihist.col = grd_cldihist.colRef("diagcd");
// grd_cldihist.dispatch("onentercell");
fGetGrdCldihistEditCell();
} else {
// Á¶È¸µÈ °á°ú°¡ ¾ø°Å³ª ¿©·¯ °ÇÀ̸é
// »óº´ÄÚµå Á¶È¸¸¦ À§ÇØ SPPIZ00400_»óº´ÄÚµåÁ¶È¸.xrw ¸¦ È£ÃâÇÑ´Ù.
fSearchSPPIZ00400();
if (model.getValue("/root/main/list1/cldi[" + row + "]/diagnm") == "" && model.getValue("/root/main/list1/cldi[" + row + "]/diagengnm") == "") {
model.setValue("/root/main/list1/cldi[" + row + "]/diagcd", model.getValue("/root/hidden/list1/cldi/olddiagcd"));
model.setValue("/root/main/list1/cldi[" + row + "]/diagnm", model.getValue("/root/hidden/list1/cldi/olddiagnm"));
model.setValue("/root/main/list1/cldi[" + row + "]/diagengnm", model.getValue("/root/hidden/list1/cldi/oldengnm"));
grd_cldihist.rowstatus(row) = model.getValue("/root/hidden/list1/cldi/oldrowstat");
grd_cldihist.refresh();
return;
} else {
// ´ÙÀ½Ä¿¡ ÀÚµ¿ Æ÷Ä¿½º 2008-11-26
row++;
if (row < grd_cldihist.rows) {
grd_cldihist.row = row;
grd_cldihist.col = grd_cldihist.colRef("diagcd");
// grd_cldihist.dispatch("onentercell");
fGetGrdCldihistEditCell();
}
}
}
} else {
// »óº´ Grid¿¡ »óº´Äڵ带 ÀÔ·ÂÇÏÁö ¾Ê°í Enter Ä£ °æ¿ì
// »óº´ÄÚµå Á¶È¸¸¦ À§ÇØ SPPIZ00400_»óº´ÄÚµåÁ¶È¸.xrw ¸¦ È£ÃâÇÑ´Ù.
fSearchSPPIZ00400();
// ´ÙÀ½Ä¿¡ ÀÚµ¿ Æ÷Ä¿½º 2008-11-26
row++;
grd_cldihist.row = row;
grd_cldihist.col = grd_cldihist.colRef("diagcd");
// grd_cldihist.dispatch("onentercell");
fGetGrdCldihistEditCell();
if (model.getValue("/root/main/list1/cldi[" + row + "]/diagcd") == "") {
model.setValue("/root/main/list1/cldi[" + row + "]/diagcd", model.getValue("/root/hidden/list1/cldi/olddiagcd"));
model.setValue("/root/main/list1/cldi[" + row + "]/diagnm", model.getValue("/root/hidden/list1/cldi/olddiagnm"));
model.setValue("/root/main/list1/cldi[" + row + "]/diagengnm", model.getValue("/root/hidden/list1/cldi/oldengnm"));
grd_cldihist.rowstatus(row) = model.getValue("/root/hidden/list1/cldi/oldrowstat");
grd_cldihist.refresh();
return;
}
}
// »èÁ¦ »óÅ¿´´ø »óº´Äڵ带 Á¶È¸ÇÏ¿© ¼öÁ¤ÇÑ °æ¿ì¸¦ À§ÇØ ¼ø¹øÀ» ´Ù½Ã ºÎ¿©ÇÑ´Ù.
// 2008-11-26
// fSortDiagNo(true);
}
// »óº´ÄÚµå Á¶È¸¸¦ À§ÇØ SPPIZ00400_»óº´ÄÚµåÁ¶È¸.xrw ¸¦ È£ÃâÇÑ´Ù.
function fSearchSPPIZ00400() {
model.removeNodeset("/root/hidden/sppiz00400/rslt");
model.makeNode("/root/hidden/sppiz00400/rslt/diagcd");
model.makeNode("/root/hidden/sppiz00400/rslt/diaghngnm");
model.makeNode("/root/hidden/sppiz00400/rslt/diagengnm");
model.resetInstanceNode("/root/hidden/sppiz00400/cond");
//model.setValue("/root/hidden/sppiz00400/cond/basedd", getCurrentDate()); // (dateHelper.js) ÇöÀ糯¥ ¹Ýȯ
model.setValue("/root/hidden/sppiz00400/cond/basedd", model.getValue("/root/main/item1/clbs/ordfromdd")); // ¿ä¾ç°³½ÃÀÏ Àû¿ë(2016.01.26 LEJ)
model.setValue("/root/hidden/sppiz00400/cond/diagcd", model.getValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagcd"));
model.setValue("/root/hidden/sppiz00400/cond/diagnm", "");
model.setValue("/root/hidden/sppiz00400/cond/selectedrdodiagkind", "3"); // »ç¿ëÀÚ°¡ Á÷Á¢°Ë»öÇÏ¿© ÀÔ·Â ÇÒ¼ö ÀÖµµ·Ï ÀÓÀÇÀǰª(3)À»³Ö¾îÁÜ
modal("SPPIZ00400", "1", "10", "10", "SPPIZ00400", "/root/hidden/sppiz00400/cond", "/root/init", "", ""); // SPPIZ00400_»óº´ÄÚµåÁ¶È¸.xrw
model.setFocus("grd_clidhist")
}
// [SPPIZ00400_»óº´ÄÚµåÁ¶È¸.xrw ¿¡¼ È£Ãâ] »óº´ÄÚµåÁ¶È¸ ÆË¾÷¿¡¼ ¼±ÅÃÇÑ »óº´À» »óº´ ±×¸®µå¿¡ ¹Ý¿µ
function fSetDiagCdNm() {
var row = grd_cldihist.row;
if (row > 0) {
var diagcd = model.getValue("/root/hidden/sppiz00400/rslt/diagcd");
var diaghngnm = model.getValue("/root/hidden/sppiz00400/rslt/diaghngnm");
var diagengnm = model.getValue("/root/hidden/sppiz00400/rslt/diagengnm");
model.setValue("/root/main/list1/cldi[" + row + "]/diagcd", diagcd);
model.setValue("/root/main/list1/cldi[" + row + "]/diagnm", diaghngnm);
model.setValue("/root/main/list1/cldi[" + row + "]/diagengnm", diagengnm);
// ÇØ´ç »óº´ÀÇ Çѱۻ󺴸í°ú ¿µ¹®»óº´¸íÀÌ Message ¿ë output ÄÁÆ®·Ñ¿¡ Ç¥½ÃµÈ´Ù.
model.setValue("/root/hidden/list3/msgspclformat", "»óº´ÄÚµå - " + diagcd + " / " + diaghngnm + " / " + diagengnm);
// 20100308 ƯÁ¤³»¿ª Á¶È¸ Ãß°¡
model.setValue("/root/main/list1/cldi[" + row + "]/vcode", fGetDiagVcode(diagcd));
// 20100329 MT002 ÀÔ·Âüũ
if (model.getValue("/root/main/list1/cldi[" + row + "]/diagseq") == "1"
&& model.getValue("/root/main/list1/cldi[" + row + "]/vcode") != ""
&& model.getValue("/root/main/list1/cldi[" + row + "]/diagkindcd") != "R")
{
fSetDiagMT002(model.getValue("/root/main/list1/cldi[" + row + "]/vcode"));
}
// 20090918 Á¤½Â¿ì ÇàÃß°¡
var addval1 = model.getValue("/root/main/list1/diag[" + row + "]/rowstat");
var addval2 = grd_cldihist.rowstatus(row);
var rowstatus = grd_cldihist.rowstatus(row);
if (rowstatus != 1 && rowstatus != 3) { // 1 : insert, 3 : insert & new
grd_cldihist.rowstatus(row) = 2; // 2 : update
}
grd_cldihist.refresh();
// 4. ºó row¿¡ ´ëÇÑ ÀÔ·ÂÀº Çà Ãß°¡¸¦ ¹ß»ý½ÃŲ´Ù. (±×¿Ü¿¡´Â ÇàÃß°¡°¡ ÀϾÁö ¾Ê´Â´Ù.)
// 20090918 Á¤½Â¿ì ÇàÃß°¡
if (addval1 == "" && (addval2 == 1 || addval2 == 3))
fDiagGridInsertRow("Y", "N");
}
}
// 20100329 ±è¿ë¹Î Ãß°¡ »óº´row ·Î MT002 ÀÔ·Â
// incode null °æ¿ì´Â ÁÖ»óº´ÀÇ Æ¯Á¤±âÈ£ üũ, null¾Æ´Ï¸é ¹Ù·ÎÀÔ·Âüũ
function fSetDiagMT002(incode) {
var gridrowstatus = "";
var existsyn = "N";
var vcode = "";
if (incode == "") {
for ( var i = 1; i < grd_cldihist.rows; i++) {
if (grd_cldihist.rowHidden(i) == false
&& model.getValue("/root/main/list1/cldi[" + i + "]/diagseq") == "1"
&& model.getValue("/root/main/list1/cldi[" + i + "]/vcode") != ""
&& model.getValue("/root/main/list1/cldi[" + i + "]/diagkindcd") != "R"
) {
vcode = model.getValue("/root/main/list1/cldi[" + i + "]/vcode")
break;
}
}
} else {
vcode = incode;
}
if (vcode != "") {
for ( var i = 1; i < grd_clsphist.rows; i++) {
spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
spclspec = model.getValue("/root/main/list3/clsp[" + i + "]/spclspec");
gridrowstatus = grd_clsphist.rowstatus(i);
if (vcode == spclspec && spclcd == "MT002" && gridrowstatus != 4) {
existsyn = "Y";
}
}
var suppkindcd = model.getValue("/root/main/item1/clbs/suppkindcd");
if ( existsyn != "Y" && suppkindcd != "00") {
var ans = messageBox(vcode + " »óº´ÀÔ´Ï´Ù.\n\n" + "MT002 ƯÁ¤³»¿ªÀ» \n\n" + "ÀÔ·Â", "S001");
if (ans == 6) { // yes
var clsprow = grd_clsphist.rows - 1; // ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡
// Ãß°¡ÇÑ´Ù.
grd_clsphist.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/unitflag", "M");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/edilnno", 0);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/snglcalcscorcd", "-");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclcd", "MT002");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/cdnm", "ƯÁ¤±âÈ£");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclspec", vcode);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclformat", "X(4)");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/detldesc", "");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldedilnno", "");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clodseqno", "");
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
grd_clsphist.refresh();
}
}
}
}
// 20100308 ±è¿ë¹Î Ãß°¡ (»óº´ÄÚµå·Î ƯÁ¤±âÈ£ Á¶È¸)
function fGetDiagVcode(diagcd) {
var vcode = "";
var spclcd = "";
var spclspec = "";
var gridrowstatus = "";
var existsyn = "N";
model.resetInstanceNode("/root/hidden/getvcode");
model.setValue("/root/hidden/getvcode/cond/diagcd", diagcd);
model.setValue("/root/hidden/getvcode/cond/ioflag", model.getValue("/root/main/item1/clbs/ioflag"));
model.setValue("/root/hidden/getvcode/cond/insukind", model.getValue("/root/main/item1/clbs/insukindcd"));
model.setValue("/root/hidden/getvcode/cond/suppkind", model.getValue("/root/main/item1/clbs/suppkindcd"));
model.setValue("/root/hidden/getvcode/cond/ordfromdd", model.getValue("/root/main/item1/clbs/ordfromdd"));
model.setValue("/root/hidden/getvcode/rslt/vcode", "");
submit("TRPID20313",false); // »óº´ÄÚµå·Î ƯÁ¤±âÈ£ Á¶È¸
vcode = model.getValue("/root/hidden/getvcode/rslt/vcode")
return vcode;
}
// /////////////////////////////////////////////////////////////////////////
// ÆË¾÷ ȸé È£Ãâ
function fLinkPopMenu(trgtWindow, cond, send) {
var trgtManWindow = getChildWindow(trgtWindow);
if (trgtManWindow == null) {
var childCnt = window.children.length;
if (childCnt < 4) {
open(trgtWindow, "2", "10", "10", trgtWindow, cond, send, "", "");
} else {
messageBox("ÃÖ´ë 4°³ÀÇ ÆË¾÷ ȸéÀ» Ç¥½ÃÇÒ ¼ö ÀÖÀ¸´Ï ÇöÀç ¿·ÁÀִ ȸéÀ»", "I007"); // /ÃÖ´ë 4°³ÀÇ ÆË¾÷ ȸéÀ» Ç¥½ÃÇÒ ¼ö ÀÖÀ¸´Ï ÇöÀç ¿·ÁÀִ ȸéÀ» È®ÀÎÇϽʽÿÀ.
}
} else {
activateChild(trgtWindow);
}
}
// ÀÌÀü¸í¼¼¼ ¸ñ·Ï¿¡¼ ¼±ÅÃÇÑ Ã»±¸Å°ÀÇ ¸í¼¼¼¸¦ ÀÌ¹Ì ¿·ÁÀÖ´Â Popup ȸéÀ¸·Î Á¶È¸½Ã¿¡ È£Ãâ
// óÀ½ PopupȸéÀ» ¿¶§´Â ev:event="xforms-ready"¿¡¼ 󸮸¦ Çϰí, ÀÌÈÄ¿¡ âÀÌ ¿·ÁÀÖ´Â °æ¿ì ÀÌ ¸Þ¼Òµå¸¦ È£ÃâÇÑ´Ù.
function fActivatePreDocuWindow() {
var rslt = fInitSrchData(); // ȸéÀ» ÃʱâÈÇÑ´Ù.
if (rslt == false) { // ¼öÁ¤»çÇ× ÀúÀåÀÌ ¿Ï·áµÇÁö ¾Ê¾Æ ÃʱâÈÇÒ ¼ö ¾ø´Â °æ¿ì
return false;
}
var openerClamym = opener.model.getValue("/root/hidden/smpid20300/cond/clamym");
var openerClamdg = opener.model.getValue("/root/hidden/smpid20300/cond/clamdg");
var openerPid = opener.model.getValue("/root/hidden/smpid20300/cond/pid");
var openerPidsn = opener.model.getValue("/root/hidden/smpid20300/cond/pidsn");
if (openerClamym) {
model.makeValue("/root/send/item1/clbs/clamym", openerClamym);
model.makeValue("/root/send/item1/clbs/clamdg", openerClamdg);
model.makeValue("/root/send/item1/clbs/pid", openerPid);
model.makeValue("/root/send/item1/clbs/pidsn", openerPidsn);
model.makeValue("/root/send/item1/clbs/ioflag", "I");
model.makeValue("/root/send/item1/clbs/workflag", opener.model.getValue("/root/hidden/smpid20300/cond/workflag"));
fCheckAuth(); // È¸é ±ÇÇÑÀ» ¼³Á¤ÇÑ´Ù.
submit("TRPID20301");
// submit("TRPID20301") »çÈÄ ½É»ç ´ë»óÀÚ¸¦ Á¶È¸ÇÑ ÀÌÈÄÀÇ Ã³¸®¸¦ ÇÑ´Ù.
fSetAftJudgTrgtManSrchData();
// »óº´°ú ó¹æ¿¡¼ ¿À¸¥ÂÊ ¸¶¿ì½º Popup À¸·Î °¡´ÉÇÑ Ã³¸®¸¦ ÇÏÁö ¸øÇϵµ·Ï ÇÑ´Ù.
// window.showPopupMenu(false);
// btn_closepredocupopup.visible = true; // Popup¿ë ´Ý±â ¹öư
} else {
fCheckAuth(); // È¸é ±ÇÇÑÀ» ¼³Á¤ÇÑ´Ù.
}
}
// È¸é ±ÇÇÑÀ» ¼³Á¤ÇÑ´Ù.
function fCheckAuth() {
if (isPopup()) { // (common.js) ÀÚ½ÅÀÌ ÆË¾÷ÀÎÁö ¾Æ´ÑÁö¸¦ ¸®ÅÏÇÑ´Ù.
var sendworkflag = model.getValue("/root/send/item1/clbs/workflag");
if (sendworkflag != "11" && sendworkflag != "12") {
document.title = "ÀÔ¿ø»çÈĽɻçÁ¶È¸";
var smpid20300_auth = opener.javascript.getParameter("smpid20300_auth");
if (smpid20300_auth) {
model.setValue("properties/auth", smpid20300_auth); // RXP񀀥
} else {
model.setValue("properties/auth", "10100000"); // RXP񀀥
}
btn_srchpid.visible = true;
btn_pretrgtman.visible = true;
btn_nexttrgtman.visible = true;
cmb_adjtresncd.visible = true;
cmb_docudelresncd.visible = true;
cmb_abdresncd.visible = true;
} else {
if (sendworkflag == "11") {
document.title = "½É»çÀü ¸í¼¼¼ Á¶È¸";
model.setValue("properties/auth", "00100000"); // RXP񀀥
btn_srchpid.visible = false;
btn_pretrgtman.visible = false;
btn_nexttrgtman.visible = false;
cmb_adjtresncd.visible = false;
cmb_docudelresncd.visible = false;
cmb_abdresncd.visible = false;
} else {
document.title = "ÀÌÀü ¸í¼¼¼ »óº´/ó¹æ Á¶È¸";
model.setValue("properties/auth", "11100000"); // RXP񀀥
btn_srchpid.visible = true;
btn_pretrgtman.visible = true;
btn_nexttrgtman.visible = true;
cmb_adjtresncd.visible = true;
cmb_docudelresncd.visible = true;
cmb_abdresncd.visible = true;
}
}
} else {
model.setValue("properties/auth", "11100000"); // RXP񀀥
btn_srchpid.visible = true;
btn_pretrgtman.visible = true;
btn_nexttrgtman.visible = true;
cmb_adjtresncd.visible = true;
cmb_docudelresncd.visible = true;
cmb_abdresncd.visible = true;
}
var rAuth = !checkAuth("R");
ipt_pid.disabled = rAuth;
ipt_chosindayno.disabled = rAuth;
ipt_medcaredayno.disabled = rAuth;
cmb_arvpathcd.disabled = rAuth; // µµÂø°æ·Î
cmb_inpathcd.disabled = rAuth; // ÀÔ¿ø°æ°ú
cmb_ordrsltcd.disabled = rAuth; // Áø·á°á°ú
ipt_insuno.disabled = rAuth; // Á¶ÇÕ±âÈ£
ipt_certno.disabled = rAuth; // Áõ¹øÈ£
setScreenBtnDisabled(); // (common.js) ¹öư ±ÇÇÑ ¼Ó¼º(_auth)¿¡ µû¶ó ȸé±ÇÇÑ(RXP)À» ó¸®ÇÑ´Ù.
}
// ±âÁ¸ Á¶È¸ ³»¿ª Áß ¼öÁ¤ »çÇ×ÀÌ ÀÖ´Â °æ¿ì ÀúÀåÇÒ °ÍÀÎÁö¸¦ ¹°¾îº»´Ù.
function fCheckChangeSave() {
var initclbs = model.getValue("/root/hidden/item1/initclbs/clbs/clamkey");
var isChange = false;
var cldiupdtdata = ""; // »óº´ Grid º¯°æ
if (initclbs) {
var clbsupdatadata = false;
if (model.getValue("/root/hidden/item1/initclbs/clbs/suppkindcd") != model.getValue("/root/main/item1/clbs/suppkindcd")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/ordfildcd") != model.getValue("/root/main/item1/clbs/ordfildcd")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/orddeptcd") != model.getValue("/root/main/item1/clbs/orddeptcd")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/orddrid") != model.getValue("/root/main/item1/clbs/orddrid")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/patrrgstno") != model.getValue("/root/main/item1/clbs/patrrgstno")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/chosindayno") != model.getValue("/root/main/item1/clbs/chosindayno")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/medcaredayno") != model.getValue("/root/main/item1/clbs/medcaredayno")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/arvpathcd") != model.getValue("/root/main/item1/clbs/arvpathcd")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/inpathcd") != model.getValue("/root/main/item1/clbs/inpathcd")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/ordrsltcd") != model.getValue("/root/main/item1/clbs/ordrsltcd")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/insuno") != model.getValue("/root/main/item1/clbs/insuno")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initclbs/clbs/certno") != model.getValue("/root/main/item1/clbs/certno")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initmemo/memo/judgmemo") != model.getValue("/root/main/item1/memo/judgmemo")) {
clbsupdatadata = true;
} else if (model.getValue("/root/hidden/item1/initmemo/memo/edimemo") != model.getValue("/root/main/item1/memo/edimemo")) {
clbsupdatadata = true;
}
if (clbsupdatadata == false) {
var clodupdtdata = getGridUpdateData(grd_clodhist); // (tfHelper.js) ±×¸®µå ¾÷µ¥ÀÌÆ® µ¥ÀÌÅÍ ¹Ýȯ, ¾÷µ¥ÀÌÆ® Á¤º¸°¡ ¾øÀ»°æ¿ì "" ¹Ýȯ
if (clodupdtdata) { // ó¹æÀÌ ¼öÁ¤µÈ °æ¿ì
isChange = true;
} else {
// ƯÁ¤³»¿ª
for ( var i = 1; i < grd_clsphist.rows; i++) {
var rowstatus = grd_clsphist.rowstatus(i);
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
var spclspec = model.getValue("/root/main/list3/clsp[" + i + "]/spclspec");
// ƯÁ¤ÄÚµå°ú ƯÁ¤³»¿ªÀÌ ÀԷµÇÁö ¾ÊÀº °æ¿ì
if (rowstatus != 4 && spclcd == "" && spclspec == "") {
// ÁÙÀ» »èÁ¦ÇÑ´Ù.
grd_clsphist.deleteRow(i, false);
i--;
}
}
var clspupdtdata = getGridUpdateData(grd_clsphist);
if (clspupdtdata) {
isChange = true;
} else {
// »óº´
for ( var i = 1; i < grd_cldihist.rows; i++) {
var rowstatus = grd_cldihist.rowstatus(i);
var diagcd = model.getValue("/root/main/list1/cldi[" + i + "]/diagcd");
// »óº´ÄÚµå¿Í Áø·á°³½ÃÀÏÀÌ ÀԷµÇÁö ¾ÊÀº °æ¿ì
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
if (diagcd == "") {
// ÁÙÀ» »èÁ¦ÇÑ´Ù.
grd_cldihist.deleteRow(i, false);
i--;
}
}
}
// »óº´ÀÇ °æ¿ì ±âº»ÀûÀ¸·Î Ãß°¡µÈ ÁÙÀ» »èÁ¦ÇÑ ÈÄ Ã¼Å©ÇÑ´Ù.
cldiupdtdata = getGridUpdateData(grd_cldihist); // (tfHelper.js) ±×¸®µå ¾÷µ¥ÀÌÆ® µ¥ÀÌÅÍ ¹Ýȯ, ¾÷µ¥ÀÌÆ® Á¤º¸°¡ ¾øÀ»°æ¿ì "" ¹Ýȯ
if (cldiupdtdata) {
isChange = true;
}
}
}
} else {
isChange = true;
}
}
if (isChange) {
var ans = messageBox("¼öÁ¤»çÇ×ÀÌ ÀÖ½À´Ï´Ù. ÀúÀå", "S001"); // /¼öÁ¤»çÇ×ÀÌ ÀÖ½À´Ï´Ù. ÀúÀåÇϽ÷Á¸é ¿¹(Yes)\n¾Æ´Ï¸é ¾Æ´Ï¿À(No)
if (ans == 6) { // 6: yes, 7:no, 2:cancel
var rslt = fSaveInAftJudg("B"); // ÀúÀå
if (rslt != "true") {
return false;
}
} else if (ans == 2) { // 6: yes, 7:no, 2:cancel
if (grd_clsphist.rows == 1) {
fSpclGridInsertRow(); // ƯÁ¤³»¿ª ÁÙÃß°¡
}
if (cldiupdtdata) { // »óº´ Grid°¡ º¯°æµÈ °æ¿ì
}
return false;
}
} else {
}
return true;
}
// »óº´, ƯÁ¤³»¿ª, ó¹æ GroupÀÇ ÄÁÆ®·Ñ Å©±â¸¦ ÃʱâÈÇÑ´Ù.
function fInitUIControlSize() {
cap_grptemp.visible = false;
grp_predoculist.visible = false; // ÀÌÀü ¸í¼¼¼ ¸ñ·Ï¿ë Group
grp_delclodlist.visible = false; // ó¹æ ÈÞÁöÅë Group
grp_delorderlist.visible = false; // ½É»çº¯°æ ¸ñ·Ï Group
fCutSwitchSize(); // ƯÁ¤³»¿ª / ½É»çÀÚ¸Þ¸ð / EDI¸Þ¸ð âÀ» ÀÛ°Ô ÇÑ´Ù.
case_spclspec.selected = false;
case_judgrmemo.selected = false;
case_ediclammemo.selected = false;
}
// ó¹æÁ¶È¸ºÎ, ó¹æ Grid¿ë GroupÀÇ ÄÁÆ®·Ñ Å©±â¸¦ ¼³Á¤ÇÑ´Ù.
function fSetOrderControlSize() {
if (cap_clod.attribute("top") == df_tp_size_cap_clod) { // ±âº»»óÅÂ
grp_cldihist.attribute("top") = "30"; // »óº´Ã¢
grp_clsphist.attribute("top") = "30"; // ƯÁ¤³»¿ªÃ¢
cap_clod.attribute("top") = "188";
grd_clodhist.attribute("height") = "429";
} else {
grp_cldihist.attribute("top") = df_tp_size_grp_cldihist; // »óº´Ã¢
grp_clsphist.attribute("top") = df_tp_size_grp_clsphist; // ƯÁ¤³»¿ªÃ¢
cap_clod.attribute("top") = df_tp_size_cap_clod;
grd_clodhist.attribute("height") = "351";
}
var icap_top = parseInt(cap_clod.attribute("top"));
grp_ordsrch.attribute("top") = icap_top - 55; // Á¶È¸ºÎ ±×·ì
cap_message.attribute("top") = icap_top + 50; // ¸Þ¼¼Áöcap
opt_msgspclformat.attribute("top") = icap_top + 48; // ¸Þ¼¼Áö
ln_clodhist.attribute("y1") = icap_top + 15;
ln_clodhist.attribute("y2") = icap_top + 15;
grd_clodhist.attribute("top") = icap_top + 20;
btn_delordlist.attribute("top") = icap_top - 5;
btn_delordsrch.attribute("top") = icap_top - 5;
btn_bfjudgdocu.attribute("top") = icap_top - 5;
btn_oprcp.attribute("top") = icap_top - 5; // ¿ø¿Üó¹æ
// btn_redu.attribute("top") = icap_top - 5; // »è°¨Ã³¹æ // 20100312
cmb_adjtresncd.attribute("top") = icap_top - 5; // ½É»ç¼öÁ¤»çÀ¯ ÄÞº¸
cmb_docudelresncd.attribute("top") = icap_top - 5; // ¸í¼¼¼»èÁ¦»çÀ¯ ÄÞº¸
cmb_abdresncd.attribute("top") = icap_top - 5; // ¹Ý¼ÛºÎÁ¦±â»çÀ¯ ÄÞº¸
opt_drgcd.attribute("top") = icap_top - 5; // KDRGºÐ·ù¹øÈ£
opt_kstage.attribute("top") = icap_top - 5; // KDRGºÐ·ù¹øÈ£
opt_kdrgnm.attribute("top") = icap_top - 5; // KDRGºÐ·ù¹øÈ£
btn_clodinsert.attribute("top") = icap_top - 5; // 20100209 ÇàÃß°¡
btn_clodcopy.attribute("top") = icap_top - 5; // 20100209 Çູ»ç
btn_cloddelete.attribute("top") = icap_top - 5; // 20100209 Çà»èÁ¦
}
// ó¹æÁ¶È¸ºÎ, ó¹æ Grid¿ë GroupÀÇ ÄÁÆ®·Ñ Å©±â¸¦ ¼³Á¤ÇÑ´Ù. (20100408 ¹é¾÷)
function fSetOrderControlSize_bakup() {
var otherGrp = true;
if (cap_clod.attribute("top") == "251") {
otherGrp = false;
cap_clod.attribute("top") = "90";
grd_clodhist.attribute("height") = "527";
// Message¿ë Output Å©±â¸¦ ÃʱâÈÇÑ´Ù.
cap_message.attribute("left") = "5";
opt_msgspclformat.attribute("left") = "95";
opt_msgspclformat.attribute("width") = "1099";
} else {
otherGrp = true;
cap_clod.attribute("top") = "251";
grd_clodhist.attribute("height") = "351";
// »óº´ Grid Å©±â¸¦ ÃʱâÈÇÑ´Ù.
grp_cldihist.attribute("height") = "170";
grd_cldihist.attribute("height") = "142";
}
grp_cldihist.visible = otherGrp;
grp_clsphist.visible = otherGrp;
var icap_top = parseInt(cap_clod.attribute("top"));
ln_clodhist.attribute("y1") = icap_top + 15;
ln_clodhist.attribute("y2") = icap_top + 15;
grd_clodhist.attribute("top") = icap_top + 20;
btn_delordlist.attribute("top") = icap_top - 5;
btn_delordsrch.attribute("top") = icap_top - 5;
btn_bfjudgdocu.attribute("top") = icap_top - 5;
btn_oprcp.attribute("top") = icap_top - 5; // ¿ø¿Üó¹æ
// btn_redu.attribute("top") = icap_top - 5; // »è°¨Ã³¹æ // 20100312
cmb_adjtresncd.attribute("top") = icap_top - 5; // ½É»ç¼öÁ¤»çÀ¯ ÄÞº¸
cmb_docudelresncd.attribute("top") = icap_top - 5; // ¸í¼¼¼»èÁ¦»çÀ¯ ÄÞº¸
cmb_abdresncd.attribute("top") = icap_top - 5; // ¹Ý¼ÛºÎÁ¦±â»çÀ¯ ÄÞº¸
opt_drgcd.attribute("top") = icap_top - 5; // KDRGºÐ·ù¹øÈ£
opt_kstage.attribute("top") = icap_top - 5; // KDRGºÐ·ù¹øÈ£
opt_kdrgnm.attribute("top") = icap_top - 5; // KDRGºÐ·ù¹øÈ£
grp_ordsrch.attribute("top") = icap_top - 55; // Á¶È¸ºÎ ±×·ì
cap_message.attribute("top") = icap_top + 50;
opt_msgspclformat.attribute("top") = icap_top + 48;
btn_clodinsert.attribute("top") = icap_top - 5; // 20100209 ÇàÃß°¡
btn_clodcopy.attribute("top") = icap_top - 5; // 20100209 Çູ»ç
btn_cloddelete.attribute("top") = icap_top - 5; // 20100209 Çà»èÁ¦
}
// ÀÌÀü¸í¼¼¼, ó¹æÈÞÁöÅë, »èÁ¦Ã³¹æ GroupÀÇ ÄÁÆ®·Ñ Å©±â¸¦ ¼³Á¤ÇÑ´Ù.
function fSetDelOrdPreDocuSize() {
var icap_top = parseInt(cap_clod.attribute("top"));
var igrd_hei = parseInt(grd_clodhist.attribute("height"));
// cap_grptemp.attribute("top") = icap_top;
// ÀÌÀü ¸í¼¼¼ ¸ñ·Ï
if (grp_predoculist.visible == true) {
cap_grptemp.text = "ÀÌÀü ¸í¼¼¼ ¸ñ·Ï";
cap_grptemp.visible = true;
grd_clodhist.attribute("width") = "630";
ln_clodhist.attribute("x2") = "630";
grp_predoculist.attribute("top") = icap_top + 15;
grp_predoculist.attribute("height") = igrd_hei + 5;
grd_predocu.attribute("height") = igrd_hei - 78;
btn_closepredoculist.attribute("top") = parseInt(grp_predoculist
.attribute("height")) - 30;
}
// ó¹æ ÈÞÁöÅë
if (grp_delclodlist.visible == true) {
cap_grptemp.text = "ó¹æ ÈÞÁöÅë";
cap_grptemp.visible = true;
grd_clodhist.attribute("width") = "630";
ln_clodhist.attribute("x2") = "630";
grp_delclodlist.attribute("top") = icap_top + 15;
grp_delclodlist.attribute("height") = igrd_hei + 5;
grd_delclod.attribute("height") = igrd_hei - 23;
btn_closedelclodlist.attribute("top") = parseInt(grp_delclodlist
.attribute("height")) - 22;
}
// ½É»çº¯°æ ¸ñ·Ï
if (grp_delorderlist.visible == true) {
cap_grptemp.text = "½É»çº¯°æ ¸ñ·Ï";
cap_grptemp.visible = true;
grd_clodhist.attribute("width") = "630";
ln_clodhist.attribute("x2") = "630";
grp_delorderlist.attribute("top") = icap_top + 15;
grp_delorderlist.attribute("height") = igrd_hei + 5;
grd_delorder.attribute("height") = igrd_hei - 23;
btn_closedelorderlist.attribute("top") = parseInt(grp_delorderlist
.attribute("height")) - 22;
}
// ƯÁ¤³»¿ª / ½É»çÀÚ¸Þ¸ð / EDI¸Þ¸ð âÀÌ È®´ëµÈ °æ¿ì °ãÃÄÁ® º¸À̹ǷΠâÀ» ÀÛ°Ô ÇÑ´Ù.
fCutSwitchSize();
}
// ÀÌÀü¸í¼¼¼ ¸ñ·Ï Á¶È¸
function fSrchPreDocuList() {
var clamym = model.getValue("/root/main/item1/clbs/clamym");
if (clamym) { // Á¶È¸µÈ ½É»ç´ë»óÀÚ°¡ ÀÖÀ½
// model.resetInstanceNode("/root/send/list4");
var refterm = model.getValue("/root/send/list4/refterm");
if (refterm == "0") {
var fromdd = model.getValue("/root/send/list4/fromdd");
var todd = model.getValue("/root/send/list4/todd");
if (isValidDateTime(fromdd)) { // (dateHelper.js) À¯È¿ÇÑ ³¯Â¥, ½Ã°£ ÀÎÁö Á¡°Ë
if (isValidDateTime(todd)) {
var dateDif = getDateInterval(fromdd, todd); // (dateHelper.js) µÎ ÀÏÀÚ»çÀÌÀÇ Â÷¸¦ ÀÏ´ÜÀ§·Î ¹Ýȯ
if (dateDif < 0) {
messageBox("°Ë»ö ½ÃÀÛÀÏÀÚ°¡ Á¾·áÀÏÀÚ º¸´Ù ÀÌÈÄ", "E008"); // /°Ë»ö ½ÃÀÛÀÏÀÚ°¡ Á¾·áÀÏÀÚ º¸´Ù ÀÌÈÄ ÀÔ´Ï´Ù.
return;
}
} else {
return;
}
} else {
return;
}
}
model.setValue("/root/send/list4/pid", model.getValue("/root/main/item1/clbs/pid"));
model.setValue("/root/send/list4/clamym", model.getValue("/root/main/item1/clbs/clamym"));
if (model.getValue("/root/send/list4/allordfild") != "Y") {
model.setValue("/root/send/list4/ordfildcd", model.getValue("/root/main/item1/clbs/ordfildcd"));
} else {
model.resetInstanceNode("/root/send/list4/ordfildcd");
}
submit("TRPID20304");
grd_predocu.rebuildStyle();
for ( var i = 1; i < grd_predocu.rows; i++) {
if (clamym == model.getValue("/root/main/list4/clbs[" + i + "]/clamym")) {
grd_predocu.rowStyle(i, "data", "background-color") = "#4d4d4d"; // common.css (input)
grd_predocu.rowStyle(i, "data", "background-image") = "../../../com/commonweb/images/grid_bg.gif";
grd_predocu.rowStyle(i, "data", "background-repeat") = "repeat-x";
i = grd_predocu.rows;
}
}
}
}
// /////////////////////////////////////////////////////////////////////////
// µî·Ï¹øÈ£¸¦ ÀÔ·ÂÇϰí Enter ۸¦ ´©¸£¸é
// ÀÔ¿ø»çÈĽɻç´ë»óÀÚ Á¶È¸ PopupÀ¸·Î µî·Ï¹øÈ£¸¦ Àü´ÞÇϰí ÇØ´ç ȯÀÚ¸¦ Á¶È¸ÇÏ¿© º¸¿©ÁØ´Ù.
function fGetInAftJudgTrgtManPidSrch() {
var trgtManWindow = getChildWindow("SMPID20200"); // SMPID20200_ÀÔ¿ø»çÈĽɻç´ë»óÀÚÁ¶È¸.xrw
var patunitsrch1 = model.getValue("/root/main/item1/clbs/pid");
if (trgtManWindow == null) {
// pid°¡ º¯°æµÇ¾ú´Âµ¥ Á¶È¸Ã¢À» ¿©´Â °æ¿ì ±âÁ¸ Á¶È¸µÈ data Ãʱâȸ¦ À§ÇØ ÀúÀåÇØµÐ´Ù.
model.setValue("/root/hidden/smpid20200/cond/pid", patunitsrch1);
model.setValue("/root/hidden/smpid20200/rslt/oldPid", patunitsrch1);
open("SMPID20200", "2", "10", "10", "SMPID20200", "/root/hidden/smpid20200/cond/pid", "/root/send/item1/patunitsrch1", "", ""); // SMPID20200_ÀÔ¿ø»çÈĽɻç´ë»óÀÚÁ¶È¸.xrw
} else {
var oldPid = model.getValue("/root/hidden/smpid20200/rslt/oldPid");
model.setValue("/root/hidden/smpid20200/cond/pid", patunitsrch1);
model.setValue("/root/hidden/smpid20200/rslt/oldPid", patunitsrch1);
/*
* // [2007.03.28. ÀÛ¼º 2] if (oldPid == patunitsrch1) {
* activateChild("SMPID20200"); } else { // ÀúÀå ÈÄ oldPid°¡ ""·Î ¼³Á¤µÇ°í Á¶È¸ ½Ã¿¡
* 󸮵ÇÁö ¾Ê´Â ¹®Á¦ÀÖÀ½ fInitSrchData();
* model.setValue("/root/main/item1/clbs/pid", patunitsrch1);
* trgtManWindow.javascript.fSetPatUnitSrch1pidSrch(); }
*/
// [2007.03.28. ÀÛ¼º 1]
if (oldPid == "") {
if (patunitsrch1 == "") { // ȯÀÚ¹øÈ£ ÀÔ·Â ¾øÀÌ ´ë»óÀÚ¸¦ Á¶È¸ÇÏ´Â °æ¿ì
trgtManWindow.grp_judgmemo.visible = false; // ´ë»óÀÚ GridÀÇ ¸Þ¸ð ÇʵåÀÇ Btn Ŭ¸¯½Ã º¸¿©Áö´Â ¸Þ¸ð ÀúÀå¿ë GroupÀ» °¨Ãá´Ù.
activateChild("SMPID20200");
} else { // ±âÁ¸ ½É»ç´ë»óÀÚ´Â ¾ø´Âµ¥ pid°¡ ÀÔ·ÂµÈ °æ¿ì ¶Ç´Â º¯°æµÈ Á¤º¸¸¦ ÀúÀå ÈÄ¿¡ Á¶È¸ÇÏ´Â °æ¿ì
trgtManWindow.javascript.fSetPatUnitSrch1pidSrch();
}
} else {
if (patunitsrch1 != oldPid) { // Á¶È¸µÈ pid°¡ º¯°æµÈ »óÅ¿¡¼ Á¶È¸ÇÏ´Â °æ¿ì
model.setValue("/root/main/item1/clbs/pid", patunitsrch1);
model.setValue("/root/hidden/smpid20200/cond/pid", patunitsrch1);
trgtManWindow.javascript.fSetPatUnitSrch1pidSrch();
} else { // ±âÁ¸ ½É»ç´ë»óÀÚ´Â Àִµ¥ pid°¡ º¯°æµÇÁö ¾ÊÀº °æ¿ì
trgtManWindow.grp_judgmemo.visible = false; // ´ë»óÀÚ GridÀÇ ¸Þ¸ð ÇʵåÀÇ Btn Ŭ¸¯½Ã º¸¿©Áö´Â ¸Þ¸ð ÀúÀå¿ë GroupÀ» °¨Ãá´Ù.
activateChild("SMPID20200");
}
}
// model.refresh();
}
}
// ¼±º°½É»ç°¡ ¾Æ´Ñ °æ¿ì ½É»ç´ë»óÀÚ Á¶È¸ ȸ鿡¼ ´ÙÀ½ ´ë»óÀÚ¸¦ ã´Â´Ù.
function fSrchNextJudgTrgtManCLBS(trgtManWindow, selectedRow, judgendyn) { // selectedRow: ÇöÀç ¼±ÅÃµÈ row
var judgendcheck;
var nextclamkey = "";
var trgtmanclamkey = trgtManWindow.model.getValue("/root/main/list1/clbs[" + selectedRow + "]/clamkey");
// ÇöÀç row ÀÌÈÄÀÇ ´ë»óÀÚ Áß ¹Ì½É»ç »óÅÂ
for ( var i = parseInt(selectedRow, 10) + 1; i < trgtManWindow.grd_clbsmast.rows; i++) {
if (trgtmanclamkey != trgtManWindow.model
.getValue("/root/main/list1/clbs[" + i + "]/clamkey")) {
// ¿Ï·á,º¸·ùÀϰæ¿ì´Â ¹Ù·Î ´ÙÀ½ ´ë»óÀÚ¸¦ Á¶È¸ÇÏ°í ³ª¸ÓÁö´Â ¹Ì½É»çÀÎ ´ÙÀ½ ´ë»óÀÚ¸¦ Á¶È¸ÇÑ´Ù.
if (judgendyn == "C" || judgendyn == "N") {
judgendcheck = trgtManWindow.model.getValue("/root/main/list1/clbs[" + i + "]/judgendyn");
} else {
judgendcheck = "A";
}
if (trgtManWindow.model.getValue("/root/main/list1/clbs[" + i + "]/judgendyn") == judgendcheck) { // ½É»ç¿Ï·á¿©ºÎ(P0151) A:¹Ì½É»ç
model.setValue("/root/hidden/smpid20200/rslt/selectedRow", i);
trgtManWindow.grd_clbsmast.row = i;
nextclamkey = trgtManWindow.model.getValue("/root/main/list1/clbs[" + i + "]/clamkey");
trgtManWindow.javascript.fSetWorkStatCnt(); // ÃѰǼö¿Í ±âŸ ½É»ç»óÅ¿¡ µû¸¥ cnt¸¦ Ç¥½ÃÇÑ´Ù.
trgtManWindow.model.refresh();
return nextclamkey;
}
}
}
trgtManWindow.model.refresh();
return nextclamkey;
}
function fSrchNextJudgTrgtManSPEC(trgtManWindow, selectedRow, judgendyn) { // selectedRow: ÇöÀç ¼±ÅÃµÈ row / judgendyn: ½É»ç¿Ï·á¿©ºÎ
var judgendcheck;
var nextclamkey = "";
var trgtmanclamkey = trgtManWindow.model.getValue("/root/main/list1/clbs[" + selectedRow + "]/clamkey");
var userid = getUserId(); // (common.js) ÇöÀç ·Î±×ÀÎÇÑ »ç¿ëÀÚ ¹øÈ£(ID)
if (userid) {
} else {
userid = "12345678";
}
for ( var i = 1; i < trgtManWindow.grd_clbsmast.rows; i++) {
if (trgtmanclamkey == trgtManWindow.model.getValue("/root/main/list1/clbs[" + i + "]/clamkey")) {
trgtManWindow.model.setValue("/root/main/list1/clbs[" + i + "]/judgendyn", judgendyn);
trgtManWindow.model.setValue("/root/main/list1/clbs[" + i + "]/lastupdtrid", userid);
} else if (i > selectedRow && nextclamkey == "") { // ÇöÀç row ÀÌÈÄÀÇ ´ë»óÀÚ Áß ¹Ì½É»ç »óÅÂ
// ¿Ï·á,º¸·ùÀϰæ¿ì´Â ¹Ù·Î ´ÙÀ½ ´ë»óÀÚ¸¦ Á¶È¸ÇÏ°í ³ª¸ÓÁö´Â ¹Ì½É»çÀÎ ´ÙÀ½ ´ë»óÀÚ¸¦ Á¶È¸ÇÑ´Ù.
if (judgendyn == "C" || judgendyn == "N") {
judgendcheck = trgtManWindow.model.getValue("/root/main/list1/clbs[" + i + "]/judgendyn");
} else {
judgendcheck = "A";
}
if (trgtManWindow.model.getValue("/root/main/list1/clbs[" + i + "]/judgendyn") == judgendcheck) { // ½É»ç¿Ï·á¿©ºÎ(P0151) A:¹Ì½É»ç
model.setValue("/root/hidden/smpid20200/rslt/selectedRow", i);
trgtManWindow.grd_clbsmast.row = i;
nextclamkey = trgtManWindow.model.getValue("/root/main/list1/clbs[" + i + "]/clamkey");
}
}
}
trgtManWindow.javascript.fSetWorkStatCnt(); // ÃѰǼö¿Í ±âŸ ½É»ç»óÅ¿¡ µû¸¥ cnt¸¦ Ç¥½ÃÇÑ´Ù.
trgtManWindow.model.refresh();
return nextclamkey;
}
// "¿Ï·á"~"»èÁ¦" ó¸® ÈÄ ´ÙÀ½ ½É»ç´ë»óÀÚ¸¦ Á¶È¸ÇÑ´Ù.
function fGetNextAftJudgTrgtMan(judgendyn) {
// »óº´±×¸®µå¿¡¼ editmodeÀλóÅ¿¡¼ F7 ´ÜÃàŰ ´©·¶À» °æ¿ì ¿¡·¯¹ß»ý¹æÁö À§ÇÔ. Àý´ë Áö¿ìÁö ¸»°Í.
model.setFocus("grd_clodhist");
var clamym = model.getValue("/root/main/item1/clbs/clamym");
var clamdg = model.getValue("/root/main/item1/clbs/clamdg");
var pid = model.getValue("/root/main/item1/clbs/pid");
var pidsn = model.getValue("/root/main/item1/clbs/pidsn");
if (pid) {
var rslt = fSaveInAftJudg(judgendyn);
if (rslt == null || rslt == "") { // ÀúÀåÀÌ ¿Ï·áµÇÁö ¾ÊÀº °æ¿ì
return;
} else {
if (rslt == "false") { // º¯°æµÈ µ¥ÀÌÅͰ¡ ¾ø´Â °æ¿ì
// "½É»ç»óÅÂ" ¼³Á¤ÇÑ´Ù.
model.removeNodeset("/root/send/item4");
model.makeValue("/root/send/item4/endclbs/clamym", clamym);
model.makeValue("/root/send/item4/endclbs/clamdg", clamdg);
model.makeValue("/root/send/item4/endclbs/pid", pid);
model.makeValue("/root/send/item4/endclbs/pidsn", pidsn);
model.makeValue("/root/send/item4/endclbs/judgendyn", judgendyn);
// ±âÁ¸¿¡ ½É»çÁßÀ̾ú´ø °æ¿ì
submit("TXPID20302");
fSetJudgSaveState(judgendyn); // ´ë»óÀÚÁ¶È¸ ½É»ç¿Ï·á¿©ºÎ (P0151)
model.setValue("/root/main/item1/clbs/judgendyn", judgendyn);
model.refreshpart("/root/main/item1/clbs/judgendyn")
}
var userid = getUserId(); // (common.js) ÇöÀç ·Î±×ÀÎÇÑ »ç¿ëÀÚ ¹øÈ£(ID)
if (userid) {
} else {
userid = "12345678";
}
model.setValue("/root/main/item1/clbs/lastupdtrid", userid);
model.setValue("/root/main/item1/clbs/judgendyn", judgendyn);
}
// ´ÙÀ½ ½É»ç´ë»óÀÚ·Î ³Ñ¾î°£´Ù.
var trgtManWindow = getChildWindow("SMPID20200"); // SMPID20200_ÀÔ¿ø»çÈĽɻç´ë»óÀÚÁ¶È¸.xrw
if (trgtManWindow != null) {
var selectedRow = model.getValue("/root/hidden/smpid20200/rslt/selectedRow");
var reloadyn = trgtManWindow.instance1.getXPathString("/root/temp/reloadyn");
var patunitsrch1 = trgtManWindow.instance1.getXPathString("/root/send/item1/patunitsrch1");
if (reloadyn == "Y" && patunitsrch1.length == 0) {
trgtManWindow.javascript.fGetInAftJudgTrgtManList();
selectedRow = parseInt(selectedRow) - 1;
}
if (selectedRow) {
var trgtmanlist = trgtManWindow.instance1.selectSingleNode("/root/main/list1/clbs");
if (trgtmanlist == null) { // Á¶È¸µÈ ´ë»óÀÚ ¸ñ·ÏÀÌ ¾ø´Â °æ¿ì
messageBox("Á¶È¸µÈ ½É»ç´ë»óÀÚ ¸ñ·ÏÀÌ", "I004"); // /Á¶È¸µÈ ½É»ç´ë»óÀÚ ¸ñ·ÏÀÌ ¾ø½À´Ï´Ù.
} else {
trgtmanlist = trgtManWindow.instance1.selectSingleNode("/root/main/list1");
var maxRow = trgtmanlist.childNodes.length;
var nextclamkey = "";
if (selectedRow < maxRow) {
var srchmode = trgtManWindow.model.getValue("/root/hidden/clbs/srchmode");
if (srchmode == "specclbs") { // ¼±º°½É»ç ¸ðµåÀÎ °æ¿ì
nextclamkey = fSrchNextJudgTrgtManSPEC(trgtManWindow, selectedRow, judgendyn);
} else {
trgtManWindow.model.setValue("/root/main/list1/clbs[" + selectedRow + "]/judgendyn", judgendyn);
trgtManWindow.model.setValue("/root/main/list1/clbs[" + selectedRow + "]/lastupdtrid", userid);
nextclamkey = fSrchNextJudgTrgtManCLBS(trgtManWindow, selectedRow);
}
if (nextclamkey) {
var irow = model.getValue("/root/hidden/smpid20200/rslt/selectedRow");
var clamym = trgtManWindow.model.getValue("/root/main/list1/clbs[" + irow + "]/clamym");
var clamdg = trgtManWindow.model.getValue("/root/main/list1/clbs[" + irow + "]/clamdg");
var pid = trgtManWindow.model.getValue("/root/main/list1/clbs[" + irow + "]/pid");
var pidsn = trgtManWindow.model.getValue("/root/main/list1/clbs[" + irow + "]/pidsn");
var gridcutprcpyn = trgtManWindow.model.getValue("/root/send/item1/cutprcpsel");
model.setValue("/root/hidden/smpid20200/rslt/clamym", clamym);
model.setValue("/root/hidden/smpid20200/rslt/clamdg", clamdg);
model.setValue("/root/hidden/smpid20200/rslt/pid", pid);
model.setValue("/root/hidden/smpid20200/rslt/pidsn", pidsn);
model.setValue("/root/hidden/smpid20200/rslt/cutprcpyn", gridcutprcpyn);
fGetInAftJudgMngt();
trgtManWindow.javascript.setPopupRefresh(pid);
return;
} else {
messageBox("´ÙÀ½ ½É»ç ´ë»óÀÚÀÇ Á¤º¸°¡", "I004"); // /´ÙÀ½ ½É»ç ´ë»óÀÚÀÇ Á¤º¸°¡ ¾ø½À´Ï´Ù.
}
} else {
trgtManWindow.model.setValue("/root/main/list1/clbs[" + selectedRow + "]/judgendyn", judgendyn);
trgtManWindow.model.setValue("/root/main/list1/clbs[" + selectedRow + "]/lastupdtrid", userid);
trgtManWindow.javascript.fSetWorkStatCnt(); // ÃѰǼö¿Í ±âŸ ½É»ç»óÅ¿¡ µû¸¥ cnt¸¦ Ç¥½ÃÇÑ´Ù.
trgtManWindow.model.refresh();
// ¸¶Áö¸· ÁÙÀÎ °æ¿ì ÀÌÈÄ ´ë»óÀÚ°¡ ¾ø´Ù.
messageBox("Á¶È¸µÈ ¸¶Áö¸· ½É»ç´ë»óÀÚ ÀÔ´Ï´Ù. ÀÌÈÄ ½É»ç ´ë»óÀÚ°¡", "I004"); // /Á¶È¸µÈ ¸¶Áö¸· ½É»ç´ë»óÀÚ ÀÔ´Ï´Ù. ÀÌÈÄ ½É»ç ´ë»óÀÚ°¡ ¾ø½À´Ï´Ù.
}
}
} else {
messageBox("ȸéÀÌ º¯°æµÇ¾úÀ¸¹Ç·Î ´ÙÀ½ ´ë»óÀÚ¸¦ ´Ù½Ã", "C002"); // /ȸéÀÌ º¯°æµÇ¾úÀ¸¹Ç·Î ´ÙÀ½ ´ë»óÀÚ¸¦ ´Ù½Ã ¼±ÅÃÇϽʽÿÀ.
}
return;
}
}
}
// ó¹æ Grid ÇÊÅÍ¿ë Á¶È¸Á¶°ÇÀ» ÃʱâÈÇÑ´Ù.
function fInitOrderFilter() {
// ó¹æGrid¿ë Á¶È¸ºÎÀÇ Radio ÃʱⰪÀ» "Àüü"·Î ¼³Á¤ÇÑ´Ù.
model.setValue("/root/hidden/list2/clodsrch/selectedRdoMatrAct", "-");
model.setValue("/root/hidden/list2/clodsrch/selectedRdoPay", "0");
model.setValue("/root/hidden/list2/clodsrch/selectedRdoItem", "-");
model.resetInstanceNode("/root/hidden/list2/clodsrch/inpCalcScorCd");
model.resetInstanceNode("/root/hidden/list2/clodsrch/inpEDICd");
// model.refresh();
rdo_matractflag.refresh();
rdo_payflag.refresh();
ipt_calcscorcd.refresh();
rdo_item1.refresh();
ipt_edicd.refresh();
}
// /////////////////////////////////////////////////////////////////////////
// º¸Á¶À¯Çü ¹× ¿äÀ² combo(cmb_supprate)ÀÇ ¼±Åà °ªÀÌ º¯°æµÈ °æ¿ì °¢°¢À» ÇØ´ç output¿¡ ¼³Á¤ÇÑ´Ù.
function fSetPatSuppRate() {
// º¸Á¶À¯ÇüID°ú ¿äÀ²%·Î combo ÀÇ value
// º¸Á¶À¯ÇüNM°ú ¿äÀ²%·Î combo ÀÇ label
var patsupprate = model.getValue("/root/hidden/item1/clbs/patsupprate");
var suppkindcd = patsupprate.substr(0, 2);
var payownbrate = patsupprate.substr(3, patsupprate.length);
model.setValue("/root/main/item1/clbs/suppkindcd", suppkindcd);
model.setValue("/root/main/item1/clbs/payownbrate", payownbrate);
model.setValue("/root/main/item1/clbs/recalcyn", "Y"); // ÀúÀå ½Ã¿¡ Àç°è»êÇÒÁö ¿©ºÎ¸¦
// ¼³Á¤ÇÔ
opt_payownbrate.refresh();
opt_suppkind.refresh();
if (suppkindcd != "00") {
opt_suppkind.attribute("background-color") = "#f7a08b"; // class="color_6" ´ÙÈ«»ö"#cece9c";
opt_payownbrate.attribute("background-color") = "#f7a08b"; // class="color_6" ´ÙÈ«»ö"#cece9c";
} else {
opt_suppkind.attribute("background-color") = "#f2f2f2"; // output_fix Ŭ·¡½ºÀÇ background-color
opt_payownbrate.attribute("background-color") = "#f2f2f2"; // output_fix Ŭ·¡½ºÀÇ background-color
}
}
// Á¶ÇÕ±âÈ£(ipt_insuno)¸¦ ÀÔ·ÂÇϸé ÇØ´ç Á¶ÇÕ¸íΰú º¸Çèȸ»çÄڵ带 Á¶È¸ÇÑ´Ù.
function fGetInAftJudgTrgtManInsunm() {
model.makeValue("/root/send/item2/incd/insucd", model.getValue("/root/main/item1/clbs/insuno"));
model.makeValue("/root/send/item2/incd/ordfromdd", model.getValue("/root/main/item1/clbs/ordfromdd"));
submit("TRPID20302");
var insucdnm = model.getValue("/root/main/item2/incd/insucdnm");
var insucmno = model.getValue("/root/main/item2/incd/insucmno");
if (insucdnm) {
model.setValue("/root/main/item1/clbs/insunm", insucdnm);
model.setValue("/root/main/item1/clbs/insucmno", insucmno);
model.refreshpart("/root/main/item1/clbs/insunm");
model.refreshpart("/root/main/item1/clbs/insucmno");
} else {
model.resetInstanceNode("/root/main/item1/clbs/insunm");
model.resetInstanceNode("/root/main/item1/clbs/insucmno");
model.refreshpart("/root/main/item1/clbs/insunm");
model.refreshpart("/root/main/item1/clbs/insucmno");
ipt_insuno.dispatch("onbuttonclick");
}
}
// [2007.04.23] function ÀÛ¼º: (ÅëÇÕÆÀ) ±è¼±Èñ ´ë¸®´Ô
// ÁֹιøÈ£¸¦ ÀÌ¿ëÇÑ ³ªÀÌ °è»êÀÇ °æ¿ì, À¯È¿ÇÏÁö ¾ÊÀº ÁֹιøÈ£¿¡ ´ëÇØ¼´Â -1 °ª¸¸À» ¹ÝȯÇϹǷÎ,
// ÁֹιøÈ£ ¾ÕÀÚ¸®¸¦ ÀÌ¿ëÇØ¼ yyyymmdd ÇüÅ·Π¸¸µç´Ù.
function getBirthDate(pResidentNo) {
if (isNaN(pResidentNo))
return -1;
gender = pResidentNo.substr(6, 1);
if (gender == "3" || gender == "4" || gender == "7" || gender == "8") {
regYY = "20";
} else if (gender == "0" || gender == "9") {
regYY = "18";
} else {
regYY = "19";
}
var rtn = regYY + pResidentNo.substr(0, 6);
return rtn;
}
// /////////////////////////////////////////////////////////////////////////
// ƯÁ¤ ȯÀÚ¿¡ ´ëÇØ ±×µ¿¾È ÀÛ¼ºµÈ ½É»çÀÚ¸Þ¸ð, û±¸¸Þ¸ð ³»¿ªÀ» Á¶È¸ÇÑ´Ù.
function fGetMemoHistList() {
var clamkey = model.getValue("/root/main/item1/clbs/clamkey");
if (clamkey) { // Á¶È¸µÈ ½É»ç´ë»óÀÚ°¡ ÀÖ°í
model.removeNodeset("/root/hidden/sppiz00300/rslt");
// SPPIZ00300_¸Þ¸ðÀÌ·ÂÁ¶È¸.xrw ¿¡¼ /root/hidden/sppiz00300 ·Î °á°ú°ªÀ» Àü´ÞÇϹǷΠcond
// ³ëµå¸¦ makeValue ÇØ¾ßÇÔ
model.makeValue("/root/hidden/sppiz00300/cond/pid", model.getValue("/root/main/item1/clbs/pid"));
model.makeValue("/root/hidden/sppiz00300/cond/orddeptcd", model.getValue("/root/main/item1/clbs/orddeptcd"));
model.makeValue("/root/hidden/sppiz00300/cond/ioflag", "I");
model.makeValue("/root/hidden/sppiz00300/cond/refterm", "2");
model.makeValue("/root/hidden/sppiz00300/cond/anofildinclyn", "Y");
model.makeValue("/root/hidden/sppiz00300/cond/fromdd", "");
model.makeValue("/root/hidden/sppiz00300/cond/todd", "");
model.makeValue("/root/hidden/sppiz00300/cond/clamkey", clamkey);
modal("SPPIZ00300", "1", "10", "10", "SPPIZ00300","/root/hidden/sppiz00300/cond", "/root/init", "", ""); // SPPIZ00300_¸Þ¸ðÀÌ·ÂÁ¶È¸.xrw
var SelectMemo = instance1.selectSingleNode("/root/hidden/sppiz00300/rslt");
if (SelectMemo != null) {
var choimemo = model.getValue("/root/hidden/sppiz00300/rslt/choimemo").getTrim(); // (stringHelper.js) ¹®ÀÚ¿ ¾ÕµÚ¿¡ ÀÖ´Â °ø¹é Á¦°Å
var choiedicd = model.getValue("/root/hidden/sppiz00300/rslt/edicd");
if (choimemo) {
model.setValue("/root/hidden/sppiz00300/rslt/choimemo", choimemo);
var destRef = model.getValue("/root/hidden/sppiz00300/rslt/destRef");
if (destRef == "judgmemo") {
// ½É»ç¸Þ¸ð·Î Àü´Þ
var judgmemo = model.getValue("/root/main/item1/memo/judgmemo");
if (judgmemo) { // ±âÁ¸ ½É»ç¸Þ¸ð°¡ °ø¹éÀÌ ¾Æ´Ñ °æ¿ì ¼±ÅÃµÈ ¸Þ¸ð¸¦ ½É»çÈ¸é ¸Þ¸ð µÚ¿¡ µ¡ºÙÀδÙ.
model.setValue("/root/main/item1/memo/judgmemo", judgmemo + " \n" + choimemo);
} else {
if (choiedicd) { // ó¹æº° ¸Þ¸ð¸¦ Àü´ÞÇÏ´Â °æ¿ìÀÓ
// µ¿ÀÏÇÑ EDI Äڵ尡 ÀÖÀ» °æ¿ì¸¸ Ãß°¡
for ( var j = 1; j < grd_clodhist.rows; j++) {
var clodedicd = model.getValue("/root/main/list2/clod[" + j + "]/basecd");
if (choiedicd == clodedicd) {
model.setValue("/root/main/item1/memo/judgmemo", choimemo);
j = grd_clodhist.rows;
}
}
} else {
model.setValue("/root/main/item1/memo/judgmemo", choimemo);
}
}
tar_judgrmemo.refresh();
model.toggle("case_judgrmemo"); // ÇØ´ç tab À¸·Î Åä±Û½ÃŲ´Ù.
} else if (destRef == "edimemo") {
// û±¸¸Þ¸ð·Î Àü´Þ
var edimemo = model
.getValue("/root/main/item1/memo/edimemo");
if (edimemo) { // ±âÁ¸ û±¸¸Þ¸ð°¡ °ø¹éÀÌ ¾Æ´Ñ °æ¿ì ¼±ÅÃµÈ ¸Þ¸ð¸¦ ½É»çÈ¸é ¸Þ¸ð µÚ¿¡ µ¡ºÙÀδÙ.
model.setValue("/root/main/item1/memo/edimemo", edimemo + " \n" + choimemo);
} else {
if (choiedicd) { // ó¹æº° ¸Þ¸ð¸¦ Àü´ÞÇÏ´Â °æ¿ìÀÓ
// µ¿ÀÏÇÑ EDI Äڵ尡 ÀÖÀ» °æ¿ì * Ç¥½Ã
for ( var j = 1; j < grd_clodhist.rows; j++) {
var clodedicd = model.getValue("/root/main/list2/clod[" + j + "]/basecd");
if (choiedicd == clodedicd) {
model.setValue("/root/main/item1/memo/edimemo", choimemo);
j = grd_clodhist.rows;
}
}
} else {
model.setValue("/root/main/item1/memo/edimemo",
choimemo);
}
}
tar_ediclammemo.refresh();
model.toggle("case_ediclammemo"); // ÇØ´ç tab À¸·Î Åä±Û½ÃŲ´Ù.
} else if (destRef == "prcpmemo") {
// ó¹æº° ÁÖ¼®·Î Àü´Þ
// µ¿ÀÏÇÑ EDI Äڵ尡 ÀÖÀ» °æ¿ì * Ç¥½Ã
for ( var i = 1; i < grd_clodhist.rows; i++) {
var snglcalcscorcd = model.getValue("/root/main/list2/clod[" + i + "]/snglcalcscorcd");
var edicd = model.getValue("/root/main/list2/clod[" + i + "]/basecd");
var seqno = model.getValue("/root/main/list2/clod[" + i + "]/seqno");
var edilnno = model.getValue("/root/main/list2/clod[" + i + "]/edilnno");
if (choiedicd == edicd) {
var lnunitspclspecyn = model.getValue("/root/main/list2/clod[" + i + "]/lnunitspclspecyn");
var rowNum = "";
if (lnunitspclspecyn) {
for ( var j = 1; j < grd_clsphist.rows; j++) {
if (grd_clsphist.rowstatus(j) != 4) {
var clodseqno = model.getValue("/root/main/list3/clsp[" + j + "]/clodseqno");
if (clodseqno == seqno) {
if (model.getValue("/root/main/list3/clsp[" + j + "]/spclcd") == "JX999") {
rowNum = j;
j = grd_clsphist.rows;
}
}
}
}
if (rowNum) {
var ans = messageBox(edilnno + "¹ø ÁÙ¿¡ µî·ÏµÈ ¸Þ¸ð°¡ ÀÖ¾î ±âÁ¸ ³»¿ª¿¡ µ¡ºÙÀ̰ųª »èÁ¦ÈÄ Ãß°¡ÇÒ ¼ö ÀÖ½À´Ï´Ù.\nµ¡ºÙ¿© Ãß°¡", "S001");
// /***¹ø ÁÙ¿¡ µî·ÏµÈ ¸Þ¸ð°¡ ÀÖ¾î ±âÁ¸ ³»¿ª¿¡ µ¡ºÙÀ̰ųª »èÁ¦ÈÄ Ãß°¡ÇÒ
// ¼ö ÀÖ½À´Ï´Ù.\nµ¡ºÙ¿© Ãß°¡ ÇϽ÷Á¸é ¿¹(Yes)\n¾Æ´Ï¸é ¾Æ´Ï¿À(No)
if (ans == 6) { // 6: yes
var spclspec = model.getValue("/root/main/list3/clsp[" + rowNum + "]/spclspec");
model.setValue("/root/main/list3/clsp[" + rowNum + "]/spclspec", spclspec + "\n" + choimemo);
var rowstatus = grd_clsphist.rowstatus(rowNum);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clsphist.rowstatus(rowNum) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
} else if (ans == 7) { // 7:no
model.setValue("/root/main/list3/clsp[" + rowNum + "]/spclspec", choimemo);
var rowstatus = grd_clsphist.rowstatus(rowNum);
if (rowstatus == 1 || rowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clsphist.rowstatus(rowNum) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
} else if (ans == 2) { // 2:cancel
}
} else { // ±âÁ¸¿¡ ÀÔ·ÂµÈ JX999°¡ ¾ø´Â °æ¿ì
// 'JX999' Äڵ带 Ãß°¡ÇÑ´Ù.
var clsprow = grd_clsphist.rows - 1; // ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
grd_clsphist.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/unitflag", "J");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/edilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clodseqno", seqno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/snglcalcscorcd", snglcalcscorcd);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclcd", "JX999");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/cdnm", "±âŸ³»¿ª");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclspec", choimemo);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclformat", "X(700)");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldedilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clsoyn", "N"); // ¿ø¿Üó¹æ¿©ºÎ JX999 + ´Ù¸¥ Äڵ嵵 ÀÖ´Â °æ¿ì°¡ µÈ´Ù.
grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("lnunitspclspecyn")) = "#b5a5d1"; // ¿¬ÇÑ º¸¶ó»ö
}
} else { // ±âÁ¸¿¡ ÀÔ·ÂµÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ¾ø´Â °æ¿ì
// 'JX999' Äڵ带 Ãß°¡ÇÑ´Ù.
var clsprow = grd_clsphist.rows - 1; // ƯÁ¤³»¿ª Grid°¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
grd_clsphist.insertRow(clsprow++, true);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/unitflag", "J");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/edilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clodseqno", seqno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/snglcalcscorcd", snglcalcscorcd);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclcd", "JX999");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/cdnm", "±âŸ³»¿ª");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclspec", choimemo);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclformat", "X(700)");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/oldedilnno", edilnno);
model.setValue("/root/main/list3/clsp[" + clsprow + "]/clsoyn", "N"); // ¿ø¿Üó¹æ¿©ºÎ
model.setValue("/root/main/list2/clod[" + i + "]/lnunitspclspecyn", "*");
// JX999¸¸ ÀÖ´Â °æ¿ì
grd_clodhist.cellStyle("background-color", i, grd_clodhist.colRef("lnunitspclspecyn")) = "#f7a08b"; // class="color_6" ´ÙÈ«»ö
fSetOrderChangeRowStat(i); // ó¹æÀÇ ¼öÁ¤µÈ row »óŸ¦ Ç¥½ÃÇÑ´Ù.
} // lnunitspclspecyn == ""
} // if (choiedicd == clodedicd)
}
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
grd_clsphist.refresh();
grd_clodhist.refresh();
model.toggle("case_spclspec"); // ÇØ´ç tab À¸·Î Åä±Û½ÃŲ´Ù.
} // if (destRef == "prcpmemo")
// model.refresh();
} // if (choimemo)
} // if (SelectMemo != null)
} // if (clamkey)
}
// ½É»çÀÚ¸Þ¸ð, EDIû±¸¸Þ¸ð¸¦ ƯÁ¤³»¿ª Çü½Ä¿¡ ¸ÂÃç ¼³Á¤ÇÑ´Ù.
function fSetJudgEDIMemo(spclmemo, usermemoyn) {
var delclspNode = instance1.selectSingleNode("/root/send/item3/delclsp");
var max = 1;
if (delclspNode != null) {
max = delclspNode.childNodes.length + 1;
}
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delunitflag", "M");
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delspclcd", "MX999");
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delusermemoyn", usermemoyn);
model.makeNode("/root/send/item3/delclsp/delmemo[" + max + "]/delcalcscorcd");
model.makeNode("/root/send/item3/delclsp/delmemo[" + max + "]/deledilnno");
var item3Path = "";
var item3Node = "";
var repeat = ""; // ƯÁ¤³»¿ª ¹Ýº¹ ¼³Á¤ rowstat = 'R'
if (usermemoyn == "Y") {
item3Path = "/root/send/item3/judgmemo[";
item3Node = "judg";
repeat = model.getValue("/root/main/item1/memo/judgmemorepeat");
} else {
item3Path = "/root/send/item3/edimemo[";
item3Node = "edi";
repeat = model.getValue("/root/main/item1/memo/edimemorepeat");
}
var iSpclCdCnt = 0; // DB¿¡ ÀúÀåµÉ MX999 ÄÚµå °³¼ö
var iSpclCdTotLength = getStringLength(spclmemo); // (stringHelper.js) ¹®ÀÚ¿ÀÇ ±æÀ̸¦ ±¸ÇÑ´Ù.
var insCharTotCnt = 0; // ƯÁ¤³»¿ªÀ¸·Î Àß¶óÁø ÃÑ ±ÛÀÚ ¼ö
if (iSpclCdTotLength > 350) { // »õ·Î ÀÔ·ÂµÈ Æ¯Á¤Äڵ尡 700byte¸¦ ³Ñ´Â´Ù.
// ¿µ¹®(700ÀÚ), ÇѱÛ(350ÀÚ) ±æÀÌ·Î Àß¶ó¼ n°³ÀÇ Æ¯Á¤Äڵ带 ¸¸µç´Ù.
var iLen = 0; // ƯÁ¤³»¿ª ±æÀ̰¡ 700 byte°¡ µÇ¾ú´ÂÁö °è»ê
var iStartInx = 0; // ƯÁ¤³»¿ª ½ÃÀÛ index
var iCharCnt = 0; // ¸î±ÛÀÚ·Î ±¸¼ºµÇ´ÂÁö °è»ê
for ( var i = 0; i < spclmemo.length; i++) {
var sBit = spclmemo.charAt(i);
iCharCnt++;
if (escape(sBit).length > 4) {
iLen = iLen + 2;
} else {
iLen = iLen + 1;
}
if (iLen == 350 || iLen > 350) { // ¿µ¹®(700ÀÚ), ÇѱÛ(350ÀÚ)
iSpclCdCnt++;
if (iLen == 350) { // 700byte·Î ±æÀ̰¡ ³¡³ °æ¿ì
model.makeValue(item3Path + iSpclCdCnt + "]/" + item3Node + "spclspec", spclmemo.substr(iStartInx, iCharCnt));
model.makeValue(item3Path + iSpclCdCnt + "]/" + item3Node + "rowstat", repeat);
iStartInx += iCharCnt;
insCharTotCnt += 350;
} else if (iLen > 350) { // ¿µ¹®(700ÀÚ), ÇѱÛ(350ÀÚ)¸¦ ³Ñ´Â °æ¿ì
model.makeValue(item3Path + iSpclCdCnt + "]/" + item3Node + "spclspec", spclmemo.substr(iStartInx, iCharCnt - 1));
model.makeValue(item3Path + iSpclCdCnt + "]/" + item3Node + "rowstat", repeat);
iStartInx += (iCharCnt - 1);
i--;
insCharTotCnt += 349;
}
iCharCnt = 0;
iLen = 0;
}
}
if (iSpclCdTotLength != insCharTotCnt) {
iSpclCdCnt++;
model.makeValue(item3Path + iSpclCdCnt + "]/" + item3Node + "spclspec", spclmemo.substring(iStartInx, spclmemo.length));
model.makeValue(item3Path + iSpclCdCnt + "]/" + item3Node + "rowstat", repeat);
}
} else if (iSpclCdTotLength > 0) { // »õ·Î Ãß°¡µÈ ³»¿ëÀÌ ÀÖ´Ù.
iSpclCdCnt++;
// model.makeValue(item3Path + iSpclCdCnt +"]/"+ item3Node
// +"usermemoyn", usermemoyn);
model.makeValue(item3Path + iSpclCdCnt + "]/" + item3Node + "spclspec", spclmemo);
model.makeValue(item3Path + iSpclCdCnt + "]/" + item3Node + "rowstat", repeat);
// }
}
}
// ½É»çComment Á¶È¸ Popup¿¡¼ ¼±ÅÃÇÑ ½É»çÀڸ޸𸦠¼³Á¤ÇÑ´Ù.
function fSetJudgMemoRefresh() {
var memo = model.getValue("/root/hidden/sppiz00700/rslt/memo");
var judgmemo = model.getValue("/root/main/item1/memo/judgmemo");
if (memo) {
if (judgmemo) { // ±âÁ¸ ½É»ç¸Þ¸ð°¡ °ø¹éÀÌ ¾Æ´Ñ °æ¿ì ¼±ÅÃµÈ ¸Þ¸ð¸¦ ½É»çÈ¸é ¸Þ¸ð µÚ¿¡ µ¡ºÙÀδÙ.
model.setValue("/root/main/item1/memo/judgmemo", judgmemo + " \n" + memo);
} else {
model.setValue("/root/main/item1/memo/judgmemo", memo);
}
model.refreshpart("/root/main/item1/memo/judgmemo");
}
}
// ½É»çComment Á¶È¸ Popup¿¡¼ ¼±ÅÃÇÑ EDI¸Þ¸ð¸¦ ¼³Á¤ÇÑ´Ù.
function fSetEdiMemoRefresh() {
var memo = model.getValue("/root/hidden/sppiz00700/rslt/memo");
var edimemo = model.getValue("/root/main/item1/memo/edimemo");
if (memo) {
if (edimemo) { // ±âÁ¸ û±¸¸Þ¸ð°¡ °ø¹éÀÌ ¾Æ´Ñ °æ¿ì ¼±ÅÃµÈ ¸Þ¸ð¸¦ ½É»çÈ¸é ¸Þ¸ð µÚ¿¡ µ¡ºÙÀδÙ.
model.setValue("/root/main/item1/memo/edimemo", edimemo + " \n" + memo);
} else {
model.setValue("/root/main/item1/memo/edimemo", memo);
}
model.refreshpart("/root/main/item1/memo/edimemo");
}
}
// -------------------------------------
// ƯÁ¤ ȯÀÚ¿¡ ´ëÇÑ »óº´ÀÌ·ÂÀ» Á¶È¸ÇÑ´Ù.
// -------------------------------------
function fGetDiagHistList() {
var clamkey = model.getValue("/root/main/item1/clbs/clamkey");
if (clamkey) { // Á¶È¸µÈ ½É»ç´ë»óÀÚ°¡ ÀÖÀ¸¸é
// ½É»ç´ë»óÀÚÀÇ µî·Ï¹øÈ£¸¦ Á¶°ÇÀ¸·Î ÇÏ¿© Àüü û±¸ »óº´ÀÌ·ÂÀ» Á¶È¸ÇÑ´Ù.
model.removeNodeset("/root/hidden/smpiz00100/rslt");
model.setValue("/root/hidden/smpiz00100/cond/pid", model.getValue("/root/main/item1/clbs/pid"));
model.setValue("/root/hidden/smpiz00100/cond/ordfromdd", model.getValue("/root/main/item1/clbs/indd"));
model.setValue("/root/hidden/smpiz00100/cond/ordtodd", model.getValue("/root/main/item1/clbs/dschdd"));
// model.setValue("/root/hidden/smpiz00100/cond/srchflag", "pam"); //
// °Ë»ö±¸ºÐ Radio : û±¸
modal("SMPIZ00100", "1", "10", "10", "SMPIZ00100", "/root/hidden/smpiz00100/cond", "/root/init", "", ""); // SMPIZ00100_¿Ü·¡ÀÔ¿ø»óº´ÀÌ·ÂÁ¶È¸.xrw
var rsltNode = instance1
.selectSingleNode("/root/hidden/smpiz00100/rslt");
if (rsltNode != null) {
for ( var i = 1; i <= rsltNode.childNodes.length; i++) {
var diagcd = model.getValue("/root/hidden/smpiz00100/rslt/diag[" + i + "]/diagcd");
var isSame = false;
for ( var j = grd_cldihist.fixedRows; j < grd_cldihist.rows; j++) {
if (diagcd == model.getValue("/root/main/list1/cldi[" + j + "]/diagcd")
// && grd_cldihist.rowstatus(j) != 4 20100308 Ãß°¡ ÀúÀå½Ã¹®Á¦ÀÖÀ½
) {
// µ¿ÀÏÇÑ »óº´ÀÌ Á¸ÀçÇÏ´Â °æ¿ì
isSame = true;
j = grd_cldihist.rows;
}
}
if (isSame == false) {
// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "Çà Ãß°¡"
fDiagGridInsertRow("Y", "Y");
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagkindcd", model.getValue("/root/hidden/smpiz00100/rslt/diag[" + i + "]/diagkindcd"));
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagseq", grd_cldihist.row);
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagcd", model.getValue("/root/hidden/smpiz00100/rslt/diag[" + i + "]/diagcd"));
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagnm", model.getValue("/root/hidden/smpiz00100/rslt/diag[" + i + "]/diaghngnm"));
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagengnm", model.getValue("/root/hidden/smpiz00100/rslt/diag[" + i + "]/diagengnm"));
// 20100308 ƯÁ¤³»¿ª Á¶È¸ Ãß°¡
model.setValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/vcode", fGetDiagVcode(diagcd));
// 20100329 MT002 ÀÔ·Âüũ
if (model.getValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagseq") == "1"
&& model.getValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/vcode") != ""
&& model.getValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/diagkindcd") != "R"
)
{
fSetDiagMT002(model.getValue("/root/main/list1/cldi[" + grd_cldihist.row + "]/vcode"));
}
var nowRow = grd_cldihist.row;
}
}
fSortDiagNo(true);
grd_cldihist.row = nowRow;
}
}
}
// 󹿻çÀ¯Á¶È¸
// history.. Áø·á¿¡ ÀÖ´ÂÈ¸é ±âº»Á¶°ÇÀ¸·Î ÆË¾÷»ç¿ë..YS(À±»ù)¿äû
function fPrcpResnRef() {
// ¼¼¼Ç°ª ¹Þ±â
var sUserInfosS = getUserInfos();
sUserInfosS = sUserInfosS + "|";
var UserInfosS_Array = sUserInfosS.split("|");
var userid = UserInfosS_Array[0]; // »ç¿ëÀÚ¹øÈ£
var usernm = UserInfosS_Array[1]; // »ç¿ëÀÚÀ̸§
var posinstcd = UserInfosS_Array[6]; // ±Ù¹«Áö±â°üÄÚµå
var posinstnm = UserInfosS_Array[7]; // ±Ù¹«Áö±â°ü¸í
var posdeptcd = UserInfosS_Array[4]; // ¼Ò¼ÓºÎ¼ÄÚµå
var posdeptnm = UserInfosS_Array[5]; // ¼Ò¼ÓºÎ¼¸í
model.makeValue("/root/tmp/prcpresnref/info/pid", model.getValue("/root/main/item1/clbs/pid")); // µî·Ï¹øÈ£
model.makeValue("/root/tmp/prcpresnref/info/fromdd", model.getValue("/root/main/item1/clbs/indd")); // 󹿽ÃÀÛÀÏ default indd
model.makeValue("/root/tmp/prcpresnref/info/todd", model.getValue("/root/main/item1/clbs/dschdd")); // ó¹æÁ¾·áÀÏ default dschdd
model.makeValue("/root/tmp/prcpresnref/info/orddeptcd", "-"); // Áø·á°ú ÁÖÁø·á°ú
model.makeValue("/root/tmp/prcpresnref/info/orddrid", "-"); // ÁÖÄ¡ÀÇ : default "-"
model.makeValue("/root/tmp/prcpresnref/info/mainjudgid", "-"); // ½É»çÀÚ : ÇöÀç½É»çÀÚ
// 20091111 JHP ÇÊÅͽÿ¡´Â getValue°¡ ¸ÔÁö¸¦ ¾Ê±â ¶§¹®¿¡ valuMatrix·Î 󸮺¯°æÇÔ.
model.makeValue("/root/tmp/prcpresnref/info/prcpcd", grd_clodhist.valueMatrix(grd_clodhist.row, grd_clodhist.colRef("grupcalcscorcd"))); // ¼ö°¡ÄÚµå : ±×·ìÄÚµå
model.makeValue("/root/tmp/prcpresnref/info/insukind", model.getValue("/root/main/item1/clbs/insukindcd")); // º¸ÇèÀ¯Çü : ȯÀÚº¸ÇèÀ¯Çü
model.makeValue("/root/tmp/prcpresnref/info/ioflag", "I"); // ³»¿øÀ¯Çü : default "-"
model.makeValue("/root/tmp/prcpresnref/info/resncd", "FF"); // »çÀ¯±¸ºÐ : default "FF" Áߺ¹Ã³¹æ
model.makeValue("/root/tmp/prcpresnref/info/popup", "judg"); // ÆË¾÷»ç¿ë󱸺Р: judg(½É»ç)
modal("SPMMO19000_Áߺ¹Ã³¹æ»çÀ¯Á¶È¸", "", "400", "300", "", "/root/tmp/prcpresnref/info", "/root/tmp/prcpresnref/info");
model.removeNode("/root/tmp/prcpresnref");
}
// -------------------------------------------------------------------
// ÁÙ´ÜÀ§ ƯÁ¤³»¿ª Áß ±âŸ¸Þ¸ð(JX999)¸¦ ƯÁ¤³»¿ª Çü½Ä¿¡ ¸ÂÃç ¼³Á¤ÇÑ´Ù.
// -------------------------------------------------------------------
function fSetSpclSpecJX999() {
var iTotSpclCdCnt = 0; // DB¿¡ ÀúÀåµÉ JX999 ÄÚµå °³¼ö
for ( var i = 1; i < grd_clsphist.rows; i++) {
var rowstatus = grd_clsphist.rowstatus(i);
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
var snglcalcscorcd = model.getValue("/root/main/list3/clsp[" + i + "]/snglcalcscorcd");
var edilnno = model.getValue("/root/main/list3/clsp[" + i + "]/edilnno");
var seqno = model.getValue("/root/main/list3/clsp[" + i + "]/seqno");
var clodseqno = model.getValue("/root/main/list3/clsp[" + i + "]/clodseqno");
var clsoyn = model.getValue("/root/main/list3/clsp[" + i + "]/clsoyn");
var mpsno = model.getValue("/root/main/list3/clsp[" + i + "]/mpsno");
if (rowstatus != 0 && spclcd == "JX999") {
var delclspNode = instance1.selectSingleNode("/root/send/item3/delclsp");
var max = 1;
if (delclspNode != null) {
max = delclspNode.childNodes.length + 1;
}
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delunitflag", "J");
var oldspclcd = model.getValue("/root/main/list3/clsp[" + i + "]/oldspclcd");
if (oldspclcd) {
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delspclcd", oldspclcd);
} else {
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delspclcd", spclcd);
}
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delusermemoyn", "N");
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delcalcscorcd", snglcalcscorcd);
if (rowstatus == 2) { // JX999´Â seqno·Î ±âÁ¸ Äڵ带 »èÁ¦ÇÏ´Â °ÍÀÌ ¾Æ´Ï¶ó ÁÙ¹øÈ£·Î
// »èÁ¦ÇϹǷΠÁ¶È¸Çؿ Ãʱâ ÁÙ¹øÈ£¸¦ Àü´ÞÇÑ´Ù.
var initedilnno = model.getValue("/root/main/list3/clsp[" + i + "]/initedilnno");
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/deledilnno", initedilnno);
} else {
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/deledilnno", edilnno);
}
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delseqno", seqno);
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delclsoyn", clsoyn);
model.makeValue("/root/send/item3/delclsp/delmemo[" + max + "]/delmpsno", mpsno);
}
// ÇØ´ç û±¸Å°ÀÇ JX999´Â ¸ðµÎ »èÁ¦ÇÏ°í »õ·Î Ãß°¡ÇϹǷΠ"»èÁ¦" »óŰ¡ ¾Æ´Ñ ¸ðµç °æ¿ì¸¦ Àü¼ÛÇÑ´Ù.
if (rowstatus != 0 && rowstatus != 4 && spclcd == "JX999") { // 0 : new, 4: delete
var iSpclCdCnt = 0;
var spclmemo = model.getValue("/root/main/list3/clsp[" + i + "]/spclspec");
var repeat = model.getValue("/root/main/list3/clsp[" + i + "]/rowstat"); // ƯÁ¤³»¿ª ¹Ýº¹ ¼³Á¤ rowstat = 'R'
var iSpclCdTotLength = getStringLength(spclmemo); // (stringHelper.js) ¹®ÀÚ¿ÀÇ ±æÀ̸¦ ±¸ÇÑ´Ù.
var insCharTotCnt = 0; // ƯÁ¤³»¿ªÀ¸·Î Àß¶óÁø ÃÑ ±ÛÀÚ ¼ö
if (iSpclCdTotLength > 350) { // »õ·Î ÀÔ·ÂµÈ Æ¯Á¤Äڵ尡 700byte¸¦ ³Ñ´Â´Ù.
// ¿µ¹®(700ÀÚ), ÇѱÛ(350ÀÚ) ±æÀÌ·Î Àß¶ó¼ n°³ÀÇ Æ¯Á¤Äڵ带 ¸¸µç´Ù.
var iLen = 0; // ƯÁ¤³»¿ª ±æÀ̰¡ 700 byte°¡ µÇ¾ú´ÂÁö °è»ê
var iStartInx = 0; // ƯÁ¤³»¿ª ½ÃÀÛ index
var iCharCnt = 0; // ¸î±ÛÀÚ·Î ±¸¼ºµÇ´ÂÁö °è»ê
for ( var j = 0; j < spclmemo.length; j++) {
var sBit = spclmemo.charAt(j);
iCharCnt++;
if (escape(sBit).length > 4) {
iLen = iLen + 2;
} else {
iLen = iLen + 1;
}
if (iLen == 350 || iLen > 350) { // ¿µ¹®(700ÀÚ), ÇѱÛ(350ÀÚ)
iTotSpclCdCnt++;
iSpclCdCnt++;
if (iLen == 350) { // 700byte·Î ±æÀ̰¡ ³¡³ °æ¿ì
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitspclspec", spclmemo.substr(iStartInx, iCharCnt));
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitcalcscorcd", snglcalcscorcd);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitedilnno", edilnno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitclodseqno", clodseqno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitclsoyn", clsoyn);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitmpsno", mpsno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitrowstat", repeat);
iStartInx += iCharCnt;
insCharTotCnt += 350;
} else if (iLen > 350) { // ¿µ¹®(700ÀÚ), ÇѱÛ(350ÀÚ)¸¦ ³Ñ´Â °æ¿ì
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitspclspec", spclmemo.substr(iStartInx, iCharCnt - 1));
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitcalcscorcd", snglcalcscorcd);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitedilnno", edilnno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitdclodseqno", clodseqno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitclsoyn", clsoyn);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitmpsno", mpsno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitrowstat", repeat);
iStartInx += (iCharCnt - 1);
j--;
insCharTotCnt += 349;
}
iCharCnt = 0;
iLen = 0;
}
}
if (iSpclCdTotLength != insCharTotCnt) {
iTotSpclCdCnt++;
iSpclCdCnt++;
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitspclspec", spclmemo.substring(iStartInx, spclmemo.length));
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitcalcscorcd", snglcalcscorcd);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitedilnno", edilnno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitclodseqno", clodseqno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitclsoyn", clsoyn);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitmpsno", mpsno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitrowstat", repeat);
}
} else if (iSpclCdTotLength > 0) { // »õ·Î Ãß°¡µÈ ³»¿ëÀÌ ÀÖ´Ù.
iTotSpclCdCnt++;
iSpclCdCnt++;
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitspclspec", spclmemo);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitcalcscorcd", snglcalcscorcd);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitedilnno", edilnno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitclodseqno", clodseqno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitclsoyn", clsoyn);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitmpsno", mpsno);
model.makeValue("/root/send/item3/lnunitmemo[" + iTotSpclCdCnt + "]/lnunitrowstat", repeat);
}
}
}
}
// ƯÁ¤³»¿ª / ½É»çÀÚ¸Þ¸ð / EDI¸Þ¸ð âÀ» ÀÛ°Ô ÇÑ´Ù.
function fCutSwitchSize() {
grp_clsphist.attribute("height") = "170";
var igrd_hei = parseInt(grp_clsphist.attribute("height"));
swt_spclmemo.attribute("height") = igrd_hei - 24;
grd_clsphist.attribute("height") = igrd_hei - 61;
tar_judgrmemo.attribute("height") = igrd_hei - 61;
tar_ediclammemo.attribute("height") = igrd_hei - 61;
if (grp_predoculist.visible == false && grp_delclodlist.visible == false
&& grp_delorderlist.visible == false) {
grd_clodhist.attribute("width") = "1114";
ln_clodhist.attribute("x2") = "1114";
}
}
// ƯÁ¤³»¿ª / ½É»çÀÚ¸Þ¸ð / EDI¸Þ¸ð âÀ» Å©°Ô ÇÑ´Ù.
function fExpandSwitchSize() {
grp_clsphist.attribute("height") = "632";
var igrd_hei = parseInt(grp_clsphist.attribute("height"));
swt_spclmemo.attribute("height") = igrd_hei - 24;
grd_clsphist.attribute("height") = igrd_hei - 61;
tar_judgrmemo.attribute("height") = igrd_hei - 61;
tar_ediclammemo.attribute("height") = igrd_hei - 61;
// ó¹æ Grid À» Ãà¼ÒÇϰí, Grid GroupÀÌ °ãÃÄÁ® º¸À̹ǷΠvisible = false ó¸®ÇÑ´Ù.
if (grp_predoculist.visible == true || grp_delclodlist.visible == true
|| grp_delorderlist.visible == true) {
grd_clodhist.attribute("width") = "630";
ln_clodhist.attribute("x2") = "630";
} else {
grd_clodhist.attribute("width") = "480";
ln_clodhist.attribute("x2") = "480";
}
}
// /////////////////////////////////////////////////////////////////////////
// ƯÁ¤³»¿ª Áß MT004 ³»¿ªÀ» ¼³Á¤ÇÑ´Ù.
function fSetSpclMT004() {
var clamkey = model.getValue("/root/main/item1/clbs/clamkey");
if (clamkey) { // Á¶È¸µÈ ½É»ç´ë»óÀÚ°¡ ÀÖ°í
if (btn_mt0004.attribute("class") == "btn5_letter4") { // ƯÁ¤³»¿ª¿¡ 'MT004'
// Äڵ尡 ÀÖ´Â °æ¿ì
// 'MT004' Äڵ带 »èÁ¦ÇÑ´Ù.
for ( var i = 1; i < grd_clsphist.rows; i++) {
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
var gridrowstatus = grd_clsphist.rowstatus(i);
if (spclcd == "MT004" && gridrowstatus != 4) {
if (gridrowstatus == 1 || gridrowstatus == 3) { // 1 : insert, 3 : insert & new
model.resetInstanceNode("/root/main/list3/clsp[" + i + "]/spclcd");
model.resetInstanceNode("/root/main/list3/clsp[" + i + "]/spclspec");
// grd_clsphist.deleteRow(i, false); // ÇØ´ç ¶óÀÎÀ» Grid¿¡¼ »èÁ¦ÇÑ´Ù.
} else { // 0 : new, 2 : update
grd_clsphist.rowstatus(i) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
}
}
btn_mt0004.attribute("class") = "btn2_letter4";
} else { // ƯÁ¤³»¿ª¿¡ 'MT004' Äڵ尡 ¾ø´Â °æ¿ì
// 'MT004' Äڵ带 Ãß°¡ÇÑ´Ù.
fSpclGridInsertRow(); // ƯÁ¤³»¿ª Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "Çà Ãß°¡"
var clsprow = grd_clsphist.row;
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclcd", "MT004");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/cdnm", "¼Ò¸íÀÚ·á ±¸ºÐ");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclspec", "Y");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/spclformat", "X(1)");
model.setValue("/root/main/list3/clsp[" + clsprow + "]/detldesc", "¼Ò¸íÀڷḦ ÷ºÎÇÏ´Â °æ¿ì 'Y'¸¦ ±âÀç");
btn_mt0004.attribute("class") = "btn5_letter4";
btn_mt0004.attribute("color") = "#cc3333"; // cc3333=ºÓÀº»ö
}
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
grd_clsphist.refresh();
}
}
// ƯÁ¤³»¿ª Áß MT015, MT016 ³»¿ªÀ» Á¶È¸ÇÏ¿© "¼Ò¸íÀÚ·á" Btn (÷ºÎ¹° ÀÚ·á°ü¸®) Popup ȸ鿡 Ç¥½ÃÇÑ´Ù.
function fGetAttachedDataList() {
var clamkey = model.getValue("/root/main/item1/clbs/clamkey");
if (clamkey) { // Á¶È¸µÈ ½É»ç´ë»óÀÚ°¡ ÀÖ°í
model.removeNodeset("/root/hidden/sppiz00200/cond");
var index = 0;
for ( var i = 1; i < grd_clsphist.rows; i++) {
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
var gridrowstatus = grd_clsphist.rowstatus(i);
if (spclcd == "MT015" || spclcd == "MT016") {
index++;
model.makeValue("/root/hidden/sppiz00200/cond/clsp[" + index + "]/spclcd", model.getValue("/root/main/list3/clsp[" + i + "]/spclcd"));
model.makeValue("/root/hidden/sppiz00200/cond/clsp[" + index + "]/seqno", model.getValue("/root/main/list3/clsp[" + i + "]/seqno"));
model.makeValue("/root/hidden/sppiz00200/cond/clsp[" + index + "]/spclspec", model.getValue("/root/main/list3/clsp[" + i + "]/spclspec"));
// ƯÁ¤³»¿ª Grid¿¡¼ "Çà »èÁ¦"ÇÑ °æ¿ì MT015 / MT016 ÀڷḦ Ç¥½ÃÇÏÁö ¾Êµµ·Ï Çϵµ·Ï
// rowstatus¸¦ Àü´ÞÇÔ
model.makeValue("/root/hidden/sppiz00200/cond/clsp[" + index + "]/rowstat", gridrowstatus);
}
}
if (instance1.selectSingleNode("/root/hidden/sppiz00200/cond") == null) {
model.makeNode("/root/hidden/sppiz00200/cond");
}
modal("SPPIZ00200", "1", "10", "10", "SPPIZ00200", "", "", "", ""); // SPPIZ00200_÷ºÎ¹°ÀÚ·á°ü¸®.xrw
fDisplayAttachedDataList();
}
}
// "¼Ò¸íÀÚ·á" Btn (÷ºÎ¹° ÀÚ·á°ü¸®) Popup ȸ鿡¼ ƯÁ¤³»¿ª Áß MT015, MT016 Á¤º¸°¡ ÀÔ·ÂµÈ È¯ÀÚÀÎÁö¸¦ È®ÀÎÇÑ´Ù.
function fDisplayAttachedDataList() {
var isAttachedDataList = false;
var cSrcNode = instance1.selectSingleNode("/root/hidden/sppiz00200/rslt/clsp");
if (cSrcNode == null) { // ƯÁ¤³»¿ªÀÌ ¾ø´Â °æ¿ìÀÓ
return;
}
if (model.getValue("/root/hidden/sppiz00200/rslt/clsp/unitflag") == "") { // "Ãë¼Ò" ¼±Åýÿ¡ ¹öư »öÀÌ º¯°æµÇÁö ¾Êµµ·Ï
return;
}
var cSrcChildNodeList = cSrcNode.childNodes;
for ( var i = 1; i <= cSrcChildNodeList.length; i++) {
var spclcd = model.getValue("/root/hidden/sppiz00200/rslt/clsp[" + i + "]/spclcd");
if (spclcd == "MT015" || spclcd == "MT016") {
var rowstat = model.getValue("/root/hidden/sppiz00200/rslt/clsp[" + i + "]/rowstat")
if (rowstat != "D") {
var spclspec = model.getValue("/root/hidden/sppiz00200/rslt/clsp[" + i + "]/spclspec");
if (spclspec) {
isAttachedDataList = true;
}
// ƯÁ¤³»¿ª Grid ¿¡¼ ÇØ´ç ³»¿ëÀ» »ðÀÔ ¶Ç´Â ¼öÁ¤ÇÑ´Ù.
if (rowstat == "I") { // »ðÀÔ
fSpclGridInsertRow();
model.setValue("/root/main/list3/clsp[" + grd_clsphist.row + "]/spclcd", spclcd);
model.setValue("/root/main/list3/clsp[" + grd_clsphist.row + "]/spclspec", spclspec);
if (spclcd == "MT015") {
model.setValue("/root/main/list3/clsp[" + grd_clsphist.row + "]/cdnm", "Á¦ÃâÀÚ·á ¸ñ·ÏÇ¥");
model.setValue("/root/main/list3/clsp[" + grd_clsphist.row + "]/spclformat", "X(2)");
model.setValue("/root/main/list3/clsp[" + grd_clsphist.row + "]/detldesc", "Á¦ÃâÀÚ·áÄÚµå/Á¦ÃâÀÚ·áÄÚµå/... ÇüÅ·ΠÀÔ·Â");
} else {
model.setValue("/root/main/list3/clsp[" + grd_clsphist.row + "]/cdnm", "Á¦ÃâÀÚ·á ¸ñ·ÏÇ¥(±âŸ)");
model.setValue("/root/main/list3/clsp[" + grd_clsphist.row + "]/spclformat", "X(200)");
model.setValue("/root/main/list3/clsp[" + grd_clsphist.row + "]/detldesc", "¿µ¹®(200ÀÚ), ÇѱÛ(100ÀÚ)");
}
} else if (rowstat == "U") { // ¼öÁ¤
for (var j = 1; j < grd_clsphist.rows; j++) {
var gridspclcd = model.getValue("/root/main/list3/clsp[" + j + "]/spclcd");
var gridspclspec = model.getValue("/root/main/list3/clsp[" + j + "]/spclspec");
var gridrowstatus = grd_clsphist.rowstatus(j);
if (gridspclcd == spclcd) {
model.setValue("/root/main/list3/clsp[" + j + "]/spclspec", spclspec);
if (gridrowstatus == 1 || gridrowstatus == 3) { // 1 : insert, 3 : insert & new
} else {
grd_clsphist.rowstatus(j) = 2; // 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
}
}
}
} else { // »èÁ¦
// ƯÁ¤³»¿ª Grid ¿¡¼ ÇØ´ç ³»¿ëÀ» »èÁ¦ÇÑ´Ù.
for ( var j = 1; j < grd_clsphist.rows; j++) {
var gridspclcd = model.getValue("/root/main/list3/clsp[" + j + "]/spclcd");
var gridspclspec = model.getValue("/root/main/list3/clsp[" + j + "]/spclspec");
var gridrowstatus = grd_clsphist.rowstatus(j);
if (gridspclcd == spclcd) {
if (gridrowstatus == 1 || gridrowstatus == 3) { // 1 : insert, 3 : insert & new
model.resetInstanceNode("/root/main/list3/clsp[" + j + "]/spclcd");
model.resetInstanceNode("/root/main/list3/clsp[" + j + "]/spclspec");
// grd_clsphist.deleteRow(j, false); // ÇØ´ç ¶óÀÎÀ» Grid¿¡¼ »èÁ¦ÇÑ´Ù.
} else { // 0 : new, 2 : update
grd_clsphist.rowstatus(j) = 4; // 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
}
}
}
}
}
}
// ƯÁ¤³»¿ª ÁÙ¹øÈ£/ƯÁ¤Äڵ忡 µû¶ó sorting ÀÛ¾÷
fSortSpclNo();
if (isAttachedDataList) {
btn_attData.attribute("class") = "btn5_letter4";
btn_attData.attribute("color") = "#cc3333"; // cc3333=ºÓÀº»ö
} else {
btn_attData.attribute("class") = "btn2_letter4";
}
}
// --------------------------------------------------------------
// ƯÁ¤ÄÚµå MT015, MT016, MT004 Á¤º¸°¡ ÀÔ·ÂµÈ È¯ÀÚÀÎÁö¸¦ È®ÀÎÇÑ´Ù.
// --------------------------------------------------------------
function fCheckSpclSpecData() {
// »èÁ¦µÈ »óŰ¡ ¾Æ´Ñ ¼Ò¸íÀÚ·á ³»¿ªÀÌ ÀÖ´ÂÁö ÆÄ¾ÇÇÏ¿© "¼Ò¸íÀÚ·á" Btn »öÀ» ¼³Á¤ÇÑ´Ù.
// ƯÁ¤ÄÚµå MT004 °¡ ÀÖ´ÂÁö¸¦ ÆÄ¾ÇÇÏ¿© "MT004" Btn »öÀ» ¼³Á¤ÇÑ´Ù.
var isAttachedDataList = false;
var isMT004DataList = false;
for ( var i = 1; i < grd_clsphist.rows; i++) {
var spclcd = model.getValue("/root/main/list3/clsp[" + i + "]/spclcd");
if (spclcd == "MT015" || spclcd == "MT016") {
if (grd_clsphist.rowstatus(i) != 4) {
isAttachedDataList = true;
}
} else if (spclcd == "MT004") {
if (grd_clsphist.rowstatus(i) != 4) {
isMT004DataList = true;
}
}
}
// ¼Ò¸íÀÚ·á Btn
if (isAttachedDataList) {
btn_attData.attribute("class") = "btn5_letter4";
btn_attData.attribute("color") = "#cc3333"; // cc3333=ºÓÀº»ö
} else {
btn_attData.attribute("class") = "btn2_letter4";
}
// MT004 Btn
if (isMT004DataList) {
btn_mt0004.attribute("class") = "btn5_letter4";
btn_mt0004.attribute("color") = "#cc3333"; // cc3333=ºÓÀº»ö
} else {
btn_mt0004.attribute("class") = "btn2_letter4";
}
}
// /////////////////////////////////////////////////////////////////////////
// »óº´ ¹× ó¹æ Ä¡½Ä ÀÔ·Â
function fDiagOrderToothInput(flag) {
if (flag == "Diag") {
var row = grd_cldihist.row;
var diagcd = model.getValue("/root/main/list1/cldi[" + row + "]/diagcd");
if (diagcd) {
model.setValue("/root/hidden/sppiz00600/cond/clamym", model.getValue("/root/main/item1/clbs/clamym"));
model.setValue("/root/hidden/sppiz00600/cond/clamdg", model.getValue("/root/main/item1/clbs/clamdg"));
model.setValue("/root/hidden/sppiz00600/cond/pid", model.getValue("/root/main/item1/clbs/pid"));
model.setValue("/root/hidden/sppiz00600/cond/pidsn", model.getValue("/root/main/item1/clbs/pidsn"));
model.setValue("/root/hidden/sppiz00600/cond/indd", model.getValue("/root/main/item1/clbs/indd"));
model.setValue("/root/hidden/sppiz00600/cond/cretno", model.getValue("/root/main/item1/clbs/cretno"));
model.setValue("/root/hidden/sppiz00600/cond/toot", model.getValue("/root/main/list1/cldi[" + row + "]/toot"));
fSetToothPop(row, "1");
model.removeNodeset("/root/hidden/sppiz00600/rslt"); // SPPIZ00600_»óº´¹×ó¹æº°Ä¡½Ä ¿¡¼ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
modal("SPPIZ00600", "1", "10", "10", "SPPIZ00600", "/root/hidden/sppiz00600/cond", "/root/hidden/cond", "", ""); // SPPIZ00600_»óº´¹×ó¹æº°Ä¡½Ä.xrw
fGetToothPop();
}
} else if (flag == "Order") {
var row = grd_clodhist.row;
var edilnno = model.getValue("/root/main/list2/clod[" + row + "]/edilnno");
if (edilnno) {
model.setValue("/root/hidden/sppiz00600/cond/clamym", model.getValue("/root/main/item1/clbs/clamym"));
model.setValue("/root/hidden/sppiz00600/cond/clamdg", model.getValue("/root/main/item1/clbs/clamdg"));
model.setValue("/root/hidden/sppiz00600/cond/pid", model.getValue("/root/main/item1/clbs/pid"));
model.setValue("/root/hidden/sppiz00600/cond/pidsn", model.getValue("/root/main/item1/clbs/pidsn"));
model.setValue("/root/hidden/sppiz00600/cond/indd", model.getValue("/root/main/item1/clbs/indd"));
model.setValue("/root/hidden/sppiz00600/cond/cretno", model.getValue("/root/main/item1/clbs/cretno"));
model.setValue("/root/hidden/sppiz00600/cond/toot", model.getValue("/root/main/list1/cldi[" + row + "]/toot"));
fSetToothPop(row, "2");
model.removeNodeset("/root/hidden/sppiz00600/rslt"); // SPPIZ00600_»óº´¹×ó¹æº°Ä¡½Ä ¿¡¼ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
modal("SPPIZ00600", "1", "10", "10", "SPPIZ00600", "/root/hidden/sppiz00600/cond", "/root/hidden/cond", "", ""); // SPPIZ00600_»óº´¹×ó¹æº°Ä¡½Ä.xrw
fGetToothPop();
}
}
}
// ÇöÀç »óº´, ó¹æ Grid »ó¿¡¼ ÀԷ»óÅÂÀÇ Ä¡½ÄÀ» ÆË¾÷ ȸ鿡 Àü´ÞÇϱâ À§ÇØ ¸®½ºÆ® ÇüÅ·Π¸¸µç´Ù.
function fSetToothPop(row, flag) {
model.removeNodeset("/root/hidden/sppiz00600/cond/list");
model.makeNode("/root/hidden/sppiz00600/cond/list");
// »óº´
var cntcldi = getNodesetCount("/root/main/list1/cldi"); // (tfHelper.js) ³ëµå¼ÂÀÇ °¹¼ö ¹Ýȯ
// ó¹æ
var cntclod = getNodesetCount("/root/main/list2/clod"); // (tfHelper.js) ³ëµå¼ÂÀÇ °¹¼ö ¹Ýȯ grd_clodhist.rows´Â ŸÀÌÆ²À» Æ÷ÇÔÇÏÁö¸¸ getNodesetCount´Â ŸÀÌÆ²À» Á¦¿ÜÇÑ data °¹¼ö¸¦ ¹Ýȯ
var cd = "";
var cdnm = "";
var orddd = "";
var toot = "";
var rowcnt = 1;
for ( var i = 1; i <= cntcldi; i++) {
cd = model.getValue("/root/main/list1/cldi[" + i + "]/diagcd");
cdnm = model.getValue("/root/main/list1/cldi[" + i + "]/diagnm");
orddd = model.getValue("/root/main/list1/cldi[" + i + "]/ordfromdd");
toot = model.getValue("/root/main/list1/cldi[" + i + "]/toot");
if (toot != "-" && toot != "") {
var milktoothstr = "ABCDE000";
var subTootStr = "";
for ( var inx = 0; inx < 32; inx++) {
var tootnum = toot.substr(inx, 1);
if (tootnum == "*") { // ¼±ÅÃµÈ ¿µ±¸Ä¡ÀÇ °æ¿ì 1~8 »çÀÌ ¼ýÀڷΠǥ½ÃÇÑ´Ù.
if (inx < 8) {
subTootStr += (8 - inx);
} else if (inx > 7 && inx < 16) {
subTootStr += (inx - 7);
} else if (inx > 15 && inx < 24) {
subTootStr += (24 - inx);
} else {
subTootStr += (inx - 23);
}
} else if (tootnum == "#") { // ¼±ÅÃµÈ À¯Ä¡ÀÇ °æ¿ì A~E »çÀÌ ¾ËÆÄºªÀ¸·Î Ç¥½ÃÇÑ´Ù.
if (inx < 8) {
subTootStr += milktoothstr.charAt(7 - inx);
} else if (inx > 7 && inx < 16) {
subTootStr += milktoothstr.charAt(inx - 8);
} else if (inx > 15 && inx < 24) {
subTootStr += milktoothstr.charAt(23 - inx);
} else {
subTootStr += milktoothstr.charAt(inx - 24);
}
} else { // if (tootnum == "0") ¼±ÅõÇÁö ¾ÊÀº °æ¿ì °ø¹éÀ¸·Î ó¸®ÇÑ´Ù.
subTootStr += " ";
}
}
model.makeNode("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos");
// Ä¡½Ä Ç¥±â¸¦ ¼³Á¤ÇÑ´Ù.
if (row == i && flag == "1") {
model.setValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "true");
} else {
model.setValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "false");
}
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/flag", "»óº´");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cd", cd);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cdnm", cdnm);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightupper", subTootStr.substr(0, 8));
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftupper", subTootStr.substr(8, 8));
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightlower", subTootStr.substr(16, 8));
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftlower", subTootStr.substr(24, 8));
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/orddd", orddd);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/toot", toot);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/row", i);
rowcnt = rowcnt + 1;
} else {
if (row == i && flag == "1") {
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "true");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/flag", "»óº´");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cd", cd);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cdnm", cdnm);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightupper", "");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftupper", "");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightlower", "");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftlower", "");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/orddd", orddd);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/toot", "");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/row", i);
rowcnt = rowcnt + 1;
}
}
}
for ( var i = 1; i <= cntclod; i++) {
cd = model.getValue("/root/main/list2/clod[" + i + "]/snglcalcscorcd");
cdnm = model.getValue("/root/main/list2/clod[" + i + "]/hngnm");
orddd = model.getValue("/root/main/list2/clod[" + i + "]/orddd");
toot = model.getValue("/root/main/list2/clod[" + i + "]/toot");
estmcls = model.getValue("/root/main/list2/clod[" + i + "]/estmcls");
// Ä¡½Ä ÀԷµÇÁö ¾ÊÀº ó¹æÀÌ´õ¶óµµ ¼ö°¡ 󹿴ëºÐ·ù°¡ Ä¡°ú ºÐ·ù·Î µÈ 󹿵éÀÌ ÀüºÎ Á¶È¸µÇµµ·Ï º¯°æ --20100309 À±¿µ¿Á
// ¼±»ý´Ô ¿äû°Ç
if ((toot != "-" && toot != "") || estmcls == "U") {
var milktoothstr = "ABCDE000";
var subTootStr = "";
var tmpStr = "";
for ( var inx = 0; inx < 32; inx++) {
var tootnum = toot.substr(inx, 1);
if (tootnum == "*") { // ¼±ÅÃµÈ ¿µ±¸Ä¡ÀÇ °æ¿ì 1~8 »çÀÌ ¼ýÀڷΠǥ½ÃÇÑ´Ù.
if (inx < 8) {
subTootStr += (8 - inx);
} else if (inx > 7 && inx < 16) {
subTootStr += (inx - 7);
} else if (inx > 15 && inx < 24) {
subTootStr += (24 - inx);
} else {
subTootStr += (inx - 23);
}
} else if (tootnum == "#") { // ¼±ÅÃµÈ À¯Ä¡ÀÇ °æ¿ì A~E »çÀÌ ¾ËÆÄºªÀ¸·Î Ç¥½ÃÇÑ´Ù.
if (inx < 8) {
subTootStr += milktoothstr.charAt(7 - inx);
} else if (inx > 7 && inx < 16) {
subTootStr += milktoothstr.charAt(inx - 8);
} else if (inx > 15 && inx < 24) {
subTootStr += milktoothstr.charAt(23 - inx);
} else {
subTootStr += milktoothstr.charAt(inx - 24);
}
} else { // if (tootnum == "0") ¼±ÅõÇÁö ¾ÊÀº °æ¿ì °ø¹éÀ¸·Î ó¸®ÇÑ´Ù.
subTootStr += " ";
}
}
model.makeNode("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos");
// Ä¡½Ä Ç¥±â¸¦ ¼³Á¤ÇÑ´Ù.
if (row == i && flag == "2") {
model.setValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "true");
} else {
model.setValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "false");
}
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/flag", "ó¹æ");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cd", cd);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cdnm", cdnm);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightupper", subTootStr.substr(0, 8));
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftupper", subTootStr.substr(8, 8));
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightlower", subTootStr.substr(16, 8));
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftlower", subTootStr.substr(24, 8));
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/orddd", orddd);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/toot", toot);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/row", i);
rowcnt = rowcnt + 1;
} else {
if (row == i && flag == "2") {
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "true");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/flag", "ó¹æ");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cd", cd);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cdnm", cdnm);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightupper", "");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftupper", "");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightlower", "");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftlower", "");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/orddd", orddd);
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/toot", "");
model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/row", i);
rowcnt = rowcnt + 1;
}
}
}
}
// SPPIZ00600_»óº´¹×ó¹æº°Ä¡½Ä ¼±Åà °á°ú¸¦ ¹Ý¿µÇÑ´Ù.
function fGetToothPop() {
var tootSelectcnt = getNodesetCount("/root/hidden/sppiz00600/rslt/list");
var flag = "";
var row = "";
var toot = "";
tootSelectcnt = eval(tootSelectcnt) + 1;
for ( var i = 1; i < tootSelectcnt; i++) {
flag = model.getValue("/root/hidden/sppiz00600/rslt/list[" + i + "]/flag");
row = model.getValue("/root/hidden/sppiz00600/rslt/list[" + i + "]/row");
var rlsttoot = model.getValue("/root/hidden/sppiz00600/rslt/list[" + i + "]/toot");
var rlsttoot1 = model.getValue("/root/hidden/sppiz00600/rslt/list[" + i + "]/toot1");
if (rlsttoot == "") {
rlsttoot = "-";
}
if (rlsttoot1 == "") {
rlsttoot1 = "-";
}
if (flag == "1") {
toot = model.getValue("/root/main/list1/cldi[" + row + "]/toot");
model.setValue("/root/main/list1/cldi[" + row + "]/toot", rlsttoot);
model.setValue("/root/main/list1/cldi[" + row + "]/toot1",
rlsttoot1);
if (rlsttoot != toot) { // Ä¡½Ä¹øÈ£°¡ º¯°æµÈ °æ¿ì
var cldistatus = grd_cldihist.rowstatus(row);
if (cldistatus == 0 || cldistatus == 2) { // 0 : new, 2 :update
grd_cldihist.rowstatus(row) = 2; // 2 : update
}
}
} else if (flag == "2") {
toot = model.getValue("/root/main/list2/clod[" + row + "]/toot");
model.setValue("/root/main/list2/clod[" + row + "]/toot", rlsttoot);
model.setValue("/root/main/list2/clod[" + row + "]/toot1",
rlsttoot1);
if (rlsttoot != toot) { // Ä¡½Ä¹øÈ£°¡ º¯°æµÈ °æ¿ì
// ó¹æÀÇ ¼öÁ¤µÈ row »óŸ¦ Ç¥½ÃÇÑ´Ù.
fSetOrderChangeRowStat(row);
}
}
}
}
// ½É»ç»çÀ¯, Á¶Á¤»çÀ¯, ¼öÁ¤»çÀ¯ ÀÔ·Â
function fSetAdjtResnCd() {
var oldcd = model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/adjtresncd");
model.resetInstanceNode("/root/hidden/sppiz01000");
model.setValue("/root/hidden/sppiz01000/cond/cdcls", "aftin");
model.setValue("/root/hidden/sppiz01000/cond/cdid", oldcd);
modal("SPPIZ01000", "1", "550", "450", "SPPIZ01000", "/root/hidden/sppiz01000/cond", "/root/hidden/sppiz01000/cond", "", ""); // SPPIZ01000_½É»ç¼öÁ¤»çÀ¯°ü¸®.xrw
var newcd = model.getValue("/root/hidden/sppiz01000/rslt/cdid");
var newdesc = model.getValue("/root/hidden/sppiz01000/rslt/adjtresndesc");
if (newcd) {
for ( var i = 0; i < grd_clodhist.selectedRows; i++) {
var row = grd_clodhist.selectedrow(i);
model.setValue("/root/main/list2/clod[" + row + "]/adjtresncd", newcd);
model.setValue("/root/main/list2/clod[" + row + "]/adjtresndesc", newdesc);
if (newcd != oldcd) {
if (grd_clodhist.rowStatus(row) == 0) { // 0 : new, 2 : update
grd_clodhist.rowStatus(row) = 2;
}
// ó¹æ Grid ¹è°æ»öÀ» ¼³Á¤ÇÑ´Ù. - Ãß°¡/¼öÁ¤µÈ row
fOrderBkColorNew(row);
grd_clodhist.col = grd_clodhist.colRef("snglcalcscorcd");
grd_clodhist.dispatch("ondblclick");
}
}
}
return newcd;
}
// Àçû±¸ Â÷¾×¹ß»ý »çÀ¯ÀÔ·Â
function fSetReClamChgAmtResncd() {
model.resetInstanceNode("/root/hidden/sppid22800");
// model.setValue("/root/hidden/sppiz01000/cond/cdid", "");
modal("SPPID22800", "1", "500", "450", "SPPID22800", "/root/hidden/sppid22800/cond", "/root/hidden/sppid22800/cond", "", ""); // SPPID22800_Àçû±¸Â÷¾×¹ß»ý»çÀ¯°ü¸®.xrw
var resncd = model.getValue("/root/hidden/sppid22800/rslt/cdid");
if (resncd) {
model.setValue("/root/send/item8/pifhiunc/chgamtresncd", resncd);
}
return resncd;
}
// ------------------------------------------------------------
// Áø·áÁ¤º¸Á¶È¸ : SMMMO02500_ȯÀÚÁø·áÁ¤º¸.xrw
// ------------------------------------------------------------
function fGetEmrInformation() {
var clamym = model.getValue("/root/main/item1/clbs/clamym");
if (clamym) {
var pid = model.getValue("/root/main/item1/clbs/pid"); // getArrayData (cond, 0, 0,"^", "¢Ì" );
var ioflag = "O"; // getArrayData (cond, 0, 1, "^", "¢Ì" );
var indd = model.getValue("/root/main/item1/clbs/indd"); // getArrayData (cond, 0, 2, "^", "¢Ì" );
var prcpdd = ""; // getArrayData (cond, 0, 3, "^", "¢Ì" );
setParameter("SMMMO02500_cond", pid + "^" + ioflag + "^" + indd + "^" + prcpdd + "¢Ì");
open("SMMMO02500", "1", "10", "10", "SMMMO02500", "", "", "", ""); // SMMMO02500_ȯÀÚÁø·áÁ¤º¸
}
}
// ---------------------------------
// ó¹æ ±Þ¿©±¸ºÐ º¯°æ
// ---------------------------------
function fSetPayflag() {
var oldpayflag = model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/payflag");
model.resetInstanceNode("/root/hidden/sppid23100");
model.setValue("/root/hidden/sppid23100/cond/cdid", oldpayflag);
modal("SPPID23100", "1", "500", "500", "SPPID23100", "/root/hidden/sppid23100/cond", "/root/hidden/sppid23100/cond", "", ""); // SPPID23100_±Þºñº¯°æ°ü¸®.xrw
var newpayflag = model.getValue("/root/hidden/sppid23100/rslt/cdid");
if (newpayflag) {
if (newpayflag != oldpayflag) {
var adjtresncd = model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/adjtresncd");
if (adjtresncd == "" || adjtresncd == "-") { // ½É»ç(Á¶Á¤)»çÀ¯°¡ ÀԷµÇÁö ¾ÊÀº °æ¿ì
var newcd = fSetAdjtResnCd();
if (newcd == "" || newcd == "-") {
return;
}
}
model.setValue("/root/main/list2/clod[" + grd_clodhist.row + "]/payflag", newpayflag);
if (newpayflag == "0" || newpayflag == "9") {
model.setValue("/root/main/list2/clod[" + grd_clodhist.row + "]/calcappyn", "Y"); // °è»êÀû¿ë±¸ºÐ
} else {
model.setValue("/root/main/list2/clod[" + grd_clodhist.row + "]/calcappyn", "N"); // °è»êÀû¿ë±¸ºÐ
}
var matractflag = model.getValue("/root/main/list2/clod[" + grd_clodhist.row + "]/matractflag");
// û±¸°¡´É¼±ÅÃÁø·á + °¡»êÇàÀ§(2)´Â °¡»ê¾ÈÇÔÀ¸·Î º¯°æ
if (newpayflag == "9" && matractflag == "2") {
model.setValue("/root/main/list2/clod[" + grd_clodhist.row + "]/matractflag", "3"); // Àç·áÇàÀ§(3:°¡»ê¾ø´Â ÇàÀ§)
}
if (grd_clodhist.rowStatus(grd_clodhist.row) == 0) { // 0 : new, 2 : update
grd_clodhist.rowStatus(grd_clodhist.row) = 2;
}
// ó¹æ Grid ¹è°æ»öÀ» ¼³Á¤ÇÑ´Ù. - Ãß°¡/¼öÁ¤µÈ row
fOrderBkColorNew(grd_clodhist.row);
grd_clodhist.refresh();
fSetTotDrugQtyAmt();
grd_clodhist.refresh();
}
}
}
// ------------------------------------------------------------
// ±Þ¿©±¸ºÐº° ó¹æÁ¶È¸
// ------------------------------------------------------------
function fClodSelectByPayflag() {
// ¼ö°¡ÄÚµå, EDIÄÚµå input ÄÁÆ®·ÑÀ» ÃʱâÈÇÑ´Ù.
model.resetInstanceNode("/root/hidden/list2/clodsrch/inpCalcScorCd");
model.resetInstanceNode("/root/hidden/list2/clodsrch/inpEDICd");
model.refreshpart("/root/hidden/list2/clodsrch/inpCalcScorCd");
model.refreshpart("/root/hidden/list2/clodsrch/inpEDICd");
// fGetSelectedOrderData(); // ó¹æ Á¶È¸ºÎ - ÀçÇà/±Þ¿©/Ç׸ñ±¸ºÐ Radio ¼±Åÿ¡ µû¶ó ó¹æ ³»¿ªÀ» º¸¿©ÁØ´Ù.
var payflag = model.getValue("/root/hidden/list2/clodsrch/selectedRdoPay");
// ó¹æGrid ¹è°æ»öÀ» ÃʱâÈÇÑ´Ù.
grd_clodhist.rebuildStyle();
if (payflag == '0') {
model.copyNode("/root/main/list2", "/root/hidden/initclodlist/list2");
// ó¹æ Ç׸ñ ±¸ºÐ ¹× ¼±º°½É»ç ó¹æ »ö±ò ±¸ºÐ
fSetOrderData();
grd_clodhist.refresh();
grd_clodhist.row = 1;
} else {
var datasave = false;
var clodupdtdata = getGridUpdateData(grd_clodhist);
if (clodupdtdata) {
var ans = messageBox("±Þ¿©Ã³¹æ¿¡ ¼öÁ¤»çÇ×ÀÌ ÀÖ½À´Ï´Ù. ÀúÀå", "S001"); // /¼öÁ¤»çÇ×ÀÌ ÀÖ½À´Ï´Ù. ÀúÀåÇϽ÷Á¸é ¿¹(Yes)\n¾Æ´Ï¸é¾Æ´Ï¿À(No)
if (ans == 6) { // 6: yes, 7:no, 2:cancel
fSaveInAftJudg("B"); // ÀúÀå
datasave = true;
} else {
datasave = false;
}
}
// ¼öÁ¤»çÇ×À» ÀúÀåÇÏÁö ¾ÊÀº °æ¿ì OR ¼öÁ¤»çÇ×ÀÌ ¾ø´Â °æ¿ì
if (datasave == false) {
var nodeList;
model.removeNodeset("/root/main/list2/clod");
// ±Þ¿©±¸ºÐ¿¡ µû¶ó ÇØ´çµÇ´Â 󹿏¸ º¸¿©ÁØ´Ù.
if (payflag == '-') {
model.copyNode("/root/main/list2", "/root/main/list8");
} else { // Àü¾×º»Àκδã, ÀϹÝ, ¼±ÅÃ
nodeList = instance1.selectNodes("/root/main/list8/clod[payflag = " + payflag + "]");
for (var i = 0; i < nodeList.length; i++) {
model.duplicate("/root/main/list2", nodeList.item(i));
}
}
// ó¹æ Ç׸ñ ±¸ºÐ ¹× ¼±º°½É»ç ó¹æ »ö±ò ±¸ºÐ
fSetOrderData();
grd_clodhist.refresh();
grd_clodhist.row = 1;
}
}
}
// ó¹æº°È¯ÀÚÁ¶È¸(°è»ê)_¼ö°¡ÄÚµå
function fOpenSMPIS00500DetailSnglCD() {
pidfOpenSMPIS00500("I", "D", "SnglCD");
}
// ó¹æº°È¯ÀÚÁ¶È¸(°è»ê)_EDIÄÚµå
function fOpenSMPIS00500DetailEdicd() {
pidfOpenSMPIS00500("I", "D", "Edicd");
}
// ó¹æº°È¯ÀÚÁ¶È¸(û±¸/»è°¨)
function fOpenSMPIS00600Detail() {
pidfOpenSMPIS00600("I", "D");
}
// -----------------------------
// 1ȸ·® Àϰý¼öÁ¤
// -----------------------------
function fAllSetDrugqtyCol() {
if (grd_clodhist.selectedRows > 1) {
// ¼öÁ¤ÇÒ Row
var setrow = grd_clodhist.row;
// ¼öÁ¤ÇÒ 1ȸ·® ÀúÀå
var drugqty = model.getValue("/root/main/list2/clod[" + setrow + "]/drugqty");
if (drugqty == "" || drugqty == "0") {
return;
}
var rowArray = new Array();
var rCnt = 0;
for ( var i = 0; i < grd_clodhist.selectedRows; i++) {
var clodrow = grd_clodhist.selectedrow(i);
if (clodrow > 0) {
if (clodrow != setrow) {
rowArray[rCnt] = clodrow;
rCnt++;
model.setValue("/root/main/list2/clod[" + clodrow + "]/drugqty", drugqty);
model.setValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd", "A") // Á¶Àå»çÀ¯ A:ÀÏÅõÁ¶Á¤
grd_clodhist.rowStatus(clodrow) = 2; // update
}
}
}
for ( var i = 0; i <= rCnt - 1; i++) {
grd_clodhist.row = rowArray[i];
grd_clodhist.col = grd_clodhist.colRef("drugqty");
fSetTotDrugQtyAmt(); // 1ȸ·®¼öÁ¤ ÈÄ °è»ê
}
grd_clodhist.refresh();
}
}
// -----------------------------
// Ƚ¼ö Àϰý¼öÁ¤
// -----------------------------
function fAllSetTimsCol() {
if (grd_clodhist.selectedRows > 1) {
// óÀ½¼±ÅÃÇÑ Row(¼öÁ¤ÇÒ Row)
var setrow = grd_clodhist.row;
// ÇöÀç Row Ƚ¼ö ÀúÀå
var tims = model.getValue("/root/main/list2/clod[" + setrow + "]/tims");
if (tims == "" || tims == "0") {
return;
}
var rowArray = new Array();
var rCnt = 0;
for ( var i = 0; i < grd_clodhist.selectedRows; i++) {
var clodrow = grd_clodhist.selectedrow(i);
if (clodrow > 0) {
if (clodrow != setrow) {
rowArray[rCnt] = clodrow;
rCnt++;
model.setValue("/root/main/list2/clod[" + clodrow + "]/tims", tims);
model.setValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd", "A") // Á¶Àå»çÀ¯ A:ÀÏÅõÁ¶Á¤
grd_clodhist.rowStatus(clodrow) = 2; // update
}
}
}
for ( var i = 0; i <= rCnt - 1; i++) {
grd_clodhist.row = rowArray[i];
grd_clodhist.col = grd_clodhist.colRef("tims");
fSetTotDrugQtyAmt(); // Ƚ¼ö¼öÁ¤ ÈÄ °è»ê
}
grd_clodhist.refresh();
}
}
// -----------------------------
// Àϼö Àϰý¼öÁ¤
// -----------------------------
function fAllSetDaynoCol() {
if (grd_clodhist.selectedRows > 1) {
// óÀ½¼±ÅÃÇÑ Row(¼öÁ¤ÇÒ Row)
var setrow = grd_clodhist.row;
// ÇöÀç Row Ƚ¼ö ÀúÀå
var dayno = model.getValue("/root/main/list2/clod[" + setrow + "]/dayno");
if (dayno == "" || dayno == "0") {
return;
}
var rowArray = new Array();
var rCnt = 0;
var olddayno = 0;
for ( var i = 0; i < grd_clodhist.selectedRows; i++) {
var clodrow = grd_clodhist.selectedrow(i);
if (clodrow > 0) {
if (clodrow != setrow) {
rowArray[rCnt] = clodrow;
rCnt++;
olddayno = model.getValue("/root/main/list2/clod[" + clodrow + "]/dayno");
model.setValue("/root/main/list2/clod[" + clodrow + "]/dayno", dayno);
model.setValue("/root/main/list2/clod[" + clodrow + "]/adjtresncd", "A") // Á¶Àå»çÀ¯ A:ÀÏÅõÁ¶Á¤
grd_clodhist.rowStatus(clodrow) = 2; // update
var Sdayno = model.getValue("/root/main/list2/clod[" + clodrow + "]/dayno");
var dayno = parseInt(Sdayno);
var ordfromdd = model.getValue("/root/main/list2/clod[" + clodrow + "]/ordfromdd");
var ordtodd = model.getValue("/root/main/list2/clod[" + clodrow + "]/ordtodd");
var item1 = model.getValue("/root/main/list2/clod[" + clodrow + "]/item1");
// Áø·á°³½ÃÀϰú Á¾·áÀÏ »çÀÌÀÇ ÀÏÀÚÀÎÁö üũ
var clbsordfromdd = model.getValue("/root/main/item1/clbs/ordfromdd");
var clbsordtodd = model.getValue("/root/main/item1/clbs/ordtodd");
// ¼ö°¡ÄÚµåÀÇ Àû¿ëÀÏÀÚ~Á¾·áÀÏÀÚ »çÀÌÀÇ ÀÏÀÚÀÎÁö üũ
var mechfromdd = model.getValue("/root/main/list2/clod[" + clodrow + "]/mechfromdd");
var mechtodd = model.getValue("/root/main/list2/clod[" + clodrow + "]/mechtodd");
var insukind = model.getValue("/root/main/item1/clbs/insukindcd");
if (Sdayno == "" || dayno <= 0) {
} else if (ordfromdd) {
var fromDate = ordfromdd.toDate();
var toDate = fromDate.getAddDate(dayno - 1, "D"); // (dateHelper.js) ƯÁ¤ÀÏÀÚÀÇ »ó´ëÀÏÀÚ(+/-)¸¦ °è»ê
ordtodd = toDate.getDateFormat("YYYY") + toDate.getDateFormat("MM") + toDate.getDateFormat("DD");
if (item1 != "03" && clbsordfromdd && clbsordtodd) {
if (ordtodd < clbsordfromdd || ordtodd > clbsordtodd) {
messageBox("Àϼö¸¦ ±âÁØÀ¸·Î °è»êµÈ ó¹æÁ¾·áÀÏÀÚ°¡ [Áø·á °³½ÃÀÏÀÚ~Á¾·áÀÏÀÚ]¸¦ ¹þ¾î³ª", "E016"); // /Àϼö(ÃÑÅõ)¸¦ ±âÁØÀ¸·Î °è»êµÈó¹æ Á¾·áÀÏÀÚ°¡ ÀÔ¿ø °³½ÃÀÏÀÚ~Á¾·áÀÏÀÚ¸¦ ¹þ¾î³ª À¯È¿ÇÏÁö ¾Ê½À´Ï´Ù. ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
model.setValue("/root/main/list2/clod[" + clodrow + "]/dayno", olddayno);
return;
}
}
model.setValue("/root/main/list2/clod[" + clodrow + "]/ordtodd", ordtodd);
} else if (ordtodd) {
var toDate = ordtodd.toDate();
var fromDate = toDate.getAddDate((dayno - 1) * -1, "D"); // (dateHelper.js)
// ƯÁ¤ÀÏÀÚÀÇ
// »ó´ëÀÏÀÚ(+/-)¸¦
// °è»ê
ordfromdd = fromDate.getDateFormat("YYYY") + fromDate.getDateFormat("MM") + fromDate.getDateFormat("DD");
if (item1 != "03" && clbsordfromdd && clbsordtodd) {
if (ordfromdd < clbsordfromdd || ordfromdd > clbsordtodd) {
messageBox("Àϼö¸¦ ±âÁØÀ¸·Î °è»êµÈ 󹿽ÃÀÛÀÏÀÚ°¡ [Áø·á °³½ÃÀÏÀÚ~Á¾·áÀÏÀÚ]¸¦ ¹þ¾î³ª", "E016"); // /Àϼö(ÃÑÅõ)¸¦ ±âÁØÀ¸·Î °è»êµÈ ó¹æ
// ½ÃÀÛÀÏÀÚ°¡ ÀÔ¿ø °³½ÃÀÏÀÚ~Á¾·áÀÏÀÚ¸¦ ¹þ¾î³ª À¯È¿ÇÏÁö ¾Ê½À´Ï´Ù. ó¹æ data ¹× row status¸¦ º¯°æ ÀÌÀü »óÅ·Πº¹±¸ÇÑ´Ù.
model.setValue("/root/main/list2/clod[" + clodrow + "]/dayno", olddayno);
return;
}
}
// Àϼö¸¦ ±âÁØÀ¸·Î ±¸ÇÑ ³¯Â¥°¡ ¿Ã¹Ù¸¥ °æ¿ì
model.setValue("/root/main/list2/clod[" + clodrow + "]/ordfromdd", ordfromdd);
}
}
}
}
for (var i = 0; i <= rCnt - 1; i++) {
grd_clodhist.row = rowArray[i];
grd_clodhist.col = grd_clodhist.colRef("dayno");
fSetTotDrugQtyAmt(); // Àϼö¼öÁ¤ ÈÄ °è»ê
}
grd_clodhist.refresh();
}
}
// CDº¹»çÀÇ·Ú : ast/examcureweb/xrw/SMAEF00100_Çʸ§ÆÇµ¶´ëÃâ½Åû.xrw
function fOrderCDCopy() {
var pid = model.getValue("/root/main/item1/clbs/pid");
if (pid) {
model.makeValue("/root/hidden/smaef00100/cond/gb", "A"); // ½Åû±¸ºÐ(Àüü:1, ÆÇµ¶:2)
model.makeValue("/root/hidden/smaef00100/cond/srchdate1", ""); // Áø·áÀÏÀÚ
model.makeValue("/root/hidden/smaef00100/cond/lendapptm", ""); // ÆÇµ¶½ÅûÀÏ
model.makeValue("/root/hidden/smaef00100/cond/pid", model.getValue("/root/main/item1/clbs/pid")); // ȯÀÚ¹øÈ£
model.makeValue("/root/hidden/smaef00100/cond/deptcd", model.getValue("/root/main/item1/clbs/orddeptcd")); // Áø·á°ú
model.makeValue("/root/hidden/smaef00100/cond/drid", model.getValue("/root/main/item1/clbs/orddrid")); // ÁÖÄ¡ÀÇ
model.makeValue("/root/hidden/smaef00100/cond/lendgoal", "05");// ¸ñÀû : º¹»ç¿ë 05
model.makeValue("/root/hidden/smaef00100/cond/modality", ""); // ¿µ»ó±¸ºÐ
model.makeValue("/root/hidden/smaef00100/cond/deptengabbr", ""); // ÆÇµ¶½Åû°ú¿µ¹®
model.makeValue("/root/hidden/smaef00100/cond/lenddeptcd", ""); // ÆÇµ¶½Åû°ú
model.makeValue("/root/hidden/smaef00100/cond/lendrid", ""); // ÆÇµ¶½ÅûÀÚ
}
modal("SMAEF00100", "1", "10", "10", "SMAEF00100", "/root/hidden/smaef00100/cond", "/root/send/data", "", ""); // SMAEF00100_Çʸ§ÆÇµ¶´ëÃâ½Åû.xrw
}
// ȯÀÚ Àüü ¸Þ¼¼Áö ³»¿ë Á¶È¸ÇÏ¿© Çϳª¾¿ º¸±â
// 20100317 ¿Ü·¡¿¡¸¸ ÀÖ°í ÀÔ¿ø¿¡ ¾ø¾î¼ Ãß°¡ (±è¿ë¹Î)
// ÀÎÀÚ°ªÀº ½ÇÁ¦ ȯÀÚ¹øÈ£¸¸ ¾²°í ÀÖÀ½
function fJudgPatMsgTrsmRef() {
model.makeNode("/root/tmp/msgtrsm/info/refyn");
model.makeNode("/root/tmp/msgtrsm/info/pid");
model.makeNode("/root/tmp/msgtrsm/info/orddd");
model.makeNode("/root/tmp/msgtrsm/info/cretno");
model.makeNode("/root/tmp/msgtrsm/info/mskind");
model.makeNode("/root/tmp/msgtrsm/info/orddeptcd");
model.makeNode("/root/tmp/msgtrsm/info/orddrid");
model.makeNode("/root/tmp/msgtrsm/info/ordtype");
model.setValue("/root/tmp/msgtrsm/info/refyn", "Y");
model.setValue("/root/tmp/msgtrsm/info/pid", model.getValue("/root/main/item1/clbs/pid")); // chk
model.setValue("/root/tmp/msgtrsm/info/orddd", model.getValue("/root/main/item1/clbs/indd")); // chk
model.setValue("/root/tmp/msgtrsm/info/cretno", model.getValue("/root/main/item1/clbs/cretno")); // chk
model.setValue("/root/tmp/msgtrsm/info/mskind", "M"); // ¿Ü·¡±âº» ÁÖÀ¯Çü, chk
model.setValue("/root/tmp/msgtrsm/info/orddeptcd", model.getValue("/root/main/item1/clbs/orddeptcd")); // chk
model.setValue("/root/tmp/msgtrsm/info/orddrid", model.getValue("/root/main/item1/clbs/orddrid")); // chk, TABLE¿¡ Àû¿ë¾ÈÇÔ.(°ª¸¸È®ÀÎ)
model.setValue("/root/tmp/msgtrsm/info/ordtype", "O"); // ¿Ü·¡±âº» 'O', chk
modal("SMPIJ02600_¸Þ¼¼ÁöÇöȲ", "", "100", "100", "", "/root/tmp/msgtrsm/info", "/root/init/openchk");
model.removeNode("/root/tmp/msgtrsm");
}
// 󹿱׏®µå ¿¢¼¿ÀúÀå
function fExportExcel() {
if (grd_clodhist.rows > 1) {
var isSave = false;
for ( var i = grd_clodhist.fixedRows; i < grd_clodhist.rows; i++) {
if (grd_clodhist.rowHidden(i) == false) {
isSave = true;
i = grd_clodhist.rows;
}
}
if (isSave == false) {
messageBox("ó¹æ ÇÊÅ͸¦ º¯°æÇϼ¼¿ä. ¿¢¼¿ÀúÀåÇÒ Ã³¹æÀÌ", "I004"); // /ó¹æ ÇÊÅ͸¦ º¯°æÇϼ¼¿ä. ¿¢¼¿ÀúÀåÇÒ Ã³¹æÀÌ ¾ø½À´Ï´Ù.
return;
}
var fileName = window.fileDialog("save", "", false, "excel", "xls",
"Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
if (fileName != "") {
grd_clodhist.saveExcel(fileName, "sheetname:;colhiddenextend:false;rowhiddenextend:false;", true, true, "", "", true);
}
} else {
messageBox("¿¢¼¿ÀúÀåÇÒ Ã³¹æÀÌ", "I004"); // /¿¢¼¿ÀúÀåÇÒ Ã³¹æÀÌ ¾ø½À´Ï´Ù.
}
}
// 󹿱׏®µå Ãâ·Â
function fExportPrint() {
// // ¹Ì¼öÂÊ¿¡¼ popupÀ¸·Î È£ÃâÇÏ´Â °æ¿ì¸¦ À§ÇÑ Å×½ºÆ®
// modal("SMPID20300" ,"1", "10", "10", "SMPID20300", "", "", "", "");
if (grd_clodhist.rows > 1) {
// ¼±Åà : ºÎºÐÃâ·Â(¿¹6), ÀüüÃâ·Â(¾Æ´Ï¿À7), Ãë¼Ò(Ãë¼Ò7)
// º¸°í¼¿¡ µé¾î°¥ ³»¿ë ´ã±â
var pid = model.getValue("/root/main/item1/clbs/pid");
var patnm = model.getValue("/root/main/item1/clbs/patnm");
var indd = model.getValue("/root/main/item1/clbs/indd");
var insukind = model.getValue("/root/main/item1/clbs/insukindcd");
var insukindnm = model.getValue("/root/main/item1/clbs/insukindnm");
var suppkind = model.getValue("/root/main/item1/clbs/suppkindcd");
var suppkindnm = cmb_supprate.label;
var iphsfromdd = model.getValue("/root/main/item1/clbs/iphsfromdd"); // À¯Çü½ÃÀÛÀÏ
var diagcd = model.getValue("/root/main/list1/cldi/diagcd") + " (" + model.getValue("/root/main/list1/cldi/diagnm") + ")";
var ret = messageBox("µ¥ÀÌÅ͸¦ ºÎºÐÃâ·Â", "S001"); // /µ¥ÀÌÅ͸¦ ºÎºÐÃâ·Â ÇϽ÷Á¸é ¿¹(Yes)\n¾Æ´Ï¸é ¾Æ´Ï¿À(No)
if (ret == 6) {
// 1. ºÎºÐÃâ·Â (±×¸®µå¿¡ ¼±ÅÃµÈ Çุ º¸°í¼·Î Àü´ÞÇÑ´Ù.)
model.removeNodeset("/root/send/prntlist");
model.makeNode("/root/send/prntlist");
var idx = 1;
for ( var i = 0; i < grd_clodhist.selectedRows; i++) {
var row = grd_clodhist.selectedRow(i);
// »ó´Ü Á¤º¸
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/pid", pid); // ȯÀÚ¹øÈ£
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/patnm", patnm); // ¼º¸í
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/indd", indd); // ÀÔ¿øÀÏ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/insukindcd", insukind); // ȯÀÚÀ¯Çü
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/insukindnm", insukindnm);
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/suppkindcd", suppkind); // º¸Á¶À¯Çü
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/suppkindnm", suppkindnm);
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/iphsfromdd", iphsfromdd); // À¯Çü½ÃÀÛÀÏ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/diagcd", diagcd);
// ¸®½ºÆ®
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/edilnno", model.getValue("/root/main/list2/clod[" + row + "]/edilnno")); // ÁÙ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/item1", model.getValue("/root/main/list2/clod[" + row + "]/ediitem1")); // Ç×
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/item2", model.getValue("/root/main/list2/clod[" + row + "]/ediitem2")); // ¸ñ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/ordfromdd", model.getValue("/root/main/list2/clod[" + row + "]/ordfromdd")); // 󹿽ÃÀÛÀÏÀÚ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/grupsnglflag", model.getValue("/root/main/list2/clod[" + row + "]/grupsnglflag")); // G
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/grupcalcscorcd", model.getValue("/root/main/list2/clod[" + row + "]/grupcalcscorcd")); // ±×·ìÄÚµå
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/matractflag", grd_clodhist.labelMatrix(row, grd_clodhist.colRef("matractflag"))); // ÇàÀ§Àç·á
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/snglcalcscorcd", model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd")); // ¼ö°¡ÄÚµå
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/basecd", model.getValue("/root/main/list2/clod[" + row + "]/basecd")); // EDIÄÚµå
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/estmcd", model.getValue("/root/main/list2/clod[" + row + "]/estmcd")); // »êÁ¤ÄÚµå
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/hngnm", model.getValue("/root/main/list2/clod[" + row + "]/hngnm")); // Çѱ۸í
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/payflag", grd_clodhist.labelMatrix(row, grd_clodhist.colRef("payflag"))); // ±Þºñ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/ediunitcost", model.getValue("/root/main/list2/clod[" + row + "]/ediunitcost")); // ´Ü°¡
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/edidrugqty", model.getValue("/root/main/list2/clod[" + row + "]/edidrugqty")); // 1ȸ·®
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/tims", model.getValue("/root/main/list2/clod[" + row + "]/tims")); // Ƚ¼ö
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/daydrugqty", model.getValue("/root/main/list2/clod[" + row + "]/daydrugqty")); // 1ÀÏ·®(ÀÏÅõ)
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/dayno", model.getValue("/root/main/list2/clod[" + row + "]/dayno")); // Àϼö(ÃÑÅõ)
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/ediamt", model.getValue("/root/main/list2/clod[" + row + "]/ediamt")); // ±Ý¾×
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/cnfmcd", model.getValue("/root/main/list2/clod[" + row + "]/cnfmcd")); // È®ÀÎÄÚµå
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/ordtodd", model.getValue("/root/main/list2/clod[" + row + "]/ordtodd")); // ó¹æÁ¾·áÀÏÀÚ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/updtdd", model.getValue("/root/main/list2/clod[" + row + "]/updtdd")); // º¯°æÀÏÀÚ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/edihospaddamt", model.getValue("/root/main/list2/clod[" + row + "]/edihospaddamt")); // º´¿ø°¡»ê´Ü°¡
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/ediaddamt", model.getValue("/root/main/list2/clod[" + row + "]/ediaddamt")); // °¡»ê´Ü°¡
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/totordamt", model.getValue("/root/main/list2/clod[" + row + "]/totordamt")); // Áø·áºñÃѾ×
idx++;
}
// model.refresh();
exeReportPreview("RPPID20300", "XMLSTR", "", "", "false", "", "",
"", "", "false");
} else if (ret == 7) {
// 2. ÀüüÃâ·Â (±×¸®µå¿¡ º¸¿©Áö´Â ³»¿ë Àüü¸¦ º¸°í¼·Î Àü´ÞÇÑ´Ù.)
var isPrint = false;
model.removeNodeset("/root/send/prntlist");
model.makeNode("/root/send/prntlist");
var idx = 1;
for ( var i = grd_clodhist.fixedRows; i < grd_clodhist.rows; i++) {
if (grd_clodhist.rowHidden(i) == false) {
isPrint = true;
var row = i;
// »ó´Ü Á¤º¸
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/pid", pid); // ȯÀÚ¹øÈ£
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/patnm", patnm); // ¼º¸í
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/indd", indd); // ÀÔ¿øÀÏ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/insukindcd", insukind); // ȯÀÚÀ¯Çü
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/insukindnm", insukindnm);
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/suppkindcd", suppkind); // º¸Á¶À¯Çü
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/suppkindnm", suppkindnm);
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/iphsfromdd", iphsfromdd); // À¯Çü½ÃÀÛÀÏ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/diagcd", diagcd);
// ¸®½ºÆ®
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/edilnno", model.getValue("/root/main/list2/clod[" + row + "]/edilnno")); // ÁÙ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/item1", model.getValue("/root/main/list2/clod[" + row + "]/ediitem1")); // Ç×
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/item2", model.getValue("/root/main/list2/clod[" + row + "]/ediitem2")); // ¸ñ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/ordfromdd", model.getValue("/root/main/list2/clod[" + row + "]/ordfromdd")); // 󹿽ÃÀÛÀÏÀÚ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/grupsnglflag", model.getValue("/root/main/list2/clod[" + row + "]/grupsnglflag")); // G
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/grupcalcscorcd", model.getValue("/root/main/list2/clod[" + row + "]/grupcalcscorcd")); // ±×·ìÄÚµå
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/matractflag", model.getValue("/root/main/list2/clod[" + row + "]/matractflag")); // ÇàÀ§Àç·á
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/snglcalcscorcd", model.getValue("/root/main/list2/clod[" + row + "]/snglcalcscorcd")); // ¼ö°¡ÄÚµå
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/basecd", model.getValue("/root/main/list2/clod[" + row + "]/basecd")); // EDIÄÚµå
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/estmcd", model.getValue("/root/main/list2/clod[" + row + "]/estmcd")); // »êÁ¤ÄÚµå
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/hngnm", model.getValue("/root/main/list2/clod[" + row + "]/hngnm")); // Çѱ۸í
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/payflag", model.getValue("/root/main/list2/clod[" + row + "]/payflag")); // ±Þºñ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/ediunitcost", model.getValue("/root/main/list2/clod[" + row + "]/ediunitcost")); // ´Ü°¡
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/edidrugqty", model.getValue("/root/main/list2/clod[" + row + "]/edidrugqty")); // 1ȸ·®
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/tims", model.getValue("/root/main/list2/clod[" + row + "]/tims")); // Ƚ¼ö
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/daydrugqty", model.getValue("/root/main/list2/clod[" + row + "]/daydrugqty")); // 1ÀÏ·®(ÀÏÅõ)
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/dayno", model.getValue("/root/main/list2/clod[" + row + "]/dayno")); // Àϼö(ÃÑÅõ)
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/ediamt", model.getValue("/root/main/list2/clod[" + row + "]/ediamt")); // ±Ý¾×
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/cnfmcd", model.getValue("/root/main/list2/clod[" + row + "]/cnfmcd")); // È®ÀÎÄÚµå
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/ordtodd", model.getValue("/root/main/list2/clod[" + row + "]/ordtodd")); // ó¹æÁ¾·áÀÏÀÚ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/updtdd", model.getValue("/root/main/list2/clod[" + row + "]/updtdd")); // º¯°æÀÏÀÚ
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/edihospaddamt", model.getValue("/root/main/list2/clod[" + row + "]/edihospaddamt")); // º´¿ø°¡»ê´Ü°¡
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/ediaddamt", model.getValue("/root/main/list2/clod[" + row + "]/ediaddamt")); // °¡»ê´Ü°¡
model.makeValue("/root/send/prntlist/prntinfo[" + idx + "]/totordamt", model.getValue("/root/main/list2/clod[" + row + "]/totordamt")); // Áø·áºñÃѾ×
idx++;
}
}
if (isPrint == false) {
messageBox("ó¹æ ÇÊÅ͸¦ º¯°æÇϼ¼¿ä. Ãâ·ÂÇÒ Ã³¹æÀÌ", "I004"); // /ó¹æ ÇÊÅ͸¦ º¯°æÇϼ¼¿ä. Ãâ·ÂÇÒ Ã³¹æÀÌ ¾ø½À´Ï´Ù.
return;
}
model.refresh();
exeReportPreview("RPPID20300", "XMLSTR", "", "", "false", "", "", "", "", "false");
} else {
// 3. Ãë¼Ò
return;
}
} else {
messageBox("Ãâ·ÂÇÒ Ã³¹æÀÌ", "I004"); // /Ãâ·ÂÇÒ Ã³¹æÀÌ ¾ø½À´Ï´Ù.
}
}
// Á¤»êÀÇ·Úµî·Ï ȸéÈ£Ãâ
function fCallReCharge() {
model.resetInstanceNode("/root/hidden/smpir31000/cond");
if (model.getValue("/root/main/item1/clbs/acptno") != '-') {
model.setValue("/root/hidden/smpir31000/cond/srchflag", "1"); // Á¢¼ö¹øÈ£·Î Á¶È¸
} else {
model.setValue("/root/hidden/smpir31000/cond/srchflag", "1"); // û±¸¹øÈ£·Î Á¶È¸
}
model.setValue("/root/hidden/smpir31000/cond/acptno", model.getValue("/root/main/item1/clbs/acptno"));
model.setValue("/root/hidden/smpir31000/cond/judgdg", model.getValue("/root/main/item1/clbs/judgdg"));
model.setValue("/root/hidden/smpir31000/cond/docuseqno", model.getValue("/root/main/item1/clbs/docuseqno"));
model.setValue("/root/hidden/smpir31000/cond/clamno", model.getValue("/root/main/item1/clbs/clamno"));
modal("SMPIR31000", "1", "10", "10", "SMPIR31000", "/root/hidden/smpir31000/cond", "/root/init/item1", "", ""); // SMPIR31000_Á¤»êÀÇ·Ú»ý¼º.xrw
}
function fGetSelectedUnitFlag() {
var clamkey = model.getValue("/root/main/item1/clbs/clamkey");
if (clamkey) { // Á¶È¸µÈ ½É»ç´ë»óÀÚ°¡ ÀÖÀ¸¸é
var visibleRow = 0;
var rdounitflag = model.getValue("/root/hidden/list3/selectedUnitFlag");
if (rdounitflag == "-") {
for ( var i = 1; i < grd_clsphist.rows; i++) {
grd_clsphist.rowHidden(i) = false;
var rowstatus = grd_clsphist.rowstatus(i);
if (rowstatus > 3) { // »èÁ¦»óÅÂ
grd_clsphist.rowHidden(i) = true;
} else if (model.getValue("/root/chkJT001") == 'Y' && grd_clsphist.valueMatrix(i, grd_clsphist.colRef("spclcd")) == "JT001") {
grd_clsphist.rowHidden(i) = true;
} else {
visibleRow++;
}
}
} else if (rdounitflag == "M") {
for ( var i = 1; i < grd_clsphist.rows; i++) {
grd_clsphist.rowHidden(i) = false;
var rowstatus = grd_clsphist.rowstatus(i);
if (rowstatus > 3) { // »èÁ¦»óÅÂ
grd_clsphist.rowHidden(i) = true;
} else if (grd_clsphist.valueMatrix(i, grd_clsphist.colRef("unitflag")) != "M") {
grd_clsphist.rowHidden(i) = true;
} else {
visibleRow++;
}
}
} else if (rdounitflag == "J") {
for ( var i = 1; i < grd_clsphist.rows; i++) {
grd_clsphist.rowHidden(i) = false;
var rowstatus = grd_clsphist.rowstatus(i);
if (rowstatus > 3) { // »èÁ¦»óÅÂ
grd_clsphist.rowHidden(i) = true;
} else if (grd_clsphist.valueMatrix(i, grd_clsphist.colRef("unitflag")) != "J") {
grd_clsphist.rowHidden(i) = true;
}
if (model.getValue("/root/chkJT001") == 'Y' && grd_clsphist.valueMatrix(i, grd_clsphist.colRef("spclcd")) == "JT001") {
grd_clsphist.rowHidden(i) = true;
}
}
visibleRow = 1; // ÁÙ´ÜÀ§°¡ ¼±ÅÃµÈ »óÅ¿¡¼´Â ÀÚµ¿À¸·Î ÇàÃß°¡¸¦ ÇÏÁö ¾Ê´Â´Ù.
} else { // rdounitflag == "JX999"
for ( var i = 1; i < grd_clsphist.rows; i++) {
grd_clsphist.rowHidden(i) = false;
var rowstatus = grd_clsphist.rowstatus(i);
if (rowstatus > 3) { // »èÁ¦»óÅÂ
grd_clsphist.rowHidden(i) = true;
} else if (grd_clsphist.valueMatrix(i, grd_clsphist.colRef("spclcd")) != "JX999") {
grd_clsphist.rowHidden(i) = true;
}
}
visibleRow = 1; // ÁÙ´ÜÀ§°¡ ¼±ÅÃµÈ »óÅ¿¡¼´Â ÀÚµ¿À¸·Î ÇàÃß°¡¸¦ ÇÏÁö ¾Ê´Â´Ù.
}
if (checkAuth("X") && visibleRow == 0) { // ¸ðµç row°¡ »èÁ¦ »óÅÂÀÎ °æ¿ì
fSpclGridInsertRow(); // ƯÁ¤³»¿ª Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öư Ŭ¸¯½Ã ÆË¾÷ ¸Þ´º "Çà Ãß°¡"
} else {
grd_clsphist.row = 0;
}
}
}
function fGeCaseSelect(caseId, visible_val) {
var caseObj = document.all.item(caseId);
if (caseObj.selected) { // ±âÁ¸¿¡ ÀÌ¹Ì ¼±ÅõǾî ÀÖ´Â tabÀε¥ ÇØ´ç tabÀ» ´Ù½Ã ¼±ÅÃÇÑ °æ¿ì
if (swt_spclmemo.attribute("height") == "608") { // ¼¼·Î·Î È®´ëµÈ âÀ» ¿ø·¡´ë·Î ÇÑ´Ù.
fCutSwitchSize();
} else { // textarea¸¦ ¼¼·Î·Î È®´ë½ÃŲ´Ù.
fExpandSwitchSize();
}
} else { // ±âÁ¸¿¡ ¼±ÅõÇÁö ¾ÊÀº tabÀÎ °æ¿ì
fCutSwitchSize();
}
model.toggle(caseId); // ÇØ´ç tab À¸·Î Åä±Û½ÃŲ´Ù.
}
function fGetGrdCldihistEditCell() {
// col@type = "input" ÀÏ °æ¿ì onentercell½ÃÁ¡¿¡ EditMode »óÅ ¸¸µé±â
if (grd_cldihist.colType(grd_cldihist.col) == "input") {
grd_cldihist.editCell();
}
}
/* ȯÀÚ±âÁØ Àü¼Û¸Þ¼¼ÁöÀÛ¼º, JHP. 2009.08.17 */
function fPatJudgPatMsgTrsm() {
if (!isNull(model.getvalue("/root/main/item1/clbs/pid"))) {
// ÀνºÅϽº»ý¼º
model.makeNode("/root/tmp/msgtrsm/info/instcd");
model.makeNode("/root/tmp/msgtrsm/info/msgwrtedd");
model.makeNode("/root/tmp/msgtrsm/info/msgwrteno");
model.makeNode("/root/tmp/msgtrsm/info/msgwrtehistno");
model.makeNode("/root/tmp/msgtrsm/info/histstat");
model.makeNode("/root/tmp/msgtrsm/info/pid");
model.makeNode("/root/tmp/msgtrsm/info/orddd");
model.makeNode("/root/tmp/msgtrsm/info/cretno");
model.makeNode("/root/tmp/msgtrsm/info/mskind");
model.makeNode("/root/tmp/msgtrsm/info/orddeptcd");
model.makeNode("/root/tmp/msgtrsm/info/orddrid");
model.makeNode("/root/tmp/msgtrsm/info/orddrnm");
model.makeNode("/root/tmp/msgtrsm/info/ordtype");
model.makeNode("/root/tmp/msgtrsm/info/kindflag");
model.makeNode("/root/tmp/msgtrsm/info/grupcalcscorcd");
model.makeNode("/root/tmp/msgtrsm/info/snglcalcscorcd");
model.makeNode("/root/tmp/msgtrsm/info/ordqty");
model.makeNode("/root/tmp/msgtrsm/info/ordtims");
model.makeNode("/root/tmp/msgtrsm/info/orddays");
model.makeNode("/root/tmp/msgtrsm/info/prcpdd");
model.makeNode("/root/tmp/msgtrsm/info/prcpno");
model.makeNode("/root/tmp/msgtrsm/info/prcppayflag");
model.makeNode("/root/tmp/msgtrsm/info/rgstrid");
model.makeNode("/root/tmp/msgtrsm/info/rgstdd");
model.makeNode("/root/tmp/msgtrsm/info/rgsttm");
model.makeNode("/root/tmp/msgtrsm/info/sendphone");
model.makeNode("/root/tmp/msgtrsm/info/anybodyyn");
model.makeNode("/root/tmp/msgtrsm/info/sendflag");
model.makeNode("/root/tmp/msgtrsm/info/senddate");
model.makeNode("/root/tmp/msgtrsm/info/sendid");
model.makeNode("/root/tmp/msgtrsm/info/deliveid");
model.makeNode("/root/tmp/msgtrsm/info/recvdate");
model.makeNode("/root/tmp/msgtrsm/info/recvid");
model.makeNode("/root/tmp/msgtrsm/info/recvcnfmyn");
model.makeNode("/root/tmp/msgtrsm/info/recvcnfmid");
model.makeNode("/root/tmp/msgtrsm/info/sendmsg");
model.makeNode("/root/tmp/msgtrsm/info/recvmsg");
model.makeNode("/root/tmp/msgtrsm/info/fstrgstrid");
model.makeNode("/root/tmp/msgtrsm/info/fstrgstdt");
model.makeNode("/root/tmp/msgtrsm/info/lastupdtrid");
model.makeNode("/root/tmp/msgtrsm/info/lastupdtdt");
// °ª¼ÂÆÃ
// ¼¼¼Ç°ª ¹Þ±â
var sUserInfosS = getUserInfos();
sUserInfosS = sUserInfosS + "|";
var UserInfosS_Array = sUserInfosS.split("|");
var userid = UserInfosS_Array[0]; // »ç¿ëÀÚ¹øÈ£
var usernm = UserInfosS_Array[1]; // »ç¿ëÀÚÀ̸§
var posinstcd = UserInfosS_Array[6]; // ±Ù¹«Áö±â°üÄÚµå 2009.04.15
var posinstnm = UserInfosS_Array[7]; // ±Ù¹«Áö±â°ü¸í 2009.04.15
var posdeptcd = UserInfosS_Array[4]; // ¼Ò¼ÓºÎ¼ÄÚµå
var posdeptnm = UserInfosS_Array[5]; // ¼Ò¼ÓºÎ¼¸í
if (userid == null || userid == "" || userid == " " || userid == "-")
userid = "pam";
model.setValue("/root/tmp/msgtrsm/info/instcd", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/msgwrtedd", getCurrentDate()); // chk
model.setValue("/root/tmp/msgtrsm/info/msgwrteno", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/msgwrtehistno", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/histstat", "Y"); // chk
model.setValue("/root/tmp/msgtrsm/info/pid", model.getValue("/root/main/item1/clbs/pid")); // chk
model.setValue("/root/tmp/msgtrsm/info/orddd", model.getValue("/root/main/item1/clbs/indd")); // chk
model.setValue("/root/tmp/msgtrsm/info/cretno", model.getValue("/root/main/item1/clbs//cretno")); // chk
model.setValue("/root/tmp/msgtrsm/info/mskind", "M"); // ¿Ü·¡±âº» ÁÖÀ¯Çü, chk
model.setValue("/root/tmp/msgtrsm/info/orddeptcd", model.getValue("/root/main/item1/clbs/orddeptcd")); // chk
var drid = model.getValue("/root/main/item1/clbs/orddrid")
var drnm = model.getValue("/root/init/orddrid2/orddridlist[cd = '" + drid + "']/nm");
model.setValue("/root/tmp/msgtrsm/info/orddrid", model.getValue("/root/main/item1/clbs/orddrid")); // chk, TABLE¿¡ Àû¿ë¾ÈÇÔ.(°ª¸¸È®ÀÎ)
model.setValue("/root/tmp/msgtrsm/info/orddrnm", drnm); // chk, TABLE¿¡ Àû¿ë¾ÈÇÔ.(°ª¸¸È®ÀÎ)
model.setValue("/root/tmp/msgtrsm/info/ordtype", "O"); // ¿Ü·¡±âº» 'O', chk
model.setValue("/root/tmp/msgtrsm/info/kindflag", "P"); // ȯÀÚ±âÁØ 'P', chk
model.setValue("/root/tmp/msgtrsm/info/grupcalcscorcd", "-");
model.setValue("/root/tmp/msgtrsm/info/snglcalcscorcd", "-");
model.setValue("/root/tmp/msgtrsm/info/ordqty", 0);
model.setValue("/root/tmp/msgtrsm/info/ordtims", 0);
model.setValue("/root/tmp/msgtrsm/info/orddays", 0);
model.setValue("/root/tmp/msgtrsm/info/prcpdd", "-");
model.setValue("/root/tmp/msgtrsm/info/prcpno", 0);
model.setValue("/root/tmp/msgtrsm/info/prcppayflag", "-");
model.setValue("/root/tmp/msgtrsm/info/rgstrid", "-"); // ¼¹ö´Ü¿¡¼ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk
model.setValue("/root/tmp/msgtrsm/info/rgstdd", "-"); // ¼¹ö´Ü¿¡¼ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk
model.setValue("/root/tmp/msgtrsm/info/rgsttm", "-"); // ¼¹ö´Ü¿¡¼ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk
model.setValue("/root/tmp/msgtrsm/info/sendphone", ""); // ¼¹ö´Ü¿¡¼ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk
model.setValue("/root/tmp/msgtrsm/info/anybodyyn", "N"); // ´©±¸³ª ±âº» 'N', chk
model.setValue("/root/tmp/msgtrsm/info/sendflag", "I"); // Áø·á±âº» 'O', chk
model.setValue("/root/tmp/msgtrsm/info/senddate", ""); // Äõ¸®¿¡¼ timestamp chk
model.setValue("/root/tmp/msgtrsm/info/sendid", userid); // chk
model.setValue("/root/tmp/msgtrsm/info/deliveid", "-"); // ȸ鿡¼¼±ÅÃ. chk
model.setValue("/root/tmp/msgtrsm/info/recvdate", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/recvid", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/recvcnfmyn", "N"); // ±âº» ºñ¿¬¼Ó 'N', chk
model.setValue("/root/tmp/msgtrsm/info/recvcnfmid", userid); // chk
model.setValue("/root/tmp/msgtrsm/info/sendmsg", ""); // sendmsgvalue); ±âº» ó¹æÄÚµå, ó¹æ¸í°ª°¡Áö°í ½ÃÀÛ. chk
model.setValue("/root/tmp/msgtrsm/info/recvmsg", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/fstrgstrid", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/fstrgstdt", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/lastupdtrid", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/lastupdtdt", ""); // chk
} else {
messageBox("±âº»Á¤º¸°¡ ", "I004");
}
model.refresh();
modal("SPPIZ01900_½É»çȯÀÚ¸Þ¼¼ÁöÀÛ¼º", "", "400", "300", "", "/root/tmp/msgtrsm/info", "/root/main/patinfo");
model.removenode("/root/tmp/msgtrsm");
}
/* 󹿱âÁØ Àü¼Û¸Þ¼¼ÁöÀÛ¼º, JHP. 2009.08.17 */
function fOrderJudgPatMsgTrsm() {
if (!isNull(model.getvalue("/root/main/item1/clbs/pid"))) {
// ÀνºÅϽº»ý¼º
model.makeNode("/root/tmp/msgtrsm/info/instcd");
model.makeNode("/root/tmp/msgtrsm/info/msgwrtedd");
model.makeNode("/root/tmp/msgtrsm/info/msgwrteno");
model.makeNode("/root/tmp/msgtrsm/info/msgwrtehistno");
model.makeNode("/root/tmp/msgtrsm/info/histstat");
model.makeNode("/root/tmp/msgtrsm/info/pid");
model.makeNode("/root/tmp/msgtrsm/info/orddd");
model.makeNode("/root/tmp/msgtrsm/info/cretno");
model.makeNode("/root/tmp/msgtrsm/info/mskind");
model.makeNode("/root/tmp/msgtrsm/info/orddeptcd");
model.makeNode("/root/tmp/msgtrsm/info/orddrid");
model.makeNode("/root/tmp/msgtrsm/info/orddrnm");
model.makeNode("/root/tmp/msgtrsm/info/ordtype");
model.makeNode("/root/tmp/msgtrsm/info/kindflag");
model.makeNode("/root/tmp/msgtrsm/info/grupcalcscorcd");
model.makeNode("/root/tmp/msgtrsm/info/snglcalcscorcd");
model.makeNode("/root/tmp/msgtrsm/info/ordqty");
model.makeNode("/root/tmp/msgtrsm/info/ordtims");
model.makeNode("/root/tmp/msgtrsm/info/orddays");
model.makeNode("/root/tmp/msgtrsm/info/prcpdd");
model.makeNode("/root/tmp/msgtrsm/info/prcpno");
model.makeNode("/root/tmp/msgtrsm/info/prcppayflag");
model.makeNode("/root/tmp/msgtrsm/info/rgstrid");
model.makeNode("/root/tmp/msgtrsm/info/rgstdd");
model.makeNode("/root/tmp/msgtrsm/info/rgsttm");
model.makeNode("/root/tmp/msgtrsm/info/sendphone");
model.makeNode("/root/tmp/msgtrsm/info/anybodyyn");
model.makeNode("/root/tmp/msgtrsm/info/sendflag");
model.makeNode("/root/tmp/msgtrsm/info/senddate");
model.makeNode("/root/tmp/msgtrsm/info/sendid");
model.makeNode("/root/tmp/msgtrsm/info/deliveid");
model.makeNode("/root/tmp/msgtrsm/info/recvdate");
model.makeNode("/root/tmp/msgtrsm/info/recvid");
model.makeNode("/root/tmp/msgtrsm/info/recvcnfmyn");
model.makeNode("/root/tmp/msgtrsm/info/recvcnfmid");
model.makeNode("/root/tmp/msgtrsm/info/sendmsg");
model.makeNode("/root/tmp/msgtrsm/info/recvmsg");
model.makeNode("/root/tmp/msgtrsm/info/fstrgstrid");
model.makeNode("/root/tmp/msgtrsm/info/fstrgstdt");
model.makeNode("/root/tmp/msgtrsm/info/lastupdtrid");
model.makeNode("/root/tmp/msgtrsm/info/lastupdtdt");
// °ª¼ÂÆÃ
// ó¹æÀ̹ǷΠó¹ærow¼±Åÿ©ºÎ È®ÀÎ
if (grd_clodhist.row <= 0) {
return;
}
// ¼¼¼Ç°ª ¹Þ±â
var sUserInfosS = getUserInfos();
sUserInfosS = sUserInfosS + "|";
var UserInfosS_Array = sUserInfosS.split("|");
var userid = UserInfosS_Array[0]; // »ç¿ëÀÚ¹øÈ£
var usernm = UserInfosS_Array[1]; // »ç¿ëÀÚÀ̸§
var posinstcd = UserInfosS_Array[6]; // ±Ù¹«Áö±â°üÄÚµå 2009.04.15
var posinstnm = UserInfosS_Array[7]; // ±Ù¹«Áö±â°ü¸í 2009.04.15
var posdeptcd = UserInfosS_Array[4]; // ¼Ò¼ÓºÎ¼ÄÚµå
var posdeptnm = UserInfosS_Array[5]; // ¼Ò¼ÓºÎ¼¸í
if (userid == null || userid == "" || userid == " " || userid == "-")
userid = "pam";
model.setValue("/root/tmp/msgtrsm/info/instcd", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/msgwrtedd", getCurrentDate()); // chk
model.setValue("/root/tmp/msgtrsm/info/msgwrteno", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/msgwrtehistno", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/histstat", "Y"); // chk
model.setValue("/root/tmp/msgtrsm/info/pid", model.getValue("/root/main/item1/clbs/pid")); // chk
model.setValue("/root/tmp/msgtrsm/info/orddd", model.getValue("/root/main/item1/clbs/indd")); // chk
model.setValue("/root/tmp/msgtrsm/info/cretno", model.getValue("/root/main/item1/clbs/cretno")); // chk
model.setValue("/root/tmp/msgtrsm/info/mskind", "M"); // ¿Ü·¡±âº» ÁÖÀ¯Çü, chk
model.setValue("/root/tmp/msgtrsm/info/orddeptcd", model.getValue("/root/main/item1/clbs/orddeptcd")); // chk
var drid = model.getValue("/root/main/item1/clbs/orddrid")
var drnm = model.getValue("/root/init/orddrid2/orddridlist[cd = '" + drid + "']/nm");
model.setValue("/root/tmp/msgtrsm/info/orddrid", model.getValue("/root/main/item1/clbs/orddrid")); // chk, TABLE¿¡ Àû¿ë¾ÈÇÔ.(°ª¸¸È®ÀÎ)
model.setValue("/root/tmp/msgtrsm/info/orddrnm", drnm); // chk, TABLE¿¡ Àû¿ë¾ÈÇÔ.(°ª¸¸È®ÀÎ)
model.setValue("/root/tmp/msgtrsm/info/ordtype", "I"); // ¿Ü·¡±âº» 'O', chk
model.setValue("/root/tmp/msgtrsm/info/kindflag", "O"); // 󹿱âÁØ 'O', chk
model.setValue("/root/tmp/msgtrsm/info/grupcalcscorcd", model.getvalue("/root/main/list2/clod[" + grd_clodhist.row + "]/grupcalcscorcd")); // chk
model.setValue("/root/tmp/msgtrsm/info/snglcalcscorcd", model.getvalue("/root/main/list2/clod[" + grd_clodhist.row + "]/snglcalcscorcd")); // chk
model.setValue("/root/tmp/msgtrsm/info/ordqty", model.getvalue("/root/main/list2/clod[" + grd_clodhist.row + "]/drugqty")); // chk
model.setValue("/root/tmp/msgtrsm/info/ordtims", model.getvalue("/root/main/list2/clod[" + grd_clodhist.row + "]/tims")); // chk
model.setValue("/root/tmp/msgtrsm/info/orddays", model.getvalue("/root/main/list2/clod[" + grd_clodhist.row + "]/dayno")); // chk
model.setValue("/root/tmp/msgtrsm/info/prcpdd", ""); // chk, ȸ鿡 ¹ÌÁ¸Àç ¼¹ö´Ü¿¡¼ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ.
model.setValue("/root/tmp/msgtrsm/info/prcpno", ""); // chk, ȸ鿡 ¹ÌÁ¸Àç ¼¹ö´Ü¿¡¼ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ.
model.setValue("/root/tmp/msgtrsm/info/prcppayflag", model.getvalue("/root/main/list2/clod[" + grd_clodhist.row + "]/payflag")); // chk
model.setValue("/root/tmp/msgtrsm/info/rgstrid", "-"); // ¼¹ö´Ü¿¡¼ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk
model.setValue("/root/tmp/msgtrsm/info/rgstdd", "-"); // ¼¹ö´Ü¿¡¼ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk
model.setValue("/root/tmp/msgtrsm/info/rgsttm", "-"); // ¼¹ö´Ü¿¡¼ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk
model.setValue("/root/tmp/msgtrsm/info/sendphone", ""); // ¼¹ö´Ü¿¡¼ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk
model.setValue("/root/tmp/msgtrsm/info/anybodyyn", "N"); // ´©±¸³ª ±âº» 'N', chk
model.setValue("/root/tmp/msgtrsm/info/sendflag", "O"); // Áø·á±âº» 'O', chk
model.setValue("/root/tmp/msgtrsm/info/senddate", ""); // Äõ¸®¿¡¼ timestamp chk
model.setValue("/root/tmp/msgtrsm/info/sendid", userid); // chk
model.setValue("/root/tmp/msgtrsm/info/deliveid", "-"); // ȸ鿡¼¼±ÅÃ. chk
model.setValue("/root/tmp/msgtrsm/info/recvdate", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/recvid", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/recvcnfmyn", "N"); // ±âº» ºñ¿¬¼Ó 'N', chk
model.setValue("/root/tmp/msgtrsm/info/recvcnfmid", userid); // chk
model.setValue("/root/tmp/msgtrsm/info/sendmsg", ""); // ±âº» ó¹æÄÚµå,ó¹æ¸í°ª°¡Áö°í ½ÃÀÛ. chk -> º¯°æ ȸ鿡¼ ±×·ìÄÚµå ¸í Á¶È¸ÇÏ¿© ³Ö¾îÁÜ. chk
model.setValue("/root/tmp/msgtrsm/info/recvmsg", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/fstrgstrid", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/fstrgstdt", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/lastupdtrid", ""); // chk
model.setValue("/root/tmp/msgtrsm/info/lastupdtdt", ""); // chk
} else {
messageBox("±âº»Á¤º¸°¡ ", "I004");
}
model.refresh();
modal("SPPIZ01900_½É»çȯÀÚ¸Þ¼¼ÁöÀÛ¼º", "", "400", "300", "", "/root/tmp/msgtrsm/info", "/root/main/patinfo");
model.removenode("/root/tmp/msgtrsm");
}
/*
* ½É»ç¿Ï·áÀü»óº´Æ¯Á¤³»¿ªÃ¼Å© 2012.07.11 plet2 1. ÁßÁõ/»êÁ¤Æ¯·Ê »óº´ üũ- »óº´ ȸé ÁÖ»óº´(no=1)ÀÇ MT002¿¡ V
* Code ÀÖÀ¸¸é ÁßÁõ/»êÁ¤Æ¯·Ê V252, V027Àº Á¦¿Ü 2. ƯÁ¤³»¿ª¿¡ MT002 üũ - ÁßÁõ/»êÁ¤Æ¯·Ê ƯÁ¤±âÈ£ °ü·Ã ƯÁ¤³»¿ª 3.
* ƯÁ¤³»¿ª¿¡ MT014 üũ - ÁßÁõ/»êÁ¤Æ¯·Ê ÀÚ°Ý ¹øÈ£ °ü·Ã ƯÁ¤³»¿ª //ÁÖ»óº´ÀÌ v252ÀÌ°í Æ¯Á¤³»¿ª¿¡ ct002Äڵ尡 ¾øÀ»¶§ ¹ß»ý
* 2012.07.05 plet2 //ƯÁ¤³»¿ªÀÌ ct002À̰í ÁÖ»óº´¿¡ v252Äڵ尡 ¾øÀ»¶§ ¹ß»ý 2012.07.05 plet2
* //ºÒ¿ÏÀü»óº´Ã¼Å©
*/
function fGetDiagSpclcdCheck() {
var chk_vcode = model.getValue("/root/main/list1/cldi[diagseq='1']/vcode");
var chk_vcodeR = model.getValue("/root/main/list1/cldi[diagseq='1' and diagkindcd != 'R']/vcode"); //·ê¾Æ¿ôÁ¦¿Ü
var chk_CT002 = model.getValue("/root/main/list3/clsp[spclcd='CT002' and insntstat !='D']/spclcd");
var chk_MT002 = model.getValue("/root/main/list3/clsp[spclcd='MT002' and insntstat !='D']/spclcd");
var chk_F001 = model.getValue("/root/main/list3/clsp[spclcd='MT002' and spclspec='F001' and insntstat !='D']/spclcd");
var chk_F003 = model.getValue("/root/main/list3/clsp[spclcd='MT002' and spclspec='F003' and insntstat !='D']/spclcd");
var chk_F004 = model.getValue("/root/main/list3/clsp[spclcd='MT002' and spclspec='F004' and insntstat !='D']/spclcd");
var chk_F005 = model.getValue("/root/main/list3/clsp[spclcd='MT002' and spclspec='F005' and insntstat !='D']/spclcd");
var chk_V001 = model.getValue("/root/main/list3/clsp[spclcd='MT002' and spclspec='V001' and insntstat !='D']/spclspec");
var chk_V008 = model.getValue("/root/main/list3/clsp[spclcd='MT002' and spclspec='V008' and insntstat !='D']/spclcd");
var chk_MT014 = model.getValue("/root/main/list3/clsp[spclcd='MT014' and insntstat !='D']/spclcd");
var kcd6chk = model.getValue("/root/main/list1/cldi[kcd6chk='Y' and rowstat !='U']/kcd6chk");
var clamkey = model.getValue("/root/main/item1/clbs/clamkey");
var chk_insukindcd = model.getValue("/root/main/item1/clbs/insukindcd"); // º¸ÇèÀ¯Çü
var chk_suppkindcd = model.getValue("/root/main/item1/clbs/suppkindcd"); // º¸Á¶À¯Çü
var chk_diagcd = model.getValue("/root/main/list1/cldi[diagseq='1']/diagcd"); // ÁÖ»óº´ÄÚµå
var chk_diagcdR = model.getValue("/root/main/list1/cldi[diagseq='1' and diagkindcd != 'R']/diagcd"); //ÁÖ»óº´ÄÚµå·ê¾Æ¿ô
var chk_pid = model.getValue("/root/main/item1/clbs/pid"); // ȯÀÚ¹øÈ£
var chk_ioflag = model.getValue("/root/main/item1/clbs/ioflag"); // ÀÔ¿ø¿Ü·¡±¸ºÐ
var chk_ordfromdd = model.getValue("/root/main/item1/clbs/ordfromdd");
var chk_clamym = model.getValue("/root/main/item1/clbs/clamym"); // û±º³â¿ù
var chk_clamdg = model.getValue("/root/main/item1/clbs/clamdg"); // Â÷¼ö
var chk_pidsn = model.getValue("/root/main/item1/clbs/pidsn"); // ¼ø¹ø
var chk_O3420 = model.getValue("/root/main/list1/cldi[diagcd='O3420']/diagcd");
var chk_JT005 = model.getValue("/root/main/list3/clsp[spclcd='JT005' and insntstat !='D']/spclspec"); // ÀÓ½ÅÁÖ¼ö
var chk_MS004 = model.getValue("/root/main/list3/clsp[spclcd='MS004' and insntstat !='D']/spclspec"); // ½Å»ý¾ÆÃ¼Áß
var chk_O365 = model.getValue("/root/main/list1/cldi[diagcd='O365' or diagcd='O366' ]/diagcd"); // ÀÓ½ÅÁÖ¼ö»óº´ÄÚµå
var chk_rareobstflag = model.getValue("/root/main/item1/clbs[suppamt>0 and rareobstflag='L']/rareobstflag"); // °áÇÙÀÌ¸é¼ Áö¿ø±Ý ÀÖ´Â
var cnt_MT002 = getNodesetCount("/root/main/list3/clsp[spclcd='MT002' and insntstat !='D' and spclspec!='V206' and spclspec!='V246' and spclspec!='V231' and spclspec!='F008']/spclcd");
var chk_orddeptcd = model.getValue("/root/main/item1/clbs/orddeptcd"); // Áø·á°ú
var result = true;
if (clamkey) { // Á¶È¸µÈ ½É»ç´ë»óÀÚ°¡ ÀÖÀ¸¸é
model.resetInstanceNode("/root/hidden/sppid21700/cond");
model.setValue("/root/hidden/sppid21700/cond/clamym", model.getValue("/root/main/item1/clbs/clamym"));
model.setValue("/root/hidden/sppid21700/cond/clamdg", model.getValue("/root/main/item1/clbs/clamdg"));
model.setValue("/root/hidden/sppid21700/cond/pid", model.getValue("/root/main/item1/clbs/pid"));
model.setValue("/root/hidden/sppid21700/cond/pidsn", model.getValue("/root/main/item1/clbs/pidsn"));
model.setValue("/root/hidden/sppid21700/cond/clamkey", model.getValue("/root/main/item1/clbs/clamkey"));
model.setValue("/root/hidden/sppid21700/cond/workflag", model.getValue("/root/main/item1/clbs/workflag"));
model.setValue("/root/hidden/sppid21700/cond/ioflag", "I");
submit("TRPID21701");
}
var snglcalcscorcdcnt = getNodesetCount("/root/main/list7/list1/clop");
var chk_396 = model.getValue("/root/main/list7/clop[efcyclscd='396']/efcyclscd");
// V252,V027,V191,V192Á¦¿Ü
// F004,F005Á¦¿Ü
// ÁÖ»óº´ ºÒÀÏÄ¡
// ÁÖ»óº´ÀÌ N180~N189 ÀÌ¸é¼ Vcode°¡ V001¾Æ´Ñ °æ¿ì üũ
if (chk_vcodeR != "V252" && chk_vcodeR != "V027" && chk_vcodeR != "V191" && chk_vcodeR != "V192") {
if ((chk_MT002 == "" || chk_MT014 == "") && chk_vcodeR != "") {
if ((chk_diagcdR >= "N180" && chk_diagcdR <= "N189") && chk_V001 == "V001" && chk_MT014 == "") {
if (messageBox("ÁÖ»óº´°ú ƯÁ¤³»¿ªÀÌ ÀÏÄ¡ ÇÏÁö ¾Ê½À´Ï´Ù.!! (ÁßÁõ/»êÁ¤Æ¯·Ê),", "Q003") == 6) {
result = true;
} else {
result = false;
}
} else {
// ÀǷẸȣ, º¸Á¶À¯Çü 1Á¾ Â÷»óÀ§´Â Á¦¿Ü ¿¡ÀÌÁî»óº´ Á¦¿Ü (V103)
if ((chk_vcodeR == "V103")
|| (chk_insukindcd == "21" || chk_insukindcd == "22")
|| (chk_insukindcd == "11" && (chk_suppkindcd == "32" || chk_suppkindcd == "60" || chk_suppkindcd == "88"))
|| chk_suppkindcd == "00")
{
result = true;
} else {
if (messageBox("ÁÖ»óº´°ú ƯÁ¤³»¿ªÀÌ ÀÏÄ¡ ÇÏÁö ¾Ê½À´Ï´Ù.!! (ÁßÁõ/»êÁ¤Æ¯·Ê)", "Q003") == 6) {
result = true;
} else {
result = false;
}
}
}
} else if ((chk_MT002 != "" || chk_MT014 != "") && chk_vcodeR == "") {
if (chk_F003 != "" || chk_F004 != "" || chk_F005 != "" || chk_V008 || chk_F001 != "") {
result = true;
} else {
if (((chk_MT002 != "" || chk_MT014 != "") && chk_vcodeR == "" && !((chk_insukindcd == "21" || chk_insukindcd == "22") && chk_suppkindcd == "00")) || ((chk_MT002 == "" || chk_MT014 == "") && chk_vcodeR != "")) {
if (messageBox("ÁÖ»óº´°ú ƯÁ¤³»¿ªÀÌ ÀÏÄ¡ ÇÏÁö ¾Ê½À´Ï´Ù.!! (ÁßÁõ/»êÁ¤Æ¯·Ê),",
"Q003") == 6) {
result = true;
} else {
result = false;
}
}
}
} else if (chk_vcodeR == "V103" && chk_MT002 == "") {
if (messageBox("ÁÖ»óº´°ú ƯÁ¤³»¿ªÀÌ ÀÏÄ¡ ÇÏÁö ¾Ê½À´Ï´Ù.!! (ÁßÁõ/»êÁ¤Æ¯·Ê).", "Q003") == 6) {
result = true;
} else {
result = false;
}
} else if (chk_vcodeR != "" && chk_rareobstflag == "L" && cnt_MT002 > "0") {
if (messageBox("°áÇÙȯÀÚ´Â °áÇÙ°ü·Ã ƯÁ¤±âÈ£(MT002) À̿ܿ¡´Â ±âÀç ÇÒ ¼ö ¾ø½À´Ï´Ù.", "Q003") == 6) {
result = true;
} else {
result = false;
}
}
}
// °æÁõ»óº´
// CT002ºÒÀÏÄ¡
// ÁÖ»óº´ÀÌ °æÁõ + °Ç°º¸ÇèÀÌ Á¤»óÀÌ¸é¼ ¿ø¿Ü ó¹æÀÌ ÀÖ°í, CT002¾ø´Â °æ¿ì/¹Ý´ëÀǰæ¿ì üũ
if ((chk_vcodeR == "V252" && chk_CT002 == "" && snglcalcscorcdcnt > 0 && (chk_insukindcd == "11" && chk_suppkindcd == "00")) || (chk_vcodeR != "V252" && chk_CT002 != "" && snglcalcscorcdcnt > 0 && (chk_insukindcd == "11" && chk_suppkindcd == "00"))) {
if ((chk_diagcdR >= "E10" && chk_diagcdR <= "E149") && chk_396 != '396') {
if (messageBox("ÁÖ»óº´°ú ƯÁ¤³»¿ªÀÌ ÀÏÄ¡ ÇÏÁö ¾Ê½À´Ï´Ù.!! (°æÁõ)", "Q003") == 6) {
result = true;
} else {
result = false;
}
}
}
if (kcd6chk == "Y") {
if (messageBox("ºÒ¿ÏÀü»óº´ÀÌ Á¸Àç ÇÕ´Ï´Ù.", "Q003") == 6) {
result = true;
} else {
result = false;
}
}
if (chk_vcodeR.length > 0) {
model.setValue("/root/send/chksuppkindflag/cond/diagcd", chk_diagcdR);
model.setValue("/root/send/chksuppkindflag/cond/spclcd", chk_vcodeR);
model.setValue("/root/send/chksuppkindflag/cond/ioflag", chk_ioflag);
model.setValue("/root/send/chksuppkindflag/cond/ordfromdd", chk_ordfromdd);
model.setValue("/root/send/chksuppkindflag/cond/clamym", chk_clamym);
model.setValue("/root/send/chksuppkindflag/cond/clamdg", chk_clamdg);
model.setValue("/root/send/chksuppkindflag/cond/pidsn", chk_clamdg);
model.setValue("/root/send/chksuppkindflag/cond/pid", chk_pid);
model.setValue("/root/send/chksuppkindflag/cond/insukindcd", chk_insukindcd);
// »óº´ + ¹øÈ£ + ó¹æ
// »óº´ + ¹øÈ£
// º¸Á¶À¯Çü ºÒÀÏÄ¡ üũ
submit("TRPID20314");
var chksuppkindflag = model.getValue("/root/hidden/chksuppkindflag/rslt/chksuppkindflag");
if (chksuppkindflag != "" && chksuppkindflag != chk_suppkindcd && chk_diagcdR != "" && chk_suppkindcd != "00") {
if (messageBox("ÁÖ»óº´°ú º¸Á¶À¯ÇüÀÌ ÀÏÄ¡ ÇÏÁö ¾Ê½À´Ï´Ù.", "Q003") == 6) {
result = true;
} else {
result = false;
}
}
}
// ƯÁ¤ ºÐ¸¸Áø´Ü¿¡ Çʼö ºÎÁø´Ü À¯¹« üũ
// O820ÀÌ ÁÖ»óº´ÀΠȯÀÚ°¡ O3420 »óº´ÀÌ ¾øÀ» °æ¿ì üũ
if (chk_diagcd == 'O820' && chk_O3420.length == 0) {
if (messageBox("¹Ýº¹Á¦¿ÕÀý°³ ȯÀÚÀÔ´Ï´Ù.", "Q003") == 6) {
result = true;
} else {
var ans = messageBox("O3420 »óº´À» ÀÔ·Â", "S001");
if (ans == 6) {
model.setFocus("grd_cldihist");
fDiagGridInsertRow("Y", "N");
grd_cldihist.bottomRow = grd_cldihist.rows;
model.refresh();
var maxseq = model.getXPathValue("max(/root/main/list1/cldi[*]/diagseq)");
model.setValue("/root/main/list1/cldi[diagseq='" + maxseq + "']/diagcd", "O3420");
model.setValue("/root/main/list1/cldi[diagseq='" + maxseq + "']/diagnm", "ÀÌÀüÀÇ Á¦¿ÕÀý°³·Î ÀÎÇÑ ÈäÅÍÀÇ »ê¸ð °ü¸®");
}
result = false;
}
}
// ÀÓ½ÅÁÖ¼öº° üÁß°ú Áø´Ü üũ
// ½Å»ý¾Æ üÁß°ü·Ã »óº´´©¶ôÀÔ´Ï´Ù (O365 or O366)
if (chk_JT005.length > 0 && chk_MS004.length > 0) {
var nwbabyweight = parseInt(chk_MS004);
var minweight = parseInt(model.getValue("/root/main/nbwt/nbwtlist[prgntweek='" + chk_JT005 + "']/minweight"));
var maxweight = parseInt(model.getValue("/root/main/nbwt/nbwtlist[prgntweek='" + chk_JT005 + "']/maxweight"));
if (chk_O365.length == 0 && (nwbabyweight <= minweight || nwbabyweight >= maxweight)) {
if (messageBox("½Å»ý¾Æ üÁß°ü·Ã »óº´´©¶ô ȯÀÚÀÔ´Ï´Ù.", "Q003") == 6) {
result = true;
} else {
result = false;
}
}
}
// I20 ~I25 À» ÀÔ·Â ÇÏ¸é ¼øÈ¯±â,ÈäºÎ¿Ü°ú´Â ÁÖ»óº´¸íÀ̸é Åë°ú Çϰퟰú ¸é ÁÖ»óº´¸í À¸·Î ÀÔ·Â Çϸé ÀÔ·ÂÀÌ ¾ÈµÇµµ·Ï
if ((chk_diagcd >= "I200" && chk_diagcd <= "I2599") && !(chk_orddeptcd == "2070000000" || chk_orddeptcd == "2010400000")) {
if (messageBox("¼øÈ¯±â³»°ú, ÈäºÎ¿Ü°ú ¿Ü ÁÖ»óº´ ÇÒ ¼ö ¾ø´Â »óº´ ÀÔ´Ï´Ù.", "Q003") == 6) {
result = true;
} else {
result = false;
}
}
var clbs_licnsno = model.getValue("/root/main/item1/clbs/licnsno");
var cldi_licnsno = model.getValue("/root/main/list1/cldi[diagseq='1']/licnsno");
var clod_snglcalcscorcd = model.getValue("/root/main/list8/clod[item='0101' or item='0102']/snglcalcscorcd");
if (clbs_licnsno != cldi_licnsno) {
if (grd_cldihist.rowstatus(1) != 1 && grd_cldihist.rowstatus(1) != 3) {
grd_cldihist.rowstatus(1) = 2;
}
if (grd_cldihist.rowstatus(1) != 1 && grd_cldihist.rowstatus(1) != 3) {
grd_clodhist.rowstatus(grd_clodhist.findRow(clod_snglcalcscorcd,grd_clodhist.fixedRows, grd_clodhist.colRef("snglcalcscorcd"), false, true)) = 2;
}
}
var holigbn = model.getValue("/root/main/item1/clbs/holigbn");
var holifromdd = model.getValue("/root/main/item1/clbs/holifromdd");
var holitodd = model.getValue("/root/main/item1/clbs/holitodd");
if (holigbn == "Y" && clod_snglcalcscorcd.length > 0) {
if (messageBox("Áø·áÀǰ¡ " + holifromdd + " ~ " + holitodd + " ±â°£µ¿¾È ÇØ¿Ü ÃâÀåÀÔ´Ï´Ù. Áø·áÀǻ縦 º¯°æÇϼ¼¿ä.", "Q003") == 6) {
result = true;
} else {
result = false;
}
}
return result;
}
function fSaveClspList() {
if (btn_save.disabled == false && "M" == "S") {
// ÀÎÀû»çÇ×
var initclbs = instance1.selectNodesXml("/root/hidden/item1/initclbs/clbs");
var currentclbs = instance1.selectNodesXml("/root/main/item1/clbs");
model.copyNode("/root/send/item1/clbs", "/root/main/item1/clbs");
model.makeValue("/root/send/item1/clbs/clbsupdateyn", "N"); // ÀÎÀû»çÇ× ÀúÀå¿©ºÎ
// ½É»ç»óŸ¦ 'ÀúÀå' ¶Ç´Â '½É»ç¿Ï·á' »óÅ·ΠÀúÀåÇÑ´Ù.
model.makeValue("/root/send/item1/clbs/judgendyn", "B"); // »çÈĽɻç-½É»ç¿Ï·á¿©ºÎ (P0151) - B: ½É»çÁß, C: ½É»ç¿Ï·á
for ( var j = grd_clsphist.fixedRows; j < grd_clsphist.rows; j++) {
var spclLnNo = model.getValue("/root/main/list3/clsp[" + j + "]/seqno");
if (spclLnNo.substr(0, 1) == "D") {
model.setValue("/root/main/list3/clsp[" + j + "]/seqno", spclLnNo.substr(1, spclLnNo.length));
}
}
// ±âŸ¸Þ¸ð(JX999)¸¦ ƯÁ¤³»¿ª Çü½Ä¿¡ ¸ÂÃç ¼³Á¤
fSetSpclSpecJX999();
var updtdata = getGridUpdateData(grd_clsphist); // (tfHelper.js) ±×¸®µå ¾÷µ¥ÀÌÆ® µ¥ÀÌÅÍ ¹Ýȯ, ¾÷µ¥ÀÌÆ® Á¤º¸°¡ ¾øÀ»°æ¿ì "" ¹Ýȯ
if (updtdata) {
model.makeValue("/root/send/list3/clsp", updtdata);
}
submit("TXPID20315");
model.refreshpart("/root/main/list3");
fGetSelectedUnitFlag();
}
}
function fGetKDrgOpenPopup(){
var pid = model.getValue("/root/main/item1/clbs/pid");
var pidsn = model.getValue("/root/main/item1/clbs/pidsn");
var clamdg = model.getValue("/root/main/item1/clbs/clamdg");
var clamym = model.getValue("/root/main/item1/clbs/clamym");
var ordrsltcd = model.getValue("/root/main/item1/clbs/ordrsltcd");
setParameter("pid", pid);
setParameter("pidsn", pidsn);
setParameter("clamdg", clamdg);
setParameter("clamym", clamym);
setParameter("ordrsltcd", ordrsltcd);
open("SPPID31000" ,"", "10", "10", "SPPID31000", "/root/hidden/SPPID31000/cond", "/root/send/data/drginfo", "", "");
}