プログラム仕様書　BS23300P（中継委託明細用　委託料計算・中継確定データ登録）

1. 概要

1.1 機能概要

DDP から委託する送り状（最大40件）の情報を受け取り、送り状ごとに委託料（到着経費・委託消費税など）を計算して返す。返した後に、委託会社が中継確定データの対象なら、中継確定データマスター（または西濃ＯＰＰ用の DB2 テーブル）に登録する。

1. 送り状ごとに、送り状マスター（センター）の内容、または DDP から受け取った内容で、運賃計算用のデータを作る。
2. 15件ごと（または最後）に運賃計算（UC20140P）を呼び、到着経費・他社委託粁程・委託消費税などを受け取る。
3. 結果を DDP に返す（ここで DDP との会話は終わる）。
4. 委託会社が中継確定データの対象なら、中継確定データマスター・受付未入力マスターに送り状ごとのデータを書く。西濃ＯＰＰの対象なら RDITSE に書く。

flowchart LR
    DDP[DDP BV18400P・BS13300P] -- 委託送り状 4063バイト --> B33S[B33S<br/>本プログラム]
    B33S -- 委託料の計算結果 4647バイト --> DDP
    B33S --> OKR[(VKOMST2・VKOMST1<br/>送り状マスター)]
    B33S -- LINK --> UC[UC20140P<br/>運賃計算]
    B33S --> DX[(VKDXHCG<br/>配信荷主変換マスター)]
    B33S --> TY[(VKTYUKA・VKTYUUN<br/>中継確定データマスター)]
    B33S --> IT[(RDITSE<br/>西濃ＯＰＰ)]

2. インターフェース

2.1 受信データ（4063バイト）

トランザクションID（4）＋ DPCEB33S（他社委託ＣＩＣＳ間データ（ＤＤＰ～センター））。項目は BV18400P_仕様書.md 3.3 を参照。

2.2 送信データ（4647バイト）

エラーフラグ（1）＋エラーコード（4）＋ 航空・小口の区分（SENTKOKU：40件）＋ CEDPB33S（他社委託ＣＩＣＳ間データ（センター～ＤＤＰ））。

2.3 運賃計算（UC20140P）との受渡し

3. 処理仕様

3.1 処理の流れ

flowchart TD
    S([開始]) --> RCV[委託送り状を受信]
    RCV --> LP[送り状ごとに運賃計算用データを作る 3.2]
    LP --> C{15件たまった<br/>または最後}
    C -- はい --> UC[運賃計算 UC20140P 3.3]
    UC --> LP
    C -- いいえ --> LP
    LP -- 全件終了 --> SND[結果を送信して会話終了<br/>SYNCPOINT]
    SND --> DX{配信荷主変換マスター 3.4}
    DX -- 中継確定の対象 --> TY[中継確定データマスターに登録 3.5]
    DX -- 西濃ＯＰＰ --> IT[RDITSE に登録]
    DX -- 対象外 --> E([終了])
    TY --> E
    IT --> E

3.2 送り状ごとの運賃計算用データの作成

マスター区分（TITDMSKB）で分ける。

送り状マスター（センター）を読んだ場合の主な編集：

送り状マスターがない場合（マスター区分 0）は、状況区分を 1（読込みエラーは 3）にし、発地・着地を '00000' にして、元着区分を送り状ＮＯ で決める。

3.3 運賃計算と結果の編集

1. 15件ごと（またはデータの最後）に、運賃計算用データを TSキュー（端末ＣＤ＋タスク番号）に書き、運賃計算（UC20140P）を LINK し、計算結果を読み戻して TSキューを削除する。
2. 計算結果区分ごとに返信データにセットする。

3. 特約８０区分が 'T' の送り状は、着荷主名の14バイト目に印（HIGH）を入れる。
4. 仮伝（送り状ＮＯ の先頭3桁が 980～989）は、発着経費料金・委託消費税を 0 にする。

3.4 結果の送信と中継確定データの対象判定

1. 結果（4647バイト）を送信して会話を終え（SEND LAST）、SYNCPOINT を取る。以降の処理結果は DDP には返らない。
2. 配信荷主変換マスター（VKDXHCG）を「委託会社ＣＤ＋'A'」で読む。

中継確定データの対象の委託会社ＣＤ（ソースに直接記述）：0335811、0497546、0370990、0372475、1265471、1292432、1740762・1740770・1740788（2004/05/12 追加：トナミ　ＸＥＢＩＯ）、1820895・1820944・1820952・1821041・1821009・1821033・1820960・1820986・1820994（2006/09/28 追加：トナミ　委託変更）、1983320・1983338（2011/10/03 追加：トナミ福井卸開始）。

3.5 中継確定データマスターへの登録

送り状ＮＯ が 0 より大きい送り状ごとに、中継確定データ（TYUKAKUT）を作る。

送り状ごとに SYNCPOINT を取る。書込みエラーはコンソールに出して続ける。

4. 補足・留意事項

1. DDP に返してから登録する：中継確定データの登録は DDP に結果を返した後に行うため、登録のエラーは DDP に伝わらない（コンソールに出すだけ）。
2. CICS のエラー時：CICS のエラーでは、エラーフラグ '1' にしてその時点の内容を返す。
3. 固定値の判定：中継確定データの対象の配信先コード（'0259706'）・委託会社ＣＤ（18件）、西濃ＯＰＰの配信先コード（2265412）、元着区分・仮伝の送り状ＮＯ の範囲がソースに直接書かれている。
4. 受付年月日の編集：受付日の下5桁（年1桁＋月日）に 900000 を足して受付年月日にしている（年の上位桁を 9 とみなす編集）。
5. 委託年月日の2種類：中継確定データの委託年月日（TUKITYMD）は処理日（システム日付）、TUKKDYMD は DDP から受け取った委託日付をセットしている。
6. 結果の編集位置：計算結果を返信データに入れる位置（VCNT）は、計算結果区分が 0・1・2 の送り状だけ進める。ほかの区分があると、以降の送り状とずれる。仮伝の判定はその位置の送り状ＮＯ で行う。
7. 航空・小口の区分：航空・小口の区分を返すが、DDP の BV18400P・BS13300P ではこのエラーがコメントアウトされている。