A*************************************************************** A* HTY002FM : 品名マスター照会 A* HOTEI/QDSPSRC(HTY002FM) A* 使用目的 : 照会 (*INQUIRY) A* 作成日 : 2017/07/11 14:45:07 A* 作成者 : QTR A* CRTEXDSPF HOTEI/HTY002FM SRCFILE(HOTEI/QDSPSRC) A* AUT(*ALL) A*************************************************************** A DSPSIZ(*FREE) A MSGLOC(24) A PRINT * --------------------------- A R DSPHEAD * --------------------------- A TEXT(' 初期画面 ') A CF03(03 ' 終了 ') A ROLLUP(07) A ROLLDOWN(08) A BLINK A 1 2'HTY002' A 1 27' 品名マスター照会 ' A DSPATR(HI) A 2 64' 日付 ' A 2 71DATE(*JOB *YY) A EDTCDE(W) A 3 64' 時刻 ' A 3 71TIME A EDTWRD(' : : ') A 2 2' 品名コード ' A HI01S 4A B 2 23TEXT(' 品名コード ') A 11 15' 必要な項目を打鍵して実行キーを押 + A して下さい。 ' A DSPATR(HI) A 23 2'F3= 終了 ' A COLOR(BLU) * --------------------------- A R SFREC01 SFL * --------------------------- A TEXT(' SFL明細行 ') A HI01 4A O 6 2TEXT(' 品名コード ') A HI19 34A O 6 8TEXT(' 正式名漢字 *CF04') A IMGTAG 150A O 6 43TEXT('*HTML') A HI20 22A O 6 50 A HI05 4Y 0O 6 74EDTCDE(Z) A HI04 7A O 6 80 A HI06 20A O 6 94 A HI03 10A O 6114 A HI07 1A O 6126 A HI10 8Y 2O 6131EDTCDE(1) A HI12 5Y 1O 6141EDTCDE(1) A HI13 5Y 1O 6148EDTCDE(1) A HI15 3Y 0O 6159EDTCDE(1) A HI18 1A O 6170 A HI1899 1A O 6177 A HI22 13A O 6183 A HI23 5Y 0O 6198EDTCDE(1) A HI27 7Y 0O 6204EDTCDE(1) A HI31 4Y 0O 6214EDTCDE(1) A HI32 4Y 0O 6223EDTCDE(1) A HI36 2Y 0O 6234EDTCDE(Z) A HI37 6Y 0O 6239EDTCDE(Z) A HI38 1Y 0O 6252EDTCDE(Z) A HI39 1Y 0O 6263EDTCDE(Z) A HI41 3Y 0O 6266EDTCDE(Z) A HI42 3Y 0O 6271EDTCDE(Z) A HI43 3Y 0O 6276EDTCDE(Z) A HI44 10A O 6283 A HI45 34A O 6295 A HI46 28A O 6330 A HI58 1Y 0O 6360EDTCDE(Z) A HI59 1Y 0O 6369EDTCDE(Z) A HI60 1Y 0O 6374EDTCDE(Z) A HI61 1Y 0O 6380EDTCDE(Z) A HI62 1Y 0O 6386EDTCDE(Z) A* * --------------------------- A R SFCTL01 SFLCTL(SFREC01) * --------------------------- A SFLSIZ(0022) A SFLPAG(0015) A TEXT(' SFL制御見出 ') A OVERLAY A 41 SFLDSPCTL A 42 SFLDSP A 43 SFLINZ A SFLRNA A 44 SFLCLR A 45 SFLEND(*MORE) A 46 SFLDLT A 61 SFLMSGID(EDT0411 QPDA/QEDTMSG 61) A 62 SFLMSGID(EDT0410 QPDA/QEDTMSG 62) A ROLLUP(14 ' 次頁 ') A CF03(03 ' 終了 ') A CF04(04 ' プロンプト ') A CF10(10 ' 更新 ') A CF12(12 ' 前画面 ') A CF23(23 ' 削除 ') A SETOF(99) A BLINK A DSPREC 4S 0H SFLRCDNBR(CURSOR) A 1 2'HTY002' A 1 27' 品名マスター照会 ' A DSPATR(HI) A 2 64' 日付 ' ADD "A *FREE 2143 A 2 71DATE(*JOB *YY) A EDTCDE(W) ADD "A *FREE 2152 A 3 64' 時刻 ' ADD "A *FREE 3143 A 3 71TIME A EDTWRD(' : : ') ADD "A *FREE 3154 A*( DSPF ソース・ボタン ) A 3 2HTML('') A*( DDS ソース・ボタン ) A 3 18HTML('') A*( RPG ソース・ボタン ) A 3 34HTML('') A*( 明細行の桁見出し ) A* 5 2' Y ' A* DSPATR(HI) A 5 2' 品名 ' A DSPATR(HI) A 5 9' 正式名 ' A DSPATR(HI) A 08 5 41' 写真 ' A DSPATR(HI) A 5 50' 缶型 ' A DSPATR(HI) A 5 74' 入数 ' A DSPATR(HI) A 5 80' 備考 ' A DSPATR(HI) A 5 94' カナ名 ' A DSPATR(HI) A 5114' 缶カナ ' A DSPATR(HI) A 5124' 業務 ' A DSPATR(HI) A 4133' 財務部 ' A DSPATR(HI) A 5133' 単価 ' A DSPATR(HI) A 4142' 計算用 ' A DSPATR(HI) A 5142' 重量 ' A DSPATR(HI) A 4150' 運賃用 ' A DSPATR(HI) A 5150' 重量 ' A DSPATR(HI) A 4158' パレット ' A DSPATR(HI) A 5158' 積数 ' A DSPATR(HI) A 4168' 品薄 ' A DSPATR(HI) A 5168' 区分 ' A DSPATR(HI) A 4175' 使用 ' A DSPATR(HI) A 5175' 不可 ' A DSPATR(HI) A 4182' JAN ' A DSPATR(HI) A 5182' コード ' A DSPATR(HI) A 3199' 財務 ' A DSPATR(HI) A 4199' 出力 ' A DSPATR(HI) A 5199' 区分 ' A DSPATR(HI) A 4207' 最低 ' A DSPATR(HI) A 5207' 在庫 ' A DSPATR(HI) A 5214' 内容量 ' A DSPATR(HI) A 5222' 固形量 ' A DSPATR(HI) A 4231' 頭1桁 ' A DSPATR(HI) A 5231' 出力順 ' A DSPATR(HI) A 4240' 後3桁 ' A DSPATR(HI) A 5240' 出力順 ' A DSPATR(HI) A 4249' フルトップ ' A DSPATR(HI) A 5249' 区分 ' A DSPATR(HI) A 3262' 輸 ' A DSPATR(HI) A 4262' 入 ' A DSPATR(HI) A 5262' 品 ' A DSPATR(HI) A 4267'-- カートン --' A DSPATR(HI) A 5267' 縦 ' A DSPATR(HI) A 5272' 縦 ' A DSPATR(HI) A 5277' 高 ' A DSPATR(HI) A 5282' 他社コード ' A DSPATR(HI) A 5295' 他社CD (34 桁 )' A DSPATR(HI) A 5329' 他社CD (28 桁 )' A DSPATR(HI) A 4358' 財務部分類 ' A DSPATR(HI) A 5358'( 1 )' A DSPATR(HI) A 5366'( 2 )' A DSPATR(HI) A 3373' 新 ' A DSPATR(HI) A 4373' 製 ' A DSPATR(HI) A 5373' 品 ' A DSPATR(HI) A 3378' 販 ' A DSPATR(HI) A 4378' 売 ' A DSPATR(HI) A 5378' 先 ' A DSPATR(HI) A 2384' ブ ' A DSPATR(HI) A 3384' ラ ' A DSPATR(HI) A 4384' ン ' A DSPATR(HI) A 5384' ド ' A DSPATR(HI) * --------------------------- A R DSPEND01 * --------------------------- A TEXT(' 機能キーの表示 ') A OVERLAY A CF03(03 ' 終了 ') A 23 2'F3= 終了 ' A COLOR(BLU) A* 23 19'F4= プロンプト ' A 23 19'F4=プロンプト' A COLOR(BLU) A 23 44'F10= 更新 ' A COLOR(BLU) A 23 68'F12= 前画面 ' A COLOR(BLU)