# XDMF_DF111_0 / 支払依頼エントリー／仕入明細の選択 _言語: ja / データ版数 (設定の最終更新): 2024-07-11 11:38:22_ ## 要約 | 項目 | 値 | |------|------| | FUNC\_ID | \`XDMF\_DF111\_0\` | | 機能名 | 支払依頼エントリー／仕入明細の選択 | | 機能タイプ \(APP\_KBN\) | STD / 固定検索条件 | | BG\_L | 4 | | BG\_M | 10 | | ブロック数 | 2 | | 項目数 | 29 | | 読み取りテーブル | 2 | | 書き込みテーブル | 2 | | DB 接続先 | 1 | ### 機能概要 仕入先単位に支払依頼を登録する画面です。仕入先IDで検索すると、買掛金の一覧が明細に表示されますので、今回の支払依頼対象となる明細を選択して「確定」ボタンを実行します。データの確認は支払依頼の一覧・保守で行って下さい。 ※支払方法は振込／手形が選択できます。システム内での参照はありません。（メモ項目です） ※対象を1件も選択しない状態で確定するとエラーメッセージが表示されます。 ※支払依頼の一覧・保守で登録内容の確認が可能です。登録直後の支払状況は「未承認」となっています。 支払承認エントリーで「承認済」となり、買掛増減履歴に支払データが作成され仕入先テーブルの期間支払額の加算が行われます。支払承認エントリーは「経理担当」の項で説明します。 ## 機能設定 ### 機能説明 | 項目 | 値 | |------|----| | 機能ID | XDMF\_DF111\_0 | | 機能名 | 支払依頼エントリー／仕入明細の選択 | | 機能タイプ | 固定検索条件 \(STD\) | | ADMIN\_ID | | | 業務分類 大 | XTEA生産管理 \(4\) | | 業務分類 中 | 仕入・買掛管理 \(10\) | | 業務分類 小 | | | 作成 | 2024\-07\-11 11:38:09.0 demo | | 最終更新 | 2024\-07\-11 11:38:09.0 demo | | ヘルプリンク名 \(HELP\_LINK\_NM\) | | | ヘルプURL \(HELP\_URL\) | | #### 機能概要 仕入先単位に支払依頼を登録する画面です。仕入先IDで検索すると、買掛金の一覧が明細に表示されますので、今回の支払依頼対象となる明細を選択して「確定」ボタンを実行します。データの確認は支払依頼の一覧・保守で行って下さい。 ※支払方法は振込／手形が選択できます。システム内での参照はありません。（メモ項目です） ※対象を1件も選択しない状態で確定するとエラーメッセージが表示されます。 ※支払依頼の一覧・保守で登録内容の確認が可能です。登録直後の支払状況は「未承認」となっています。 支払承認エントリーで「承認済」となり、買掛増減履歴に支払データが作成され仕入先テーブルの期間支払額の加算が行われます。支払承認エントリーは「経理担当」の項で説明します。 ### アプリケーション設定 #### 機能レベル設定一覧 _TLN_M_GENERAL_APP (FUNC_SEQ=-1) に登録されている全ての設定値。非表示フラグや個別セクションで重複して表示される設定も含む。_ | ボタン | 状態 | FUNC\_KBN | |------|------|------| | 機能タイプ | 固定検索条件 | APP\_KBN=STD | | 検索条件保存 \> 非表示 | ON \[1\] | COND\_SAVE\_HDN\_FLG | | 起動Window状態 | 別Window \(既存あれば上書き\) \[NORMAL\] | OPEN\_WINDOW\_MODE | #### 標準ボタン非表示設定 | ボタン | FUNC\_KBN | 状態 | |------|------|------| | PDF出力 | PDF\_BUTTON\_HDN\_FLG | 表示 | | Excel出力 | EXCEL\_BUTTON\_HDN\_FLG | 表示 | | Excel更新 | EXCELUPDATE\_BUTTON\_HDN\_FLG | 表示 | | クリア | CLEAR\_BUTTON\_HDN\_FLG | 表示 | | 検索 | SEARCH\_BUTTON\_HDN\_FLG | 表示 | | 戻る | BACK\_BUTTON\_HDN\_FLG | 表示 | | 確定 | EXECUTE\_BTN\_HDN\_FLG | 表示 | | 参照 | VIEW\_BUTTON\_HDN\_FLG | 表示 | | 画面設定 | COL\_BUTTON\_HDN\_FLG | 表示 | | 検索条件保存 | COND\_SAVE\_HDN\_FLG | 非表示 | | 検索条件タイトル | IS\_CONDITION\_TITLE\_OFF | 表示 | | ブロック名 | BLOCK\_NAME\_HDN\_FLG | 表示 | #### 結合項目 _結合項目 (JOIN): 同じグループに属する他ブロックの検索項目は 1 つの検索条件として集約される。_ | 並び | 項目数 | 結合される項目 | |------|------|------| | 1 | 2 | BLOCK2: IDSIIRESAKI \(IDSIIRESAKI\) ↔ BLOCK1: 仕入先ID \(IDSIIRESAKI\) | ### ユーザグループ | FUNC\_ATH\_ID | グループ名 | |------|------| | system | システム管理 | ## 検索条件 (集約) | 表示名 | COL\_NAME | データ型 | 桁 | 表示形式 | 改行 | 集約数 | 集約元 | |------|------|------|------|------|------|------|------| | 仕入先ID | IDSIIRESAKI | VARCHAR2 | 30 | TEXT:半角、全角混在\(Byte\) | | 2 | BLOCK2: IDSIIRESAKI / BLOCK1: IDSIIRESAKI | ## ブロック設定 ### ブロック構成 | \# | TYPE | TITLE | |------|------|------| | BLOCK 1 | CARD | 支払依頼 | | BLOCK 2 | LIST | 買掛増減履歴の選択 | ### BLOCK 1: 支払依頼 [CARD] #### ブロックレベル更新先テーブル | 設定 | 内容 | |------|------| | SELECT式 \> 更新テーブル | DT110 | #### SELECT 式 ```sql SELECT DT010.IDSIIRESAKI as NRSIHARAI ,DT010.IDSIIRESAKI as IDSIIRESAKI ,AT030.TXKANJI as TXKANJI ,DT010.KBSIHARAI as KBSIHARAI ,TLN_DATE_TO_CHAR('YMD',TLN_SYSDATE()) as DTSIHARAI ,NULL as TXSEIKYU ,0 as AMSHIHARAI ,NULL as NRSOURCE ,NULL as STSIHARAI ,TLN_DATE_TO_CHAR('YMD',TLN_SYSDATE()) as CREATED_DATE ,/**%TLN_LOGIN_USER%**/null as CREATED_BY ,'XDMF_DF111_0' as CREATED_PRG_NM ,TLN_DATE_TO_CHAR('YMD',TLN_SYSDATE()) as UPDATED_DATE ,/**%TLN_LOGIN_USER%**/null as UPDATED_BY ,'XDMF_DF111_0' as UPDATED_PRG_NM ,0 as MODIFY_COUNT FROM DT010 INNER JOIN AT030 ON DT010.IDSIIRESAKI = AT030.IDTORIHIKISAKI ``` #### 項目情報 | 並び順 | 物理項目名 | 表示名 | キー | 更新 | 検索 | 必須 | 改行 | グループ名 | 表示形式 | データ型 | 桁 | 表示桁 | 行数 | コンポーネント | 識別コード | |------|------|------|------|------|------|------|------|------|------|------|------|------|------|------|------| | 1 | NRSIHARAI | | ○ | | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 30 | | | | | | 2 | IDSIIRESAKI | 仕入先ID | | ○ | ○ | ○ | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 30 | | | | | | 3 | TXKANJI | 仕入先名 | | | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 100 | | | | | | 4 | KBSIHARAI | 支払方法 | | ○ | | ○ | ○ | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 2 | | | リストボックス \(1\) | KBSIHARAI | | 5 | DTSIHARAI | 支払依頼日 | | ○ | | ○ | | | DATE:YYYY/MM/DD | VARCHAR2 | 10 | | | | | | 6 | TXSEIKYU | 相手先請求番号 | | ○ | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 20 | | | | | | 7 | AMSHIHARAI | | | | | | | | INT:整数　　　　　　　　　　 | NUMBER | 22 | | | | | | 8 | NRSOURCE | | | ○ | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 30 | | | | | | 9 | STSIHARAI | | | ○ | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 2 | | | | | | 10 | CREATED\_DATE | | | ○ | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 20 | | | | | | 11 | CREATED\_BY | | | ○ | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 50 | | | | | | 12 | CREATED\_PRG\_NM | | | ○ | | | | | TEXT:半角、全角混在\(Byte\) | CHAR | 50 | | | | | | 13 | UPDATED\_DATE | | | ○ | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 20 | | | | | | 14 | UPDATED\_BY | | | ○ | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 50 | | | | | | 15 | UPDATED\_PRG\_NM | | | ○ | | | | | TEXT:半角、全角混在\(Byte\) | CHAR | 50 | | | | | | 16 | MODIFY\_COUNT | | | ○ | | | | | INT:整数　　　　　　　　　　 | NUMBER | 10 | | | | | ##### 項目別 詳細設定 (ITEM_OPTN) ###### 項目: NRSIHARAI | 設定種別 | 並び | 内容 | |------|------|------| | 採番名 | 1 | XDMF\_DF\_SIHARAI | ###### 項目: IDSIIRESAKI (仕入先ID) | 設定種別 | 並び | 内容 | |------|------|------| | 入力許可パターン | 1 | パターン=1 = 2 / マクロ=ON \[1\] | | 検索必須 | 1 | ON | | 検索子画面 \> 機能ID | 1 | 機能ID=XDMF\_DF200\_0 \(仕入先マスターの検索子画面\) | | 検索子画面 | 1 | 子画面項目=IDTORIHIKISAKI \(仕入先ID\) / 項目名=IDSIIRESAKI \(仕入先ID\) | | 検索子画面 | 2 | 子画面項目=TXKANJI \(仕入先名\) / 項目名=TXKANJI \(仕入先名\) | | 検索子画面 | 3 | 子画面項目=IDTORIHIKISAKI \(仕入先ID\) / 戻り値=IDSIIRESAKI \(仕入先ID\) | | 検索子画面 | 4 | 子画面項目=TXKANJI \(仕入先名\) / 戻り値=TXKANJI \(仕入先名\) | | 検索子画面 | 5 | 項目名=ON \[INIT\_SEARCH\] | ###### 項目: NRSOURCE | 設定種別 | 並び | 内容 | |------|------|------| | 採番名 | 1 | XDMF\_DF\_SOURCE | ###### 項目: STSIHARAI | 設定種別 | 並び | 内容 | |------|------|------| | DB設定式 \> 条件式 | 1 | 条件式=マクロ \[MACRO\] / 値=10 / 登録条件式=1 = 1 | #### 詳細設定 | 設定種別 | 値 | FUNC\_KBN | |------|------|------| | 確定時オプション \> 全件を対象にする | ON \[1\] | ALL\_REG\_FLG | | ボタンの非表示 \> 画面設定 | ON \[1\] | COL\_BUTTON\_HDN\_FLG | | 処理権限 \> 登録 | ON \[1\] | INSERT\_FLG | ### BLOCK 2: 買掛増減履歴の選択 [LIST] #### SELECT 式 ```sql SELECT DT100.IDSIIRESAKI as IDSIIRESAKI ,null as SENTAKU_KBN ,DT100.NRKAIKAKE as NRKAIKAKE ,DT100.DTTORIHIKI as DTTORIHIKI ,DT100.KBKAITORI as KBKAITORI ,DT100.TXHINBAN as TXHINBAN ,DT100.TXHINMEI as TXHINMEI ,DT100.PRTORIHIKI as PRTORIHIKI ,DT100.QTTORIHIKI as QTTORIHIKI ,DT100.KBUNIT as KBUNIT ,DT100.AMTORIHIKI as AMTORIHIKI ,DT100.AMTAX as AMTAX ,DT100.AMZOUGEN as AMZOUGEN FROM DT100 WHERE DT100.FGVALID = 'T' AND ( DT100.NRSIHARAI IS NULL or DT100.NRSIHARAI = '' ) AND DT100.KBKAITORI <> '90' ``` #### 項目情報 | 並び順 | 物理項目名 | 表示名 | キー | 更新 | 検索 | 必須 | 改行 | グループ名 | 表示形式 | データ型 | 桁 | 表示桁 | 行数 | コンポーネント | 識別コード | |------|------|------|------|------|------|------|------|------|------|------|------|------|------|------|------| | 1 | IDSIIRESAKI | | | | ○ | ○ | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 30 | | | | | | 2 | SENTAKU\_KBN | 対象 | | ○ | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 10 | | | チェックボックス \(5\) | FGNYUKA | | 3 | NRKAIKAKE | 買掛取引№ | | | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 30 | | | | | | 4 | DTTORIHIKI | 取引日 | | | | | | | DATE:YYYY/MM/DD | DATE | 10 | | | | | | 5 | KBKAITORI | 取引区分 | | | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 2 | | | リストボックス \(1\) | KBKAITORI | | 6 | TXHINBAN | 品番 | | | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 100 | | | | | | 7 | TXHINMEI | 品名 | | | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 100 | | | | | | 8 | PRTORIHIKI | 取引単価 | | | | | | | INT:整数　　　　　　　　　　 | NUMBER | 11 | | | | | | 9 | QTTORIHIKI | 取引数 | | | | | | | INT:整数　　　　　　　　　　 | NUMBER | 11 | | | | | | 10 | KBUNIT | 単位区分 | | | | | | | TEXT:半角、全角混在\(Byte\) | VARCHAR2 | 3 | | | リストボックス \(1\) | KBUNIT | | 11 | AMTORIHIKI | 税抜取引額 | | | | | | | INT:整数　　　　　　　　　　 | NUMBER | 11 | | | | | | 12 | AMTAX | 消費税額 | | | | | | | INT:整数　　　　　　　　　　 | NUMBER | 11 | | | | | | 13 | AMZOUGEN | 残高増減額 | | | | | | | INT:整数　　　　　　　　　　 | NUMBER | 11 | | | | | ##### 項目別 詳細設定 (ITEM_OPTN) ###### 項目: IDSIIRESAKI | 設定種別 | 並び | 内容 | |------|------|------| | 検索子画面 \> 機能ID | 1 | 機能ID=XDMF\_DF200\_0 \(仕入先マスターの検索子画面\) | | 検索子画面 | 1 | 子画面項目=IDTORIHIKISAKI \(仕入先ID\) / 項目名=IDSIIRESAKI \(仕入先ID\) | | 検索子画面 | 2 | 子画面項目=IDTORIHIKISAKI \(仕入先ID\) / 戻り値=IDSIIRESAKI \(仕入先ID\) | | 検索子画面 | 3 | 項目名=ON \[INIT\_SEARCH\] | ###### 項目: SENTAKU_KBN (対象) | 設定種別 | 並び | 内容 | |------|------|------| | 表示位置 | 1 | 中央 \[C\] | #### 詳細設定 | 設定種別 | 値 | FUNC\_KBN | |------|------|------| | ボタンの非表示 \> 画面設定 | ON \[1\] | COL\_BUTTON\_HDN\_FLG | | ボタンの非表示 \> Excel更新 | ON \[1\] | EXCELUPDATE\_BUTTON\_HDN\_FLG | | 処理権限 \> 更新 | ON \[1\] | UPDATE\_FLG | | ボタンの非表示 \> 参照 | ON \[1\] | VIEW\_BUTTON\_HDN\_FLG | #### 他機能呼出 ##### ボタン: No.1 | 設定 | 内容 | | --- | --- | | 機能ID | XDMF_DF111_1 (支払依頼エントリーの補助機能) | | 更新時 > 選択 | 更新 [UPDATE] | **引数設定** (4 件) _引数 #1 — 遷移先項目: NRKAIKAKE (買掛取引№)_ | 設定 | 内容 | | --- | --- | | 項目 | NRKAIKAKE (買掛取引№) | _引数 #2 — 遷移先項目: NRSIHARAI (支払依頼№)_ | 設定 | 内容 | | --- | --- | | 式 | %1_NRSIHARAI% | _引数 #3 — 遷移先項目: UPDATED_BY (UPDATED_BY)_ | 設定 | 内容 | | --- | --- | | 固定値 | %LOGIN_ID% | _引数 #4 — 遷移先項目: UPDATED_PRG_NM (UPDATED_PRG_NM)_ | 設定 | 内容 | | --- | --- | | 固定値 | XDMF_DF111_0 | ## 参照情報 ### メニュー位置 | FUNC\_ATH\_ID | グループ名 | 表示名 | AUTH\_KBN | PRINT\_SORT | APP\_URL | HELP\_URL | |------|------|------|------|------|------|------| | XTEA//XTEA\_ORDER | | 支払依頼エントリー | 1 | 5200 | TALON/APPLICATION/GENERALFREE/GENERALFREE.xhtml?PARAM\_FUNC\_ID=XDMF\_DF111\_0 | | ### 依存関係 #### 参照先機能 | FUNC\_ID | FUNC\_NM | APP\_KBN | |------|------|------| | XDMF\_DF111\_0 | 支払依頼エントリー／仕入明細の選択 | STD | | XDMF\_DF111\_1 | 支払依頼エントリーの補助機能 | STD | | XDMF\_DF200\_0 | 仕入先マスターの検索子画面 | SUB | #### 参照先テーブル (書き込み) _INSERT/UPDATE/DELETE/MERGE/UPDATE_TABLE 設定_ | テーブル名 | 出典 | |------|------| | DT100 | 他機能呼出 XDMF\_DF111\_1 / 買掛増減履歴の支払依頼№更新 | | DT110 | UPDATE\_TABLE \(FUNC\_SEQ=1\) / UPDATE\_TABLE \(FUNC\_SEQ=1\) | #### 参照先テーブル (読み取りのみ) _FROM / JOIN 句から抽出_ | テーブル名 | 出典 | |------|------| | AT030 | BLOCK1.BODY\_SQL | | DT010 | BLOCK1.BODY\_SQL | > **✎ テーブル参照解析の注意事項** > > - テーブル参照は `UPDATE_TABLE` 設定 + ブロック SELECT 式 (BODY_SQL/TITLE_SQL) + JavaScript コード (CHR_TEXT) + 呼び出すストアドプロシージャ本体 (Oracle / PostgreSQL / MySQL / SQL Server) を `FROM` / `JOIN` / `INSERT INTO` / `UPDATE ... SET` / `DELETE FROM` / `MERGE INTO` / `REPLACE INTO` / `MERGE ... USING` の正規表現で抽出した結果です。 動的SQLは文字列リテラルが DML 文で始まる場合のみ抽出します。 > - **書き込み** = INSERT/UPDATE/DELETE/MERGE が検出されたテーブル / **読み取り** = FROM/JOIN のみのテーブル > - **⚠ 抜け・漏れの可能性**: コード内で動的に組み立てられた SQL、変数連結、条件分岐内の SQL は検出できない場合があります。 > - **⚠ 対象外**: ストアドプロシージャ本体は Oracle / PostgreSQL / MySQL / SQL Server に対応 (DB2 等は今後)。 プロシージャから更に呼ぶ別プロシージャ、 BODY_SQL/JS 直書きの CALL/EXEC、 外部 API 経由、 トリガ連動は含まれません。 動的SQLの変数組み立てテーブル名も対象外 (リテラル完結分は抽出)。 > - **✎ 補完 (備考タグ)**: 解析で捕捉できない依存は 機能説明タブの備考に `[R:テーブル名]` (読み) / `[W:テーブル名]` (書き) / `[WR:テーブル名]` (読み書き) と記入すると依存として取り込まれます (1タグ1テーブル、 文章中に埋め込み可)。 `@番号` で複数DB接続の接続先を明示できます (例 `[W:LOG_TBL@2]`。 省略時は機能の DB 接続先)。 #### 被参照 (呼出元機能) | FUNC\_ID | FUNC\_NM | APP\_KBN | 参照箇所 | |------|------|------|------| | XDMF\_DF110\_0 | 支払依頼の一覧・保守 | STD | BUTTON\_NEXT \(ALL\) | #### 参照先共通ライブラリ _TLN_M_HANYO_CODE_MAIN.SIKIBETU_CODE in (TLN_GENERAL_JAVASCRIPT_ENGINE / TLN_GENERAL_JAVASCRIPT / TLN_GENERAL_CSS) からマップ。「全て」モード時は該当種別の全ライブラリ、「個別」モード時は CHR1 で指定されたものだけ。_ | 種別 | LIBRARY\_CODE | 名称 | 使用スコープ | |------|------|------|------| | サーバ JS | XDMF\_JS001\_0 | \[共通\]共通 | サーバJS:確定処理後\[個別\] | | サーバ JS | XDMF\_JS002\_0 | \[共通\]仕入関連 | サーバJS:確定処理後\[個別\] | | サーバ JS | XDMF\_JS003\_0 | \[共通\]製造関連 | サーバJS:確定処理後\[個別\] | ### マスタ参照 #### 汎用CD (TLN_M_HANYO_CODE_MAIN) | 識別コード | KEY | 名称 | DSP1 | DSP2 | DSP3 | DSP\_NO1 | SORT | |------|------|------|------|------|------|------|------| | FGNYUKA | T | 入荷指示済フラグ | 対象 | | | 0 | | | KBKAITORI | 00 | 取引区分\(買掛\) | 入荷仕入 | | | 0 | 0 | | KBKAITORI | 01 | 取引区分\(買掛\) | 直入荷仕入 | | | 0 | 1 | | KBKAITORI | 02 | 取引区分\(買掛\) | 仕入返品 | | | 0 | 2 | | KBKAITORI | 10 | 取引区分\(買掛\) | 振替控除 | | | 0 | 10 | | KBKAITORI | 11 | 取引区分\(買掛\) | 振替計上 | | | 0 | 11 | | KBKAITORI | 90 | 取引区分\(買掛\) | 支払 | | | 0 | 90 | | KBSIHARAI | 10 | 支払方法区分 | 振込 | | | 0 | 10 | | KBSIHARAI | 20 | 支払方法区分 | 手形 | | | 0 | 20 | | KBUNIT | CNT | 単位区分 | 件 | | | 0 | 20 | | KBUNIT | ECH | 単位区分 | 個 | | | 0 | 10 | | KBUNIT | G | 単位区分 | ｇ | | | 0 | 60 | | KBUNIT | KG | 単位区分 | kg | | | 0 | 50 | | KBUNIT | MTR | 単位区分 | ｍ | | | 0 | 30 | | KBUNIT | ROL | 単位区分 | 巻 | | | 0 | 40 | #### 採番 (TLN_M_SEQ_PARAMETER) | 識別コード | SEQ\_NO | KIND | VALUE | |------|------|------|------| | XDMF\_DF\_SIHARAI | 0 | 1 | SH | | XDMF\_DF\_SIHARAI | 1 | 2 | %tY%tm | | XDMF\_DF\_SIHARAI | 2 | 3 | 5 | | XDMF\_DF\_SOURCE | 0 | 1 | SO | | XDMF\_DF\_SOURCE | 1 | 2 | %tY%tm | | XDMF\_DF\_SOURCE | 2 | 3 | 5 | ## コードブック ### JavaScript / 各種コード #### サーバJS:確定処理後 (機能レベル, 並び=0) ```javascript //入力値取得 var itemBlockListHed = TALON.getBlockData_List(1); var lineDataMap = itemBlockListHed[0]; var _NRSIHARAI = lineDataMap['NRSIHARAI']; //更新フィールドの設定 var itemColNameTbl = [ 'NRSIHARAI' , 'AMSIHARAI' ]; //買掛履歴を支払依頼№で検索して、1件もなければエラーとする var sql = "SELECT " + " sum(AMZOUGEN) as AMZOUGEN " + "FROM DT100 " + "WHERE NRSIHARAI = '" + _NRSIHARAI + "'" + "GROUP BY NRSIHARAI " ; var itemSelectList = TALON.select(sql); //存在しない場合、未選択なのでエラー if (itemSelectList.length == 0) { TALON.addErrorMsg( "買掛増減履歴が選択されていません。" ); TALON.setIsSuccess(false); } else { //支払依頼の支払依頼額を更新する var lineDataMapS = itemSelectList[0]; var _AMZOUGEN = lineDataMapS['AMZOUGEN']; //データの設定 var itemDataList = new Array(); itemDataList['NRSIHARAI'] = _NRSIHARAI; itemDataList['AMSIHARAI'] = _AMZOUGEN; var whereList = new Array(); var whereTbl1 = [ null, '=' , 'NRSIHARAI' ]; whereList.push(whereTbl1); TALON.updateByMap( 'DT110', itemDataList , itemColNameTbl , whereList ); } ``` ### 共通ライブラリ #### サーバJS ライブラリ: XDMF_JS001_0 ([共通]共通) ```javascript //------------------------------------------- //［部品］共通 //------------------------------------------- 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; } ``` #### サーバJS ライブラリ: XDMF_JS002_0 ([共通]仕入関連) ```javascript //------------------------------------------- //［処理］入庫処理 //------------------------------------------- //入庫新規登録 //　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); } ``` #### サーバJS ライブラリ: XDMF_JS003_0 ([共通]製造関連) ```javascript //------------------------------------------- //［処理］出庫処理 //------------------------------------------- //出庫新規登録 //　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); } ```