//入力値取得
var itemBlockListHed = TALON.getBlockData_List(1);
var lineDataMap = itemBlockListHed[0];
var _NRNYUKA = lineDataMap['NRNYUKA'];


//発注明細を入荷№で検索して、1件もなければエラーとする
var sql = 
	"SELECT " +
	" NRHATTYU "  + 
	",SQHATTYU "    + 
	"FROM HT011 "       +
	"WHERE NRNYUKA = '" + _NRNYUKA + "'"
	;

var itemSelectList = TALON.select(sql);


//存在しない場合、未選択なのでエラー
if (itemSelectList.length == 0) {

    TALON.addErrorMsg( "発注明細が選択されていません。" );
    TALON.setIsSuccess(false);

}

SELECT  
        AT030.IDTORIHIKISAKI as NRNYUKA
       ,AT030.IDTORIHIKISAKI as IDSIIRESAKI
       ,AT030.CDTORIHIKISAKI as CDTORIHIKISAKI
       ,AT030.TXKANJI as TXKANJI
       ,TLN_DATE_TO_CHAR('YMD',TLN_SYSDATE()) as DTNYUKA
       ,TLN_DATE_TO_CHAR('YMD',TLN_SYSDATE()) as DTKENSYU
       ,null as CDSOUKO
       ,null as TXSOUKO
       ,'10' as STNYUKA
       ,TLN_DATE_TO_CHAR('YMD',TLN_SYSDATE()) as CREATED_DATE
       ,/**%TLN_LOGIN_USER%**/null as CREATED_BY
       ,'XDMF_HF021_0' as CREATED_PRG_NM
       ,TLN_DATE_TO_CHAR('YMD',TLN_SYSDATE()) as UPDATED_DATE
       ,/**%TLN_LOGIN_USER%**/null as UPDATED_BY
       ,'XDMF_HF021_0' as UPDATED_PRG_NM
       ,0 as MODIFY_COUNT
FROM
        AT030
        INNER JOIN (SELECT HT010.IDSIIRESAKI  FROM HT010 INNER JOIN HT011 ON HT011.NRHATTYU = HT010.NRHATTYU WHERE HT011.NRNYUKA IS NULL GROUP BY HT010.IDSIIRESAKI ) HT010
                  ON HT010.IDSIIRESAKI = AT030.IDTORIHIKISAKI 

SELECT  
        HT011.FGNYUKA
       ,HT010.IDSIIRESAKI as IDSIIRESAKI
       ,AT030.TXKANJI as SIRESAKI_NM
       ,HT011.DTNOUKI as DTNOUKI
       ,HT011.QTHATTYU as QTHATTYU
       ,BT010.KBUNITPUR as KBUNITPUR
       ,HT011.NRHATTYU as NRHATTYU
       ,HT011.SQHATTYU as SQHATTYU
       ,AT040.TXSOUKO as TXSOUKO
       ,BT010.TXHINBAN as TXHINBAN
       ,BT010.TXHINMEI as TXHINMEI
       ,HT011.NRNYUKA
       ,HT011.QTKANZAN
       ,HT011.MODIFY_COUNT
       ,BT010.KBUNIT as KBUNIT
       ,BT010.VLKANZAN as VLKANZAN
FROM
 HT011 LEFT JOIN BT010
            ON  HT011.IDHINMOKU = BT010.IDHINMOKU
 LEFT JOIN HT010
            ON  HT011.NRHATTYU = HT010.NRHATTYU
 LEFT JOIN AT040
            ON  HT010.CDSOUKO = AT040.CDSOUKO
 LEFT JOIN AT030
            ON  HT010.IDSIIRESAKI = AT030.IDTORIHIKISAKI
WHERE  
       HT011.NRNYUKA IS NULL

//-------------------------------------------
//［部品］共通
//-------------------------------------------
var _USER_ID = '';
var _FUNC_ID = '';
function tln_com_escape(val) {
    return val.replace("'","''");
}
//システム日付を返す
//更新時、データベースの日付型項目へバインドする際に使用（更新日付など）
function tln_com_nowdate() {
    var sysDate = new java.util.Date();
    return sysDate;
}
//システム日付（文字列 YYYY-MM-DD HH:MI:SS）を返す
//更新時、タイムスタンプ型としてSQLに組み込む際に使用
function tln_com_nowdate_str() {
    var sysDate = new java.util.Date();
    return (sysDate.getYear()+1900) + "-" +  (sysDate.getMonth()+1) + "-" + sysDate.getDate() + " " + sysDate.getHours() + ":" + sysDate.getMinutes() + ":" + sysDate.getSeconds();
}
//文字列型の日付(画面項目)(YYYY/MM/DD)を日付型に変換
function tln_com_todate(val) {
    y = parseInt(val.split("/")[0]) - 1900;
    m = parseInt(val.split("/")[1]) - 1;
    d = parseInt(val.split("/")[2]);

    var sysDate = new java.util.Date(y,m,d);
    return sysDate;
}
//文字列型の日付(YYYY-MM-DD HH:MI)を日付型に変換
function tln_com_todatetime(val) {
    //val = val.replace("-","/")
    var regExp = new RegExp( "-", "g" ) ;
    val = val.replace( regExp , "/" ) ;
    var val1 = val.split(" ")[0];
    var val2 = val.split(" ")[1];

    var y = parseInt(val1.split("/")[0]) - 1900;
    var m = parseInt(val1.split("/")[1]) - 1;
    var d = parseInt(val1.split("/")[2]) + 0;

    var h = parseInt(val2.split(":")[0]);
    var f = parseInt(val2.split(":")[1]);

    var sysDate = new java.util.Date(y,m,d,h,f);
    return sysDate;
}
//日付型を文字列型に変換（単純変換）
function tln_com_date2string(obj) {
    if (obj == null) { 
        return null;
    } else {
        return obj.toString();
    }
}
//日付型を文字列型に変換（YYYY-MM-DD HH:MI:SS変換）
//function tln_com_date2string2(obj) {
//    return (obj.getYear()+1900) + "-" +  tln_com_zpad2(obj.getMonth()+1) + "-" + tln_com_zpad2(obj.getDate()) + " " + tln_com_zpad2(obj.getHours()) + ":" + tln_com_zpad2(obj.getMinutes()) + ":" + tln_com_zpad2(obj.getSeconds());
//}
//日付型を文字列型に変換（YYYY-MM-DD HH:MI:SS変換）
function tln_com_date2string2(obj) {
    var DTYPE = 'DATETIME';
    try {
        var tmp = obj.getHours();
    } catch(e) {
        DTYPE = 'DATE';
    }
    if ( DTYPE == 'DATETIME' ) {
        return (obj.getYear()+1900) + "-" +  tln_com_zpad2(obj.getMonth()+1) + "-" + tln_com_zpad2(obj.getDate()) + " " + tln_com_zpad2(obj.getHours()) + ":" + tln_com_zpad2(obj.getMinutes()) + ":" + tln_com_zpad2(obj.getSeconds());
    } else {
        return (obj.getYear()+1900) + "-" +  tln_com_zpad2(obj.getMonth()+1) + "-" + tln_com_zpad2(obj.getDate()) + " " + "00:00:00";
    }
}
//機能IDを返す（Ver3.2用）
function tln_com_func_id() {
    if (_FUNC_ID == '') {
        _FUNC_ID = TALON.getUserInfoMap().get("FUNC_ID");
    }
    return _FUNC_ID;
}
//ログインユーザーIDを返す
function tln_com_user_id() {
    if (_USER_ID == '') {
        var lineDataMap = TALON.getUserInfoMap();
        _USER_ID = lineDataMap['USER_ID'];
    }
    return _USER_ID;
}
//ログファイルに出力
function tln_com_log(val) {
    var log = TALON.getLogger();
    log.writeDebug(val);
}
//指定文字数でカット
function tln_com_lcut(str,len) {
    return str.substring( 0 , len );
}
//ゼロ詰め（２けた）
function tln_com_zpad2(str) {
    return ( '0' + str ).slice( -2 );
}
//
function tln_timestamp(str) {
    var val = str;
    var regExp = new RegExp( "-", "g" ) ;
    val = val.replace( regExp , "/" ) ;
    var val1  = val.split(" ")[0];
    var val2  = val.split(" ")[1];
    var val2h = val2.split(":")[0];
    var val2m = val2.split(":")[1];
    var val2s = val2.split(":")[2];

    return val1 + " " + val2h + ":" + val2m + ":" + val2s;
}




//-------------------------------------------
//［部品］消費税率
//-------------------------------------------
function getTAX_RATE(_KIJUN) {
    var itemSelectList = TALON.select( "SELECT VLTAXRATE FROM ZT060 WHERE TLN_DATE_TO_CHAR('YMD', DTSTART) <= '" + _KIJUN + "' ORDER BY DTSTART DESC " );
    var lineDataMap = itemSelectList[0];
    var val = lineDataMap['VLTAXRATE'];
    //var val = 0.08;
    return val;
}

//-------------------------------------------
//［部品］会計年度・月序　チェック
//-------------------------------------------
function checkNENDO(_NENDO,GMSEQ) {
    var itemSelectList = TALON.select( "SELECT TXVALUE FROM ZT010 WHERE IDVARIANT = 'ALLOWED_FISCAL_MONTH' " );
    var lineDataMap = itemSelectList[0];
    var _ALLOWED_FISCAL_MONTH = lineDataMap['TXVALUE'];

    if ( ( ( _NENDO * 100 ) + GMSEQ ) < parseInt(_ALLOWED_FISCAL_MONTH) ) {
        TALON.addErrorMsg( "すでに会計締め処理済み取引日のため処理できません" );
        TALON.setIsSuccess(false);
    }

    return true;
}

//-------------------------------------------
//［部品］会計年度
//パラメータ基準日(YYYY/MM/DD)
//-------------------------------------------
function getNENDO(BASE_DATE) {
    var regExp = new RegExp( "-", "g" ) ;
    BASE_DATE = tln_com_date2string2(BASE_DATE).replace( regExp , "/" ) ;
    var BASE_DATE1 = BASE_DATE.split(" ")[0];
    var BASE_DATE2 = BASE_DATE.split(" ")[1];
    BASE_DATE = BASE_DATE1

    var itemSelectList = TALON.select( "SELECT TXVALUE FROM ZT010 WHERE IDVARIANT = 'FIRST_MONTH' " );
    var lineDataMap = itemSelectList[0];
    var _FIRST_MONTH = lineDataMap['TXVALUE'];

    var itemSelectList = TALON.select( "SELECT TXVALUE FROM ZT010 WHERE IDVARIANT = 'LAST_DAY' " );
    var lineDataMap = itemSelectList[0];
    var _LAST_DAY = lineDataMap['TXVALUE'];

    var _END_MONTH = 0;
    var _END_DAY   = 0;
    //END日を取得
    if (_FIRST_MONTH == 1) {
        _END_MONTH = 12;
    } else {
        _END_MONTH = _FIRST_MONTH - 1;
    }
    if (_LAST_DAY == 31) {
        //END_MONTHの最終日(_FIRST_MONTH初日の前日)
        var _TEMP = "1999/" + tln_com_zpad2(_FIRST_MONTH) + "/01" + " "  + "00:00:00";
        var wdate = tln_com_todatetime(_TEMP);
        wdate.setMinutes(wdate.getMinutes() - 1);
        var tdate = tln_com_date2string2(wdate);
        _TEMP = (tdate.toString().split(" ")[0]).substr( 8 , 2 );
        _END_DAY = _TEMP;
    } else {
        if ( ( _END_MONTH == 2 ) && ( _LAST_DAY >= 28 ) ) {
            _END_DAY = 28;
        } else {
            _END_DAY = _LAST_DAY;
        }
    }
    _END_MONTH = tln_com_zpad2(_END_MONTH);
    _END_DAY   = tln_com_zpad2(_END_DAY);
    //TALON.addMsg( _END_MONTH  + "/" + _END_DAY  );

    var _BASE_DATE_NEN = BASE_DATE.split("/")[0];
    var _BASE_DATE_BAS = BASE_DATE.split("/")[1] + BASE_DATE.split("/")[2];
    if ( (_BASE_DATE_BAS >= '0101' ) && (_BASE_DATE_BAS <= ( _END_MONTH + _END_DAY ) ) ) {
        _BASE_DATE_NEN = _BASE_DATE_NEN - 1;
    }

    //TALON.addMsg( _BASE_DATE_NEN );

    return _BASE_DATE_NEN;
}

//-------------------------------------------
//［部品］月例
//パラメータ基準日(YYYY/MM/DD)
//-------------------------------------------
function getGMSEQ(BASE_DATE) {
    var regExp = new RegExp( "-", "g" ) ;
    BASE_DATE = tln_com_date2string2(BASE_DATE).replace( regExp , "/" ) ;
    var BASE_DATE1 = BASE_DATE.split(" ")[0];
    var BASE_DATE2 = BASE_DATE.split(" ")[1];
    BASE_DATE = BASE_DATE1

    var itemSelectList = TALON.select( "SELECT TXVALUE FROM ZT010 WHERE IDVARIANT = 'FIRST_MONTH' " );
    var lineDataMap = itemSelectList[0];
    var _FIRST_MONTH = lineDataMap['TXVALUE'];

    var itemSelectList = TALON.select( "SELECT TXVALUE FROM ZT010 WHERE IDVARIANT = 'LAST_DAY' " );
    var lineDataMap = itemSelectList[0];
    var _LAST_DAY = lineDataMap['TXVALUE'];

    var _BASE_DATE_NEN = BASE_DATE.split("/")[0];
    var _BASE_DATE_MON = BASE_DATE.split("/")[1];
    var _BASE_DATE_DAY = BASE_DATE.split("/")[2];

    //締め日が31の場合はそのまま月で計算
    if (parseInt(_LAST_DAY) == 31) {
        _BASE_DATE_MON = parseInt(_BASE_DATE_MON);
    }

    //締め日が31以外で日付が締め日より大きい場合、翌月数字で計算
    if ( (parseInt(_LAST_DAY) != 31) && (parseInt(_LAST_DAY) < parseInt(_BASE_DATE_DAY)) ) {
        if (_BASE_DATE_MON == 12) {
            _BASE_DATE_MON = 1;
        } else {
            _BASE_DATE_MON = parseInt(_BASE_DATE_MON) + 1;
        }
    }

    //締め日が31以外で日付が締め日より小さい場合、そのままの月数字で計算
    if ( (parseInt(_LAST_DAY) != 31) && (parseInt(_LAST_DAY) >= parseInt(_BASE_DATE_DAY)) ) {
        _BASE_DATE_MON = parseInt(_BASE_DATE_MON);
    }

    var REC = 0;
    if (parseInt(_FIRST_MONTH) > parseInt(_BASE_DATE_MON)) {
        REC = (parseInt(_BASE_DATE_MON) + 12) - (parseInt(_FIRST_MONTH) - 1);
    } else {
        REC = (parseInt(_BASE_DATE_MON)) - (parseInt(_FIRST_MONTH) - 1);
    }

    //TALON.addMsg( REC );

    return REC;
}

//-------------------------------------------
//［部品］休日チェック(1:休日 / 0:平日)
//-------------------------------------------
function getHOLIDAY_FLG(_KBCALENDAR, _DTOFF) {
    var sql = 
        "SELECT  " + 
        "COUNT(*) AS CNT " + 
        "FROM ZT070 " + 
        "WHERE ZT070.KBCALENDAR = '" + _KBCALENDAR + "' " + 
        "  AND ZT070.DTOFF = TLN_CHAR_TO_DATE('YMDHMS','" + tln_timestamp(_DTOFF) + "') "
    ;
    var itemSelectList = TALON.select(sql);
    var lineDataMap    = itemSelectList[0];
    var _CNT = lineDataMap['CNT'];

    return _CNT;
}

//-------------------------------------------
//［部品］品目[BT010]
//-------------------------------------------
function selectBT010(_IDHINMOKU) {
    var sql = 
        "SELECT " +
        " IDHINMOKU "   + 
        ",TXHINBAN "    + 
        ",TXHINMEI "    + 
        ",KBHINSYU "    + 
        ",PRGENKA "     + 
        ",PRHANBAI "    + 
        ",KBUNIT "      + 
        ",KBUNITPUR "   + 
        ",VLKANZAN "    + 
        ",PRKOUNYU "    + 
        ",IDSIIRESAKI " + 
        ",FGZAIKO "     + 
        ",FGKOUNYU "    + 
        ",FGHANBAI "    + 
        ",FGSEIZO "     + 
        ",TXTEKIYO "    + 
        ",CREATED_DATE "   + 
        ",CREATED_BY "     + 
        ",CREATED_PRG_NM " + 
        ",UPDATED_DATE "   + 
        ",UPDATED_BY "     + 
        ",UPDATED_PRG_NM " + 
        ",MODIFY_COUNT "   + 
        "FROM BT010 "       +
        "WHERE IDHINMOKU = '" + _IDHINMOKU + "'"
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;

}

//-------------------------------------------
//［部品］仕入先[DT010]
//-------------------------------------------
function selectDT010(_IDSIIRESAKI) {
    var sql = 
        "SELECT " +
        " IDSIIRESAKI      " + 
        ",KBSIHARAI        " + 
        ",TXHURIKOMI       " + 
        ",TXTEKIYO         " + 
        ",AMKISYUKAIKAKE   " + 
        ",AMSIIRE          " + 
        ",AMSIHARAI        " + 
        ",AMGENKAIKAKE     " + 
        ",CREATED_DATE     " + 
        ",CREATED_BY       " + 
        ",CREATED_PRG_NM   " + 
        ",UPDATED_DATE     " + 
        ",UPDATED_BY       " + 
        ",UPDATED_PRG_NM   " + 
        ",MODIFY_COUNT     " + 
        "FROM DT010 "       +
        "WHERE IDSIIRESAKI = '" + _IDSIIRESAKI + "'"
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}
function updateDT010(itemDataList) {
    //項目
    var itemColNameTbl = [
         'IDSIIRESAKI'
        ,'KBSIHARAI'
        ,'TXHURIKOMI'
        ,'TXTEKIYO'
        ,'AMKISYUKAIKAKE'
        ,'AMSIIRE'
        ,'AMSIHARAI'
        ,'AMGENKAIKAKE'
        ,'CREATED_DATE'
        ,'CREATED_BY'
        ,'CREATED_PRG_NM'
        ,'UPDATED_DATE'
        ,'UPDATED_BY'
        ,'UPDATED_PRG_NM'
        ,'MODIFY_COUNT'
    ];

    var itemSelectList = selectDT010(itemDataList['IDSIIRESAKI']);

    var lineDataMap = itemSelectList[0];
    var _MODIFY_COUNT = lineDataMap['MODIFY_COUNT'];

    //UPDATE
    itemDataList['UPDATED_DATE']   = tln_com_nowdate();
    itemDataList['UPDATED_BY']     = tln_com_user_id();
    itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
    itemDataList['MODIFY_COUNT']   = (_MODIFY_COUNT + 1);

    var whereList = new Array();
    var whereTbl1 = [ null, '=' , 'IDSIIRESAKI' ];
    whereList.push(whereTbl1);

    TALON.updateByMap( 'DT010', itemDataList , itemColNameTbl , whereList );

}

//-------------------------------------------
//［部品］得意先[ET010]
//-------------------------------------------
function selectET010(_IDTOKUISAKI) {
    var sql = 
        "SELECT " +
        " IDTOKUISAKI         " + 
        ",TXTANTOUBUSYO       " + 
        ",TXTANTOUSYA         " + 
        ",TXTANTOUSYASYOKUI   " + 
        ",TXTANTOUSYAEMAIL    " + 
        ",TXTANTOUSYADENWA    " + 
        ",KBSEIKYUHOUSHIKI    " + 
        ",TXSIMEBI            " + 
        ",KBNYUKINHOUHOU      " + 
        ",VLNYUKINSAITO       " + 
        ",AMYOSHIN            " + 
        ",NRTANTOUJYUGYOIN    " + 
        ",TXTEKIYO            " + 
        ",AMKISYUURIKAKE      " + 
        ",AMURIAGE            " + 
        ",AMJYURYO            " + 
        ",AMGENURIKAKE        " + 
        ",CREATED_DATE        " + 
        ",CREATED_BY          " + 
        ",CREATED_PRG_NM      " + 
        ",UPDATED_DATE        " + 
        ",UPDATED_BY          " + 
        ",UPDATED_PRG_NM      " + 
        ",MODIFY_COUNT        " + 
        "FROM ET010 "       +
        "WHERE IDTOKUISAKI = '" + _IDTOKUISAKI + "'"
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}
function updateET010(itemDataList) {
    //項目
    var itemColNameTbl = [
         'IDTOKUISAKI'
        ,'TXTANTOUBUSYO'
        ,'TXTANTOUSYA'
        ,'TXTANTOUSYASYOKUI'
        ,'TXTANTOUSYAEMAIL'
        ,'TXTANTOUSYADENWA'
        ,'KBSEIKYUHOUSHIKI'
        ,'TXSIMEBI'
        ,'KBNYUKINHOUHOU'
        ,'VLNYUKINSAITO'
        ,'AMYOSHIN'
        ,'NRTANTOUJYUGYOIN'
        ,'TXTEKIYO'
        ,'AMKISYUURIKAKE'
        ,'AMURIAGE'
        ,'AMJYURYO'
        ,'AMGENURIKAKE'
        ,'CREATED_DATE'
        ,'CREATED_BY'
        ,'CREATED_PRG_NM'
        ,'UPDATED_DATE'
        ,'UPDATED_BY'
        ,'UPDATED_PRG_NM'
        ,'MODIFY_COUNT'
    ];

    var itemSelectList = selectET010(itemDataList['IDTOKUISAKI']);

    var lineDataMap = itemSelectList[0];
    var _MODIFY_COUNT = lineDataMap['MODIFY_COUNT'];

    //UPDATE
    itemDataList['UPDATED_DATE']   = tln_com_nowdate();
    itemDataList['UPDATED_BY']     = tln_com_user_id();
    itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
    itemDataList['MODIFY_COUNT']   = (_MODIFY_COUNT + 1);

    var whereList = new Array();
    var whereTbl1 = [ null, '=' , 'IDTOKUISAKI' ];
    whereList.push(whereTbl1);

    TALON.updateByMap( 'ET010', itemDataList , itemColNameTbl , whereList );

}

//-------------------------------------------
//［部品］倉庫在庫[FT010]
//-------------------------------------------
function selectFT010(_IDHINMOKU, _CDSOUKO) {
    var sql = 
        "SELECT " +
        " IDHINMOKU "  + 
        ",CDSOUKO "    + 
        ",QTKISYU "    + 
        ",QTNYUKO "    + 
        ",QTSYUKKO "   + 
        ",AMKISYU "    + 
        ",AMNYUKO "    + 
        ",AMSYUKKO "   + 
        ",QTGENZAIKO " + 
        ",AMGENZAIKO " + 
        ",PRGENZAIKO "     + 
        ",CREATED_DATE "   + 
        ",CREATED_BY "     + 
        ",CREATED_PRG_NM " + 
        ",UPDATED_DATE "   + 
        ",UPDATED_BY "     + 
        ",UPDATED_PRG_NM " + 
        ",MODIFY_COUNT "   + 
        "FROM FT010 "       +
        "WHERE IDHINMOKU = '" + _IDHINMOKU + "'" + 
        "  AND CDSOUKO   = '" + _CDSOUKO   + "'"
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}
function selectFT010_CDSOUKO(_CDSOUKO) {
    var sql = 
        "SELECT " +
        " IDHINMOKU "  + 
        ",CDSOUKO "    + 
        ",QTKISYU "    + 
        ",QTNYUKO "    + 
        ",QTSYUKKO "   + 
        ",AMKISYU "    + 
        ",AMNYUKO "    + 
        ",AMSYUKKO "   + 
        ",QTGENZAIKO " + 
        ",AMGENZAIKO " + 
        ",PRGENZAIKO "     + 
        ",CREATED_DATE "   + 
        ",CREATED_BY "     + 
        ",CREATED_PRG_NM " + 
        ",UPDATED_DATE "   + 
        ",UPDATED_BY "     + 
        ",UPDATED_PRG_NM " + 
        ",MODIFY_COUNT "   + 
        "FROM FT010 "       +
        "WHERE CDSOUKO = '" + _CDSOUKO + "'"
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}
function updateFT010(itemDataList) {
    //項目
    var itemColNameTbl = [
         'IDHINMOKU'
        ,'CDSOUKO'
        ,'QTKISYU'
        ,'QTNYUKO'
        ,'QTSYUKKO'
        ,'AMKISYU'
        ,'AMNYUKO'
        ,'AMSYUKKO'
        ,'QTGENZAIKO'
        ,'AMGENZAIKO'
        ,'PRGENZAIKO'
        ,'CREATED_DATE'
        ,'CREATED_BY'
        ,'CREATED_PRG_NM'
        ,'UPDATED_DATE'
        ,'UPDATED_BY'
        ,'UPDATED_PRG_NM'
        ,'MODIFY_COUNT'
    ];

    //共通
    //--------
    //現在庫数
    itemDataList['QTGENZAIKO']     = itemDataList['QTKISYU'] + itemDataList['QTNYUKO'] - itemDataList['QTSYUKKO'];
    //現在庫額
    itemDataList['AMGENZAIKO']     = itemDataList['AMKISYU'] + itemDataList['AMNYUKO'] - itemDataList['AMSYUKKO'];
    //現在庫単価
    if (itemDataList['QTGENZAIKO'] == 0) {
        itemDataList['PRGENZAIKO'] = 0;
    } else {
        itemDataList['PRGENZAIKO'] = itemDataList['AMGENZAIKO'] / itemDataList['QTGENZAIKO'];
    }

    //データが存在する場合はupdate、存在しない場合はinsert

    var itemSelectList = selectFT010(itemDataList['IDHINMOKU'], itemDataList['CDSOUKO']);
    if (itemSelectList.length == 0) {
        //INSERT
        itemDataList['CREATED_DATE']   = tln_com_nowdate();
        itemDataList['CREATED_BY']     = tln_com_user_id();
        itemDataList['CREATED_PRG_NM'] = tln_com_func_id();
        itemDataList['UPDATED_DATE']   = tln_com_nowdate();
        itemDataList['UPDATED_BY']     = tln_com_user_id();
        itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
        itemDataList['MODIFY_COUNT']   = 1;

        TALON.insertByMap( 'FT010', itemDataList , itemColNameTbl );

    } else {
        var lineDataMap = itemSelectList[0];
        var _MODIFY_COUNT = lineDataMap['MODIFY_COUNT'];

        //UPDATE
        itemDataList['UPDATED_DATE']   = tln_com_nowdate();
        itemDataList['UPDATED_BY']     = tln_com_user_id();
        itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
        itemDataList['MODIFY_COUNT']   = (_MODIFY_COUNT + 1);

        var whereList = new Array();
        var whereTbl1 = [ null, '=' , 'IDHINMOKU' ];
        var whereTbl2 = [ null, '=' , 'CDSOUKO'   ];
        whereList.push(whereTbl1);
        whereList.push(whereTbl2);

        TALON.updateByMap( 'FT010', itemDataList , itemColNameTbl , whereList );

    }
}

//-------------------------------------------
//［部品］在庫増減履歴[FT100]
//-------------------------------------------
function selectFT100(_NRZAITORI) {
    var sql = 
        "SELECT " +
        " NRZAITORI " + 
        ",DTTORIHIKI " + 
        ",KBUKEBARAI " + 
        ",KBZAIHURI " + 
        ",KBAKADEN " + 
        ",FGVALID " + 
        ",IDHINMOKU " + 
        ",TXHINBAN " + 
        ",TXHINMEI " + 
        ",KBUNIT " + 
        ",CDSOUKO " + 
        ",TXAITESAKI " + 
        ",PRTORIHIKI " + 
        ",QTTORIHIKI " + 
        ",AMTORIHIKI " + 
        ",AMSAGAKU " + 
        ",NRSOURCE " + 
        ",DTCREATE " + 
        ",TXREFNO " + 
        ",DTNEND " + 
        ",DTMSEQ " + 
        ",QTZOUGEN " + 
        ",AMZOUGEN " + 
        ",CREATED_DATE " + 
        ",CREATED_BY " + 
        ",CREATED_PRG_NM " + 
        ",UPDATED_DATE " + 
        ",UPDATED_BY " + 
        ",UPDATED_PRG_NM " + 
        ",MODIFY_COUNT " + 
        "FROM FT100 "       +
        "WHERE NRZAITORI = '" + _NRZAITORI + "'"
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}
function updateFT100(itemDataList) {
    //項目
    var itemColNameTbl = [
         'NRZAITORI'
        ,'DTTORIHIKI'
        ,'KBUKEBARAI'
        ,'KBZAIHURI'
        ,'KBAKADEN'
        ,'FGVALID'
        ,'IDHINMOKU'
        ,'TXHINBAN'
        ,'TXHINMEI'
        ,'KBUNIT'
        ,'CDSOUKO'
        ,'TXAITESAKI'
        ,'PRTORIHIKI'
        ,'QTTORIHIKI'
        ,'AMTORIHIKI'
        ,'AMSAGAKU'
        ,'NRSOURCE'
        ,'DTCREATE'
        ,'TXREFNO'
        ,'DTNEND'
        ,'DTMSEQ'
        ,'QTZOUGEN'
        ,'AMZOUGEN'
        ,'CREATED_DATE'
        ,'CREATED_BY'
        ,'CREATED_PRG_NM'
        ,'UPDATED_DATE'
        ,'UPDATED_BY'
        ,'UPDATED_PRG_NM'
        ,'MODIFY_COUNT'
    ];

    //関連情報補填(採番)
    //在庫取引№
    var numList = TALON.getNumberingData('XDMF_FF_ZAITORI', 1)
    itemDataList['NRZAITORI']     = numList[0];

    //関連情報補填(品目マスタ)
    var itemSelectList = selectBT010(itemDataList['IDHINMOKU']);
    var lineDataMap = itemSelectList[0];

    //品番
    itemDataList['TXHINBAN']      = lineDataMap['TXHINBAN'];
    //品名
    itemDataList['TXHINMEI']      = lineDataMap['TXHINMEI'];
    //単位区分
    itemDataList['KBUNIT']        = lineDataMap['KBUNIT'];

    //取引差額
    if ( (itemDataList['AMSAGAKU'] == "") || (itemDataList['AMSAGAKU'] == null) ) {
        itemDataList['AMSAGAKU']      = 0;
    }

    //共通
    itemDataList['CREATED_DATE']   = tln_com_nowdate();
    itemDataList['CREATED_BY']     = tln_com_user_id();
    itemDataList['CREATED_PRG_NM'] = tln_com_func_id();
    itemDataList['UPDATED_DATE']   = tln_com_nowdate();
    itemDataList['UPDATED_BY']     = tln_com_user_id();
    itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
    itemDataList['MODIFY_COUNT']   = 1;


    var _NENDO = getNENDO(itemDataList['DTTORIHIKI']);
    var _GMSEQ = getGMSEQ(itemDataList['DTTORIHIKI']);
    checkNENDO(_NENDO, _GMSEQ);
    //年度
    itemDataList['DTNEND']        = _NENDO;
    //月序
    itemDataList['DTMSEQ']        = _GMSEQ;


    TALON.insertByMap( 'FT100', itemDataList , itemColNameTbl );

}
function insertAkaFT100(_NRZAITORI) {

    //関連情報補填(採番)
    //在庫取引№
    var numList = TALON.getNumberingData('XDMF_FF_ZAITORI', 1)
    _NEXT_NRZAITORI     = numList[0];

    //
    TALON.insert(
                " INSERT INTO FT100 ( " + 
                "  NRZAITORI " + 
                " ,DTTORIHIKI " + 
                " ,KBUKEBARAI " + 
                " ,KBZAIHURI " + 
                " ,KBAKADEN " + 
                " ,FGVALID " + 
                " ,IDHINMOKU " + 
                " ,TXHINBAN " + 
                " ,TXHINMEI " + 
                " ,KBUNIT " + 
                " ,CDSOUKO " + 
                " ,TXAITESAKI " + 
                " ,PRTORIHIKI " + 
                " ,QTTORIHIKI " + 
                " ,AMTORIHIKI " + 
                " ,AMSAGAKU " + 
                " ,NRSOURCE " + 
                " ,DTCREATE " + 
                " ,TXREFNO " + 
                " ,DTNEND " + 
                " ,DTMSEQ " + 
                " ,QTZOUGEN " + 
                " ,AMZOUGEN " + 
                " ,CREATED_DATE " + 
                " ,CREATED_BY " + 
                " ,CREATED_PRG_NM " + 
                " ,UPDATED_DATE " + 
                " ,UPDATED_BY " + 
                " ,UPDATED_PRG_NM " + 
                " ,MODIFY_COUNT " + 
                " )  " + 
                " SELECT  " + 
                "  '" + _NEXT_NRZAITORI + "' " + 
                " ,DTTORIHIKI " + 
                " ,KBUKEBARAI " + 
                " ,KBZAIHURI  " + 
                " ,'2' " + 
                " ,'F' " + 
                " ,IDHINMOKU  " + 
                " ,TXHINBAN   " + 
                " ,TXHINMEI   " + 
                " ,KBUNIT     " + 
                " ,CDSOUKO    " + 
                " ,TXAITESAKI " + 
                " ,PRTORIHIKI " + 
                " ,QTTORIHIKI " + 
                " ,AMTORIHIKI " + 
                " ,AMSAGAKU   " + 
                " ,NRSOURCE   " + 
                " ,DTCREATE   " + 
                " ,TXREFNO    " + 
                " ,DTNEND     " + 
                " ,DTMSEQ     " + 
                " ,(QTZOUGEN * -1) " + 
                " ,(AMZOUGEN * -1) " + 
                " ,TLN_CHAR_TO_DATE('YMDHMS','" + tln_timestamp(tln_com_nowdate_str()) + "') " + 
                " ,'" + tln_com_user_id() + "' " + 
                " ,'" + tln_com_func_id() + "' " + 
                " ,TLN_CHAR_TO_DATE('YMDHMS','" + tln_timestamp(tln_com_nowdate_str()) + "') " + 
                " ,'" + tln_com_user_id() + "' " + 
                " ,'" + tln_com_func_id() + "' " + 
                " ,0    " + 
                " FROM FT100       " + 
                " WHERE NRZAITORI = '" + _NRZAITORI + "'"
                );
}


//-------------------------------------------
//［部品］買掛増減履歴[DT100]
//-------------------------------------------
function selectDT100(_NRKAIKAKE) {
    var sql = 
        "SELECT " +
        " NRKAIKAKE " + 
        ",IDSIIRESAKI " + 
        ",DTTORIHIKI " + 
        ",KBKAITORI " + 
        ",KBKAIHURI " + 
        ",KBAKADEN " + 
        ",FGVALID " + 
        ",IDHINMOKU " + 
        ",TXHINBAN " + 
        ",TXHINMEI " + 
        ",KBUNIT " + 
        ",PRTORIHIKI " + 
        ",QTTORIHIKI " + 
        ",AMTORIHIKI " + 
        ",AMTAX " + 
        ",NRSIHARAI " + 
        ",NRSOURCE " + 
        ",DTCREATE " + 
        ",TXREFNO " + 
        ",DTNEND " + 
        ",DTMSEQ " + 
        ",AMZOUGEN " + 
        ",CREATED_DATE " + 
        ",CREATED_BY " + 
        ",CREATED_PRG_NM " + 
        ",UPDATED_DATE " + 
        ",UPDATED_BY " + 
        ",UPDATED_PRG_NM " + 
        ",MODIFY_COUNT " + 
        "FROM DT100 "       +
        "WHERE NRKAIKAKE = '" + _NRKAIKAKE + "'"
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}
function updateDT100(itemDataList) {
    //項目
    var itemColNameTbl = [
         'NRKAIKAKE'
        ,'IDSIIRESAKI'
        ,'DTTORIHIKI'
        ,'KBKAITORI'
        ,'KBKAIHURI'
        ,'KBAKADEN'
        ,'FGVALID'
        ,'IDHINMOKU'
        ,'TXHINBAN'
        ,'TXHINMEI'
        ,'KBUNIT'
        ,'PRTORIHIKI'
        ,'QTTORIHIKI'
        ,'AMTORIHIKI'
        ,'AMTAX'
        ,'NRSIHARAI'
        ,'NRSOURCE'
        ,'DTCREATE'
        ,'TXREFNO'
        ,'DTNEND'
        ,'DTMSEQ'
        ,'AMZOUGEN'
        ,'CREATED_DATE'
        ,'CREATED_BY'
        ,'CREATED_PRG_NM'
        ,'UPDATED_DATE'
        ,'UPDATED_BY'
        ,'UPDATED_PRG_NM'
        ,'MODIFY_COUNT'
    ];

    //関連情報補填(採番)
    //買掛取引№
    var numList = TALON.getNumberingData('XDMF_DF_KAIKAKE', 1)
    itemDataList['NRKAIKAKE']     = numList[0];


    //関連情報補填(品目マスタ) ※品目IDが入っているときのみ
    if (itemDataList['IDHINMOKU'] != '') {
        var itemSelectList = selectBT010(itemDataList['IDHINMOKU']);
        var lineDataMap = itemSelectList[0];

        //品番
        itemDataList['TXHINBAN']      = lineDataMap['TXHINBAN'];
        //品名
        itemDataList['TXHINMEI']      = lineDataMap['TXHINMEI'];
        //単位区分
        itemDataList['KBUNIT']        = lineDataMap['KBUNITPUR'];
    }


    //共通
    itemDataList['CREATED_DATE']   = tln_com_nowdate();
    itemDataList['CREATED_BY']     = tln_com_user_id();
    itemDataList['CREATED_PRG_NM'] = tln_com_func_id();
    itemDataList['UPDATED_DATE']   = tln_com_nowdate();
    itemDataList['UPDATED_BY']     = tln_com_user_id();
    itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
    itemDataList['MODIFY_COUNT']   = 1;


    var _NENDO = getNENDO(itemDataList['DTTORIHIKI']);
    var _GMSEQ = getGMSEQ(itemDataList['DTTORIHIKI']);
    checkNENDO(_NENDO, _GMSEQ);
    //年度
    itemDataList['DTNEND']        = _NENDO;
    //月序
    itemDataList['DTMSEQ']        = _GMSEQ;


    TALON.insertByMap( 'DT100', itemDataList , itemColNameTbl );

}
function insertAkaDT100(_NRKAIKAKE) {

    //関連情報補填(採番)
    //買掛取引№
    var numList = TALON.getNumberingData('XDMF_DF_KAIKAKE', 1)
    _NEXT_NRKAIKAKE     = numList[0];

    //
    TALON.insert(
                " INSERT INTO DT100 ( " + 
                "  NRKAIKAKE " + 
                " ,IDSIIRESAKI " + 
                " ,DTTORIHIKI " + 
                " ,KBKAITORI " + 
                " ,KBKAIHURI " + 
                " ,KBAKADEN " + 
                " ,FGVALID " + 
                " ,IDHINMOKU " + 
                " ,TXHINBAN " + 
                " ,TXHINMEI " + 
                " ,KBUNIT " + 
                " ,PRTORIHIKI " + 
                " ,QTTORIHIKI " + 
                " ,AMTORIHIKI " + 
                " ,AMTAX " + 
                " ,NRSIHARAI " + 
                " ,NRSOURCE " + 
                " ,DTCREATE " + 
                " ,TXREFNO " + 
                " ,DTNEND " + 
                " ,DTMSEQ " + 
                " ,AMZOUGEN " + 
                " ,CREATED_DATE " + 
                " ,CREATED_BY " + 
                " ,CREATED_PRG_NM " + 
                " ,UPDATED_DATE " + 
                " ,UPDATED_BY " + 
                " ,UPDATED_PRG_NM " + 
                " ,MODIFY_COUNT " + 
                " )  " + 
                " SELECT  " + 
                "  '" + _NEXT_NRKAIKAKE + "' " + 
                " ,IDSIIRESAKI " + 
                " ,DTTORIHIKI " + 
                " ,KBKAITORI " + 
                " ,KBKAIHURI " + 
                " ,'2' " + 
                " ,'F' " + 
                " ,IDHINMOKU " + 
                " ,TXHINBAN " + 
                " ,TXHINMEI " + 
                " ,KBUNIT " + 
                " ,PRTORIHIKI " + 
                " ,QTTORIHIKI " + 
                " ,AMTORIHIKI " + 
                " ,AMTAX " + 
                " ,NRSIHARAI " + 
                " ,NRSOURCE " + 
                " ,DTCREATE " + 
                " ,TXREFNO " + 
                " ,DTNEND " + 
                " ,DTMSEQ " + 
                " ,(AMZOUGEN * -1) " + 
                " ,TLN_CHAR_TO_DATE('YMDHMS','" + tln_timestamp(tln_com_nowdate_str()) + "') " + 
                " ,'" + tln_com_user_id() + "' " + 
                " ,'" + tln_com_func_id() + "' " + 
                " ,TLN_CHAR_TO_DATE('YMDHMS','" + tln_timestamp(tln_com_nowdate_str()) + "') " + 
                " ,'" + tln_com_user_id() + "' " + 
                " ,'" + tln_com_func_id() + "' " + 
                " ,0    " + 
                " FROM DT100       " + 
                " WHERE NRKAIKAKE = '" + _NRKAIKAKE + "'"
                );
}

//-------------------------------------------
//［部品］売掛増減履歴[ET100]
//-------------------------------------------
function selectET100(_NRURIKAKE) {
    var sql = 
        "SELECT " +
        " NRURIKAKE " + 
        ",IDTOKUISAKI " + 
        ",DTTORIHIKI " + 
        ",KBURITORI " + 
        ",KBURIHURI " + 
        ",KBAKADEN " + 
        ",FGVALID " + 
        ",IDHINMOKU " + 
        ",TXHINBAN " + 
        ",TXHINMEI " + 
        ",KBUNIT " + 
        ",PRTORIHIKI " + 
        ",QTTORIHIKI " + 
        ",AMTAX " + 
        ",AMGENKA " + 
        ",NRSOURCE " + 
        ",NRSEIKYU " + 
        ",DTCREATE " + 
        ",TXREFNO " + 
        ",DTNEND " + 
        ",DTMSEQ " + 
        ",AMARARI " + 
        ",AMZOUGEN " + 
        ",CREATED_DATE " + 
        ",CREATED_BY " + 
        ",CREATED_PRG_NM " + 
        ",UPDATED_DATE " + 
        ",UPDATED_BY " + 
        ",UPDATED_PRG_NM " + 
        ",MODIFY_COUNT " + 
        ",AMTORIHIKI " + 
        "FROM ET100 "       +
        "WHERE NRURIKAKE = '" + _NRURIKAKE + "'"
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}
function updateET100(itemDataList) {
    //項目
    var itemColNameTbl = [
         'NRURIKAKE'
        ,'IDTOKUISAKI'
        ,'DTTORIHIKI'
        ,'KBURITORI'
        ,'KBURIHURI'
        ,'KBAKADEN'
        ,'FGVALID'
        ,'IDHINMOKU'
        ,'TXHINBAN'
        ,'TXHINMEI'
        ,'KBUNIT'
        ,'PRTORIHIKI'
        ,'QTTORIHIKI'
        ,'AMTAX'
        ,'AMGENKA'
        ,'NRSOURCE'
        ,'NRSEIKYU'
        ,'DTCREATE'
        ,'TXREFNO'
        ,'DTNEND'
        ,'DTMSEQ'
        ,'AMARARI'
        ,'AMZOUGEN'
        ,'CREATED_DATE'
        ,'CREATED_BY'
        ,'CREATED_PRG_NM'
        ,'UPDATED_DATE'
        ,'UPDATED_BY'
        ,'UPDATED_PRG_NM'
        ,'MODIFY_COUNT'
        ,'AMTORIHIKI'
    ];

    //関連情報補填(採番)
    //買掛取引№
    var numList = TALON.getNumberingData('XDMF_EF_URIKAKE', 1)
    itemDataList['NRURIKAKE']     = numList[0];


    //関連情報補填(品目マスタ) ※品目IDが入っているときのみ
    if (itemDataList['IDHINMOKU'] != '') {
        var itemSelectList = selectBT010(itemDataList['IDHINMOKU']);
        var lineDataMap = itemSelectList[0];

        //品番
        itemDataList['TXHINBAN']      = lineDataMap['TXHINBAN'];
        //品名
        itemDataList['TXHINMEI']      = lineDataMap['TXHINMEI'];
        //単位区分
        itemDataList['KBUNIT']        = lineDataMap['KBUNIT'];
    }


    //共通
    itemDataList['CREATED_DATE']   = tln_com_nowdate();
    itemDataList['CREATED_BY']     = tln_com_user_id();
    itemDataList['CREATED_PRG_NM'] = tln_com_func_id();
    itemDataList['UPDATED_DATE']   = tln_com_nowdate();
    itemDataList['UPDATED_BY']     = tln_com_user_id();
    itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
    itemDataList['MODIFY_COUNT']   = 1;


    var _NENDO = getNENDO(itemDataList['DTTORIHIKI']);
    var _GMSEQ = getGMSEQ(itemDataList['DTTORIHIKI']);
    checkNENDO(_NENDO, _GMSEQ);
    //年度
    itemDataList['DTNEND']        = _NENDO;
    //月序
    itemDataList['DTMSEQ']        = _GMSEQ;


    TALON.insertByMap( 'ET100', itemDataList , itemColNameTbl );

}
function insertAkaET100(_NRURIKAKE) {

    //関連情報補填(採番)
    //買掛取引№
    var numList = TALON.getNumberingData('XDMF_EF_URIKAKE', 1)
    _NEXT_NRURIKAKE     = numList[0];

    //
    TALON.insert(
                " INSERT INTO ET100 ( " + 
                "  NRURIKAKE " + 
                " ,IDTOKUISAKI " + 
                " ,DTTORIHIKI " + 
                " ,KBURITORI " + 
                " ,KBURIHURI " + 
                " ,KBAKADEN " + 
                " ,FGVALID " + 
                " ,IDHINMOKU " + 
                " ,TXHINBAN " + 
                " ,TXHINMEI " + 
                " ,KBUNIT " + 
                " ,PRTORIHIKI " + 
                " ,QTTORIHIKI " + 
                " ,AMTAX " + 
                " ,AMGENKA " + 
                " ,NRSOURCE " + 
                " ,NRSEIKYU " + 
                " ,DTCREATE " + 
                " ,TXREFNO " + 
                " ,DTNEND " + 
                " ,DTMSEQ " + 
                " ,AMARARI " + 
                " ,AMZOUGEN " + 
                " ,AMTORIHIKI " + 
                " ,CREATED_DATE " + 
                " ,CREATED_BY " + 
                " ,CREATED_PRG_NM " + 
                " ,UPDATED_DATE " + 
                " ,UPDATED_BY " + 
                " ,UPDATED_PRG_NM " + 
                " ,MODIFY_COUNT " + 
                " )  " + 
                " SELECT  " + 
                "  '" + _NEXT_NRURIKAKE + "' " + 
                " ,IDTOKUISAKI " + 
                " ,DTTORIHIKI " + 
                " ,KBURITORI " + 
                " ,KBURIHURI " + 
                " ,'2' " + 
                " ,'F' " + 
                " ,IDHINMOKU " + 
                " ,TXHINBAN " + 
                " ,TXHINMEI " + 
                " ,KBUNIT " + 
                " ,PRTORIHIKI " + 
                " ,QTTORIHIKI " + 
                " ,AMTAX " + 
                " ,AMGENKA " + 
                " ,NRSOURCE " + 
                " ,NRSEIKYU " + 
                " ,DTCREATE " + 
                " ,TXREFNO " + 
                " ,DTNEND " + 
                " ,DTMSEQ " + 
                " ,AMARARI " + 
                " ,(AMZOUGEN * -1) " + 
                " ,AMTORIHIKI " + 
                " ,TLN_CHAR_TO_DATE('YMDHMS','" + tln_timestamp(tln_com_nowdate_str()) + "') " + 
                " ,'" + tln_com_user_id() + "' " + 
                " ,'" + tln_com_func_id() + "' " + 
                " ,TLN_CHAR_TO_DATE('YMDHMS','" + tln_timestamp(tln_com_nowdate_str()) + "') " + 
                " ,'" + tln_com_user_id() + "' " + 
                " ,'" + tln_com_func_id() + "' " + 
                " ,0    " + 
                " FROM ET100       " + 
                " WHERE NRURIKAKE = '" + _NRURIKAKE + "'"
                );
}

//-------------------------------------------
//［部品］製造指示[JT010]
//-------------------------------------------
function selectJT010(_NRSEIZO) {
    var sql = 
    " SELECT  " + 
    "  NRSEIZO " + 
    " ,IDTOKUISAKI " + 
    " ,SQSYUKKASAKI " + 
    " ,TXTYUMONBANGO " + 
    " ,IDHINMOKU " + 
    " ,DTNOUKI " + 
    " ,QTJYUTYU " + 
    " ,QTSYUKKA " + 
    " ,QTSEIZO " + 
    " ,QTKANSEI " + 
    " ,QTHURYO " + 
    " ,QTHAIKI " + 
    " ,AMGENKA " + 
    " ,PRMITSUMORI " + 
    " ,PRJYUTYU " + 
    " ,TXTEKIYO " + 
    " ,CDSOUKOKAN " + 
    " ,CDSOUKOZAI " + 
    " ,DTCREATE " + 
    " ,DTHAKKO " + 
    " ,DTSYUKKO " + 
    " ,DTKANSEI " + 
    " ,DTSYUKKA " + 
    " ,DTCANCEL " + 
    " ,NRSOURCE " + 
    " ,STSEIZO " + 
    " ,PRYOTEIGEN " + 
    " ,AMHANBAI " + 
    " ,AMARARI " + 
    " ,PRGENKA " + 
    " ,TXSEIZOYOTEI " + 
    " ,CREATED_DATE " + 
    " ,CREATED_BY " + 
    " ,CREATED_PRG_NM " + 
    " ,UPDATED_DATE " + 
    " ,UPDATED_BY " + 
    " ,UPDATED_PRG_NM " + 
    " ,MODIFY_COUNT " + 
    " FROM JT010  " + 
    " WHERE JT010.NRSEIZO = '" + _NRSEIZO + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}
function updateJT010(itemDataList) {
    //項目
    var itemColNameTbl = [
         'NRSEIZO'
        ,'IDTOKUISAKI'
        ,'SQSYUKKASAKI'
        ,'TXTYUMONBANGO'
        ,'IDHINMOKU'
        ,'DTNOUKI'
        ,'QTJYUTYU'
        ,'QTSYUKKA'
        ,'QTSEIZO'
        ,'QTKANSEI'
        ,'QTHURYO'
        ,'QTHAIKI'
        ,'AMGENKA'
        ,'PRMITSUMORI'
        ,'PRJYUTYU'
        ,'TXTEKIYO'
        ,'CDSOUKOKAN'
        ,'CDSOUKOZAI'
        ,'DTCREATE'
        ,'DTHAKKO'
        ,'DTSYUKKO'
        ,'DTKANSEI'
        ,'DTSYUKKA'
        ,'DTCANCEL'
        ,'NRSOURCE'
        ,'STSEIZO'
        ,'PRYOTEIGEN'
        ,'AMHANBAI'
        ,'AMARARI'
        ,'PRGENKA'
        ,'TXSEIZOYOTEI'
        ,'CREATED_DATE'
        ,'CREATED_BY'
        ,'CREATED_PRG_NM'
        ,'UPDATED_DATE'
        ,'UPDATED_BY'
        ,'UPDATED_PRG_NM'
        ,'MODIFY_COUNT'
    ];

    var itemSelectList = selectJT010(itemDataList['NRSEIZO']);

    var lineDataMap = itemSelectList[0];
    var _MODIFY_COUNT = lineDataMap['MODIFY_COUNT'];

    //UPDATE
    itemDataList['UPDATED_DATE']   = tln_com_nowdate();
    itemDataList['UPDATED_BY']     = tln_com_user_id();
    itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
    itemDataList['MODIFY_COUNT']   = (_MODIFY_COUNT + 1);

    var whereList = new Array();
    var whereTbl1 = [ null, '=' , 'NRSEIZO' ];
    whereList.push(whereTbl1);

    TALON.updateByMap( 'JT010', itemDataList , itemColNameTbl , whereList );
}

//-------------------------------------------
//［部品］製造指示工程明細[JT030]
//-------------------------------------------
function selectJT030(_NRSEIZO) {
    var sql = 
    " SELECT  " + 
    "  JT030.NRSEIZO " + 
    " ,JT030.SQKOUTEI " + 
    " ,JT030.CDKOUTEI " + 
    " ,JT030.SQCENTER " + 
    " ,JT030.LTSEIZO " + 
    " ,JT030.DTFROM " + 
    " ,JT030.TMFROM " + 
    " ,JT030.DTTHRU " + 
    " ,JT030.TMTHRU " + 
    " ,JT030.SQLIST " + 
    " ,JT030.TXSAGYOYOTEI " + 
    " ,JT030.AMKAKOU " + 
    " ,JT030.CREATED_DATE " + 
    " ,JT030.CREATED_BY " + 
    " ,JT030.CREATED_PRG_NM " + 
    " ,JT030.UPDATED_DATE " + 
    " ,JT030.UPDATED_BY " + 
    " ,JT030.UPDATED_PRG_NM " + 
    " ,JT030.MODIFY_COUNT " + 
    " ,BT060.RTKAKOU " + 
    " FROM JT030  " + 
    " INNER JOIN BT060 " + 
    "    ON BT060.CDKOUTEI = JT030.CDKOUTEI " + 
    "   AND BT060.SQCENTER = JT030.SQCENTER " + 
    " WHERE JT030.NRSEIZO = '" + _NRSEIZO + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}
function updateJT030(itemDataList) {
    //項目
    var itemColNameTbl = [
         'NRSEIZO'
        ,'SQKOUTEI'
        ,'CDKOUTEI'
        ,'SQCENTER'
        ,'LTSEIZO'
        ,'DTFROM'
        ,'TMFROM'
        ,'DTTHRU'
        ,'TMTHRU'
        ,'SQLIST'
        ,'TXSAGYOYOTEI'
        ,'AMKAKOU'
        ,'CREATED_DATE'
        ,'CREATED_BY'
        ,'CREATED_PRG_NM'
        ,'UPDATED_DATE'
        ,'UPDATED_BY'
        ,'UPDATED_PRG_NM'
        ,'MODIFY_COUNT'
    ];

    var itemSelectList = selectJT030(itemDataList['NRSEIZO']);

    var lineDataMap = itemSelectList[0];
    var _MODIFY_COUNT = lineDataMap['MODIFY_COUNT'];

    //UPDATE
    itemDataList['UPDATED_DATE']   = tln_com_nowdate();
    itemDataList['UPDATED_BY']     = tln_com_user_id();
    itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
    itemDataList['MODIFY_COUNT']   = (_MODIFY_COUNT + 1);

    var whereList = new Array();
    var whereTbl1 = [ null, '=' , 'NRSEIZO' ];
    var whereTbl2 = [ null, '=' , 'SQKOUTEI' ];
    whereList.push(whereTbl1);
    whereList.push(whereTbl2);

    TALON.updateByMap( 'JT030', itemDataList , itemColNameTbl , whereList );

}


//-------------------------------------------
//［部品］製造指示材料明細[JT040]
//-------------------------------------------
function selectJT040(_NRSEIZO) {
    var sql = 
    " SELECT  " + 
    "  JT040.NRSEIZO " + 
    " ,JT040.SQZAIRYO " + 
    " ,JT040.IDHINMOKU " + 
    " ,JT040.QTTOUNYU " + 
    " ,JT040.SQKOUTEI " + 
    " ,JT040.PRYOTEI " + 
    " ,JT040.PRSYUKKO " + 
    " ,JT040.SQLIST " + 
    " ,JT040.CDSOUKO " + 
    " ,JT040.CREATED_DATE " + 
    " ,JT040.CREATED_BY " + 
    " ,JT040.CREATED_PRG_NM " + 
    " ,JT040.UPDATED_DATE " + 
    " ,JT040.UPDATED_BY " + 
    " ,JT040.UPDATED_PRG_NM " + 
    " ,JT040.MODIFY_COUNT " + 
    " FROM JT040  " + 
    " WHERE JT040.NRSEIZO = '" + _NRSEIZO + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}

//-------------------------------------------
//［部品］売掛振替[LT010]
//-------------------------------------------
function selectLT010(_NRURIHURI) {
    var sql = 
    " SELECT  " + 
    "  NRURIHURI " + 
    " ,KBURIHURI " + 
    " ,DTHURIKAE " + 
    " ,IDTOKUISAKI " + 
    " ,AMHURIKAE " + 
    " ,TXTEKIYO " + 
    " ,NRSEIKYU " + 
    " ,NRSOURCE " + 
    " ,CREATED_DATE " + 
    " ,CREATED_BY " + 
    " ,CREATED_PRG_NM " + 
    " ,UPDATED_DATE " + 
    " ,UPDATED_BY " + 
    " ,UPDATED_PRG_NM " + 
    " ,MODIFY_COUNT " + 
    " ,KBZOUGEN " + 
    " FROM LT010  " + 
    " WHERE LT010.NRURIHURI = '" + _NRURIHURI + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}


//-------------------------------------------
//［部品］特殊売上[LT020]
//-------------------------------------------
function selectLT020(_NRTOKUURI) {
    var sql = 
    " SELECT  " + 
    " NRTOKUURI " + 
    ",KBTOKUURI " + 
    ",IDTOKUISAKI " + 
    ",SQSYUKKASAKI " + 
    ",DTTORIHIKI " + 
    ",IDHINMOKU " + 
    ",CDSOUKO " + 
    ",PRTORIHIKI " + 
    ",QTTORIHIKI " + 
    ",PRZAIKO " + 
    ",QTZAIKO " + 
    ",TXTEKIYO " + 
    ",NRSOURCE " + 
    ",AMTORIHIKI " + 
    ",AMTAX " + 
    ",CREATED_DATE " + 
    ",CREATED_BY " + 
    ",CREATED_PRG_NM " + 
    ",UPDATED_DATE " + 
    ",UPDATED_BY " + 
    ",UPDATED_PRG_NM " + 
    ",MODIFY_COUNT  " + 
    " FROM LT020  " + 
    " WHERE LT020.NRTOKUURI = '" + _NRTOKUURI + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}

//-------------------------------------------
//［部品］在庫振替[MT010]
//-------------------------------------------
function selectMT010(_NRZAIHURI) {
    var sql = 
    " SELECT  " + 
    "     NRZAIHURI        " + 
    "    ,CDSOUKO          " + 
    "    ,DTHURIKAE        " + 
    "    ,KBZOUGEN         " + 
    "    ,KBZAIHURI        " + 
    "    ,IDHINMOKU        " + 
    "    ,PRHURIKAE        " + 
    "    ,QTHURIKAE        " + 
    "    ,TXTEKIYO         " + 
    "    ,NRSOURCE         " + 
    "    ,CREATED_DATE     " + 
    "    ,CREATED_BY       " + 
    "    ,CREATED_PRG_NM   " + 
    "    ,UPDATED_DATE     " + 
    "    ,UPDATED_BY       " + 
    "    ,UPDATED_PRG_NM   " + 
    "    ,MODIFY_COUNT     " + 
    " FROM MT010  " + 
    " WHERE NRZAIHURI = '" + _NRZAIHURI + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}

//-------------------------------------------
//［部品］棚卸指示[MT020]
//-------------------------------------------
function selectMT020(_NRTANAOROSI) {
    var sql = 
    " SELECT  " + 
    "     NRTANAOROSI        " + 
    "    ,CDSOUKO            " + 
    "    ,DTKIJYUN           " + 
    "    ,DTKAKUTEI          " + 
    "    ,TXTEKIYO           " + 
    "    ,NRSOURCE           " + 
    "    ,DTKIJYUNWORK       " + 
    "    ,STTANAOROSI        " + 
    "    ,CREATED_DATE       " + 
    "    ,CREATED_BY         " + 
    "    ,CREATED_PRG_NM     " + 
    "    ,UPDATED_DATE       " + 
    "    ,UPDATED_BY         " + 
    "    ,UPDATED_PRG_NM     " + 
    "    ,MODIFY_COUNT       " + 
    " FROM MT020  " + 
    " WHERE NRTANAOROSI = '" + _NRTANAOROSI + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}

//-------------------------------------------
//［部品］棚卸指示明細[MT021]
//-------------------------------------------
function selectMT021(_NRTANAOROSI,_IDHINMOKU) {
    var sql = 
    " SELECT  " + 
    "     NRTANAOROSI         " + 
    "    ,IDHINMOKU           " + 
    "    ,PRKIJYUN            " + 
    "    ,QTKIJYUN            " + 
    "    ,PRJITSUTANA         " + 
    "    ,QTJITSUTANA         " + 
    "    ,QTDIFF              " + 
    "    ,AMDIFF              " + 
    "    ,CREATED_DATE        " + 
    "    ,CREATED_BY          " + 
    "    ,CREATED_PRG_NM      " + 
    "    ,UPDATED_DATE        " + 
    "    ,UPDATED_BY          " + 
    "    ,UPDATED_PRG_NM      " + 
    "    ,MODIFY_COUNT        " + 
    " FROM MT021  " + 
    " WHERE NRTANAOROSI = '" + _NRTANAOROSI + "' " +
    "   AND IDHINMOKU   = '" + _IDHINMOKU + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}
function updateMT021(itemDataList) {
    //項目
    var itemColNameTbl = [
         'NRTANAOROSI'
        ,'IDHINMOKU'
        ,'PRKIJYUN'
        ,'QTKIJYUN'
        ,'PRJITSUTANA'
        ,'QTJITSUTANA'
        ,'QTDIFF'
        ,'AMDIFF'
        ,'CREATED_DATE'
        ,'CREATED_BY'
        ,'CREATED_PRG_NM'
        ,'UPDATED_DATE'
        ,'UPDATED_BY'
        ,'UPDATED_PRG_NM'
        ,'MODIFY_COUNT'
    ];

    //共通
    itemDataList['CREATED_DATE']   = tln_com_nowdate();
    itemDataList['CREATED_BY']     = tln_com_user_id();
    itemDataList['CREATED_PRG_NM'] = tln_com_func_id();
    itemDataList['UPDATED_DATE']   = tln_com_nowdate();
    itemDataList['UPDATED_BY']     = tln_com_user_id();
    itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
    itemDataList['MODIFY_COUNT']   = 1;

    TALON.insertByMap( 'MT021', itemDataList , itemColNameTbl );

}

//-------------------------------------------
//［部品］棚卸指示明細[MT021]
//-------------------------------------------
function selectMT021_NRTANAOROSI(_NRTANAOROSI) {
    var sql = 
    " SELECT  " + 
    "     NRTANAOROSI         " + 
    "    ,IDHINMOKU           " + 
    "    ,PRKIJYUN            " + 
    "    ,QTKIJYUN            " + 
    "    ,PRJITSUTANA         " + 
    "    ,QTJITSUTANA         " + 
    "    ,QTDIFF              " + 
    "    ,AMDIFF              " + 
    "    ,CREATED_DATE        " + 
    "    ,CREATED_BY          " + 
    "    ,CREATED_PRG_NM      " + 
    "    ,UPDATED_DATE        " + 
    "    ,UPDATED_BY          " + 
    "    ,UPDATED_PRG_NM      " + 
    "    ,MODIFY_COUNT        " + 
    " FROM MT021  " + 
    " WHERE NRTANAOROSI = '" + _NRTANAOROSI + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}


//-------------------------------------------
//［部品］在庫移動指示[MT030]
//-------------------------------------------
function selectMT030(_NRZAIIDOU) {
    var sql = 
    " SELECT  " + 
    "     NRZAIIDOU        " + 
    "    ,CDSOUKOFROM      " + 
    "    ,CDSOUKOTHRU      " + 
    "    ,DTSHIJI          " + 
    "    ,DTKANRYOU        " + 
    "    ,TXTEKIYO         " + 
    "    ,NRSOURCE         " + 
    "    ,STZAIIDOU        " + 
    "    ,CREATED_DATE     " + 
    "    ,CREATED_BY       " + 
    "    ,CREATED_PRG_NM   " + 
    "    ,UPDATED_DATE     " + 
    "    ,UPDATED_BY       " + 
    "    ,UPDATED_PRG_NM   " + 
    "    ,MODIFY_COUNT     " + 
    " FROM MT030  " + 
    " WHERE NRZAIIDOU = '" + _NRZAIIDOU + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}


//-------------------------------------------
//［部品］在庫移動指示明細[MT031]
//-------------------------------------------
function selectMT031_NRZAIIDOU(_NRZAIIDOU) {
    var sql = 
    " SELECT  " + 
    "     NRZAIIDOU      " + 
    "    ,IDHINMOKU      " + 
    "    ,PRZAIIDOU      " + 
    "    ,QTZAIIDOU      " + 
    "    ,CREATED_DATE   " + 
    "    ,CREATED_BY     " + 
    "    ,CREATED_PRG_NM " + 
    "    ,UPDATED_DATE   " + 
    "    ,UPDATED_BY     " + 
    "    ,UPDATED_PRG_NM " + 
    "    ,MODIFY_COUNT   " + 
    " FROM MT031  " + 
    " WHERE NRZAIIDOU = '" + _NRZAIIDOU + "' " 
    ;
    var itemSelectList = TALON.select(sql);

    return itemSelectList;
}







//-------------------------------------------
//［部品］工程日付計算リバース
//-------------------------------------------
function calcDTTM_R(sBasDy,sBasTm,sLet,_kakof,_kakot,_calender) {

    var rec  = '';

    var flg1 = true;
    var flg2 = true;

    sBasDy = sBasDy.toString().split(" ")[0];

    tln_com_log("☆R[param       ]" + sBasDy + " / " +  sBasTm + " / " +  sLet + " / " +  _kakof + " / " +  _kakot + " / " + _calender);

    //スタート時点の基準日が既に稼働対象外の場合は直近の稼働に変更する
    if (_kakot < sBasTm ) {
        tln_com_log("☆R[param       ] (1)");
        sBasTm = _kakot;
    }
    if (_kakof > sBasTm ) {
        tln_com_log("☆R[param       ] (2)");
        sBasTm = _kakot;

        //前日完了
        var wdate = tln_com_todatetime(sBasDy + " " + "00:00:00");
        wdate.setMinutes(wdate.getMinutes() - 1);
        var tdate = tln_com_date2string2(wdate);
        sBasDy = tdate.toString().split(" ")[0];

        flg2 = true;
        while (flg2){
            if (getHOLIDAY_FLG(_calender,sBasDy + ' 00:00:00') == '0') {
                flg2 = false;
            } else {
                wdate = tln_com_todatetime(sBasDy + ' 00:00:00');
                wdate.setMinutes(wdate.getMinutes() - 1);

                var tdate = tln_com_date2string2(wdate);
                sBasDy = tdate.toString().split(" ")[0];
            }
        }
    }

    rec = sBasDy + " " + sBasTm;

    while (flg1){
        sBasDy = sBasDy.toString().split(" ")[0];
        var wdate = tln_com_todatetime(sBasDy + " " + sBasTm);
        var wdatl = tln_com_todatetime(sBasDy + " " + sBasTm);
        wdatl.setMinutes(wdate.getMinutes() - sLet);
        var wdats = tln_com_todatetime(sBasDy + " " + _kakof);

        var tdate = tln_com_date2string2(wdatl);
        var tDat = tdate.toString().split(" ")[0];
        var tTim = tdate.toString().split(" ")[1];
        tTim = tln_com_lcut(tTim,5);

        tln_com_log("☆R[wdate       ]" + wdate);
        tln_com_log("☆R[sLet        ]" + sLet);
        tln_com_log("☆R[wdatl       ]" + wdatl);
        tln_com_log("☆R[wdats       ]" + wdats);
        tln_com_log("☆R[tDat        ]" + tDat);
        tln_com_log("☆R[sBasDy      ]" + sBasDy);
        tln_com_log("☆R[tTim        ]" + tTim);
        tln_com_log("☆R[kakof       ]" + _kakof);

        if (tDat == sBasDy && tTim >= _kakof) {
            sBasTm = tTim;

            flg1 = false;
        } else {
            //日付が異なっている場合、もしくは同日でも稼働開始時間より前の開始時刻の場合
            //基準から開始日までの時間を計算し残りリードタイムを計算し
            //基準日を前日、基準時間を稼働終了時刻にして再度実施

            //var sWok = wdats - wdate;
            var sWok = getDiff(tln_com_date2string2(wdats),tln_com_date2string2(wdate));
            if (sWok < 0) {
                sWok = sWok * -1;
            }

            sLet = sLet - sWok;

            tln_com_log("☆R[sWok        ]" + sWok);
            tln_com_log("☆R[sLet        ]" + sLet);

            var wdate = tln_com_todatetime(sBasDy + " " + "00:00:00");
            wdate.setMinutes(wdate.getMinutes() - 1);
            var tdate = tln_com_date2string2(wdate);
            sBasDy = tdate.toString().split(" ")[0];

            flg2 = true;
            while (flg2){
                if (getHOLIDAY_FLG(_calender,sBasDy + ' 00:00:00') == '0') {
                    flg2 = false;
                } else {
                    wdate = tln_com_todatetime(sBasDy + ' 00:00:00');
                    wdate.setMinutes(wdate.getMinutes() - 1);

                    var tdate = tln_com_date2string2(wdate);
                    sBasDy = tdate.toString().split(" ")[0];
                }
            }

            sBasTm = _kakot;
        }
    }

tln_com_log("☆R[return      ]" + (sBasDy + " " + sBasTm + "," + rec));

    return (sBasDy + " " + sBasTm + "," + rec);

}


//-------------------------------------------
//［部品］工程日付計算フォワード
//返り値：(完了日),(開始日) 
//-------------------------------------------
function calcDTTM_F(sBasDy,sBasTm,sLet,_kakof,_kakot,_calender) {

    var rec  = '';

    var flg1 = true;
    var flg2 = true;

    sBasDy = sBasDy.toString().split(" ")[0];

    tln_com_log("☆F[param       ]" + sBasDy + " / " +  sBasTm + " / " +  sLet + " / " +  _kakof + " / " +  _kakot + " / " + _calender);

    //スタート時点の基準日が既に稼働対象外の場合は直近の稼働に変更する
    if (_kakof > sBasTm ) {
        tln_com_log("☆F[param       ] (1)");
        sBasTm = _kakof;
    }
    if (_kakot < sBasTm ) {
        tln_com_log("☆F[param       ] (2)");

        sBasTm = _kakof;

        //翌日開始
        var wdate = tln_com_todatetime(sBasDy + " " + "23:59:00");
        wdate.setMinutes(wdate.getMinutes() + 1);
        var tdate = tln_com_date2string2(wdate);
        sBasDy = tdate.toString().split(" ")[0];

        flg2 = true;
        while (flg2){
            if (getHOLIDAY_FLG(_calender,sBasDy + ' 00:00:00') == '0') {
                flg2 = false;
            } else {
                wdate = tln_com_todatetime(sBasDy + ' 23:59:00');
                wdate.setMinutes(wdate.getMinutes() + 2);

                var tdate = tln_com_date2string2(wdate);
                sBasDy = tdate.toString().split(" ")[0];
            }
        }
    }

    rec = sBasDy + " " + sBasTm;

    while (flg1){
        sBasDy = sBasDy.toString().split(" ")[0];
        var wdate = tln_com_todatetime(sBasDy + " " + sBasTm);
        var wdatl = tln_com_todatetime(sBasDy + " " + sBasTm);
        wdatl.setMinutes(wdate.getMinutes() + sLet);
        var wdats = tln_com_todatetime(sBasDy + " " + _kakot);

        var tdate = tln_com_date2string2(wdatl);
        var tDat = tdate.toString().split(" ")[0];
        var tTim = tdate.toString().split(" ")[1];
        tTim = tln_com_lcut(tTim,5);

        tln_com_log("☆F[wdate       ]" + wdate);
        tln_com_log("☆F[sLet        ]" + sLet);
        tln_com_log("☆F[wdatl       ]" + wdatl);
        tln_com_log("☆F[wdats       ]" + wdats);
        tln_com_log("☆F[tDat        ]" + tDat);
        tln_com_log("☆F[sBasDy      ]" + sBasDy);
        tln_com_log("☆F[tTim        ]" + tTim);
        tln_com_log("☆F[_kakof      ]" + _kakof);

        if (tDat == sBasDy && tTim <= _kakot) {
            sBasTm = tTim;

            flg1 = false;
        } else {
            //日付が異なっている場合、もしくは同日でも稼働完了時間より先の終了時刻の場合
            //基準から終了日までの時間を計算し残りリードタイムを計算し
            //基準日を翌日、基準時間を稼働開始時刻にして再度実施

            //var sWok = wdats - wdate;
            var sWok = getDiff(tln_com_date2string2(wdats),tln_com_date2string2(wdate));
            if (sWok < 0) {
                sWok = sWok * -1;
            }

            sLet = sLet - sWok;

            tln_com_log("☆F[sWok       ]" + sWok);
            tln_com_log("☆F[sLet       ]" + sLet);

            var wdate = tln_com_todatetime(sBasDy + " " + "23:59:00");
            wdate.setMinutes(wdate.getMinutes() + 2);
            var tdate = tln_com_date2string2(wdate);
            sBasDy = tdate.toString().split(" ")[0];

            flg2 = true;
            while (flg2){
                if (getHOLIDAY_FLG(_calender,sBasDy + ' 00:00:00') == '0') {
                    flg2 = false;
                } else {
                    wdate = tln_com_todatetime(sBasDy + ' 23:59:00');
                    wdate.setMinutes(wdate.getMinutes() + 2);

                    var tdate = tln_com_date2string2(wdate);
                    sBasDy = tdate.toString().split(" ")[0];
                }
            }

            sBasTm = _kakof;
        }
    }

    tln_com_log("☆R[return      ]" + (sBasDy + " " + sBasTm + "," + rec));

    return (sBasDy + " " + sBasTm + "," + rec);

}


function getDiff(date1Str, date2Str) {
    var date1 = new Date(date1Str);
    var date2 = new Date(date2Str);
 
    var msDiff = date2.getTime() - date1.getTime();
 
    var daysDiff = Math.floor(msDiff / (1000 * 60));
 
    return (++daysDiff) - 1;
}

//-------------------------------------------
//［処理］入庫処理
//-------------------------------------------
//入庫新規登録
//　1 : 品目コード
//　2 : 取引先コード
//　3 : 倉庫コード
//　4 : 取引日
//　5 : 数量
//　6 : 税抜金額
//　7 : ソース番号
//　8 : 参照番号
function exec_nyuko_ins(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _SURYO, _ZEINUKI_KINGAKU, _NRSOURCE, _TXREFNO) {

	//数値準備
	var itemSelectList = selectBT010(_HINMOKU);
	var lineDataMap = itemSelectList[0];

	var _C_SURYO			= _SURYO;
	var _C_ZEIGAKU			= _ZEINUKI_KINGAKU * getTAX_RATE(_TORIHIKIDATE);
	var _C_KINGAKU_NUKI		= _ZEINUKI_KINGAKU;
	var _C_KINGAKU_KOMI		= _ZEINUKI_KINGAKU + _C_ZEIGAKU;
	var _C_TANKA_NUKI		= _C_KINGAKU_NUKI / _C_SURYO;
	var _C_TANKA_KOMI		= _C_KINGAKU_KOMI / _C_SURYO;

	var _C_SURYO_KEISU		= _C_SURYO * lineDataMap['VLKANZAN'];
	var _C_TANKA_KOMI_KEISU	= _C_KINGAKU_KOMI / _C_SURYO_KEISU;



	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数(係数込取引数)
		itemDataList['QTNYUKO']        = _C_SURYO_KEISU;
		//期間出庫数
		itemDataList['QTSYUKKO']       = 0;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額(税込金額)
		itemDataList['AMNYUKO']        = _C_KINGAKU_KOMI;
		//期間出庫額
		itemDataList['AMSYUKKO']       = 0;

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数(係数込取引数)
		itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + _C_SURYO_KEISU;
		//期間出庫数
		itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額(税込金額)
		itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + _C_KINGAKU_KOMI;
		//期間出庫額
		itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];

	}

	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------
	var itemDataList = new Array();

	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//受払区分 (030 : 仕入入庫)
	itemDataList['KBUKEBARAI']    = "030";
	//振替区分 (Null)
	itemDataList['KBZAIHURI']     = "";
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//倉庫Ｃ
	itemDataList['CDSOUKO']       = _SOUKO;
	//相手先名
	itemDataList['TXAITESAKI']    = _TORIHIKISAKI;
	//取引単価(係数込税込単価)
	itemDataList['PRTORIHIKI']    = _C_TANKA_KOMI_KEISU;
	//取引数(係数込取引数)
	itemDataList['QTTORIHIKI']    = _C_SURYO_KEISU;
	//取引額(税込金額)
	itemDataList['AMTORIHIKI']    = _C_KINGAKU_KOMI;
	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減数(係数込取引数)
	itemDataList['QTZOUGEN']      = _C_SURYO_KEISU;
	//残高増減額(税込金額
	itemDataList['AMZOUGEN']      = _C_KINGAKU_KOMI;

	updateFT100(itemDataList);



	//買掛履歴作成
	//--------------------
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']   = _TORIHIKISAKI;
	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//取引区分 (00:入荷仕入)
	itemDataList['KBKAITORI']     = "00";
	//振替区分 (Null)
	itemDataList['KBKAIHURI']     = "";
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//取引単価(税抜単価)
	itemDataList['PRTORIHIKI']    = _C_TANKA_NUKI;
	//取引数
	itemDataList['QTTORIHIKI']    = _C_SURYO;
	//税抜取引額(税抜金額)
	itemDataList['AMTORIHIKI']    = _C_KINGAKU_NUKI;
	//消費税額
	itemDataList['AMTAX']         = _C_ZEIGAKU;
	//支払依頼№
	itemDataList['NRSIHARAI']     = "";
	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減額(税込金額)
	itemDataList['AMZOUGEN']      = _C_KINGAKU_KOMI;

	updateDT100(itemDataList);



	//仕入先情報更新
	//--------------------
	var itemDataList = new Array();

	//仕入先情報取得
	var itemSelectList = selectDT010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']    = lineDataMap['IDSIIRESAKI'];
	//支払方法区分
	itemDataList['KBSIHARAI']      = lineDataMap['KBSIHARAI'];
	//振込銀行口座
	itemDataList['TXHURIKOMI']     = lineDataMap['TXHURIKOMI'];
	//摘要
	itemDataList['TXTEKIYO']       = lineDataMap['TXTEKIYO'];
	//期首買掛残高
	itemDataList['AMKISYUKAIKAKE'] = lineDataMap['AMKISYUKAIKAKE'];
	//期間仕入額(税込金額)
	itemDataList['AMSIIRE']        = lineDataMap['AMSIIRE'] + _C_KINGAKU_KOMI;
	//期間支払額
	itemDataList['AMSIHARAI']      = lineDataMap['AMSIHARAI'];
	//現買掛残高
	itemDataList['AMGENKAIKAKE']   = lineDataMap['AMGENKAIKAKE'];

	updateDT010(itemDataList);


}
//-------------------------------------------
//入庫取消削除
//　1 : 品目コード
//　2 : 取引先
//　3 : 倉庫
//　4 : 取引日
//　5 : 数量
//　6 : 税抜金額
//　7 : ソース番号
//　8 : 参照番号
//
//　* : 在庫取引№
//　* : 買掛取引№
function exec_nyuko_del(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _SURYO, _ZEINUKI_KINGAKU, _NRSOURCE, _TXREFNO, 
					_NRZAITORI, _NRKAIKAKE) {

	//数値準備
	// * var itemSelectList = selectBT010(_HINMOKU);
	// * var lineDataMap = itemSelectList[0];
	// * 
	// * var _C_SURYO			= _SURYO;
	// * var _C_ZEIGAKU			= _ZEINUKI_KINGAKU * getTAX_RATE(_TORIHIKIDATE);
	// * var _C_KINGAKU_NUKI	= _ZEINUKI_KINGAKU;
	// * var _C_KINGAKU_KOMI	= _ZEINUKI_KINGAKU + _C_ZEIGAKU;
	// * var _C_TANKA_NUKI		= _C_KINGAKU_NUKI / _C_SURYO;
	// * var _C_TANKA_KOMI		= _C_KINGAKU_KOMI / _C_SURYO;
	// * 
	// * var _C_SURYO_KEISU		= _C_SURYO * lineDataMap['VLKANZAN'];
	// * var _C_TANKA_KOMI_KEISU	= _C_KINGAKU_KOMI / _C_SURYO_KEISU;

	var itemSelectList = selectFT100(_NRZAITORI);
	var lineDataMapFT100 = itemSelectList[0];
	var itemSelectList = selectDT100(_NRKAIKAKE);
	var lineDataMapDT100 = itemSelectList[0];

	var _C_SURYO			= lineDataMapDT100['QTTORIHIKI'];
	var _C_ZEIGAKU			= lineDataMapDT100['AMTAX'];
	var _C_KINGAKU_NUKI		= lineDataMapDT100['AMTORIHIKI'];
	var _C_KINGAKU_KOMI		= lineDataMapDT100['AMZOUGEN'];
	var _C_TANKA_NUKI		= lineDataMapDT100['PRTORIHIKI'];
	//var _C_TANKA_KOMI		= (使用無し)

	var _C_SURYO_KEISU		= lineDataMapFT100['QTTORIHIKI'];
	var _C_TANKA_KOMI_KEISU	= lineDataMapFT100['PRTORIHIKI'];




	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数(係数込取引数)
		itemDataList['QTNYUKO']        = _C_SURYO_KEISU * -1;
		//期間出庫数
		itemDataList['QTSYUKKO']       = 0;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額(税込金額)
		itemDataList['AMNYUKO']        = _C_KINGAKU_KOMI * -1;
		//期間出庫額
		itemDataList['AMSYUKKO']       = 0;

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数(係数込取引数)
		itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + (_C_SURYO_KEISU * -1);
		//期間出庫数
		itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額(税込金額)
		itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + (_C_KINGAKU_KOMI * -1);
		//期間出庫額
		itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];

	}

	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------

	// * var itemDataList = new Array();
	// * 
	// * //取引日
	// * itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	// * //受払区分 (030 : 仕入入庫)
	// * itemDataList['KBUKEBARAI']    = "030";
	// * //振替区分 (Null)
	// * itemDataList['KBZAIHURI']     = "";
	// * //赤黒     (2:赤伝)
	// * itemDataList['KBAKADEN']      = "2";
	// * //効区     (F:無効)
	// * itemDataList['FGVALID']       = "F";
	// * //品目ID
	// * itemDataList['IDHINMOKU']     = _HINMOKU;
	// * //倉庫Ｃ
	// * itemDataList['CDSOUKO']       = _SOUKO;
	// * //相手先名
	// * itemDataList['TXAITESAKI']    = _TORIHIKISAKI;
	// * //取引単価(係数込税込単価)
	// * itemDataList['PRTORIHIKI']    = _C_TANKA_KOMI_KEISU;
	// * //取引数(係数込取引数)
	// * itemDataList['QTTORIHIKI']    = _C_SURYO_KEISU;
	// * //取引額(税込金額)
	// * itemDataList['AMTORIHIKI']    = _C_KINGAKU_KOMI;
	// * //取引ソース№
	// * itemDataList['NRSOURCE']      = _NRSOURCE;
	// * //登録日時
	// * itemDataList['DTCREATE']      = tln_com_nowdate();
	// * //参照番号
	// * itemDataList['TXREFNO']       = _TXREFNO;
	// * //年度(Null)
	// * itemDataList['DTNEND']        = '';
	// * //月序(Null)
	// * itemDataList['DTMSEQ']        = '';
	// * //残高増減数(係数込取引数)
	// * itemDataList['QTZOUGEN']      = _C_SURYO_KEISU * -1;
	// * //残高増減額(税込金額)
	// * itemDataList['AMZOUGEN']      = _C_KINGAKU_KOMI * -1;
	// *
	// * updateFT100(itemDataList);
	// * 

	insertAkaFT100(_NRZAITORI);



	//入出庫履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）

	TALON.update( " UPDATE FT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBUKEBARAI = '" + "030" + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE   + "'"
				);



	//買掛履歴作成
	//--------------------
	// * var itemDataList = new Array();
	// * 
	// * //仕入先ID
	// * itemDataList['IDSIIRESAKI']   = _TORIHIKISAKI;
	// * //取引日
	// * itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	// * //取引区分 (00:入荷仕入)
	// * itemDataList['KBKAITORI']     = "00";
	// * //振替区分 (Null)
	// * itemDataList['KBKAIHURI']     = "";
	// * //赤黒     (2:赤伝)
	// * itemDataList['KBAKADEN']      = "2";
	// * //効区     (F:無効)
	// * itemDataList['FGVALID']       = "F";
	// * //品目ID
	// * itemDataList['IDHINMOKU']     = _HINMOKU;
	// * //取引単価(税抜単価)
	// * itemDataList['PRTORIHIKI']    = _C_TANKA_NUKI;
	// * //取引数
	// * itemDataList['QTTORIHIKI']    = _C_SURYO;
	// * //税抜取引額(税抜金額)
	// * itemDataList['AMTORIHIKI']    = _C_KINGAKU_NUKI;
	// * //消費税額(消費税額)
	// * itemDataList['AMTAX']         = _C_ZEIGAKU;
	// * //支払依頼№
	// * itemDataList['NRSIHARAI']     = "";
	// * //取引ソース№
	// * itemDataList['NRSOURCE']      = _NRSOURCE;
	// * //登録日時
	// * itemDataList['DTCREATE']      = tln_com_nowdate();
	// * //参照番号
	// * itemDataList['TXREFNO']       = _TXREFNO;
	// * //年度(Null)
	// * itemDataList['DTNEND']        = '';
	// * //月序(Null)
	// * itemDataList['DTMSEQ']        = '';
	// * //残高増減額(税込金額)
	// * itemDataList['AMZOUGEN']      = _C_KINGAKU_KOMI * -1;
	// * 
	// * updateDT100(itemDataList);
	// * 

	insertAkaDT100(_NRKAIKAKE);



	//買掛履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）

	TALON.update( " UPDATE DT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBKAITORI  = '" + "00" + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE  + "'"
				);



	//仕入先情報更新
	//--------------------

	//仕入先情報取得
	var itemSelectList = selectDT010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']    = lineDataMap['IDSIIRESAKI']
	//支払方法区分
	itemDataList['KBSIHARAI']      = lineDataMap['KBSIHARAI']
	//振込銀行口座
	itemDataList['TXHURIKOMI']     = lineDataMap['TXHURIKOMI']
	//摘要
	itemDataList['TXTEKIYO']       = lineDataMap['TXTEKIYO']
	//期首買掛残高
	itemDataList['AMKISYUKAIKAKE'] = lineDataMap['AMKISYUKAIKAKE']
	//期間仕入額(税込金額)
	itemDataList['AMSIIRE']        = lineDataMap['AMSIIRE'] - _C_KINGAKU_KOMI
	//期間支払額
	itemDataList['AMSIHARAI']      = lineDataMap['AMSIHARAI']
	//現買掛残高
	itemDataList['AMGENKAIKAKE']   = lineDataMap['AMGENKAIKAKE']

	updateDT010(itemDataList);

}



//-------------------------------------------
//［処理］買掛振替処理
//-------------------------------------------
//買掛振替新規登録
//　1 : 仕入先
//　2 : 取引日
//  3 : 増減区分
//　4 : 振替区分
//　5 : 適用
//　6 : 取引単価
//　7 : ソース番号
//　8 : 参照番号
function exec_kaihuri_ins(_IDSIIRESAKI, _TORIHIKIDATE, _KBZOUGEN, _KBKAIHURI, _TXTEKIYO, _ZEINUKI_HURIKAE, _NRSOURCE, _TXREFNO) {

	//数値準備
	var _C_SURYO			= 1;
	var _C_ZEIGAKU			= 0;
	var _C_KINGAKU_NUKI		= _ZEINUKI_HURIKAE;
	var _C_KINGAKU_KOMI		= _ZEINUKI_HURIKAE + _C_ZEIGAKU;
	var _C_TANKA_NUKI		= _C_KINGAKU_NUKI / _C_SURYO;
	var _C_TANKA_KOMI		= _C_KINGAKU_KOMI / _C_SURYO;



	//買掛履歴作成
	//--------------------
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']   = _IDSIIRESAKI;
	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//取引区分
	if (_KBZOUGEN == '0') {
		//増減区分=0:残高減 → 10:振替控除
		itemDataList['KBKAITORI']     = "10";
	} else {
		//増減区分=1:残高増 → 11:振替計上
		itemDataList['KBKAITORI']     = "11";
	}
	//振替区分 (Null)
	itemDataList['KBKAIHURI']     = _KBKAIHURI;
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = '';
	//品名／摘要
	itemDataList['TXHINMEI']      = _TXTEKIYO;
	//単位区分
	itemDataList['KBUNIT']        = 'CNT';
	//取引単価(税抜単価)
	itemDataList['PRTORIHIKI']    = _C_TANKA_NUKI;
	//取引数
	itemDataList['QTTORIHIKI']    = _C_SURYO;
	//税抜取引額(税抜金額)
	itemDataList['AMTORIHIKI']    = _C_KINGAKU_NUKI;
	//消費税額
	itemDataList['AMTAX']         = _C_ZEIGAKU;
	//支払依頼№
	itemDataList['NRSIHARAI']     = "";
	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減額(税込金額)
	if (_KBZOUGEN == '0') {
		//増減区分=0:残高減 → 10:振替控除
		var _AMZOUGEN = _C_KINGAKU_KOMI * -1;
	} else {
		//増減区分=1:残高増 → 11:振替計上
		var _AMZOUGEN = _C_KINGAKU_KOMI;
	}
	itemDataList['AMZOUGEN']     = _AMZOUGEN;

	updateDT100(itemDataList);



	//仕入先情報更新
	//--------------------

	//仕入先情報取得
	var itemSelectList = selectDT010(_IDSIIRESAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']    = lineDataMap['IDSIIRESAKI']
	//支払方法区分
	itemDataList['KBSIHARAI']      = lineDataMap['KBSIHARAI']
	//振込銀行口座
	itemDataList['TXHURIKOMI']     = lineDataMap['TXHURIKOMI']
	//摘要
	itemDataList['TXTEKIYO']       = lineDataMap['TXTEKIYO']
	//期首買掛残高
	itemDataList['AMKISYUKAIKAKE'] = lineDataMap['AMKISYUKAIKAKE']
	//期間仕入額(税込金額)
	if (_KBZOUGEN == '0') {
		//増減区分=0:残高減 → 10:振替控除
		var _AMZOUGEN = _C_KINGAKU_KOMI * -1;
	} else {
		//増減区分=1:残高増 → 11:振替計上
		var _AMZOUGEN = _C_KINGAKU_KOMI;
	}
	itemDataList['AMSIIRE']        = lineDataMap['AMSIIRE'] + _AMZOUGEN
	//期間支払額
	itemDataList['AMSIHARAI']      = lineDataMap['AMSIHARAI']
	//現買掛残高
	itemDataList['AMGENKAIKAKE']   = lineDataMap['AMGENKAIKAKE']

	updateDT010(itemDataList);


}
//-------------------------------------------
//買掛振替取消削除
//　1 : 仕入先
//　2 : 取引日
//  3 : 増減区分
//　4 : 振替区分
//　5 : 適用
//　6 : 取引単価
//　7 : ソース番号
//　8 : 参照番号
//
//　* : 買掛取引№
function exec_kaihuri_del(_IDSIIRESAKI, _TORIHIKIDATE, _KBZOUGEN, _KBKAIHURI, _TXTEKIYO, _ZEINUKI_HURIKAE, _NRSOURCE, _TXREFNO,
						  _NRKAIKAKE) {

	//数量準備
	// * var _C_SURYO			= 1;
	// * var _C_ZEIGAKU			= 0;
	// * var _C_KINGAKU_NUKI		= _ZEINUKI_HURIKAE;
	// * var _C_KINGAKU_KOMI		= _ZEINUKI_HURIKAE + _C_ZEIGAKU;
	// * var _C_TANKA_NUKI		= _C_KINGAKU_NUKI / _C_SURYO;
	// * var _C_TANKA_KOMI		= _C_KINGAKU_KOMI / _C_SURYO;

	var itemSelectList = selectDT100(_NRKAIKAKE);
	var lineDataMapDT100 = itemSelectList[0];

	var _C_SURYO			= lineDataMapDT100['QTTORIHIKI'];
	var _C_ZEIGAKU			= lineDataMapDT100['AMTAX'];
	var _C_KINGAKU_NUKI		= lineDataMapDT100['AMTORIHIKI'];
	var _C_KINGAKU_KOMI		= lineDataMapDT100['AMZOUGEN'];
	if (_C_KINGAKU_KOMI < 0 ) { 
		_C_KINGAKU_KOMI = _C_KINGAKU_KOMI * -1;
	}
	var _C_TANKA_NUKI		= lineDataMapDT100['PRTORIHIKI'];
	//var _C_TANKA_KOMI		= (使用無し)




	//買掛履歴作成
	//--------------------
	// * var itemDataList = new Array();
	// * 
	// * //仕入先ID
	// * itemDataList['IDSIIRESAKI']   = _IDSIIRESAKI;
	// * //取引日
	// * itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	// * //取引区分
	// * if (_KBZOUGEN == '0') {
	// * 	//増減区分=0:残高減 → 10:振替控除
	// * 	itemDataList['KBKAITORI']     = "10";
	// * } else {
	// * 	//増減区分=1:残高増 → 11:振替計上
	// * 	itemDataList['KBKAITORI']     = "11";
	// * }
	// * //振替区分 (Null)
	// * itemDataList['KBKAIHURI']     = _KBKAIHURI;
	// * //赤黒     (2:赤伝)
	// * itemDataList['KBAKADEN']      = "2";
	// * //効区     (F:無効)
	// * itemDataList['FGVALID']       = "F";
	// * //品目ID
	// * itemDataList['IDHINMOKU']     = '';
	// * //品名／摘要
	// * itemDataList['TXHINMEI']      = _TXTEKIYO;
	// * //単位区分
	// * itemDataList['KBUNIT']        = 'CNT';
	// * //取引単価(税抜単価)
	// * itemDataList['PRTORIHIKI']    = _C_TANKA_NUKI;
	// * //取引数
	// * itemDataList['QTTORIHIKI']    = _C_SURYO;
	// * //税抜取引額(税抜金額)
	// * itemDataList['AMTORIHIKI']    = _C_KINGAKU_NUKI;
	// * //消費税額
	// * itemDataList['AMTAX']         = _C_ZEIGAKU;
	// * //支払依頼№
	// * itemDataList['NRSIHARAI']     = "";
	// * //取引ソース№
	// * itemDataList['NRSOURCE']      = _NRSOURCE;
	// * //登録日時
	// * itemDataList['DTCREATE']      = tln_com_nowdate();
	// * //参照番号
	// * itemDataList['TXREFNO']       = _TXREFNO;
	// * //年度(Null)
	// * itemDataList['DTNEND']        = '';
	// * //月序(Null)
	// * itemDataList['DTMSEQ']        = '';
	// * //残高増減額(税込金額)
	// * if (_KBZOUGEN == '0') {
	// * 	//増減区分=0:残高減 → 10:振替控除
	// * 	var _AMZOUGEN = _C_KINGAKU_KOMI * -1;
	// * } else {
	// * 	//増減区分=1:残高増 → 11:振替計上
	// * 	var _AMZOUGEN = _C_KINGAKU_KOMI;
	// * }
	// * itemDataList['AMZOUGEN']     = _AMZOUGEN * -1;
	// * 
	// * updateDT100(itemDataList);
	// * 

	insertAkaDT100(_NRKAIKAKE);



	//買掛履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）
	if (_KBZOUGEN == '0') {
		//増減区分=0:残高減 → 10:振替控除
		var _KBKAITORI = "10";
	} else {
		//増減区分=1:残高増 → 11:振替計上
		var _KBKAITORI = "11";
	}
	TALON.update( " UPDATE DT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBKAITORI  = '" + _KBKAITORI + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE  + "'"
				);



	//仕入先情報更新
	//--------------------

	//仕入先情報取得
	var itemSelectList = selectDT010(_IDSIIRESAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']    = lineDataMap['IDSIIRESAKI']
	//支払方法区分
	itemDataList['KBSIHARAI']      = lineDataMap['KBSIHARAI']
	//振込銀行口座
	itemDataList['TXHURIKOMI']     = lineDataMap['TXHURIKOMI']
	//摘要
	itemDataList['TXTEKIYO']       = lineDataMap['TXTEKIYO']
	//期首買掛残高
	itemDataList['AMKISYUKAIKAKE'] = lineDataMap['AMKISYUKAIKAKE']
	//期間仕入額
	//期間仕入額(税込金額)
	if (_KBZOUGEN == '0') {
		//増減区分=0:残高減 → 10:振替控除
		var _AMZOUGEN = _C_KINGAKU_KOMI * -1;
	} else {
		//増減区分=1:残高増 → 11:振替計上
		var _AMZOUGEN = _C_KINGAKU_KOMI;
	}
	itemDataList['AMSIIRE']        = lineDataMap['AMSIIRE'] + (_AMZOUGEN * -1)
	//期間支払額
	itemDataList['AMSIHARAI']      = lineDataMap['AMSIHARAI']
	//現買掛残高
	itemDataList['AMGENKAIKAKE']   = lineDataMap['AMGENKAIKAKE']

	updateDT010(itemDataList);

}



//-------------------------------------------
//［処理］特殊仕入処理
//-------------------------------------------
//特殊仕入新規登録
//　 1 : 品目コード
//　 2 : 取引先コード
//　 3 : 倉庫コード
//　 4 : 取引日
//　 5 : 取引区分
//　 6 : 取引数
//　 7 : 税抜単価
//　 8 : 税抜取引額
//　 9 : 消費税額
//　10 : ソース番号
//　11 : 参照番号
function exec_tsiire_ins(
				_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _KBTOKUSIIRE,
				_SURYO, _ZEINUKI_TANKA, _ZEINUKI_KINGAKU, _ZEIGAKU,
				_NRSOURCE, _TXREFNO) {

	//数値準備
	var itemSelectList = selectBT010(_HINMOKU);
	var lineDataMap = itemSelectList[0];

	var _C_SURYO			= _SURYO;
	var _C_ZEIGAKU			= _ZEIGAKU;
	var _C_KINGAKU_NUKI		= _ZEINUKI_KINGAKU;
	var _C_KINGAKU_KOMI		= _ZEINUKI_KINGAKU + _C_ZEIGAKU;
	var _C_TANKA_NUKI		= _ZEINUKI_TANKA;
	var _C_TANKA_KOMI		= _C_KINGAKU_KOMI / _C_SURYO;

	var _C_SURYO_KEISU		= _C_SURYO * lineDataMap['VLKANZAN'];
	var _C_TANKA_KOMI_KEISU	= _C_KINGAKU_KOMI / _C_SURYO_KEISU;



	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	/*
	取引区分=10:仕入返品 → 買掛取引区分=02:仕入返品　　→出庫
	取引区分=20:直接入荷 → 買掛取引区分=01:直入荷仕入　→入庫
	*/
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;

		if (_KBTOKUSIIRE == '20') {
			//期間入庫数(係数込取引数)
			itemDataList['QTNYUKO']        = _C_SURYO_KEISU;
			//期間出庫数
			itemDataList['QTSYUKKO']       = 0;
			//期間入庫額(税込金額)
			itemDataList['AMNYUKO']        = _C_KINGAKU_KOMI;
			//期間出庫額
			itemDataList['AMSYUKKO']       = 0;
		} else {
			//期間入庫数
			itemDataList['QTNYUKO']        = 0;
			//期間出庫数(係数込取引数)
			itemDataList['QTSYUKKO']       = _C_SURYO_KEISU;
			//期間入庫額
			itemDataList['AMNYUKO']        = 0;
			//期間出庫額(税込金額)
			itemDataList['AMSYUKKO']       = _C_KINGAKU_KOMI;
		}

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];

		if (_KBTOKUSIIRE == '20') {
			//期間入庫数(係数込取引数)
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + _C_SURYO_KEISU;
			//期間出庫数
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
			//期間入庫額
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + _C_KINGAKU_KOMI;
			//期間出庫額
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];
		} else {
			//期間入庫数
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
			//期間出庫数(係数込取引数)
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + _C_SURYO_KEISU;
			//期間入庫額
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
			//期間出庫額
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + _C_KINGAKU_KOMI;
		}

	}

	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------
	var itemDataList = new Array();

	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//受払区分
	//10:仕入返品 → 02:仕入返品   → 140:仕入返品
	//20:直接入荷 → 01:直入荷仕入 → 040:直仕入入庫
	if (_KBTOKUSIIRE == '20') {
		itemDataList['KBUKEBARAI']    = "040";
	} else {
		itemDataList['KBUKEBARAI']    = "140";
	}
	//振替区分 (Null)
	itemDataList['KBZAIHURI']     = "";
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//倉庫Ｃ
	itemDataList['CDSOUKO']       = _SOUKO;
	//相手先名
	itemDataList['TXAITESAKI']    = _TORIHIKISAKI;
	//取引単価(係数込税込単価)
	itemDataList['PRTORIHIKI']    = _C_TANKA_KOMI_KEISU;
	//取引数(係数込取引数)
	itemDataList['QTTORIHIKI']    = _C_SURYO_KEISU;
	//取引額(税込金額)
	itemDataList['AMTORIHIKI']    = _C_KINGAKU_KOMI;
	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	if (_KBTOKUSIIRE == '20') {
		//20:直接入荷 → 01:直入荷仕入 → 040:直仕入入庫
		//残高増減数(係数込税込単価
		itemDataList['QTZOUGEN']      = _C_SURYO_KEISU;
		//残高増減額(税込金額)
		itemDataList['AMZOUGEN']      = _C_KINGAKU_KOMI;
	} else {
		//10:仕入返品 → 02:仕入返品   → 140:仕入返品
		//残高増減数(係数込税込単価
		itemDataList['QTZOUGEN']      = _C_SURYO_KEISU * -1;
		//残高増減額(税込金額)
		itemDataList['AMZOUGEN']      = _C_KINGAKU_KOMI * -1;
	}

	updateFT100(itemDataList);



	//買掛履歴作成
	//--------------------
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']   = _TORIHIKISAKI;
	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//取引区分
	//10:仕入返品 → 02:仕入返品 
	//20:直接入荷 → 01:直入荷仕入
	if (_KBTOKUSIIRE == '20') {
		itemDataList['KBKAITORI']     = "01";
	} else {
		itemDataList['KBKAITORI']     = "02";
	}
	//振替区分 (Null)
	itemDataList['KBKAIHURI']     = "";
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//取引単価(税抜単価)
	itemDataList['PRTORIHIKI']    = _C_TANKA_NUKI;
	//取引数
	itemDataList['QTTORIHIKI']    = _C_SURYO;
	//税抜取引額(税抜金額)
	itemDataList['AMTORIHIKI']    = _C_KINGAKU_NUKI;
	//消費税額
	itemDataList['AMTAX']         = _C_ZEIGAKU;
	//支払依頼№
	itemDataList['NRSIHARAI']     = "";
	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減額(税込金額)
	if (_KBTOKUSIIRE == '20') {
		//20:直接入荷 → 01:直入荷仕入
		itemDataList['AMZOUGEN']     = _C_KINGAKU_KOMI;
	} else {
		//10:仕入返品 → 02:仕入返品 
		itemDataList['AMZOUGEN']     = _C_KINGAKU_KOMI * -1;
	}

	updateDT100(itemDataList);




	//仕入先情報更新
	//--------------------
	var itemDataList = new Array();

	//仕入先情報取得
	var itemSelectList = selectDT010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']    = lineDataMap['IDSIIRESAKI'];
	//支払方法区分
	itemDataList['KBSIHARAI']      = lineDataMap['KBSIHARAI'];
	//振込銀行口座
	itemDataList['TXHURIKOMI']     = lineDataMap['TXHURIKOMI'];
	//摘要
	itemDataList['TXTEKIYO']       = lineDataMap['TXTEKIYO'];
	//期首買掛残高
	itemDataList['AMKISYUKAIKAKE'] = lineDataMap['AMKISYUKAIKAKE'];
	//期間仕入額(税込金額)
	if (_KBTOKUSIIRE == '20') {
		//20:直接入荷 → 01:直入荷仕入
		var _AMSIIRE = _C_KINGAKU_KOMI;
	} else {
		//10:仕入返品 → 02:仕入返品 
		var _AMSIIRE = _C_KINGAKU_KOMI * -1;
	}
	itemDataList['AMSIIRE']        = lineDataMap['AMSIIRE'] + _AMSIIRE;
	//期間支払額
	itemDataList['AMSIHARAI']      = lineDataMap['AMSIHARAI'];
	//現買掛残高
	itemDataList['AMGENKAIKAKE']   = lineDataMap['AMGENKAIKAKE'];

	updateDT010(itemDataList);


}

//-------------------------------------------
//特殊仕入取消削除
//　 1 : 品目コード
//　 2 : 取引先コード
//　 3 : 倉庫コード
//　 4 : 取引日
//　 5 : 取引区分
//　 6 : 取引数
//　 7 : 税抜単価
//　 8 : 税抜取引額
//　 9 : 消費税額
//　10 : ソース番号
//　11 : 参照番号
//
//　* : 在庫取引№
//　* : 買掛取引№
function exec_tsiire_del(
				_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _KBTOKUSIIRE,
				_SURYO, _ZEINUKI_TANKA, _ZEINUKI_KINGAKU, _ZEIGAKU,
				_NRSOURCE, _TXREFNO,
				_NRZAITORI, _NRKAIKAKE) {

	//数値準備
	// * var itemSelectList = selectBT010(_HINMOKU);
	// * var lineDataMap = itemSelectList[0];
	// * 
	// * var _C_SURYO			= _SURYO;
	// * var _C_ZEIGAKU			= _ZEIGAKU;
	// * var _C_KINGAKU_NUKI		= _ZEINUKI_KINGAKU;
	// * var _C_KINGAKU_KOMI		= _ZEINUKI_KINGAKU + _C_ZEIGAKU;
	// * var _C_TANKA_NUKI		= _ZEINUKI_TANKA;
	// * var _C_TANKA_KOMI		= _C_KINGAKU_KOMI / _C_SURYO;
	// * 
	// * var _C_SURYO_KEISU		= _C_SURYO * lineDataMap['VLKANZAN'];
	// * var _C_TANKA_KOMI_KEISU	= _C_KINGAKU_KOMI / _C_SURYO_KEISU;

	var itemSelectList = selectFT100(_NRZAITORI);
	var lineDataMapFT100 = itemSelectList[0];
	var itemSelectList = selectDT100(_NRKAIKAKE);
	var lineDataMapDT100 = itemSelectList[0];

	var _C_SURYO			= lineDataMapDT100['QTTORIHIKI'];
	var _C_ZEIGAKU			= lineDataMapDT100['AMTAX'];
	var _C_KINGAKU_NUKI		= lineDataMapDT100['AMTORIHIKI'];
	var _C_KINGAKU_KOMI		= lineDataMapDT100['AMZOUGEN'];
	if (_C_KINGAKU_KOMI < 0 ) { 
		_C_KINGAKU_KOMI = _C_KINGAKU_KOMI * -1;
	}
	var _C_TANKA_NUKI		= lineDataMapDT100['PRTORIHIKI'];
	//var _C_TANKA_KOMI		= (使用無し)

	var _C_SURYO_KEISU		= lineDataMapFT100['QTTORIHIKI'];
	var _C_TANKA_KOMI_KEISU	= lineDataMapFT100['PRTORIHIKI'];




	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	/*
	取引区分=10:仕入返品 → 買掛取引区分=02:仕入返品　　→出庫
	取引区分=20:直接入荷 → 買掛取引区分=01:直入荷仕入　→入庫
	*/
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;

		if (_KBTOKUSIIRE == '20') {
			//期間入庫数(係数込取引数)
			itemDataList['QTNYUKO']        = _C_SURYO_KEISU * -1;
			//期間出庫数
			itemDataList['QTSYUKKO']       = 0;
			//期間入庫額(税込金額)
			itemDataList['AMNYUKO']        = _C_KINGAKU_KOMI * -1;
			//期間出庫額
			itemDataList['AMSYUKKO']       = 0;
		} else {
			//期間入庫数
			itemDataList['QTNYUKO']        = 0;
			//期間出庫数(係数込取引数)
			itemDataList['QTSYUKKO']       = _C_SURYO_KEISU * -1;
			//期間入庫額
			itemDataList['AMNYUKO']        = 0;
			//期間出庫額(税込金額)
			itemDataList['AMSYUKKO']       = _C_KINGAKU_KOMI * -1;
		}

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];

		if (_KBTOKUSIIRE == '20') {
			//期間入庫数(係数込取引数)
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + (_C_SURYO_KEISU * -1);
			//期間出庫数
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
			//期間入庫額(税込金額)
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + (_C_KINGAKU_KOMI * -1);
			//期間出庫額
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];
		} else {
			//期間入庫数
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
			//期間出庫数(係数込取引数)
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + (_C_SURYO_KEISU * -1);
			//期間入庫額
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
			//期間出庫額(税込金額)
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + (_C_KINGAKU_KOMI * -1);
		}


	}

	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------
	// * var itemDataList = new Array();
	// * 
	// * //取引日
	// * itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	// * //受払区分
	// * //10:仕入返品 → 02:仕入返品   → 140:仕入返品
	// * //20:直接入荷 → 01:直入荷仕入 → 040:直仕入入庫
	// * if (_KBTOKUSIIRE == '20') {
	// * 	itemDataList['KBUKEBARAI']    = "040";
	// * } else {
	// * 	itemDataList['KBUKEBARAI']    = "140";
	// * }
	// * //振替区分 (Null)
	// * itemDataList['KBZAIHURI']     = "";
	// * //赤黒     (2:赤伝)
	// * itemDataList['KBAKADEN']      = "2";
	// * //効区     (F:無効)
	// * itemDataList['FGVALID']       = "F";
	// * //品目ID
	// * itemDataList['IDHINMOKU']     = _HINMOKU;
	// * //倉庫Ｃ
	// * itemDataList['CDSOUKO']       = _SOUKO;
	// * //相手先名
	// * itemDataList['TXAITESAKI']    = _TORIHIKISAKI;
	// * //取引単価(係数込税込単価)
	// * itemDataList['PRTORIHIKI']    = _C_TANKA_KOMI_KEISU;
	// * //取引数(係数込取引数)
	// * itemDataList['QTTORIHIKI']    = _C_SURYO_KEISU;
	// * //取引額(税込金額)
	// * itemDataList['AMTORIHIKI']    = _C_KINGAKU_KOMI;
	// * //取引ソース№
	// * itemDataList['NRSOURCE']      = _NRSOURCE;
	// * //登録日時
	// * itemDataList['DTCREATE']      = tln_com_nowdate();
	// * //参照番号
	// * itemDataList['TXREFNO']       = _TXREFNO;
	// * //年度(Null)
	// * itemDataList['DTNEND']        = '';
	// * //月序(Null)
	// * itemDataList['DTMSEQ']        = '';
	// * if (_KBTOKUSIIRE == '20') {
	// * 	//20:直接入荷 → 01:直入荷仕入 → 040:直仕入入庫
	// * 	//残高増減数(係数込取引数)
	// * 	itemDataList['QTZOUGEN']      = _C_SURYO_KEISU  * -1;
	// * 	//残高増減額(税込金額)
	// * 	itemDataList['AMZOUGEN']      = _C_KINGAKU_KOMI * -1;
	// * } else {
	// * 	//10:仕入返品 → 02:仕入返品   → 140:仕入返品
	// * 	//残高増減数(係数込取引数)
	// * 	itemDataList['QTZOUGEN']      = (_C_SURYO_KEISU  * -1) * -1;
	// * 	//残高増減額(税込金額)
	// * 	itemDataList['AMZOUGEN']      = (_C_KINGAKU_KOMI * -1) * -1;
	// * }
	// * 
	// * updateFT100(itemDataList);
	// * 

	insertAkaFT100(_NRZAITORI);



	//入出庫履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）
	if (_KBTOKUSIIRE == '20') {
		var _KBUKEBARAI    = "040";
	} else {
		var _KBUKEBARAI    = "140";
	}
	TALON.update( " UPDATE FT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBUKEBARAI = '" + _KBUKEBARAI + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE   + "'"
				);



	//買掛履歴作成
	//--------------------
	// * var itemDataList = new Array();
	// * 
	// * //仕入先ID
	// * itemDataList['IDSIIRESAKI']   = _TORIHIKISAKI;
	// * //取引日
	// * itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	// * //取引区分
	// * //10:仕入返品 → 02:仕入返品 
	// * //20:直接入荷 → 01:直入荷仕入
	// * if (_KBTOKUSIIRE == '20') {
	// * 	itemDataList['KBKAITORI']     = "01";
	// * } else {
	// * 	itemDataList['KBKAITORI']     = "02";
	// * }
	// * //振替区分 (Null)
	// * itemDataList['KBKAIHURI']     = "";
	// * //赤黒     (2:赤伝)
	// * itemDataList['KBAKADEN']      = "2";
	// * //効区     (F:無効)
	// * itemDataList['FGVALID']       = "F";
	// * //品目ID
	// * itemDataList['IDHINMOKU']     = _HINMOKU;
	// * //取引単価(税抜単価)
	// * itemDataList['PRTORIHIKI']    = _C_TANKA_NUKI;
	// * //取引数
	// * itemDataList['QTTORIHIKI']    = _C_SURYO;
	// * //税抜取引額(税抜金額)
	// * itemDataList['AMTORIHIKI']    = _C_KINGAKU_NUKI;
	// * //消費税額
	// * itemDataList['AMTAX']         = _C_ZEIGAKU;
	// * //支払依頼№
	// * itemDataList['NRSIHARAI']     = "";
	// * //取引ソース№
	// * itemDataList['NRSOURCE']      = _NRSOURCE;
	// * //登録日時
	// * itemDataList['DTCREATE']      = tln_com_nowdate();
	// * //参照番号
	// * itemDataList['TXREFNO']       = _TXREFNO;
	// * //年度(Null)
	// * itemDataList['DTNEND']        = '';
	// * //月序(Null)
	// * itemDataList['DTMSEQ']        = '';
	// * //残高増減額(税込金額)
	// * if (_KBTOKUSIIRE == '20') {
	// * 	//20:直接入荷 → 01:直入荷仕入
	// * 	itemDataList['AMZOUGEN']     = _C_KINGAKU_KOMI * -1;
	// * } else {
	// * 	//10:仕入返品 → 02:仕入返品 
	// * 	itemDataList['AMZOUGEN']     = (_C_KINGAKU_KOMI * -1) * -1;
	// * }
	// * 
	// * updateDT100(itemDataList);
	// * 

	insertAkaDT100(_NRKAIKAKE);



	//買掛履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）
	if (_KBTOKUSIIRE == '20') {
		//10:仕入返品 → 02:仕入返品 
		var _KBKAITORI     = "01";
	} else {
		//20:直接入荷 → 01:直入荷仕入
		var _KBKAITORI     = "02";
	}
	TALON.update( " UPDATE DT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBKAITORI  = '" + _KBKAITORI + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE  + "'"
				);



	//仕入先情報更新
	//--------------------
	var itemDataList = new Array();

	//仕入先情報取得
	var itemSelectList = selectDT010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']    = lineDataMap['IDSIIRESAKI']
	//支払方法区分
	itemDataList['KBSIHARAI']      = lineDataMap['KBSIHARAI']
	//振込銀行口座
	itemDataList['TXHURIKOMI']     = lineDataMap['TXHURIKOMI']
	//摘要
	itemDataList['TXTEKIYO']       = lineDataMap['TXTEKIYO']
	//期首買掛残高
	itemDataList['AMKISYUKAIKAKE'] = lineDataMap['AMKISYUKAIKAKE']
	//期間仕入額(税込金額)
	if (_KBTOKUSIIRE == '20') {
		//20:直接入荷 → 01:直入荷仕入
		var _AMSIIRE = _C_KINGAKU_KOMI;
	} else {
		//10:仕入返品 → 02:仕入返品 
		var _AMSIIRE = _C_KINGAKU_KOMI * -1;
	}
	itemDataList['AMSIIRE']        = lineDataMap['AMSIIRE'] + (_AMSIIRE * -1);
	//期間支払額
	itemDataList['AMSIHARAI']      = lineDataMap['AMSIHARAI']
	//現買掛残高
	itemDataList['AMGENKAIKAKE']   = lineDataMap['AMGENKAIKAKE']

	updateDT010(itemDataList);


}












//-------------------------------------------
//［処理］仕入関連処理
//-------------------------------------------

//-------------------------------------------
//入荷見出し
function selectHT020(_NRNYUKA) {
	var sql = 
		"SELECT " +
		" NRNYUKA          " + 
		",IDSIIRESAKI      " + 
		",DTNYUKA          " + 
		",DTKENSYU         " + 
		",CDSOUKO          " + 
		",STNYUKA          " + 
		",CREATED_DATE     " + 
		",CREATED_BY       " + 
		",CREATED_PRG_NM   " + 
		",UPDATED_DATE     " + 
		",UPDATED_BY       " + 
		",UPDATED_PRG_NM   " + 
		",MODIFY_COUNT     " + 
		"FROM HT020        " +
		"WHERE NRNYUKA = '" + _NRNYUKA + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}
//発注見出し
function selectHT010(_NRHATTYU) {
	var sql = 
		"SELECT " +
		" HT010.NRHATTYU          " + 
		",HT010.IDSIIRESAKI       " + 
		",HT010.DTHATTYU          " + 
		",HT010.DTCREATE          " + 
		",HT010.CDSOUKO           " + 
		",HT010.TXTEKIYO          " + 
		",HT010.STHATTYU          " + 
		",HT010.CREATED_DATE      " + 
		",HT010.CREATED_BY        " + 
		",HT010.CREATED_PRG_NM    " + 
		",HT010.UPDATED_DATE      " + 
		",HT010.UPDATED_BY        " + 
		",HT010.UPDATED_PRG_NM    " + 
		",HT010.MODIFY_COUNT      " + 

		",HT011.QTHATTYU       " + 
		",HT011.QTKENSYU       " + 

		"FROM HT010            " + 
		"INNER JOIN ( SELECT NRHATTYU, SUM(QTHATTYU) AS QTHATTYU, SUM(QTKENSYU) AS QTKENSYU FROM HT011 GROUP BY NRHATTYU ) HT011 " + 
		"  ON HT011.NRHATTYU = HT010.NRHATTYU " + 
		"WHERE HT010.NRHATTYU = '" + _NRHATTYU + "' "
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}
function updateHT010(itemDataList) {
	//項目
	var itemColNameTbl = [
		 'NRHATTYU'
		,'IDSIIRESAKI'
		,'DTHATTYU'
		,'DTCREATE'
		,'CDSOUKO'
		,'TXTEKIYO'
		,'STHATTYU'
		,'CREATED_DATE'
		,'CREATED_BY'
		,'CREATED_PRG_NM'
		,'UPDATED_DATE'
		,'UPDATED_BY'
		,'UPDATED_PRG_NM'
		,'MODIFY_COUNT'
	];

	var itemSelectList = selectHT010(itemDataList['NRHATTYU']);

	var lineDataMap = itemSelectList[0];
	var _MODIFY_COUNT = lineDataMap['MODIFY_COUNT'];

	//UPDATE
	itemDataList['UPDATED_DATE']   = tln_com_nowdate();
	itemDataList['UPDATED_BY']     = tln_com_user_id();
	itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
	itemDataList['MODIFY_COUNT']   = (_MODIFY_COUNT + 1);

	var whereList = new Array();
	var whereTbl1 = [ null, '=' , 'NRHATTYU' ];
	whereList.push(whereTbl1);

	TALON.updateByMap( 'HT010', itemDataList , itemColNameTbl , whereList );

}
//発注明細(入荷№)
function selectHT011_NRNYUKA(_NRNYUKA) {
	var sql = 
		"SELECT " +
		" HT011.NRHATTYU       " + 
		",HT011.SQHATTYU       " + 
		",HT011.IDHINMOKU      " + 
		",HT011.PRHATTYU       " + 
		",HT011.QTHATTYU       " + 
		",HT011.QTKENSYU       " + 
		",HT011.DTNOUKI        " + 
		",HT011.NRNYUKA        " + 
		",HT011.NRSOURCE       " + 
		",HT011.QTKANZAN       " + 
		",HT011.FGNYUKA        " + 
		",HT011.CREATED_DATE   " + 
		",HT011.CREATED_BY     " + 
		",HT011.CREATED_PRG_NM " + 
		",HT011.UPDATED_DATE   " + 
		",HT011.UPDATED_BY     " + 
		",HT011.UPDATED_PRG_NM " + 
		",HT011.MODIFY_COUNT   " + 

		",HT010.IDSIIRESAKI   " + 
		",HT010.CDSOUKO       " + 

		"FROM HT011            " + 
		"INNER JOIN HT010      " + 
		"  ON HT010.NRHATTYU = HT011.NRHATTYU " +
		"WHERE NRNYUKA = '" + _NRNYUKA + "' "
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}
//在庫増減履歴(受払区分＋取引ソース番号）
function selectFT100_NRSOURCE(_KBUKEBARAI,_NRSOURCE) {
	var sql = 
		"SELECT " +
		" NRZAITORI      " + 
		",DTTORIHIKI     " + 
		",KBUKEBARAI     " + 
		",KBZAIHURI      " + 
		",KBAKADEN       " + 
		",FGVALID        " + 
		",IDHINMOKU      " + 
		",TXHINBAN       " + 
		",TXHINMEI       " + 
		",KBUNIT         " + 
		",CDSOUKO        " + 
		",TXAITESAKI     " + 
		",PRTORIHIKI     " + 
		",QTTORIHIKI     " + 
		",AMTORIHIKI     " + 
		",AMSAGAKU       " + 
		",NRSOURCE       " + 
		",DTCREATE       " + 
		",TXREFNO        " + 
		",DTNEND         " + 
		",DTMSEQ         " + 
		",QTZOUGEN       " + 
		",AMZOUGEN       " + 
		",CREATED_DATE   " + 
		",CREATED_BY     " + 
		",CREATED_PRG_NM " + 
		",UPDATED_DATE   " + 
		",UPDATED_BY     " + 
		",UPDATED_PRG_NM " + 
		",MODIFY_COUNT   " + 
		"FROM FT100      " +
		"WHERE KBUKEBARAI = '" + _KBUKEBARAI + "'" + 
		"  AND FGVALID  = 'T'" + 
		"  AND NRSOURCE = '" + _NRSOURCE + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}
//買掛振替[KT010]
function selectKT010(_NRKAIHURI) {
	var sql = 
		"SELECT " +
		" NRKAIHURI        " + 
		",KBKAIHURI        " + 
		",DTHURIKAE        " + 
		",IDSIIRESAKI      " + 
		",AMHURIKAE        " + 
		",TXTEKIYO         " + 
		",NRSOURCE         " + 
		",CREATED_DATE     " + 
		",CREATED_BY       " + 
		",CREATED_PRG_NM   " + 
		",UPDATED_DATE     " + 
		",UPDATED_BY       " + 
		",UPDATED_PRG_NM   " + 
		",MODIFY_COUNT     " + 
		",KBZOUGEN         " + 
		"FROM KT010        " +
		"WHERE NRKAIHURI = '" + _NRKAIHURI + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}
//買掛増減履歴(受払区分＋取引ソース番号）
function selectDT100_NRSOURCE(_KBKAITORI,_NRSOURCE) {
	var sql = 
		"SELECT " +
		" NRKAIKAKE           " + 
		",IDSIIRESAKI         " + 
		",DTTORIHIKI          " + 
		",KBKAITORI           " + 
		",KBKAIHURI           " + 
		",KBAKADEN            " + 
		",FGVALID             " + 
		",IDHINMOKU           " + 
		",TXHINBAN            " + 
		",TXHINMEI            " + 
		",KBUNIT              " + 
		",PRTORIHIKI          " + 
		",QTTORIHIKI          " + 
		",AMTORIHIKI          " + 
		",AMTAX               " + 
		",NRSIHARAI           " + 
		",NRSOURCE            " + 
		",DTCREATE            " + 
		",TXREFNO             " + 
		",DTNEND              " + 
		",DTMSEQ              " + 
		",AMZOUGEN            " + 
		",CREATED_DATE        " + 
		",CREATED_BY          " + 
		",CREATED_PRG_NM      " + 
		",UPDATED_DATE        " + 
		",UPDATED_BY          " + 
		",UPDATED_PRG_NM      " + 
		",MODIFY_COUNT        " + 
		"FROM DT100      " +
		"WHERE KBKAITORI = '" + _KBKAITORI + "'" + 
		"  AND FGVALID  = 'T'" + 
		"  AND NRSOURCE = '" + _NRSOURCE + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}
//特殊仕入[KT020]
function selectKT020(_NRTOKUSIIRE) {
	var sql = 
		"SELECT " +
		" NRTOKUSIIRE      " + 
		",KBTOKUSIIRE      " + 
		",IDSIIRESAKI      " + 
		",DTTORIHIKI       " + 
		",IDHINMOKU        " + 
		",CDSOUKO          " + 
		",PRTORIHIKI       " + 
		",QTTORIHIKI       " + 
		",PRZAIKO          " + 
		",TXTEKIYO         " + 
		",NRSOURCE         " + 
		",AMTORIHIKI       " + 
		",AMTAX            " + 
		",QTZAITORI        " + 
		",CREATED_DATE     " + 
		",CREATED_BY       " + 
		",CREATED_PRG_NM   " + 
		",UPDATED_DATE     " + 
		",UPDATED_BY       " + 
		",UPDATED_PRG_NM   " + 
		",MODIFY_COUNT     " + 
		"FROM KT020        " +
		"WHERE NRTOKUSIIRE = '" + _NRTOKUSIIRE + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}





//-------------------------------------------
//［処理］支払関連
//-------------------------------------------
//支払依頼[DT110]
function selectDT110(_NRSIHARAI) {
	var sql = 
		"SELECT " +
		"  NRSIHARAI        " + 
		" ,IDSIIRESAKI      " + 
		" ,DTSIHARAI        " + 
		" ,DTSYONIN         " + 
		" ,KBSIHARAI        " + 
		" ,TXSEIKYU         " + 
		" ,TXTEKIYO         " + 
		" ,NRSOURCE         " + 
		" ,AMSIHARAI        " + 
		" ,STSIHARAI        " + 
		" ,CREATED_DATE     " + 
		" ,CREATED_BY       " + 
		" ,CREATED_PRG_NM   " + 
		" ,UPDATED_DATE     " + 
		" ,UPDATED_BY       " + 
		" ,UPDATED_PRG_NM   " + 
		" ,MODIFY_COUNT     " + 
		"FROM DT110        " +
		"WHERE NRSIHARAI = '" + _NRSIHARAI + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}



//-------------------------------------------
//［処理］支払承認
//-------------------------------------------
//　1 : 仕入先ID
//　2 : 支払承認日
//　3 : 支払依頼額
//　4 : 摘要
//　5 : ソース番号
//　6 : 参照番号
function exec_shiharaisyonin_ins(_TORIHIKISAKI, _TORIHIKIDATE, _AMSIHARAI, _TXTEKIYO , _NRSOURCE, _TXREFNO) {


	//買掛履歴作成
	//--------------------
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']   = _TORIHIKISAKI;
	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//取引区分 (90:支払)
	itemDataList['KBKAITORI']     = "90";
	//振替区分 (Null)
	itemDataList['KBKAIHURI']     = "";
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = "";
	//品目名／摘要
	itemDataList['TXHINMEI']     = _TXTEKIYO;
	//取引単価(税抜単価)
	itemDataList['PRTORIHIKI']    = _AMSIHARAI;
	//取引数
	itemDataList['QTTORIHIKI']    = 1;
	//税抜取引額(税抜金額)
	itemDataList['AMTORIHIKI']    = _AMSIHARAI;
	//消費税額
	itemDataList['AMTAX']         = 0;
	//支払依頼№
	itemDataList['NRSIHARAI']     = "";
	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減額(税込金額)
	itemDataList['AMZOUGEN']      = _AMSIHARAI;

	updateDT100(itemDataList);



	//仕入先情報更新
	//--------------------
	var itemDataList = new Array();

	//仕入先情報取得
	var itemSelectList = selectDT010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']    = lineDataMap['IDSIIRESAKI'];
	//支払方法区分
	itemDataList['KBSIHARAI']      = lineDataMap['KBSIHARAI'];
	//振込銀行口座
	itemDataList['TXHURIKOMI']     = lineDataMap['TXHURIKOMI'];
	//摘要
	itemDataList['TXTEKIYO']       = lineDataMap['TXTEKIYO'];
	//期首買掛残高
	itemDataList['AMKISYUKAIKAKE'] = lineDataMap['AMKISYUKAIKAKE'];
	//期間仕入額(税込金額)
	itemDataList['AMSIIRE']        = lineDataMap['AMSIIRE'];
	//期間支払額
	itemDataList['AMSIHARAI']      = lineDataMap['AMSIHARAI'] + _AMSIHARAI;
	//現買掛残高
	itemDataList['AMGENKAIKAKE']   = lineDataMap['AMGENKAIKAKE'];

	updateDT010(itemDataList);


}


//　1 : 仕入先ID
//　2 : 支払承認日
//　3 : 支払依頼額
//　4 : 摘要
//　5 : ソース番号
//　6 : 参照番号
//　* : 買掛取引№
function exec_shiharaisyonin_del(_TORIHIKISAKI, _TORIHIKIDATE, _AMSIHARAI, _TXTEKIYO , _NRSOURCE, _TXREFNO, _NRKAIKAKE) {

	//買掛履歴作成
	insertAkaDT100(_NRKAIKAKE);


	//買掛履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）

	TALON.update( " UPDATE DT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBKAITORI  = '" + "90" + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE  + "'"
				);



	//仕入先情報更新
	//--------------------

	//仕入先情報取得
	var itemSelectList = selectDT010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//仕入先ID
	itemDataList['IDSIIRESAKI']    = lineDataMap['IDSIIRESAKI']
	//支払方法区分
	itemDataList['KBSIHARAI']      = lineDataMap['KBSIHARAI']
	//振込銀行口座
	itemDataList['TXHURIKOMI']     = lineDataMap['TXHURIKOMI']
	//摘要
	itemDataList['TXTEKIYO']       = lineDataMap['TXTEKIYO']
	//期首買掛残高
	itemDataList['AMKISYUKAIKAKE'] = lineDataMap['AMKISYUKAIKAKE']
	//期間仕入額(税込金額)
	itemDataList['AMSIIRE']        = lineDataMap['AMSIIRE']
	//期間支払額
	itemDataList['AMSIHARAI']      = lineDataMap['AMSIHARAI'] - _AMSIHARAI
	//現買掛残高
	itemDataList['AMGENKAIKAKE']   = lineDataMap['AMGENKAIKAKE']

	updateDT010(itemDataList);

}

//-------------------------------------------
//［処理］出庫処理
//-------------------------------------------
//出庫新規登録
//　1 : 品目コード
//　2 : 取引先コード
//　3 : 倉庫コード
//　4 : 取引日
//　5 : 数量
//　6 : 税抜単価
//　7 : 税抜金額
//　8 : ソース番号
//　9 : 参照番号
function exec_syuko_ins(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _SURYO, _TANKA, _KINGAKU, _NRSOURCE, _TXREFNO) {


	//在庫更新
	//--------------------
	var _QTZOUGEN = _SURYO * -1
	var _AMZOUGEN = _KINGAKU * -1


	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数
		itemDataList['QTNYUKO']        = 0;
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = _SURYO;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額
		itemDataList['AMNYUKO']        = 0;
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = _KINGAKU;

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数
		itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + _SURYO;
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額
		itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + _KINGAKU;

	}

	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------
	var itemDataList = new Array();

	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//受払区分 (160:材料出庫)
	itemDataList['KBUKEBARAI']    = "160";
	//振替区分 (Null)
	itemDataList['KBZAIHURI']     = "";
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//倉庫Ｃ
	itemDataList['CDSOUKO']       = _SOUKO;
	//相手先名
	itemDataList['TXAITESAKI']    = _TORIHIKISAKI;
	//取引単価(単価)
	itemDataList['PRTORIHIKI']    = _TANKA;
	//取引数(数量)
	itemDataList['QTTORIHIKI']    = _SURYO;
	//取引額(金額)
	itemDataList['AMTORIHIKI']    = _KINGAKU;
	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減数(数量)
	itemDataList['QTZOUGEN']      = _QTZOUGEN;
	//残高増減額(金額)
	itemDataList['AMZOUGEN']      = _AMZOUGEN;

	updateFT100(itemDataList);


}
//-------------------------------------------
//出庫取消削除
//　1 : 品目コード
//　2 : 取引先コード
//　3 : 倉庫コード
//　4 : 取引日
//　5 : 数量
//　6 : 税抜単価
//　7 : 税抜金額
//　8 : ソース番号
//　9 : 参照番号
//
//　* : 在庫取引№
function exec_syuko_del(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _SURYO, _TANKA, _KINGAKU, _NRSOURCE, _TXREFNO,
					    _NRZAITORI
					   ) {

	//数値準備(赤データで再セット)
	var itemSelectList = selectFT100(_NRZAITORI);
	var lineDataMapFT100 = itemSelectList[0];
	_SURYO			= lineDataMapFT100['QTTORIHIKI'];
	_KINGAKU		= lineDataMapFT100['AMTORIHIKI'];
	_TANKA			= lineDataMapFT100['PRTORIHIKI'];




	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数
		itemDataList['QTNYUKO']        = 0;
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = _SURYO * -1;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額
		itemDataList['AMNYUKO']        = 0;
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = _KINGAKU * -1;

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数
		itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + (_SURYO * -1);
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額
		itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + (_KINGAKU * -1);

	}

	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------

	insertAkaFT100(_NRZAITORI);



	//入出庫履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）

	TALON.update( " UPDATE FT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBUKEBARAI = '" + "160" + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE   + "'" + 
				  "   AND NRZAITORI  = '" + _NRZAITORI + "'"
				);


}

//-------------------------------------------
//［処理］完成・出荷(完成入庫)処理
//-------------------------------------------
//完成・出荷入庫新規登録
//　1 : 品目コード
//　2 : 取引先コード
//　3 : 倉庫コード
//　4 : 取引日
//　5 : 数量
//　6 : 税抜単価
//　7 : 税抜金額
//　8 : ソース番号
//　9 : 参照番号
function exec_kansei_nyuko_ins(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _SURYO, _TANKA, _KINGAKU, _NRSOURCE, _TXREFNO) {


	//計算
	//--------------------
	var _C_KINGAKU = _SURYO * _TANKA;


	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数(数量)
		itemDataList['QTNYUKO']        = _SURYO;
		//期間出庫数
		itemDataList['QTSYUKKO']       = 0;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額(金額)
		itemDataList['AMNYUKO']        = _C_KINGAKU;
		//期間出庫額
		itemDataList['AMSYUKKO']       = 0;

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数(数量)
		itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + _SURYO;
		//期間出庫数
		itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額(金額)
		itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + _C_KINGAKU;
		//期間出庫額
		itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];

	}

	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------
	var itemDataList = new Array();

	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//受払区分 (060 : 完成入庫)
	itemDataList['KBUKEBARAI']    = "060";
	//振替区分 (Null)
	itemDataList['KBZAIHURI']     = "";
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//倉庫Ｃ
	itemDataList['CDSOUKO']       = _SOUKO;
	//相手先名
	itemDataList['TXAITESAKI']    = _TORIHIKISAKI;
	//取引単価(単価)
	itemDataList['PRTORIHIKI']    = _TANKA;
	//取引数(数量)
	itemDataList['QTTORIHIKI']    = _SURYO;
	//取引額(金額)
	itemDataList['AMTORIHIKI']    = _C_KINGAKU;
	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減数(数量)
	itemDataList['QTZOUGEN']      = _SURYO;
	//残高増減額(金額)
	itemDataList['AMZOUGEN']      = _C_KINGAKU;

	updateFT100(itemDataList);


}
//-------------------------------------------
//完成出荷入庫取消削除
//　1 : 品目コード
//　2 : 取引先コード
//　3 : 倉庫コード
//　4 : 取引日
//　5 : 数量
//　6 : 税抜単価
//　7 : 税抜金額
//　8 : ソース番号
//　9 : 参照番号
//
//　* : 在庫取引№
function exec_kansei_nyuko_del(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _SURYO, _TANKA, _KINGAKU, _NRSOURCE, _TXREFNO,
							   _NRZAITORI) {

	//数値準備(赤データで再セット)
	var itemSelectList = selectFT100(_NRZAITORI);
	var lineDataMapFT100 = itemSelectList[0];
	_SURYO			= lineDataMapFT100['QTTORIHIKI'];
	_KINGAKU		= lineDataMapFT100['AMTORIHIKI'];
	_TANKA			= lineDataMapFT100['PRTORIHIKI'];




	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数(数量)
		itemDataList['QTNYUKO']        = _SURYO * -1;
		//期間出庫数
		itemDataList['QTSYUKKO']       = 0;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額(金額)
		itemDataList['AMNYUKO']        = _KINGAKU * -1;
		//期間出庫額
		itemDataList['AMSYUKKO']       = 0;

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数(数量)
		itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + (_SURYO * -1);
		//期間出庫数
		itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額(金額)
		itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + (_KINGAKU * -1);
		//期間出庫額
		itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];

	}


	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------

	insertAkaFT100(_NRZAITORI);



	//入出庫履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）

	TALON.update( " UPDATE FT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBUKEBARAI = '" + "060" + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE   + "'"
				);


}



//-------------------------------------------
//［処理］完成・出荷(廃棄)処理
//-------------------------------------------
//完成・出荷(廃棄)新規登録
//　1 : 品目コード
//　2 : 取引先コード
//　3 : 倉庫コード
//　4 : 取引日
//　5 : 数量
//　6 : 税抜単価
//　7 : 税抜金額
//　8 : ソース番号
//　9 : 参照番号
function exec_kansei_haiki_ins(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _SURYO, _TANKA, _KINGAKU, _NRSOURCE, _TXREFNO) {


	//計算
	//--------------------
	var _C_KINGAKU = _SURYO * _TANKA;


	//在庫更新
	//--------------------
	var _QTZOUGEN = _SURYO * -1
	var _AMZOUGEN = _C_KINGAKU * -1

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数
		itemDataList['QTNYUKO']        = 0;
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = _SURYO;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額
		itemDataList['AMNYUKO']        = 0;
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = _C_KINGAKU;

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数
		itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + _SURYO;
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額
		itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + _C_KINGAKU;

	}

	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------
	var itemDataList = new Array();

	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//受払区分 (120 : 振替出庫)
	itemDataList['KBUKEBARAI']    = "120";
	//振替区分 (11:雑損)
	itemDataList['KBZAIHURI']     = "11";
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//倉庫Ｃ
	itemDataList['CDSOUKO']       = _SOUKO;
	//相手先名
	itemDataList['TXAITESAKI']    = _TORIHIKISAKI;
	//取引単価(単価)
	itemDataList['PRTORIHIKI']    = _TANKA;
	//取引数(数量)
	itemDataList['QTTORIHIKI']    = _SURYO;
	//取引額(金額)
	itemDataList['AMTORIHIKI']    = _C_KINGAKU;
	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減数(数量)
	itemDataList['QTZOUGEN']      = _QTZOUGEN;
	//残高増減額(金額)
	itemDataList['AMZOUGEN']      = _AMZOUGEN;

	updateFT100(itemDataList);


}
//-------------------------------------------
//完成・出荷(廃棄)取消削除
//　1 : 品目コード
//　2 : 取引先コード
//　3 : 倉庫コード
//　4 : 取引日
//　5 : 数量
//　6 : 税抜単価
//　7 : 税抜金額
//　8 : ソース番号
//　9 : 参照番号
//
//　* : 在庫取引№
function exec_kansei_haiki_del(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _SURYO, _TANKA, _KINGAKU, _NRSOURCE, _TXREFNO,
							   _NRZAITORI) {


	//数値準備(赤データで再セット)
	var itemSelectList = selectFT100(_NRZAITORI);
	var lineDataMapFT100 = itemSelectList[0];
	_SURYO			= lineDataMapFT100['QTTORIHIKI'];
	_KINGAKU		= lineDataMapFT100['AMTORIHIKI'];
	_TANKA			= lineDataMapFT100['PRTORIHIKI'];




	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数
		itemDataList['QTNYUKO']        = 0;
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = _SURYO * -1;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額
		itemDataList['AMNYUKO']        = 0;
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = _KINGAKU * -1;

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数
		itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + (_SURYO * -1);
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額
		itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + (_KINGAKU * -1);

	}


	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------

	insertAkaFT100(_NRZAITORI);



	//入出庫履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）

	TALON.update( " UPDATE FT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBUKEBARAI = '" + "120" + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE   + "'"
				);


}



//-------------------------------------------
//［処理］完成・出荷(販売出荷)処理
//-------------------------------------------
//完成・出荷(販売出荷)新規登録
//　 1 : 品目コード
//　 2 : 取引先コード
//　 3 : 倉庫コード
//　 4 : 取引日
//　 5 : 数量(出荷数)
//　 6 : 単価(実勢原価)
//　 7 : 単価(受注単価)
//　 8 : 実勢原価額
//　 9 : ソース番号
//　10 : 参照番号
function exec_kansei_hanbai_ins(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE,
							    _SYUKA_SURYO, _JISEI_GENKA, _JUCHU_TANKA, _JISEI_KINGAKU, 
							    _NRSOURCE, _TXREFNO) {

	//計算
	//取引額＝実勢原価額
	//出荷額
	var _C_SYUKA_KINGAKU	  = _SYUKA_SURYO * _JISEI_GENKA;
	var _C_JISEI_KINGAKU	  = _C_SYUKA_KINGAKU;

	//受注金額/消費税額
	var _C_JUCHU_KINGAKU_NUKI = _SYUKA_SURYO * _JUCHU_TANKA;
	var _C_JUCHU_ZEIGAKU	  = _C_JUCHU_KINGAKU_NUKI * getTAX_RATE(_TORIHIKIDATE);
	var _C_JUCHU_KINGAKU_KOMI = _C_JUCHU_KINGAKU_NUKI + _C_JUCHU_ZEIGAKU;


	//在庫更新
	//--------------------
	var _QTZOUGEN = _SYUKA_SURYO * -1
	var _AMZOUGEN = _C_SYUKA_KINGAKU * -1

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数
		itemDataList['QTNYUKO']        = 0;
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = _SYUKA_SURYO;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額
		itemDataList['AMNYUKO']        = 0;
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = _C_SYUKA_KINGAKU;

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数
		itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + _SYUKA_SURYO;
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額
		itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + _C_SYUKA_KINGAKU;

	}

	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------
	var itemDataList = new Array();

	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//受払区分 (130 : 売上出庫)
	itemDataList['KBUKEBARAI']    = "130";
	//振替区分 (Null)
	itemDataList['KBZAIHURI']     = "";
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//倉庫Ｃ
	itemDataList['CDSOUKO']       = _SOUKO;
	//相手先名
	itemDataList['TXAITESAKI']    = _TORIHIKISAKI;
	//取引単価(単価)
	itemDataList['PRTORIHIKI']    = _JISEI_GENKA;
	//取引数(数量)
	itemDataList['QTTORIHIKI']    = _SYUKA_SURYO;
	//取引額(金額)
	itemDataList['AMTORIHIKI']    = _C_SYUKA_KINGAKU;

	//取引差額 ['（【製造指示】出荷数 *【製造指示】受注単価）－【製造指示】実勢原価額]
	itemDataList['AMSAGAKU']    = (_SYUKA_SURYO * _JUCHU_TANKA) - _C_JISEI_KINGAKU;

	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減数(数量)
	itemDataList['QTZOUGEN']      = _QTZOUGEN;
	//残高増減額(金額)
	itemDataList['AMZOUGEN']      = _AMZOUGEN;

	updateFT100(itemDataList);



	//売掛履歴作成
	//--------------------
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']  = _TORIHIKISAKI;
	//取引日
	itemDataList['DTTORIHIKI']   = _TORIHIKIDATE;
	//取引区分(00 : 出荷売上)
	itemDataList['KBURITORI']    = "00";
	//振替区分(Null)
	itemDataList['KBURIHURI']    = "";
	//赤黒(1:黒伝)
	itemDataList['KBAKADEN']     = "1";
	//効区(T:有効)
	itemDataList['FGVALID']      = "T";
	//品目ID
	itemDataList['IDHINMOKU']    = _HINMOKU;
	//取引単価(受注単価)
	itemDataList['PRTORIHIKI']   = _JUCHU_TANKA;
	//取引数(出荷数)
	itemDataList['QTTORIHIKI']   = _SYUKA_SURYO;
	//消費税額(受注金額消費税額)
	itemDataList['AMTAX']        = _C_JUCHU_ZEIGAKU;
	//販売原価
	itemDataList['AMGENKA']      = _C_JISEI_KINGAKU;
	//取引ソース№
	itemDataList['NRSOURCE']     = _NRSOURCE;
	//請求№(Null)
	itemDataList['NRSEIKYU']     = "";
	//登録日時
	itemDataList['DTCREATE']     = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']      = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']       = '';
	//月序(Null)
	itemDataList['DTMSEQ']       = '';
	//粗利額
	itemDataList['AMARARI']      = _C_JUCHU_KINGAKU_NUKI - _C_JISEI_KINGAKU;
	//残高増減額
	itemDataList['AMZOUGEN']     = _C_JUCHU_KINGAKU_KOMI;
	//税抜取引額
	itemDataList['AMTORIHIKI']   = _C_JUCHU_KINGAKU_NUKI;


	updateET100(itemDataList);



	//得意先情報更新
	//--------------------
	var itemDataList = new Array();

	//得意先情報取得
	var itemSelectList = selectET010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']       = lineDataMap['IDTOKUISAKI'];
	//客先担当部署
	itemDataList['TXTANTOUBUSYO']     = lineDataMap['TXTANTOUBUSYO'];
	//客先担当名
	itemDataList['TXTANTOUSYA']       = lineDataMap['TXTANTOUSYA'];
	//客先担当職位
	itemDataList['TXTANTOUSYASYOKUI'] = lineDataMap['TXTANTOUSYASYOKUI'];
	//客先担当メアド
	itemDataList['TXTANTOUSYAEMAIL']  = lineDataMap['TXTANTOUSYAEMAIL'];
	//客先担当TEL
	itemDataList['TXTANTOUSYADENWA']  = lineDataMap['TXTANTOUSYADENWA'];
	//請求方式区分
	itemDataList['KBSEIKYUHOUSHIKI']  = lineDataMap['KBSEIKYUHOUSHIKI'];
	//締め日
	itemDataList['TXSIMEBI']          = lineDataMap['TXSIMEBI'];
	//標準入金方法区分
	itemDataList['KBNYUKINHOUHOU']    = lineDataMap['KBNYUKINHOUHOU'];
	//売上入金サイト
	itemDataList['VLNYUKINSAITO']     = lineDataMap['VLNYUKINSAITO'];
	//与信限度額
	itemDataList['AMYOSHIN']          = lineDataMap['AMYOSHIN'];
	//担当営業№
	itemDataList['NRTANTOUJYUGYOIN']  = lineDataMap['NRTANTOUJYUGYOIN'];
	//摘要
	itemDataList['TXTEKIYO']          = lineDataMap['TXTEKIYO'];
	//期首売掛残高
	itemDataList['AMKISYUURIKAKE']    = lineDataMap['AMKISYUURIKAKE'];
	//期間売上額(税込金額)
	itemDataList['AMURIAGE']          = lineDataMap['AMURIAGE'] + _C_JUCHU_KINGAKU_KOMI;
	//期間受領額
	itemDataList['AMJYURYO']          = lineDataMap['AMJYURYO'];
	//現売掛残高
	itemDataList['AMGENURIKAKE']      = lineDataMap['AMGENURIKAKE'];

	updateET010(itemDataList);

}


//-------------------------------------------
//完成・出荷(販売出荷)取消削除
//　 1 : 品目コード
//　 2 : 取引先コード
//　 3 : 倉庫コード
//　 4 : 取引日
//　 5 : 数量(出荷数)
//　 6 : 数量(受注数)
//　 7 : 単価(実勢原価)
//　 8 : 単価(受注単価)
//　 9 : 実勢原価額
//　10 : ソース番号
//　11 : 参照番号
//
//　* : 在庫取引№
//　* : 売掛取引№
function exec_kansei_hanbai_del(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE,
							    _SYUKA_SURYO, _JISEI_GENKA, _JUCHU_TANKA, _JISEI_KINGAKU, 
							    _NRSOURCE,  _TXREFNO,
							    _NRZAITORI, _NRURIKAKE) {

	//数値準備
	// * //出荷額
	// * var _C_SYUKA_KINGAKU	  = _SYUKA_SURYO * _JISEI_GENKA;
	// * //受注金額/消費税額
	// * var _C_JUCHU_KINGAKU_NUKI = _SYUKA_SURYO * _JUCHU_TANKA;
	// * var _C_JUCHU_ZEIGAKU	  = _C_JUCHU_KINGAKU_NUKI * getTAX_RATE(_TORIHIKIDATE);
	// * var _C_JUCHU_KINGAKU_KOMI = _C_JUCHU_KINGAKU_NUKI + _C_JUCHU_ZEIGAKU;

	//数値準備(赤データで再セット)
	var itemSelectList = selectFT100(_NRZAITORI);
	var lineDataMapFT100 = itemSelectList[0];
	var itemSelectList = selectET100(_NRURIKAKE);
	var lineDataMapET100 = itemSelectList[0];

	_SYUKA_SURYO			= lineDataMapFT100['QTTORIHIKI'];
	_JISEI_GENKA			= lineDataMapFT100['PRTORIHIKI'];
	var _C_SYUKA_KINGAKU	= lineDataMapFT100['AMTORIHIKI'];
	var _C_JUCHU_KINGAKU_NUKI = lineDataMapET100['AMTORIHIKI'];
	var _C_JUCHU_ZEIGAKU	  = lineDataMapET100['AMTAX'];
	var _C_JUCHU_KINGAKU_KOMI = _C_JUCHU_KINGAKU_NUKI + _C_JUCHU_ZEIGAKU;




	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数
		itemDataList['QTNYUKO']        = 0;
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = _SYUKA_SURYO * -1;
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額
		itemDataList['AMNYUKO']        = 0;
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = _C_SYUKA_KINGAKU * -1;

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数
		itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
		//期間出庫数(数量)
		itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + (_SYUKA_SURYO * -1);
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額
		itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
		//期間出庫額(金額)
		itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + (_C_SYUKA_KINGAKU * -1);

	}


	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------

	insertAkaFT100(_NRZAITORI);



	//入出庫履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）

	TALON.update( " UPDATE FT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBUKEBARAI = '" + "130" + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE   + "'"
				);



	//売掛履歴作成
	//--------------------

	insertAkaET100(_NRURIKAKE);



	//売掛履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）

	TALON.update( " UPDATE ET100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBURITORI  = '" + "00" + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE  + "'"
				);



	//得意先情報更新
	//--------------------
	var itemDataList = new Array();

	//得意先情報取得
	var itemSelectList = selectET010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']       = lineDataMap['IDTOKUISAKI'];
	//客先担当部署
	itemDataList['TXTANTOUBUSYO']     = lineDataMap['TXTANTOUBUSYO'];
	//客先担当名
	itemDataList['TXTANTOUSYA']       = lineDataMap['TXTANTOUSYA'];
	//客先担当職位
	itemDataList['TXTANTOUSYASYOKUI'] = lineDataMap['TXTANTOUSYASYOKUI'];
	//客先担当メアド
	itemDataList['TXTANTOUSYAEMAIL']  = lineDataMap['TXTANTOUSYAEMAIL'];
	//客先担当TEL
	itemDataList['TXTANTOUSYADENWA']  = lineDataMap['TXTANTOUSYADENWA'];
	//請求方式区分
	itemDataList['KBSEIKYUHOUSHIKI']  = lineDataMap['KBSEIKYUHOUSHIKI'];
	//締め日
	itemDataList['TXSIMEBI']          = lineDataMap['TXSIMEBI'];
	//標準入金方法区分
	itemDataList['KBNYUKINHOUHOU']    = lineDataMap['KBNYUKINHOUHOU'];
	//売上入金サイト
	itemDataList['VLNYUKINSAITO']     = lineDataMap['VLNYUKINSAITO'];
	//与信限度額
	itemDataList['AMYOSHIN']          = lineDataMap['AMYOSHIN'];
	//担当営業№
	itemDataList['NRTANTOUJYUGYOIN']  = lineDataMap['NRTANTOUJYUGYOIN'];
	//摘要
	itemDataList['TXTEKIYO']          = lineDataMap['TXTEKIYO'];
	//期首売掛残高
	itemDataList['AMKISYUURIKAKE']    = lineDataMap['AMKISYUURIKAKE'];
	//期間売上額(税込金額)
	itemDataList['AMURIAGE']          = lineDataMap['AMURIAGE'] + (_C_JUCHU_KINGAKU_KOMI * -1);
	//期間受領額
	itemDataList['AMJYURYO']          = lineDataMap['AMJYURYO'];
	//現売掛残高
	itemDataList['AMGENURIKAKE']      = lineDataMap['AMGENURIKAKE'];

	updateET010(itemDataList);

}

//-------------------------------------------
//［処理］売掛振替登録処理
//-------------------------------------------
//売掛振替登録処理
//　 1 : 取引先コード
//　 2 : 取引日
//　 3 : 増減区分
//　 4 : 振替区分
//   5 : 適用
//   6 : 振替額
//　 7 : ソース番号
//　 8 : 参照番号(売掛振替№)
function exec_urikake_ins(_TORIHIKISAKI, _TORIHIKIDATE, _ZOGENKBN, _HURIKAEKBN, _TEKIYO, _HURIKAEGAKU,
						  _NRSOURCE, _TXREFNO) {

	//売掛履歴作成
	//--------------------
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']  = _TORIHIKISAKI;
	//取引日
	itemDataList['DTTORIHIKI']   = _TORIHIKIDATE;
	//取引区分(00 : 出荷売上)
	if (_ZOGENKBN == '0') {
		//10:振替控除
		itemDataList['KBURITORI']    = "10";
	} else {
		//11:振替計上
		itemDataList['KBURITORI']    = "11";
	}
	//振替区分(Null)
	itemDataList['KBURIHURI']    = _HURIKAEKBN;
	//赤黒(1:黒伝)
	itemDataList['KBAKADEN']     = "1";
	//効区(T:有効)
	itemDataList['FGVALID']      = "T";
	//品目ID
	itemDataList['IDHINMOKU']    = '';
	//品名／摘要 
	itemDataList['TXHINMEI']     = _TEKIYO;
	//単位区分
	itemDataList['KBUNIT']        = 'CNT';
	//取引単価
	itemDataList['PRTORIHIKI']   = _HURIKAEGAKU;
	//取引数
	itemDataList['QTTORIHIKI']   = 1;
	//消費税額
	itemDataList['AMTAX']        = 0;
	//販売原価
	itemDataList['AMGENKA']      = 0;
	//取引ソース№
	itemDataList['NRSOURCE']     = _NRSOURCE;
	//請求№(Null)
	itemDataList['NRSEIKYU']     = "";
	//登録日時
	itemDataList['DTCREATE']     = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']      = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']       = '';
	//月序(Null)
	itemDataList['DTMSEQ']       = '';
	//粗利額
	itemDataList['AMARARI']      = 0;
	//残高増減額
	//取引区分(00 : 出荷売上)
	if (_ZOGENKBN == '0') {
		//10:振替控除
		itemDataList['AMZOUGEN']     = _HURIKAEGAKU * -1;
	} else {
		//11:振替計上
		itemDataList['AMZOUGEN']     = _HURIKAEGAKU;
	}
	//税抜取引額
	itemDataList['AMTORIHIKI']   = _HURIKAEGAKU;


	updateET100(itemDataList);



	//得意先情報更新
	//--------------------
	var itemDataList = new Array();

	//得意先情報取得
	var itemSelectList = selectET010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']       = lineDataMap['IDTOKUISAKI'];
	//客先担当部署
	itemDataList['TXTANTOUBUSYO']     = lineDataMap['TXTANTOUBUSYO'];
	//客先担当名
	itemDataList['TXTANTOUSYA']       = lineDataMap['TXTANTOUSYA'];
	//客先担当職位
	itemDataList['TXTANTOUSYASYOKUI'] = lineDataMap['TXTANTOUSYASYOKUI'];
	//客先担当メアド
	itemDataList['TXTANTOUSYAEMAIL']  = lineDataMap['TXTANTOUSYAEMAIL'];
	//客先担当TEL
	itemDataList['TXTANTOUSYADENWA']  = lineDataMap['TXTANTOUSYADENWA'];
	//請求方式区分
	itemDataList['KBSEIKYUHOUSHIKI']  = lineDataMap['KBSEIKYUHOUSHIKI'];
	//締め日
	itemDataList['TXSIMEBI']          = lineDataMap['TXSIMEBI'];
	//標準入金方法区分
	itemDataList['KBNYUKINHOUHOU']    = lineDataMap['KBNYUKINHOUHOU'];
	//売上入金サイト
	itemDataList['VLNYUKINSAITO']     = lineDataMap['VLNYUKINSAITO'];
	//与信限度額
	itemDataList['AMYOSHIN']          = lineDataMap['AMYOSHIN'];
	//担当営業№
	itemDataList['NRTANTOUJYUGYOIN']  = lineDataMap['NRTANTOUJYUGYOIN'];
	//摘要
	itemDataList['TXTEKIYO']          = lineDataMap['TXTEKIYO'];
	//期首売掛残高
	itemDataList['AMKISYUURIKAKE']    = lineDataMap['AMKISYUURIKAKE'];
	//期間売上額(税込金額)
	if (_ZOGENKBN == '0') {
		//10:振替控除
		itemDataList['AMURIAGE']          = lineDataMap['AMURIAGE'] + (_HURIKAEGAKU * -1);
	} else {
		//11:振替計上
		itemDataList['AMURIAGE']          = lineDataMap['AMURIAGE'] + _HURIKAEGAKU;
	}
	//期間受領額
	itemDataList['AMJYURYO']          = lineDataMap['AMJYURYO'];
	//現売掛残高
	itemDataList['AMGENURIKAKE']      = lineDataMap['AMGENURIKAKE'];

	updateET010(itemDataList);

}


//-------------------------------------------
//売掛振替削除処理
//　 1 : 取引先コード
//　 2 : 取引日
//　 3 : 増減区分
//　 4 : 振替区分
//   5 : 適用
//   6 : 振替額
//　 7 : ソース番号
//　 8 : 参照番号(売掛振替№)
//　*  : 売掛取引№
//　*  : 取引区分
function exec_urikake_del(_TORIHIKISAKI, _TORIHIKIDATE, _ZOGENKBN, _HURIKAEKBN, _TEKIYO, _HURIKAEGAKU,
						  _NRSOURCE, _TXREFNO, _NRURIKAKE,_KBURITORI) {

	//売掛履歴作成
	//--------------------
	insertAkaET100(_NRURIKAKE);


	//売掛履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）
	TALON.update( " UPDATE ET100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBURITORI  = '" + _KBURITORI + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE  + "'"
				);


	//得意先情報更新
	//--------------------
	var itemDataList = new Array();

	//得意先情報取得
	var itemSelectList = selectET010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']       = lineDataMap['IDTOKUISAKI'];
	//客先担当部署
	itemDataList['TXTANTOUBUSYO']     = lineDataMap['TXTANTOUBUSYO'];
	//客先担当名
	itemDataList['TXTANTOUSYA']       = lineDataMap['TXTANTOUSYA'];
	//客先担当職位
	itemDataList['TXTANTOUSYASYOKUI'] = lineDataMap['TXTANTOUSYASYOKUI'];
	//客先担当メアド
	itemDataList['TXTANTOUSYAEMAIL']  = lineDataMap['TXTANTOUSYAEMAIL'];
	//客先担当TEL
	itemDataList['TXTANTOUSYADENWA']  = lineDataMap['TXTANTOUSYADENWA'];
	//請求方式区分
	itemDataList['KBSEIKYUHOUSHIKI']  = lineDataMap['KBSEIKYUHOUSHIKI'];
	//締め日
	itemDataList['TXSIMEBI']          = lineDataMap['TXSIMEBI'];
	//標準入金方法区分
	itemDataList['KBNYUKINHOUHOU']    = lineDataMap['KBNYUKINHOUHOU'];
	//売上入金サイト
	itemDataList['VLNYUKINSAITO']     = lineDataMap['VLNYUKINSAITO'];
	//与信限度額
	itemDataList['AMYOSHIN']          = lineDataMap['AMYOSHIN'];
	//担当営業№
	itemDataList['NRTANTOUJYUGYOIN']  = lineDataMap['NRTANTOUJYUGYOIN'];
	//摘要
	itemDataList['TXTEKIYO']          = lineDataMap['TXTEKIYO'];
	//期首売掛残高
	itemDataList['AMKISYUURIKAKE']    = lineDataMap['AMKISYUURIKAKE'];
	//期間売上額(税込金額)
	//if (_ZOGENKBN == '0') {
	if (_KBURITORI == '10') {
		//増減区分=0:残高減 → 取引区分=10:振替控除
		//10:振替控除
		itemDataList['AMURIAGE']          = lineDataMap['AMURIAGE'] + ((_HURIKAEGAKU * -1) * -1);
	} else {
		//11:振替計上
		itemDataList['AMURIAGE']          = lineDataMap['AMURIAGE'] + (_HURIKAEGAKU * -1);
	}
	//期間受領額
	itemDataList['AMJYURYO']          = lineDataMap['AMJYURYO'];
	//現売掛残高
	itemDataList['AMGENURIKAKE']      = lineDataMap['AMGENURIKAKE'];

	updateET010(itemDataList);

}



//-------------------------------------------
//［処理］特殊売上登録処理
//-------------------------------------------
//特殊売上登録処理
//　 1 : 品目コード
//　 2 : 取引先コード
//　 3 : 倉庫コード
//　 4 : 取引日
//   5 : 取引区分
//　 6 : 数量
//　 7 : 単価
//　 8 : 消費税
//　 9   税抜取引額
//　10 : 在庫単価
//　11 : 在庫取引数
//　12 : ソース番号
//　13 : 参照番号
function exec_tokuuri_ins(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _TORIHIKIKBN,
						  _SURYO, _TANKA, _SYOHIZEI, _NUKIGAKU, _ZAIKOTANKA, _ZAIKOTORIHIKISU, 
						  _NRSOURCE, _TXREFNO) {

	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数／期間出庫数(数量)
		if (_TORIHIKIKBN == '10') {
			itemDataList['QTNYUKO']        = _ZAIKOTORIHIKISU;
			itemDataList['QTSYUKKO']       = 0;
		} else {
			itemDataList['QTNYUKO']        = 0;
			itemDataList['QTSYUKKO']       = _ZAIKOTORIHIKISU;
		}
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額／期間出庫額(金額)
		if (_TORIHIKIKBN == '10') {
			itemDataList['AMNYUKO']        = (_ZAIKOTORIHIKISU * _ZAIKOTANKA);
			itemDataList['AMSYUKKO']       = 0;
		} else {
			itemDataList['AMNYUKO']        = 0;
			itemDataList['AMSYUKKO']       = (_ZAIKOTORIHIKISU * _ZAIKOTANKA) ;
		}

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数／期間出庫数(数量)
		if (_TORIHIKIKBN == '10') {
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + _ZAIKOTORIHIKISU;
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
		} else {
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + _ZAIKOTORIHIKISU;
		}
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額／期間出庫額(金額)
		if (_TORIHIKIKBN == '10') {
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + (_ZAIKOTORIHIKISU * _ZAIKOTANKA) ;
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];
		} else {
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + (_ZAIKOTORIHIKISU * _ZAIKOTANKA) ;
		}
	}

	updateFT010(itemDataList);




	//入出庫履歴作成
	//--------------------
	var itemDataList = new Array();

	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//受払区分
	if (_TORIHIKIKBN == '10') {
		itemDataList['KBUKEBARAI']    = "050";
	} else {
		itemDataList['KBUKEBARAI']    = "150";
	}
	//振替区分 (Null)
	itemDataList['KBZAIHURI']     = "";
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//倉庫Ｃ
	itemDataList['CDSOUKO']       = _SOUKO;
	//相手先名
	itemDataList['TXAITESAKI']    = _TORIHIKISAKI;
	//取引単価(単価)
	itemDataList['PRTORIHIKI']    = _ZAIKOTANKA;
	//取引数(数量)
	itemDataList['QTTORIHIKI']    = _ZAIKOTORIHIKISU;
	//取引額(金額)
	itemDataList['AMTORIHIKI']    = (_ZAIKOTANKA * _ZAIKOTORIHIKISU);

	//取引差額
	itemDataList['AMSAGAKU']    = _NUKIGAKU - (_ZAIKOTANKA * _ZAIKOTORIHIKISU);

	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減数(数量)／残高増減額(金額)
	if (_TORIHIKIKBN == '10') {
		itemDataList['QTZOUGEN']      = _ZAIKOTORIHIKISU;
		itemDataList['AMZOUGEN']      = (_ZAIKOTANKA * _ZAIKOTORIHIKISU);
	} else {
		itemDataList['QTZOUGEN']      = _ZAIKOTORIHIKISU * -1;
		itemDataList['AMZOUGEN']      = (_ZAIKOTANKA * _ZAIKOTORIHIKISU) * -1;
	}

	updateFT100(itemDataList);




	//売掛履歴作成
	//--------------------
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']  = _TORIHIKISAKI;
	//取引日
	itemDataList['DTTORIHIKI']   = _TORIHIKIDATE;
	//取引区分
	if (_TORIHIKIKBN == '10') {
		itemDataList['KBURITORI']    = "02";
	} else {
		itemDataList['KBURITORI']    = "01";
	}
	//振替区分(Null)
	itemDataList['KBURIHURI']    = "";
	//赤黒(1:黒伝)
	itemDataList['KBAKADEN']     = "1";
	//効区(T:有効)
	itemDataList['FGVALID']      = "T";
	//品目ID
	itemDataList['IDHINMOKU']    = _HINMOKU;
	//取引単価
	itemDataList['PRTORIHIKI']   = _TANKA;
	//取引数(出荷数)
	itemDataList['QTTORIHIKI']   = _SURYO;
	//消費税額
	itemDataList['AMTAX']        = _SYOHIZEI;
	//販売原価
	itemDataList['AMGENKA']      = (_ZAIKOTANKA * _ZAIKOTORIHIKISU);
	//取引ソース№
	itemDataList['NRSOURCE']     = _NRSOURCE;
	//請求№(Null)
	itemDataList['NRSEIKYU']     = "";
	//登録日時
	itemDataList['DTCREATE']     = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']      = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']       = '';
	//月序(Null)
	itemDataList['DTMSEQ']       = '';
	//粗利額
	itemDataList['AMARARI']      = _NUKIGAKU - (_ZAIKOTANKA * _ZAIKOTORIHIKISU);
	//残高増減額
	if (_TORIHIKIKBN == '10') {
		itemDataList['AMZOUGEN']     = (_NUKIGAKU + _SYOHIZEI) * -1;
	} else {
		itemDataList['AMZOUGEN']     = _NUKIGAKU + _SYOHIZEI;
	}
	//税抜取引額
	itemDataList['AMTORIHIKI']   = _NUKIGAKU;

	updateET100(itemDataList);




	//得意先情報更新
	//--------------------
	var itemDataList = new Array();

	//得意先情報取得
	var itemSelectList = selectET010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']       = lineDataMap['IDTOKUISAKI'];
	//客先担当部署
	itemDataList['TXTANTOUBUSYO']     = lineDataMap['TXTANTOUBUSYO'];
	//客先担当名
	itemDataList['TXTANTOUSYA']       = lineDataMap['TXTANTOUSYA'];
	//客先担当職位
	itemDataList['TXTANTOUSYASYOKUI'] = lineDataMap['TXTANTOUSYASYOKUI'];
	//客先担当メアド
	itemDataList['TXTANTOUSYAEMAIL']  = lineDataMap['TXTANTOUSYAEMAIL'];
	//客先担当TEL
	itemDataList['TXTANTOUSYADENWA']  = lineDataMap['TXTANTOUSYADENWA'];
	//請求方式区分
	itemDataList['KBSEIKYUHOUSHIKI']  = lineDataMap['KBSEIKYUHOUSHIKI'];
	//締め日
	itemDataList['TXSIMEBI']          = lineDataMap['TXSIMEBI'];
	//標準入金方法区分
	itemDataList['KBNYUKINHOUHOU']    = lineDataMap['KBNYUKINHOUHOU'];
	//売上入金サイト
	itemDataList['VLNYUKINSAITO']     = lineDataMap['VLNYUKINSAITO'];
	//与信限度額
	itemDataList['AMYOSHIN']          = lineDataMap['AMYOSHIN'];
	//担当営業№
	itemDataList['NRTANTOUJYUGYOIN']  = lineDataMap['NRTANTOUJYUGYOIN'];
	//摘要
	itemDataList['TXTEKIYO']          = lineDataMap['TXTEKIYO'];
	//期首売掛残高
	itemDataList['AMKISYUURIKAKE']    = lineDataMap['AMKISYUURIKAKE'];
	//期間売上額(税込金額)
	if (_TORIHIKIKBN == '10') {
		itemDataList['AMURIAGE']     = lineDataMap['AMURIAGE'] + ( (_NUKIGAKU + _SYOHIZEI) * -1 );
	} else {
		itemDataList['AMURIAGE']     = lineDataMap['AMURIAGE'] + (_NUKIGAKU + _SYOHIZEI);
	}
	//期間受領額
	itemDataList['AMJYURYO']          = lineDataMap['AMJYURYO'];
	//現売掛残高
	itemDataList['AMGENURIKAKE']      = lineDataMap['AMGENURIKAKE'];

	updateET010(itemDataList);

}




//-------------------------------------------
//特殊売上削除処理
//　 1 : 品目コード
//　 2 : 取引先コード
//　 3 : 倉庫コード
//　 4 : 取引日
//   5 : 取引区分
//　 6 : 数量
//　 7 : 単価
//　 8 : 消費税
//　 9   税抜取引額
//　10 : 在庫単価
//　11 : 在庫取引数
//　12 : ソース番号
//　13 : 参照番号
//
//　* : 在庫取引№
//　* : 売掛取引№
function exec_tokuuri_del(_HINMOKU, _TORIHIKISAKI, _SOUKO, _TORIHIKIDATE, _TORIHIKIKBN,
						  _SURYO, _TANKA, _SYOHIZEI, _NUKIGAKU, _ZAIKOTANKA, _ZAIKOTORIHIKISU, 
						  _NRSOURCE, _TXREFNO, 
						  _NRZAITORI, _NRURIKAKE) {


	//数値準備(赤データで再セット)
	// * var itemSelectList = selectFT100(_NRZAITORI);
	// * var lineDataMapFT100 = itemSelectList[0];
	// * _SYUKA_SURYO			= lineDataMapFT100['QTTORIHIKI'];
	// * _JISEI_GENKA			= lineDataMapFT100['PRTORIHIKI'];
	// * var _C_SYUKA_KINGAKU	= lineDataMapFT100['AMTORIHIKI'];

	var itemSelectList = selectET100(_NRURIKAKE);
	var lineDataMapET100 = itemSelectList[0];
	// * var _C_JUCHU_KINGAKU_NUKI = lineDataMapET100['AMTORIHIKI'];
	// * var _C_JUCHU_ZEIGAKU	  = lineDataMapET100['AMTAX'];
	// * var _C_JUCHU_KINGAKU_KOMI = _C_JUCHU_KINGAKU_NUKI + _C_JUCHU_ZEIGAKU;
	var _AMZOUGEN = lineDataMapET100['AMZOUGEN'];



	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数／期間出庫数(数量)
		if (_TORIHIKIKBN == '02') {
			itemDataList['QTNYUKO']        = _ZAIKOTORIHIKISU * -1;
			itemDataList['QTSYUKKO']       = 0;
		} else {
			itemDataList['QTNYUKO']        = 0;
			itemDataList['QTSYUKKO']       = _ZAIKOTORIHIKISU * -1;
		}
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額／期間出庫額(金額)
		if (_TORIHIKIKBN == '02') {
			itemDataList['AMNYUKO']        = (_ZAIKOTORIHIKISU * _ZAIKOTANKA) * -1;
			itemDataList['AMSYUKKO']       = 0;
		} else {
			itemDataList['AMNYUKO']        = 0;
			itemDataList['AMSYUKKO']       = (_ZAIKOTORIHIKISU * _ZAIKOTANKA) * -1 ;
		}
	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数／期間出庫数(数量)
		if (_TORIHIKIKBN == '02') {
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + (_ZAIKOTORIHIKISU * -1);
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
		} else {
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + (_ZAIKOTORIHIKISU * -1);
		}
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額／期間出庫額(金額)
		if (_TORIHIKIKBN == '02') {
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + ( (_ZAIKOTORIHIKISU * _ZAIKOTANKA) * -1);
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];
		} else {
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + ( (_ZAIKOTORIHIKISU * _ZAIKOTANKA) * -1) ;
		}
	}
	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------
	insertAkaFT100(_NRZAITORI);



	//入出庫履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）
	//受払区分
	if (_TORIHIKIKBN == '02') {
		var _KBUKEBARAI    = "050";
	} else {
		var _KBUKEBARAI    = "150";
	}
	TALON.update( " UPDATE FT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBUKEBARAI = '" + _KBUKEBARAI + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE   + "'"
				);



	//売掛履歴作成
	//--------------------
	insertAkaET100(_NRURIKAKE);



	//売掛履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）
	TALON.update( " UPDATE ET100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBURITORI  = '" + _TORIHIKIKBN + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE    + "'"
				);



	//得意先情報更新
	//--------------------
	var itemDataList = new Array();

	//得意先情報取得
	var itemSelectList = selectET010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']       = lineDataMap['IDTOKUISAKI'];
	//客先担当部署
	itemDataList['TXTANTOUBUSYO']     = lineDataMap['TXTANTOUBUSYO'];
	//客先担当名
	itemDataList['TXTANTOUSYA']       = lineDataMap['TXTANTOUSYA'];
	//客先担当職位
	itemDataList['TXTANTOUSYASYOKUI'] = lineDataMap['TXTANTOUSYASYOKUI'];
	//客先担当メアド
	itemDataList['TXTANTOUSYAEMAIL']  = lineDataMap['TXTANTOUSYAEMAIL'];
	//客先担当TEL
	itemDataList['TXTANTOUSYADENWA']  = lineDataMap['TXTANTOUSYADENWA'];
	//請求方式区分
	itemDataList['KBSEIKYUHOUSHIKI']  = lineDataMap['KBSEIKYUHOUSHIKI'];
	//締め日
	itemDataList['TXSIMEBI']          = lineDataMap['TXSIMEBI'];
	//標準入金方法区分
	itemDataList['KBNYUKINHOUHOU']    = lineDataMap['KBNYUKINHOUHOU'];
	//売上入金サイト
	itemDataList['VLNYUKINSAITO']     = lineDataMap['VLNYUKINSAITO'];
	//与信限度額
	itemDataList['AMYOSHIN']          = lineDataMap['AMYOSHIN'];
	//担当営業№
	itemDataList['NRTANTOUJYUGYOIN']  = lineDataMap['NRTANTOUJYUGYOIN'];
	//摘要
	itemDataList['TXTEKIYO']          = lineDataMap['TXTEKIYO'];
	//期首売掛残高
	itemDataList['AMKISYUURIKAKE']    = lineDataMap['AMKISYUURIKAKE'];
	//期間売上額(税込金額)
	//itemDataList['AMURIAGE']        = lineDataMap['AMURIAGE'] + (_C_JUCHU_KINGAKU_KOMI * -1);
	itemDataList['AMURIAGE']          = lineDataMap['AMURIAGE'] + (_AMZOUGEN * -1);
	//期間受領額
	itemDataList['AMJYURYO']          = lineDataMap['AMJYURYO'];
	//現売掛残高
	itemDataList['AMGENURIKAKE']      = lineDataMap['AMGENURIKAKE'];

	updateET010(itemDataList);

}




//-------------------------------------------
//［処理］在庫振替の保守
//-------------------------------------------
//在庫振替登録処理
//　 1 : 品目コード
//　 2 : 倉庫コード
//　 3 : 振替日（取引日）
//   4 : 増減区分
//   4 : 振替区分
//　 5 : 取引数量
//　 6 : 取引単価
//　 7 : ソース番号
//　 8 : 参照番号
function exec_zaihuri_ins(_HINMOKU, _SOUKO, _TORIHIKIDATE, _ZOGENKBN, _HURIKAEKBN,
						  _ZAIKOTORIHIKISU, _ZAIKOTANKA, _NRSOURCE, _TXREFNO) {

	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数／期間出庫数(数量)
		if (_ZOGENKBN == '1') {
			itemDataList['QTNYUKO']        = _ZAIKOTORIHIKISU;
			itemDataList['QTSYUKKO']       = 0;
		} else {
			itemDataList['QTNYUKO']        = 0;
			itemDataList['QTSYUKKO']       = _ZAIKOTORIHIKISU;
		}
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額／期間出庫額(金額)
		if (_ZOGENKBN == '1') {
			itemDataList['AMNYUKO']        = (_ZAIKOTORIHIKISU * _ZAIKOTANKA);
			itemDataList['AMSYUKKO']       = 0;
		} else {
			itemDataList['AMNYUKO']        = 0;
			itemDataList['AMSYUKKO']       = (_ZAIKOTORIHIKISU * _ZAIKOTANKA) ;
		}

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数／期間出庫数(数量)
		if (_ZOGENKBN == '1') {
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + _ZAIKOTORIHIKISU;
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
		} else {
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + _ZAIKOTORIHIKISU;
		}
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額／期間出庫額(金額)
		if (_ZOGENKBN == '1') {
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + (_ZAIKOTORIHIKISU * _ZAIKOTANKA) ;
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];
		} else {
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + (_ZAIKOTORIHIKISU * _ZAIKOTANKA) ;
		}
	}

	updateFT010(itemDataList);




	//入出庫履歴作成
	//--------------------
	var itemDataList = new Array();

	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//受払区分
	if (_ZOGENKBN == '1') {
		itemDataList['KBUKEBARAI']    = "020";
	} else {
		itemDataList['KBUKEBARAI']    = "120";
	}
	//振替区分 (Null)
	itemDataList['KBZAIHURI']     = _HURIKAEKBN;
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//倉庫Ｃ
	itemDataList['CDSOUKO']       = _SOUKO;
	//相手先名
	itemDataList['TXAITESAKI']    = "";
	//取引単価(単価)
	itemDataList['PRTORIHIKI']    = _ZAIKOTANKA;
	//取引数(数量)
	itemDataList['QTTORIHIKI']    = _ZAIKOTORIHIKISU;
	//取引額(金額)
	itemDataList['AMTORIHIKI']    = (_ZAIKOTANKA * _ZAIKOTORIHIKISU);
	//取引差額
	itemDataList['AMSAGAKU']    = 0;

	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減数(数量)／残高増減額(金額)
	if (_ZOGENKBN == '1') {
		itemDataList['QTZOUGEN']      = _ZAIKOTORIHIKISU;
		itemDataList['AMZOUGEN']      = (_ZAIKOTANKA * _ZAIKOTORIHIKISU);
	} else {
		itemDataList['QTZOUGEN']      = _ZAIKOTORIHIKISU * -1;
		itemDataList['AMZOUGEN']      = (_ZAIKOTANKA * _ZAIKOTORIHIKISU) * -1;
	}

	updateFT100(itemDataList);


}






//-------------------------------------------
//［処理］在庫振替削除
//-------------------------------------------
//在庫振替削除処理
//　 1 : 品目コード
//　 2 : 倉庫コード
//　 3 : 振替日（取引日）
//　 5 : 取引数量
//　 6 : 取引単価
//　 7 : 受払区分
//　 7 : ソース番号
//　 8 : 参照番号
//　* : 在庫取引№
function exec_zaihuri_del(_HINMOKU, _SOUKO, _TORIHIKIDATE, _ZAIKOTORIHIKISU, _ZAIKOTANKA, _KBUKEBARAI,
						 _NRSOURCE, _TXREFNO, _NRZAITORI) {

	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数／期間出庫数(数量)
		if (_KBUKEBARAI == '020') {
			itemDataList['QTNYUKO']        = _ZAIKOTORIHIKISU * -1;
			itemDataList['QTSYUKKO']       = 0;
		} else {
			itemDataList['QTNYUKO']        = 0;
			itemDataList['QTSYUKKO']       = _ZAIKOTORIHIKISU * -1;
		}
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額／期間出庫額(金額)
		if (_KBUKEBARAI == '020') {
			itemDataList['AMNYUKO']        = (_ZAIKOTORIHIKISU * _ZAIKOTANKA) * -1;
			itemDataList['AMSYUKKO']       = 0;
		} else {
			itemDataList['AMNYUKO']        = 0;
			itemDataList['AMSYUKKO']       = (_ZAIKOTORIHIKISU * _ZAIKOTANKA) * -1 ;
		}
	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数／期間出庫数(数量)
		if (_KBUKEBARAI == '020') {
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + (_ZAIKOTORIHIKISU * -1);
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
		} else {
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + (_ZAIKOTORIHIKISU * -1);
		}
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額／期間出庫額(金額)
		if (_KBUKEBARAI == '020') {
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + ( (_ZAIKOTORIHIKISU * _ZAIKOTANKA) * -1);
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];
		} else {
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + ( (_ZAIKOTORIHIKISU * _ZAIKOTANKA) * -1) ;
		}
	}
	updateFT010(itemDataList);



	//入出庫履歴作成
	//--------------------
	insertAkaFT100(_NRZAITORI);



	//入出庫履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）
	TALON.update( " UPDATE FT100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBUKEBARAI = '" + _KBUKEBARAI + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE   + "'"
				);

}

//-------------------------------------------
//［処理］在庫振替の保守
//-------------------------------------------
//在庫振替登録処理
//　 1 : 品目コード
//　 2 : 倉庫コード
//　 2 : 相手倉庫コード
//　 3 : 振替日（取引日）
//   4 : 受払区分
//　 5 : 取引数量
//　 6 : 取引単価
//　 7 : ソース番号
//　 8 : 参照番号
function exec_zaiidou_ins(_HINMOKU, _SOUKO, _AITE_SOUKO, _TORIHIKIDATE, _KBUKEBARAI, 
						  _ZAIKOTORIHIKISU, _ZAIKOTANKA, _NRSOURCE, _TXREFNO) {

	//在庫更新
	//--------------------

	//現在在庫情報取得
	var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

	//
	var itemDataList = new Array();
	if (itemSelectList.length == 0) {
		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = 0;
		//期間入庫数／期間出庫数(数量)
		if (_KBUKEBARAI == '010') {
			itemDataList['QTNYUKO']        = _ZAIKOTORIHIKISU;
			itemDataList['QTSYUKKO']       = 0;
		} else {
			itemDataList['QTNYUKO']        = 0;
			itemDataList['QTSYUKKO']       = _ZAIKOTORIHIKISU;
		}
		//期首在庫額
		itemDataList['AMKISYU']        = 0;
		//期間入庫額／期間出庫額(金額)
		if (_KBUKEBARAI == '010') {
			itemDataList['AMNYUKO']        = (_ZAIKOTORIHIKISU * _ZAIKOTANKA);
			itemDataList['AMSYUKKO']       = 0;
		} else {
			itemDataList['AMNYUKO']        = 0;
			itemDataList['AMSYUKKO']       = (_ZAIKOTORIHIKISU * _ZAIKOTANKA) ;
		}

	} else {
		var lineDataMap = itemSelectList[0];

		//品目ID
		itemDataList['IDHINMOKU']      = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']        = _SOUKO;
		//期首在庫数
		itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
		//期間入庫数／期間出庫数(数量)
		if (_KBUKEBARAI == '010') {
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + _ZAIKOTORIHIKISU;
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
		} else {
			itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
			itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + _ZAIKOTORIHIKISU;
		}
		//期首在庫額
		itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
		//期間入庫額／期間出庫額(金額)
		if (_KBUKEBARAI == '010') {
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + (_ZAIKOTORIHIKISU * _ZAIKOTANKA) ;
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];
		} else {
			itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
			itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + (_ZAIKOTORIHIKISU * _ZAIKOTANKA) ;
		}
	}

	updateFT010(itemDataList);




	//入出庫履歴作成
	//--------------------
	var itemDataList = new Array();

	//取引日
	itemDataList['DTTORIHIKI']    = _TORIHIKIDATE;
	//受払区分
	itemDataList['KBUKEBARAI']    = _KBUKEBARAI;
	//振替区分 (Null)
	itemDataList['KBZAIHURI']     = null;
	//赤黒     (1:黒伝)
	itemDataList['KBAKADEN']      = "1";
	//効区     (T:有効)
	itemDataList['FGVALID']       = "T";
	//品目ID
	itemDataList['IDHINMOKU']     = _HINMOKU;
	//倉庫Ｃ
	itemDataList['CDSOUKO']       = _SOUKO;
	//相手先名
	itemDataList['TXAITESAKI']    = _AITE_SOUKO;
	//取引単価(単価)
	itemDataList['PRTORIHIKI']    = _ZAIKOTANKA;
	//取引数(数量)
	itemDataList['QTTORIHIKI']    = _ZAIKOTORIHIKISU;
	//取引額(金額)
	itemDataList['AMTORIHIKI']    = (_ZAIKOTANKA * _ZAIKOTORIHIKISU);
	//取引差額
	itemDataList['AMSAGAKU']    = 0;
	//取引ソース№
	itemDataList['NRSOURCE']      = _NRSOURCE;
	//登録日時
	itemDataList['DTCREATE']      = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']       = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']        = '';
	//月序(Null)
	itemDataList['DTMSEQ']        = '';
	//残高増減数(数量)／残高増減額(金額)
		if (_KBUKEBARAI == '010') {
		itemDataList['QTZOUGEN']      = _ZAIKOTORIHIKISU;
		itemDataList['AMZOUGEN']      = (_ZAIKOTANKA * _ZAIKOTORIHIKISU);
	} else {
		itemDataList['QTZOUGEN']      = _ZAIKOTORIHIKISU * -1;
		itemDataList['AMZOUGEN']      = (_ZAIKOTANKA * _ZAIKOTORIHIKISU) * -1;
	}

	updateFT100(itemDataList);


}













//-------------------------------------------
//［処理］棚卸確定更新
//-------------------------------------------
//棚卸確定更新処理
//　 1 : 品目コード
//　 2 : 倉庫コード
//　 4 : 確定日時
//   5 : 実棚数量
//　 6 : 基準数量
//　 7 : 実棚単価
//　 8 : ソース番号
//　 9 : 参照番号(棚卸№)
function exec_tanakakutei_ins(_HINMOKU, _SOUKO, _KAKUTEIDATE, _JITSUSU, _KIJUNSU, 
						      _TANKA,   _NRSOURCE, _TXREFNO) {

	if (_JITSUSU - _KIJUNSU != 0 ) {

		if (_JITSUSU == '') { _JITSUSU = 0; }
		if (_KIJUNSU == '') { _KIJUNSU = 0; }
		if (_TANKA   == '') { _TANKA   = 0; }
		var _KBUKEBARAI = '';
		var _QTTORIHIKI = 0;
		var _AMTORIHIKI = 0;
		var _QTZOUGEN   = 0;
		var _AMZOUGEN   = 0;
		if (_JITSUSU - _KIJUNSU > 0 ) {
			_KBUKEBARAI = '070';
			_QTTORIHIKI =  _JITSUSU - _KIJUNSU;
			_AMTORIHIKI = (_JITSUSU - _KIJUNSU) * _TANKA;
			_QTZOUGEN   = _QTTORIHIKI;
			_AMZOUGEN   = _AMTORIHIKI;
		} else {
			_KBUKEBARAI = '170';
			_QTTORIHIKI = (_JITSUSU - _KIJUNSU) * -1;
			_AMTORIHIKI = ((_JITSUSU - _KIJUNSU) * _TANKA) * -1;
			_QTZOUGEN   = _QTTORIHIKI * -1;
			_AMZOUGEN   = _AMTORIHIKI * -1;
		}


		//在庫更新
		//--------------------

		//現在在庫情報取得
		var itemSelectList = selectFT010(_HINMOKU, _SOUKO);

		//
		var itemDataList = new Array();
		if (itemSelectList.length == 0) {
			//品目ID
			itemDataList['IDHINMOKU']      = _HINMOKU;
			//倉庫Ｃ
			itemDataList['CDSOUKO']        = _SOUKO;
			//期首在庫数
			itemDataList['QTKISYU']        = 0;
			//期間入庫数／期間出庫数(数量)
			if (_KBUKEBARAI == '070') {
				itemDataList['QTNYUKO']        = _QTTORIHIKI;
				itemDataList['QTSYUKKO']       = 0;
			} else {
				itemDataList['QTNYUKO']        = 0;
				itemDataList['QTSYUKKO']       = _QTTORIHIKI;
			}
			//期首在庫額
			itemDataList['AMKISYU']        = 0;
			//期間入庫額／期間出庫額(金額)
			if (_KBUKEBARAI == '070') {
				itemDataList['AMNYUKO']        = _AMTORIHIKI;
				itemDataList['AMSYUKKO']       = 0;
			} else {
				itemDataList['AMNYUKO']        = 0;
				itemDataList['AMSYUKKO']       = _AMTORIHIKI;
			}

		} else {
			var lineDataMap = itemSelectList[0];

			//品目ID
			itemDataList['IDHINMOKU']      = _HINMOKU;
			//倉庫Ｃ
			itemDataList['CDSOUKO']        = _SOUKO;
			//期首在庫数
			itemDataList['QTKISYU']        = lineDataMap['QTKISYU'];
			//期間入庫数／期間出庫数(数量)
			if (_KBUKEBARAI == '070') {
				itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'] + _QTTORIHIKI;
				itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'];
			} else {
				itemDataList['QTNYUKO']        = lineDataMap['QTNYUKO'];
				itemDataList['QTSYUKKO']       = lineDataMap['QTSYUKKO'] + _QTTORIHIKI;
			}
			//期首在庫額
			itemDataList['AMKISYU']        = lineDataMap['AMKISYU'];
			//期間入庫額／期間出庫額(金額)
			if (_KBUKEBARAI == '070') {
				itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'] + _AMTORIHIKI ;
				itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'];
			} else {
				itemDataList['AMNYUKO']        = lineDataMap['AMNYUKO'];
				itemDataList['AMSYUKKO']       = lineDataMap['AMSYUKKO'] + _AMTORIHIKI ;
			}
		}

		updateFT010(itemDataList);



		//入出庫履歴作成
		//--------------------
		var itemDataList = new Array();

		//取引日
		itemDataList['DTTORIHIKI']    = _KAKUTEIDATE;
		//受払区分
		itemDataList['KBUKEBARAI']    = _KBUKEBARAI;
		//振替区分 (Null)
		itemDataList['KBZAIHURI']     = null;
		//赤黒     (1:黒伝)
		itemDataList['KBAKADEN']      = "1";
		//効区     (T:有効)
		itemDataList['FGVALID']       = "T";
		//品目ID
		itemDataList['IDHINMOKU']     = _HINMOKU;
		//倉庫Ｃ
		itemDataList['CDSOUKO']       = _SOUKO;
		//相手先名
		itemDataList['TXAITESAKI']    = null;
		//取引単価(単価)
		itemDataList['PRTORIHIKI']    = _TANKA;
		//取引数(数量)
		itemDataList['QTTORIHIKI']    = _QTTORIHIKI;
		//取引額(金額)
		itemDataList['AMTORIHIKI']    = _AMTORIHIKI;
		//取引差額
		itemDataList['AMSAGAKU']      = 0;
		//取引ソース№
		itemDataList['NRSOURCE']      = _NRSOURCE;
		//登録日時
		itemDataList['DTCREATE']      = tln_com_nowdate();
		//参照番号
		itemDataList['TXREFNO']       = _TXREFNO;
		//年度(Null)
		itemDataList['DTNEND']        = '';
		//月序(Null)
		itemDataList['DTMSEQ']        = '';
		//残高増減数(数量)／残高増減額(金額)
		itemDataList['QTZOUGEN']      = _QTZOUGEN;
		itemDataList['AMZOUGEN']      = _AMZOUGEN;

		updateFT100(itemDataList);

	}
}







//-------------------------------------------
//［処理］製造関連処理
//-------------------------------------------

//-------------------------------------------
//製造指示[JT010]
function selectJT010(_NRSEIZO) {
	var sql = 
		"SELECT " +
		" NRSEIZO             " + 
		",IDTOKUISAKI         " + 
		",SQSYUKKASAKI        " + 
		",TXTYUMONBANGO       " + 
		",IDHINMOKU           " + 
		",DTNOUKI             " + 
		",QTJYUTYU            " + 
		",QTSYUKKA            " + 
		",QTSEIZO             " + 
		",QTKANSEI            " + 
		",QTHURYO             " + 
		",QTHAIKI             " + 
		",AMGENKA             " + 
		",PRMITSUMORI         " + 
		",PRJYUTYU            " + 
		",TXTEKIYO            " + 
		",CDSOUKOKAN          " + 
		",CDSOUKOZAI          " + 
		",DTCREATE            " + 
		",DTHAKKO             " + 
		",DTSYUKKO            " + 
		",DTKANSEI            " + 
		",DTSYUKKA            " + 
		",DTCANCEL            " + 
		",NRSOURCE            " + 
		",STSEIZO             " + 
		",PRYOTEIGEN          " + 
		",AMHANBAI            " + 
		",AMARARI             " + 
		",PRGENKA             " + 
		",TXSEIZOYOTEI        " + 
		",CREATED_DATE        " + 
		",CREATED_BY          " + 
		",CREATED_PRG_NM      " + 
		",UPDATED_DATE        " + 
		",UPDATED_BY          " + 
		",UPDATED_PRG_NM      " + 
		",MODIFY_COUNT        " + 
		"FROM JT010        " +
		"WHERE NRSEIZO = '" + _NRSEIZO + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}

//製造指示材料明細(製造指示番号)[JT040]
function selectJT040_NRSEIZO(_NRSEIZO) {
	var sql = 
		"SELECT " +
		" NRSEIZO             " + 
		",SQZAIRYO            " + 
		",IDHINMOKU           " + 
		",QTTOUNYU            " + 
		",SQKOUTEI            " + 
		",PRYOTEI             " + 
		",PRSYUKKO            " + 
		",SQLIST              " + 
		",CDSOUKO             " + 
		",CREATED_DATE        " + 
		",CREATED_BY          " + 
		",CREATED_PRG_NM      " + 
		",UPDATED_DATE        " + 
		",UPDATED_BY          " + 
		",UPDATED_PRG_NM      " + 
		",MODIFY_COUNT        " + 
		"FROM JT040        " +
		"WHERE NRSEIZO = '" + _NRSEIZO + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}

//在庫増減履歴
function selectFT100(_NRZAITORI) {
	var sql = 
		"SELECT " +
		" NRZAITORI      " + 
		",DTTORIHIKI     " + 
		",KBUKEBARAI     " + 
		",KBZAIHURI      " + 
		",KBAKADEN       " + 
		",FGVALID        " + 
		",IDHINMOKU      " + 
		",TXHINBAN       " + 
		",TXHINMEI       " + 
		",KBUNIT         " + 
		",CDSOUKO        " + 
		",TXAITESAKI     " + 
		",PRTORIHIKI     " + 
		",QTTORIHIKI     " + 
		",AMTORIHIKI     " + 
		",AMSAGAKU       " + 
		",NRSOURCE       " + 
		",DTCREATE       " + 
		",TXREFNO        " + 
		",DTNEND         " + 
		",DTMSEQ         " + 
		",QTZOUGEN       " + 
		",AMZOUGEN       " + 
		",CREATED_DATE   " + 
		",CREATED_BY     " + 
		",CREATED_PRG_NM " + 
		",UPDATED_DATE   " + 
		",UPDATED_BY     " + 
		",UPDATED_PRG_NM " + 
		",MODIFY_COUNT   " + 
		"FROM FT100      " +
		"WHERE NRZAITORI = '" + _NRZAITORI + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}

//在庫増減履歴(受払区分＋取引ソース番号）
function selectFT100_NRSOURCE(_KBUKEBARAI,_NRSOURCE) {
	var sql = 
		"SELECT " +
		" NRZAITORI      " + 
		",DTTORIHIKI     " + 
		",KBUKEBARAI     " + 
		",KBZAIHURI      " + 
		",KBAKADEN       " + 
		",FGVALID        " + 
		",IDHINMOKU      " + 
		",TXHINBAN       " + 
		",TXHINMEI       " + 
		",KBUNIT         " + 
		",CDSOUKO        " + 
		",TXAITESAKI     " + 
		",PRTORIHIKI     " + 
		",QTTORIHIKI     " + 
		",AMTORIHIKI     " + 
		",AMSAGAKU       " + 
		",NRSOURCE       " + 
		",DTCREATE       " + 
		",TXREFNO        " + 
		",DTNEND         " + 
		",DTMSEQ         " + 
		",QTZOUGEN       " + 
		",AMZOUGEN       " + 
		",CREATED_DATE   " + 
		",CREATED_BY     " + 
		",CREATED_PRG_NM " + 
		",UPDATED_DATE   " + 
		",UPDATED_BY     " + 
		",UPDATED_PRG_NM " + 
		",MODIFY_COUNT   " + 
		"FROM FT100      " +
		"WHERE KBUKEBARAI = '" + _KBUKEBARAI + "'" + 
		"  AND FGVALID  = 'T'" + 
		"  AND NRSOURCE = '" + _NRSOURCE + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}

//売掛増減履歴(受払区分、効区(T)、取引ソース番号）
function selectET100_NRSOURCE(_KBURITORI, _NRSOURCE) {
	var sql = 
		"SELECT " +
		" NRURIKAKE           " + 
		",IDTOKUISAKI         " + 
		",DTTORIHIKI          " + 
		",KBURITORI           " + 
		",KBURIHURI           " + 
		",KBAKADEN            " + 
		",FGVALID             " + 
		",IDHINMOKU           " + 
		",TXHINBAN            " + 
		",TXHINMEI            " + 
		",KBUNIT              " + 
		",PRTORIHIKI          " + 
		",QTTORIHIKI          " + 
		",AMTAX               " + 
		",AMGENKA             " + 
		",NRSOURCE            " + 
		",NRSEIKYU            " + 
		",DTCREATE            " + 
		",TXREFNO             " + 
		",DTNEND              " + 
		",DTMSEQ              " + 
		",AMARARI             " + 
		",AMZOUGEN            " + 
		",CREATED_DATE        " + 
		",CREATED_BY          " + 
		",CREATED_PRG_NM      " + 
		",UPDATED_DATE        " + 
		",UPDATED_BY          " + 
		",UPDATED_PRG_NM      " + 
		",MODIFY_COUNT        " + 
		",AMTORIHIKI          " + 
		"FROM ET100      " +
		"WHERE KBURITORI = '" + _KBURITORI + "'" + 
		"  AND FGVALID   = 'T'" + 
		"  AND NRSOURCE  = '" + _NRSOURCE + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}


//請求見出し[ET110]
function insertET110(itemDataList) {
	//項目
	var itemColNameTbl = [
		 'NRSEIKYU'
		,'IDTOKUISAKI'
		,'DTSEIKYU'
		,'TXTEKIYO'
		,'AMSEIKYU'
		,'AMNYUKIN'
		,'CREATED_DATE'
		,'CREATED_BY'
		,'CREATED_PRG_NM'
		,'UPDATED_DATE'
		,'UPDATED_BY'
		,'UPDATED_PRG_NM'
		,'MODIFY_COUNT'
	];

	//var numList = TALON.getNumberingData('XDMF_EF_SEIKYU', 1)
	//itemDataList['NRSEIKYU']     = numList[0];

	//共通
	itemDataList['CREATED_DATE']   = tln_com_nowdate();
	itemDataList['CREATED_BY']     = tln_com_user_id();
	itemDataList['CREATED_PRG_NM'] = tln_com_func_id();
	itemDataList['UPDATED_DATE']   = tln_com_nowdate();
	itemDataList['UPDATED_BY']     = tln_com_user_id();
	itemDataList['UPDATED_PRG_NM'] = tln_com_func_id();
	itemDataList['MODIFY_COUNT']   = 1;

	TALON.insertByMap( 'ET110', itemDataList , itemColNameTbl );

}





//-------------------------------------------
//［処理］受領関連
//-------------------------------------------
//受領明細[ET120]
function selectET120(_NRJYURYOU) {
	var sql = 
		"SELECT " +
		"  NRJYURYOU         " + 
		" ,IDTOKUISAKI       " + 
		" ,DTJYURYOU         " + 
		" ,KBKINSYU          " + 
		" ,AMJYURYOU         " + 
		" ,AMTESURYOU        " + 
		" ,NRSOURCE          " + 
		" ,CREATED_DATE      " + 
		" ,CREATED_BY        " + 
		" ,CREATED_PRG_NM    " + 
		" ,UPDATED_DATE      " + 
		" ,UPDATED_BY        " + 
		" ,UPDATED_PRG_NM    " + 
		" ,MODIFY_COUNT      " + 
		"FROM ET120        " +
		"WHERE NRJYURYOU = '" + _NRJYURYOU + "'"
	;
	var itemSelectList = TALON.select(sql);

	return itemSelectList;
}



//-------------------------------------------
//［処理］受領処理
//-------------------------------------------
//　1 : 得意先ID
//　2 : 受領日
//　3 : 金種区分
//　4 : 金額（受領金額／残高控除分手数料）
//　5 : 処理区分（1:金額処理／2:手数料処理）
//　5 : 取引ソース№
//　6 : 受領№
function exec_juryo_ins(_TORIHIKISAKI, _TORIHIKIDATE, _KBKINSYU, _KINGAKU, _SYORIKBN, 
					    _NRSOURCE, _TXREFNO) {

	//売掛履歴作成
	//--------------------
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']  = _TORIHIKISAKI;
	//取引日
	itemDataList['DTTORIHIKI']   = _TORIHIKIDATE;
	//取引区分
	if (_SYORIKBN == '1') {
		if (_KBKINSYU == '1') {
			itemDataList['KBURITORI']    = "90";
		} else if (_KBKINSYU == '2') {
			itemDataList['KBURITORI']    = "91";
		} else {
			itemDataList['KBURITORI']    = "XX";
		}
	} else {
		itemDataList['KBURITORI']    = "92";
	}
	//振替区分(Null)
	itemDataList['KBURIHURI']    = "";
	//赤黒(1:黒伝)
	itemDataList['KBAKADEN']     = "1";
	//効区(T:有効)
	itemDataList['FGVALID']      = "T";
	//品目ID
	itemDataList['IDHINMOKU']    = "";
	//単位区分
	itemDataList['KBUNIT']       = "CNT";
	//取引単価
	itemDataList['PRTORIHIKI']   = _KINGAKU;
	//取引数
	itemDataList['QTTORIHIKI']   = 1;
	//消費税額
	itemDataList['AMTAX']        = 0;
	//販売原価
	itemDataList['AMGENKA']      = 0;
	//取引ソース№
	itemDataList['NRSOURCE']     = _NRSOURCE;
	//請求№(Null)
	itemDataList['NRSEIKYU']     = "";
	//登録日時
	itemDataList['DTCREATE']     = tln_com_nowdate();
	//参照番号
	itemDataList['TXREFNO']      = _TXREFNO;
	//年度(Null)
	itemDataList['DTNEND']       = '';
	//月序(Null)
	itemDataList['DTMSEQ']       = '';
	//粗利額
	itemDataList['AMARARI']      = 0;
	//残高増減額
	itemDataList['AMZOUGEN']     = _KINGAKU;
	//税抜取引額
	itemDataList['AMTORIHIKI']   = _KINGAKU;


	updateET100(itemDataList);



	//得意先情報更新
	//--------------------
	var itemDataList = new Array();

	//得意先情報取得
	var itemSelectList = selectET010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']       = lineDataMap['IDTOKUISAKI'];
	//客先担当部署
	itemDataList['TXTANTOUBUSYO']     = lineDataMap['TXTANTOUBUSYO'];
	//客先担当名
	itemDataList['TXTANTOUSYA']       = lineDataMap['TXTANTOUSYA'];
	//客先担当職位
	itemDataList['TXTANTOUSYASYOKUI'] = lineDataMap['TXTANTOUSYASYOKUI'];
	//客先担当メアド
	itemDataList['TXTANTOUSYAEMAIL']  = lineDataMap['TXTANTOUSYAEMAIL'];
	//客先担当TEL
	itemDataList['TXTANTOUSYADENWA']  = lineDataMap['TXTANTOUSYADENWA'];
	//請求方式区分
	itemDataList['KBSEIKYUHOUSHIKI']  = lineDataMap['KBSEIKYUHOUSHIKI'];
	//締め日
	itemDataList['TXSIMEBI']          = lineDataMap['TXSIMEBI'];
	//標準入金方法区分
	itemDataList['KBNYUKINHOUHOU']    = lineDataMap['KBNYUKINHOUHOU'];
	//売上入金サイト
	itemDataList['VLNYUKINSAITO']     = lineDataMap['VLNYUKINSAITO'];
	//与信限度額
	itemDataList['AMYOSHIN']          = lineDataMap['AMYOSHIN'];
	//担当営業№
	itemDataList['NRTANTOUJYUGYOIN']  = lineDataMap['NRTANTOUJYUGYOIN'];
	//摘要
	itemDataList['TXTEKIYO']          = lineDataMap['TXTEKIYO'];
	//期首売掛残高
	itemDataList['AMKISYUURIKAKE']    = lineDataMap['AMKISYUURIKAKE'];
	//期間売上額(税込金額)
	itemDataList['AMURIAGE']          = lineDataMap['AMURIAGE'];
	//期間受領額
	itemDataList['AMJYURYO']          = lineDataMap['AMJYURYO'] + _KINGAKU;
	//現売掛残高
	itemDataList['AMGENURIKAKE']      = lineDataMap['AMGENURIKAKE'];

	updateET010(itemDataList);

}


//-------------------------------------------
//　1 : 得意先ID
//　2 : 受領日
//　3 : 金種区分
//　4 : 金額（受領金額／残高控除分手数料）
//　5 : 処理区分（1:金額処理／2:手数料処理）
//　5 : 取引ソース№
//　6 : 受領№
//　* : 売掛取引№
//　* : 取引区分
function exec_juryo_del(_TORIHIKISAKI, _TORIHIKIDATE, _KBKINSYU, _KINGAKU, _SYORIKBN, 
					    _NRSOURCE, _TXREFNO, _NRURIKAKE, _KBURITORI) {


	//売掛履歴作成
	//--------------------
	insertAkaET100(_NRURIKAKE);


	//売掛履歴更新
	//--------------------
	//赤伝発行と共に元黒の効区をF:無効に更新（対象受払区分＋取引ソース内で効区は全てFに）

	TALON.update( " UPDATE ET100 SET " +
				  " FGVALID = 'F' " +
				  " WHERE KBURITORI  = '" + _KBURITORI + "'" +
				  "   AND NRSOURCE   = '" + _NRSOURCE  + "'"
				);


	//得意先情報更新
	//--------------------
	var itemDataList = new Array();

	//得意先情報取得
	var itemSelectList = selectET010(_TORIHIKISAKI);

	var lineDataMap  = itemSelectList[0];
	var itemDataList = new Array();

	//得意先ID
	itemDataList['IDTOKUISAKI']       = lineDataMap['IDTOKUISAKI'];
	//客先担当部署
	itemDataList['TXTANTOUBUSYO']     = lineDataMap['TXTANTOUBUSYO'];
	//客先担当名
	itemDataList['TXTANTOUSYA']       = lineDataMap['TXTANTOUSYA'];
	//客先担当職位
	itemDataList['TXTANTOUSYASYOKUI'] = lineDataMap['TXTANTOUSYASYOKUI'];
	//客先担当メアド
	itemDataList['TXTANTOUSYAEMAIL']  = lineDataMap['TXTANTOUSYAEMAIL'];
	//客先担当TEL
	itemDataList['TXTANTOUSYADENWA']  = lineDataMap['TXTANTOUSYADENWA'];
	//請求方式区分
	itemDataList['KBSEIKYUHOUSHIKI']  = lineDataMap['KBSEIKYUHOUSHIKI'];
	//締め日
	itemDataList['TXSIMEBI']          = lineDataMap['TXSIMEBI'];
	//標準入金方法区分
	itemDataList['KBNYUKINHOUHOU']    = lineDataMap['KBNYUKINHOUHOU'];
	//売上入金サイト
	itemDataList['VLNYUKINSAITO']     = lineDataMap['VLNYUKINSAITO'];
	//与信限度額
	itemDataList['AMYOSHIN']          = lineDataMap['AMYOSHIN'];
	//担当営業№
	itemDataList['NRTANTOUJYUGYOIN']  = lineDataMap['NRTANTOUJYUGYOIN'];
	//摘要
	itemDataList['TXTEKIYO']          = lineDataMap['TXTEKIYO'];
	//期首売掛残高
	itemDataList['AMKISYUURIKAKE']    = lineDataMap['AMKISYUURIKAKE'];
	//期間売上額(税込金額)
	itemDataList['AMURIAGE']          = lineDataMap['AMURIAGE'];
	//期間受領額
	itemDataList['AMJYURYO']          = lineDataMap['AMJYURYO'] + (_KINGAKU * -1);
	//現売掛残高
	itemDataList['AMGENURIKAKE']      = lineDataMap['AMGENURIKAKE'];

	updateET010(itemDataList);

}