/* ---------------------------------------------------------------------

  ¸¶Ãë¹æ¹ýµî·Ï(SMMNP01100.xfm - JScript )

  - Version :
      1)  : Ver.1.00.01
          : Create By  K. J. M
          : 2010.02.09
----------------------------------------------------------------------  */

/* ------------------------------------------------- */
/* SMMNP01100_¸¶Ãë¹æ¹ýµî·Ï                           */
/* On Load ½Ã Call                                   */
/* ------------------------------------------------- */
/* group  : EMR °£È£ ¼ö¼ú¸¶Ãë                        */
/* ver    : 2010.02.09                               */
/* by     : ±èÁø¸í                                   */
/* --------------------------------------------------*/
/* type   : function                                 */
/* access : public                                   */
/* desc   : xforms-ready½Ã ¼öÇàÇÑ´Ù                  */
/* return :                                          */
/* --------------------------------------------------*/

function fInit() {

    model.removeNodeset("/root/main/anstdrinfo/anstdrlist");
    model.removeNodeset("/root/main/copyanstdringo/copyanstdrlist");



    model.removenode("/root/send");
	model.makeValue("/root/send/reqdata/cdgrupid", "061");//¸¶Ãë°ú
	model.makeValue("/root/send/reqdata/supcdid", "");//¼­ºê±¸ºÐ
	model.makeValue("/root/send/reqdata/cdid", "");//¼­ºê±¸ºÐ
	model.makeValue("/root/send/reqdata/cdnm", "A1");//¼­ºê±¸ºÐ
    submit("TRMNP04903", false);

    model.setValue("/root/main/cond/orddeptcd", model.getValue("/root/init/hardcodeinfo/cdid"));
    model.removenode("/root/send"      );
    model.makeNode("/root/send"        );
    model.makeNode("/root/send/reqdata");
    model.makeValue("/root/send/reqdata/orddept", model.getValue("/root/init/hardcodeinfo/cdid"));
    submit("TRMNP00103");
    model.copyNode("/root/temp/DrInfo/DrLists", "root/init/DrLists");
    model.copyNode("/root/temp/DrInfo2/DrLists", "root/init/DrLists");

    addComboItem("cmb_perf"   , "Àü ü", "", "above" );
    addComboItem("cmb_perf2"   , "Àü ü", "", "above" );

    grd_anstdrlist.explorerbar   = "sort";
    grd_copyanstlist.explorerbar   = "sort";
    grd_anstdrlist.fixedcellcheckbox(0,1) = true;
    grd_copyanstlist.fixedcellcheckbox(0,1) = true;

    model.refresh();

}

/* ------------------------------------------------- */
/* group  : EMR °£È£ ¼ö¼ú¸¶Ãë                        */
/* ver    : 2010.02.09                               */
/* by     : ±èÁø¸í                                   */
/* ------------------------------------------------- */
/* SMMNP01100_¸¶Ãë¹æ¹ýµî·Ï                           */
/* desc   : ¸¶Ãë¹æ¹ýµî·Ï Á¶È¸                        */
/* --------------------------------------------------*/
function fSearch(){
    model.removenode("/root/send");
    model.makeNode("/root/send/reqdata");
    model.copyNode("/root/send/reqdata", "/root/main/cond");
    submit("TRMNP01100");
}

/* ------------------------------------------------- */
/* group  : EMR °£È£ ¼ö¼ú¸¶Ãë                        */
/* ver    : 2010.02.09                               */
/* by     : ±èÁø¸í                                   */
/* ------------------------------------------------- */
/* SMMNP01100_¸¶Ãë¹æ¹ýµî·Ï                           */
/* desc   : ¸¶Ãë¹æ¹ýµî·Ï ÃʱâÈ­                      */
/* --------------------------------------------------*/
function fClear(){
    model.removenode("/root/main/copyanstdringo/copyanstdrlist");//¸¶Ãë¸íº¹»ç ±×¸®µå ÃʱâÈ­
    model.makeNode("/root/main/copyanstdringo/copyanstdrlist");//¸¶Ãë¸íº¹»ç ÀνºÅϽº »ý¼º
    model.refresh();
}

/* ------------------------------------------------- */
/* group  : EMR °£È£ ¼ö¼ú¸¶Ãë                        */
/* ver    : 2010.02.10                               */
/* by     : ±èÁø¸í                                   */
/* ------------------------------------------------- */
/* SMMNP01100_¸¶Ãë¹æ¹ýµî·Ï                           */
/* desc   : ¸¶Ãë¸í º¹»ç                              */
/* --------------------------------------------------*/
function fCopyAnstNm(){

    var cnt = 0;
    model.removenode("/root/main/copyanstdringo/copyanstdrlist");//¸¶Ãë¸íº¹»ç ±×¸®µå ÃʱâÈ­
    model.makeNode("/root/main/copyanstdringo/copyanstdrlist");//¸¶Ãë¸íº¹»ç ÀνºÅϽº »ý¼º

    for( var iRow = 1; iRow < grd_anstdrlist.rows; iRow++ ) {
        if( model.getValue("/root/main/anstdrinfo/anstdrlist[" + iRow + "]/chkflag") == "true" ) {
            if( model.getValue("/root/main/anstdrinfo/anstdrlist[" + iRow + "]/anstccrtno") != "" ) {
                if( model.getValue("/root/main/anstdrinfo/anstdrlist[" + iRow + "]/anstuseflag") == "N" ) {
                    messageBox("¹Ì »ç¿ëÁßÀÎ ¸¶Ãë¸íÀº ¼±Åà ", "E001");
                    model.removenode("/root/main/copyanstdringo/copyanstdrlist");//¸¶Ãë¸íº¹»ç ±×¸®µå ÃʱâÈ­
                    model.makeNode("/root/main/copyanstdringo/copyanstdrlist");//¸¶Ãë¸íº¹»ç ÀνºÅϽº »ý¼º
                    model.refresh();
                    return;
                }
                model.duplicate("/root/main/copyanstdringo/copyanstdrlist", "/root/main/anstdrinfo/anstdrlist["+ iRow +"]");
                cnt++;
            }else {
                messageBox("¹Ì µî·ÏµÈ ¸¶Ãë¸íÀº ¼±Åà ", "E001");
                model.removenode("/root/main/copyanstdringo/copyanstdrlist");//¸¶Ãë¸íº¹»ç ±×¸®µå ÃʱâÈ­
                model.makeNode("/root/main/copyanstdringo/copyanstdrlist");//¸¶Ãë¸íº¹»ç ÀνºÅϽº »ý¼º
                model.refresh();
                return;
            }
        }
    }

    if( cnt < 1 ) {
        messageBox("¼±ÅÃÇϽŠ¸¶Ãë¸íÀÌ ¾ø½À´Ï´Ù.!", "E000");
        return;
    }else {
        model.refresh();
    }

}

/* ------------------------------------------------- */
/* group  : EMR °£È£ ¼ö¼ú¸¶Ãë                        */
/* ver    : 2010.02.10                               */
/* by     : ±èÁø¸í                                   */
/* ------------------------------------------------- */
/* desc   : Case Cart MASTER ÀÚ·áÀúÀåÇ챉            */
/* param  : S:ÀúÀå, D:»èÁ¦                           */
/* return :                                          */
/* ------------------------------------------------- */
function fSave(pFlag){
    var anstccrtno, anstmthdnm, anstuseflag, anstdrid, cartgubn, orddeptcd, newanstdrid, rgstflag, anstappdd;
    var cnt = 0;
    var anstsavelist = "m¢Ëanstdrid¢Ëorddeptcd¢Ëanstmthdnm¢Ëcartgubn¢Ëanstuseflag¢Ëanstccrtno¢Ëdeptinit¢Ëanstappdd";
    var orddeptcd  = model.getValue("/root/init/hardcodeinfo/cdid");
    var anstdrid   = model.getValue("/root/main/cond/anstdrid");
    var cartgubn   = model.getValue("/root/main/cond/cartgubn");

    if( anstdrid == "" ) {
        messageBox("¸¶ÃëÀǸ¦ ¼±ÅÃÇÏÁö ¾Ê¾Ò½À´Ï´Ù.!", "E000");
        model.setFocus("cmb_perf");
        return;
    }

    for(var iRow = 1; iRow < grd_anstdrlist.rows; iRow++ ) {
        if( model.getValue("/root/main/anstdrinfo/anstdrlist[" + iRow + "]/chkflag") == "true" ) {
            anstccrtno  = model.getValue("/root/main/anstdrinfo/anstdrlist[" + iRow +"]/anstccrtno");
            anstmthdnm  = model.getValue("/root/main/anstdrinfo/anstdrlist[" + iRow +"]/anstmthdnm");
            anstuseflag = model.getValue("/root/main/anstdrinfo/anstdrlist[" + iRow +"]/anstuseflag");
            newanstdrid = model.getValue("/root/main/anstdrinfo/anstdrlist[" + iRow +"]/anstdrid");
            anstappdd   = model.getValue("/root/main/anstdrinfo/anstdrlist[" + iRow +"]/anstappdd");
            if( anstdrid != newanstdrid ) {
                messageBox("¼±ÅÃÇÑ ¸¶ÃëÀÇ¿Í ÀúÀåÇÒ·Á´Â ¸¶ÃëÀÇ°¡ °°Áö ¾Ê½À´Ï´Ù.!", "E000");
                model.setFocus("cmb_perf");
                return;
            }
            if( anstmthdnm == "" ) {
                messageBox("¸¶Ãë¸íÀ» ÀÔ·ÂÇÏ¼Å¾ß ÇÕ´Ï´Ù.!", "E000");
                return;
            }
            if( anstccrtno == "" ) {//µî·ÏµÈ Ä«Æ®°¡ ¾Æ´Ï¸é ½Å±Ôµî·Ï, µî·ÏµÈ Ä«Æ®À̸鼭 ¹Ì»ç¿ëÁßÀÌ¸é ¼öÁ¤
                rgstflag = "I";
            }else {
                rgstflag = "U";
            }
            if( pFlag == "D" ) {//»èÁ¦À̸é
                rgstflag = "D";
                anstuseflag = "N";
            }
            if( !((anstccrtno == "")&&(pFlag == "D")) ) {//½Å±Ôµî·ÏÀε¥ »èÁ¦Àΰæ¿ì´Â ½ºÅµ
                cnt++
                anstsavelist = anstsavelist + "¢Ì" + rgstflag   + "¢Ë" + newanstdrid + "¢Ë" + orddeptcd + "¢Ë" + anstmthdnm + "¢Ë" + cartgubn + "¢Ë" + anstuseflag
                                            + "¢Ë" + anstccrtno + "¢Ë" + "AN"        + "¢Ë" + anstappdd;
            }
        }
    }
    if( cnt > 0 ) {
       model.removenode("/root/send");
       model.makeNode("/root/send/reqdata");
       model.copyNode("/root/send/reqdata", "/root/main/cond");
       model.makeValue("/root/send/savedata", anstsavelist);

       submit("TXMNP01102");
    }else {
       messageBox("¼±ÅÃÇϽŠ¸¶Ãë¸íÀÌ ", "E007");
       return;
    }
}


/* -------------------------------------------------  */
/* desc   : ¸¶Ãë¸í º¹»ç                               */
/* param  :                                           */
/* return :                                           */
/* -------------------------------------------------- */
function fAnstCopy(){

    var copylist     = "anstccrtno¢Ëanstmthdnm¢Ëcartgubn¢Ëanstuseflag¢Ëcopyanstdrid¢Ëdeptinit¢Ëanstappdd¢Ëorddeptcd";
    var orddeptcd    = model.getValue("/root/init/hardcodeinfo/cdid");
    var copyanstdrid = model.getValue("/root/main/cond/copyanstdrid");
    var copyflag     = model.getValue("/root/main/cond/copyflag");
    var cartgubn     = model.getValue("/root/main/cond/cartgubn");

    if( copyanstdrid == "" ) {
        messageBox("º¹»çÇÒ ¸¶ÃëÀǸ¦ ¼±ÅÃÇÏÁö ¾Ê¾Ò½À´Ï´Ù.", "E000");
        model.setFocus("cmb_perf2");
        return;
    }else if( copyflag == "" ) {
        messageBox("º¹»ç Á¶°ÇÀ» ¼±ÅÃÇÏÁö ¾Ê¾Ò½À´Ï´Ù.!", "E000");
        model.setFocus("rdo_copyflag");
        return;
    }

    var cnt = 0;
    for( var i=0; i < grd_copyanstlist.rows; i++ ) {
        var chk        = model.getValue("/root/main/copyanstdringo/copyanstdrlist/anstdrlist[" + i + "]/chkflag");
        var anstmthdnm = model.getValue("/root/main/copyanstdringo/copyanstdrlist/anstdrlist[" + i + "]/anstmthdnm");
        var anstccrtno = model.getValue("/root/main/copyanstdringo/copyanstdrlist/anstdrlist[" + i + "]/anstccrtno");
        var anstappdd  = model.getValue("/root/main/copyanstdringo/copyanstdrlist/anstdrlist[" + i +"]/anstappdd");

        if( chk == "true" ) {
            copylist = copylist + "¢Ì" + anstccrtno + "¢Ë" + anstmthdnm + "¢Ë" + cartgubn + "¢Ë" + "Y" +  "¢Ë" + copyanstdrid + "¢Ë" + "AN"
                                + "¢Ë" + anstappdd  + "¢Ë" + orddeptcd;
            cnt++;
        }
    }

    if( cnt > 0 ) {
        model.removenode("/root/send");
        model.makeValue("/root/send/reqdata/copyflag", copyflag);
        model.makeValue("/root/send/savedata", copylist);
        submit("TXMNP01103", false);
        fClear();//¼ö¼ú¸í º¹»ç ÃʱâÈ­
    }else {
        messageBox("¼±ÅÃÇϽŠ¸¶Ãë¸íÀÌ ", "I004");
    }

}

/* -------------------------------------------------  */
/* ------End Of List -------------------------------  */
/* -------------------------------------------------- */