【水産】BMS発注切替手順

事前準備

概要
協定シート記載の内容を確認し、JX 手順 CLIENT 制御F1の通信設定を行う。JXクライアント通信設定

送受信対象のデータ種に応じて次の3点を行う。
①JX 手順 CLIENT 制御F2を設定する
②JX 手順 CLIENT 制御F2の処理の内容でフォルダーを BMSHOME \ MAR に用意する
③JCALIB/MDATCMにファイルを用意する

・受注(受信・抽出・累積)

              
CRTPF FILE(JCALIB/LDS1BH) SRCFILE(EVXJXLIB/QDBFSRC) SRCMBR(TBJEP010)
        TEXT('リオンドール水産 受注 受信 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            
              
CRTPF FILE(MDATCM/LDS1BHW) SRCFILE(EVXJXLIB/QDBFSRC) SRCMBR(TBJEP010)
        TEXT('リオンドール水産 受注 抽出 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            
              
CRTPF FILE(MDATCM/LDS1BHR) SRCFILE(HKSLIB/QDDSSRC) SRCMBR(TBJEP010RB)
        TEXT('リオンドール水産 受注 累積 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            
              
CRTLF FILE(MDATCM/LDS1BHRL01) SRCFILE(MSLIB/QDDSSRC) SRCMBR(LDS1BHRL01)
        TEXT('リオンドール水産 受注 累積 BMS')
        OPTION(*NOSRC *NOLIST)
              
            
              
CRTPF FILE(JCALIB/LDS1BHRW) SRCFILE(MSLIB/QDDSSRC) SRCMBR(TBJEP010RC)
        TEXT('リオンドール水産 受注 累積抽出 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            

・出荷確定(送信・累積・抽出・集計)

              
CRTPF FILE(JCALIB/LDS1BSW) SRCFILE(MSLIB/QDDSSRC) SRCMBR(TBJEP010RC)
        TEXT('リオンドール水産 ASN抽出 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            
              
CRTPF FILE(JCALIB/LDS1BS) SRCFILE(EVXJXLIB/QDBFSRC) SRCMBR(TBJEP010)
        TEXT('リオンドール水産 ASN送信 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            
              
CRTPF FILE(JCALIB/LDS1BS1) SRCFILE(EVXJXLIB/QDBFSRC) SRCMBR(TBJEP010)
        TEXT('リオンドール水産 ASN作成1 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            
              
CRTPF FILE(JCALIB/LDS1BS2) SRCFILE(EVXJXLIB/QDBFSRC) SRCMBR(TBJEP010)
        TEXT('リオンドール水産 ASN作成2 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            
              
CRTPF FILE(MDATCM/LDS1BSR) SRCFILE(MSLIB/QDDSSRC) SRCMBR(TBJEP010RC)
        TEXT('リオンドール水産 ASN累積 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            

・受領(受信・累積)

              
CRTPF FILE(JCALIB/LDS1BJ) SRCFILE(EVXJXLIB/QDBFSRC) SRCMBR(TBJEP010)
        TEXT('リオンドール水産 受領 受信 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            
              
CRTPF FILE(MDATCM/LDS1BJR) SRCFILE(MSLIB/QDDSSRC) SRCMBR(TBJEP010RC)
        TEXT('リオンドール水産 受領 累積 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            

・返品(受信・累積)

              
CRTPF FILE(JCALIB/LDS1BR) SRCFILE(EVXJXLIB/QDBFSRC) SRCMBR(TBJEP010)
        TEXT('リオンドール水産 返品 受信 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            
              
CRTPF FILE(MDATCM/LDS1BRR) SRCFILE(MSLIB/QDDSSRC) SRCMBR(TBJEP010RC)
        TEXT('リオンドール水産 返品 累積 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            

・支払(送信・累積)

              
CRTPF FILE(JCALIB/LDS1BP) SRCFILE(EVXJXLIB/QDBFSRC) SRCMBR(TBJEP030)
        TEXT('リオンドール水産 支払 受信 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            
              
CRTPF FILE(MDATCM/LDS1BPR) SRCFILE(MSLIB/QDDSSRC) SRCMBR(TBJEP030R)
        TEXT('リオンドール水産 支払 累積 BMS')
        OPTION(*NOSRC *NOLIST) SIZE(*NOMAX)
              
            

 

発注テスト受信

JX発注レイアウトが送付されてきたら、受注関連のCLを準備する。

 ・MR系 BMS発注 受信CL
  /取引先コード設定
  /データ変換プログラム設定

              
OZU179C01
OZU179C02
OZU179C03
OZU179C04
OZU179C05
OZU179C06
OZU179C07
OZU179C08
              
            

 ・BMS発注データ変換

              
SCVC3401
SCVC3402
SCVC3403
              
            

 ・EOS納品数量訂正

              
OZE861C03
              
            

 ・EOS分納品書出力

              
SCVC3406
OZL360M
              
            

 ・手書き分納品書出力

              
OZU179C61
OZE302M
SCVC3407
              
            

 ・テスト環境の準備

              
CALL PGM(KIKUCHI/ADDLMM02)             
CALL PGM(KIKUCHI/CPYZEN4T)
CALL PGM(KIKUCHI/CPYEIG4T2) PARM('02' '')
              
            

 ・JXクライアントから受信のみ行う場合、受信後処理を行う。

              
CALL PGM(OZU882C) PARM('LDS1' '1' 'JCALIB' 'LDS1BH')
              
            

 

受領・返品テスト受信

 ・受領および返品は受信・累積・リスト印刷の処理のみとなる。
受信データを基に基幹システムにデータ作成等は行わない。

              
OZU179C31
OZU179C32
SCVC3431
SCVC3432
              
            

 

支払テスト受信

 ・支払は受信・累積・リスト印刷の処理のみとなる。
受信データを基に基幹システムにデータ作成等は行わない。

              
OZU179C51
PZL570R
              
            

 

出荷送信テスト

受注データを問題なく取込む事が出来たら、出荷データを作成し送信テストを行う。

 ・BMS ASN送信CL
  /取引先コードおよび量販店区分を設定
  /データ変換プログラム設定
  /CLが出来たらテスト版を複製し、送信CLをテスト用に切替、&YYMDにテストデータの納品を設定

              
OZU179C21
              
            

 ・ASN作成 (EOS/手書き)COBLE
  /JX出荷レイアウトを基に改修

              
OZU756M
OZU757M
              
            

テストASNデータ作成
  /手書き分の送信が対象の場合、定番受注入力および引当をする。
  /テスト環境でテストデータを作成し、出荷レイアウトと相違が無いか確認する。

              
OZU179C21T
              
            

テストASNデータ送信
  /出荷データのレイアウトに問題無き場合、送信CLを切替えて送信する。

本番切替

スケジュール設定
 受信・送信CLをスケジュールに登録する。

 ・受注受信

              
ADDJOBSCDE JOB(LDS1B) RCYACN(*NOSBM)
             CMD(CALL PGM(MOLIB/OZU179C01))
             FRQ(*WEEKLY) SCDDATE(*NONE) SCDDAY(*ALL) SCDTIME(150300)
             TEXT('リオンドール BMS受注(受信)')
              
            

 ・ASN送信

              
ADDJOBSCDE JOB(LDS1BS) RCYACN(*NOSBM)
             CMD(CALL PGM(MOLIB/OZU179C21) PARM('02' '0'))
             FRQ(*WEEKLY) SCDDATE(*NONE) SCDDAY(*ALL) SCDTIME(153500)
             TEXT('リオンドール BMS(ASN送信)')
              
            

 ・受領受信

              
ADDJOBSCDE JOB(LDS1BJ) RCYACN(*NOSBM)
             CMD(CALL PGM(MOLIB/OZU179C31) PARM('0'))
             FRQ(*WEEKLY) SCDDATE(*NONE) SCDDAY(*ALL) SCDTIME(083800)
             TEXT('リオンドール BMS受信(受領)')
              
            

 ・返品受信

              
ADDJOBSCDE JOB(LDS1BR) RCYACN(*NOSBM)
             CMD(CALL PGM(MOLIB/OZU179C31) PARM('1'))
             FRQ(*WEEKLY) SCDDATE(*NONE) SCDDAY(*ALL) SCDTIME(084000)
             TEXT('リオンドール BMS受信(返品)')
              
            

 ・支払受信

              
ADDJOBSCDE JOB(LDS1BP) RCYACN(*NOSBM)
             CMD(CALL PGM(MOLIB/OZU179C51))
             FRQ(*WEEKLY) SCDDATE(*NONE) SCDDAY(*ALL) SCDTIME(084800)
             TEXT('リオンドール BMS受信(支払)')