(現在 過去ログ50 を表示中)

HOME HELP 新規作成 新着記事 トピック表示 ファイル一覧 検索 過去ログ

[ 最新記事及び返信フォームをトピックトップへ ]

■7655 / inTopicNo.1)  レポートでQRコード作成
  
□投稿者/ たろん -(2013/10/04(Fri) 14:03:06)
    桐Ver8を使用していて表ファイルからレポート一覧表印刷で、下記の情報をQRコードで表示したいのですがどのようにしたら良いか教えてください。

    出荷.tblに項目が番号・品名・TYPE・受注とありまして

    番号  品名  TYPE  受注
    1    ○○  △△   2
    2    ○○  □□   3
    とあり単純にオブジェクトのテキストに[品名],[TYPE]とすると
    読み込んだ時、文字化けとTYPEが一つしか表示されませんでした。

    QRコードにしたいのは ○○にたいして構成される△△ 2・□□ 3
    としたいのです。

    桐に関してあまり知識がない為、この先の手順がわかりませんので投稿しました。
    違う表に書き出すべきなのか、プログラムみたいなことしなければならないのかわかななくて。

    どなたかお知恵をお貸しください。
引用返信 [メール受信/OFF] 削除キー/
■7658 / inTopicNo.2)  Re[1]: レポートでQRコード作成
□投稿者/ 今村 誠 -(2013/10/05(Sat) 09:15:14)
    たろんさん管理工学のダウンロードコーナーから桐9の体験版
    をダウンロードしてから一括処理を実行します。
    > 桐Ver8を使用していて表ファイルからレポート一覧表印刷で、
    > 下記の情報をQRコードで表示したいのですがどのようにしたら
    > 良いか教えてください。
    元がないとこちらでは何もできません。
    レポートや印刷用の一時作業テーブルの見本を自分で作って
    サンプルアップしないと。

frciy.lzh
/6KB
引用返信 [メール受信/OFF] 削除キー/
■7667 / inTopicNo.3)  Re[2]: レポートでQRコード作成
□投稿者/ たろん -(2013/10/07(Mon) 10:05:56)
    今村さんすいません初の投稿にてサンプルの有り無しが理解していませんでした。

    作りかけですがサンプルを置いてみますのでこれで伝わりますでしょうか?

1381107956.lzh
/18KB
引用返信 [メール受信/OFF] 削除キー/
■7669 / inTopicNo.4)  Re[3]: レポートでQRコード作成
□投稿者/ 今村 誠 -(2013/10/07(Mon) 22:11:14)
    たろんさんこんにちは
    3行までの[局名]が小計で[納品契番]が改ページ小計1の設定で
    小計明細が3行以内ということでQRコードを印刷したいという
    希望で表を加工してみました。
    まず、表にQRコード印字内容である [TYPE] [受注] の他に
    [1TYPE][1受注][2TYPE][2受注]さらに[カウンタ][G][N]の数値項目
    を追加します。

    表の項目追加が終わったら基本状態でグループ順に並んでいる
    のであれば、[カウンタ]の列に移動して「/」メニュー→「置換」R
    で置換式に下記を設定します。
    [カウンタ]=#N,[G]=#グループ([局名]),[N]=#cond(#直前値([G],0)=[G],#直前値([N],0)+1,1,1)
    次に索引を作ります。仮に索引名を「GN逆順」とします。
    [G]昇順
    [N]降順
    「/」メニュー→「索引定義」N としておくと並び替えボタン
    を押して索引を使用するとすると簡単に並び替えられます。
    並び替え終わるとグループの末尾が先頭行になります。
    次に新規作成した項目[1TYPE]の列にカーソルを移動後置換式に以下を設定
    [1TYPE]=#cond([N]=2,[TYPE]
    ,#直前値([G],0)=[G] .and [N]=1,#直前値([1TYPE],""))
    ,[1受注]=#COND([N]=2,[受注]
    ,#直前値([G],0)=[G] .and [N]=1,#直前値([1受注],""),1,#U)
    ,[2TYPE]=#cond([N]=3,[TYPE]
    ,#直前値([G],0)=[G] .and [N]=2,#直前値([2TYPE],"")
    ,#直前値([G],0)=[G] .and [N]=1,#直前値([2TYPE],""))
    ,[2受注]=#cond([N]=3,[受注]
    ,#直前値([G],0)=[G] .and [N]=2,#直前値([2受注],#u)
    ,#直前値([G],0)=[G] .and [N]=1,#直前値([2受注],#u),1,#U)

    と置換した後、並び替えを解除して表を確認するとグループの先頭行に
    2行目や3行目のTYPEや受注が横方向に並んでいるのが解ると思います。

    この標準の並びでレポートのQRコードのソースが今は[TYPE]となっている
    のを下記のソースに変更すると3行分のデータが印字されます。

    #cond([TYPE],[TYPE]+":"+#STR([受注]))
    +#cond([1TYPE],#強制改行文字+[1TYPE]+":"+#STR([1受注]))
    +#cond([2TYPE],#強制改行文字+[2TYPE]+":"+#STR([2受注]))

    表に強制改行文字が設定されていないので2行や3行目は数字に続けて
    文字が印字されます。
    表が未定義値を「0」に設定されているので2行しかグループがない場合
    [2受注]が置換によって「0」になります。
    表のファイル属性の未定義値項目値処理を□未定義値 にチェックすれば
    白紙になります。
    レポートの設定は文字列項目の[2TYPE]で以下を印字しないとしていますので
    QRコードは綺麗に印字すると思います。
引用返信 [メール受信/OFF] 削除キー/
■7672 / inTopicNo.5)  Re[4]: レポートでQRコード作成
□投稿者/ たろん -(2013/10/08(Tue) 11:21:57)
    今村さん
    早速試してみました。無事にQRコードにでき読みこみまで可能となりました。
    ありがとうございます。

    しかし、私の確認不足でQRコードのとらわれ過ぎて重要な事を忘れてました。
    会社にて使用しているQRコードで管理発送しているシステムに今回の製作した事を表示できるQRコードにしなければならなかったようで必要情報が抜けていました。

    サンプルを置いてみたのですが桐の情報からレポート処理する中でバーコードに必要情報は既存のシステムでバーコード表示をしている情報が下記の用になっていました。
    ##1545,1,20130212060,2013/02/18,宇部川上,1,8701903,ATCC-1-D AISGアン,ATCC010-3502,1,2,8701903,ATCC-1-D AISGアン,ATCC010-3503,1,3,8701903,ATCC-1-D AISGアン,ATCC055-0324,1,4,8701903,防水キャッフ,AMNB,1,5,8701903,防水キャッフ,AVCX,1$
    となっています。
    ##見積番号でそのあとは日付と出荷日と局名・契番・TYPEと数量であると思います。

    いま製作している桐からバーコードに必要と思われるのは、見積番号と出荷日と局名で構成されるTYPE一覧を表示するのだと思います。行数は10行くらい今までの最大はありました。

    このような説明で申し訳ありませんが伝わるでしょうか?

    こちらのシステム開発者に相談したところ自社の問題ですが一言やりたくないとの返答で自分で行うしか方法がなかったのでこのように投稿させていただいています

    なんとかやり遂げたいので説明不足であれば何が必要か言っていただければ調べたりして伝えたいと思いますのでよろしくお願いします。

1381198917.lzh
/36KB
引用返信 [メール受信/OFF] 削除キー/
■7673 / inTopicNo.6)  Re[5]: レポートでQRコード作成
□投稿者/ 今村 誠 -(2013/10/08(Tue) 12:41:20)
    たろんさんこんにちは
    > サンプルを置いてみたのですが桐の情報からレポート処理する中で
    > バーコードに必要情報は既存のシステムでバーコード表示をしてい
    > る情報が下記の用になっていました。
    > ##1545,1,20130212060,2013/02/18,宇部川上,1,8701903,ATCC-1-D AISGアン,ATCC010-3502,1,2,8701903,ATCC-1-D AISGアン,ATCC010-3503,1,3,8701903,ATCC-1-D AISGアン,ATCC055-0324,1,4,8701903,防水キャッフ,AMNB,1,5,8701903,防水キャッフ,AVCX,1$
    > となっています。

    このテキスト内容はQRコードで印字可能ですね。
    サンプルに無い文字ばかりのでソースが不明ですが

    > ##見積番号でそのあとは日付と出荷日と局名・契番・TYPEと数量で
    > あると思います。

    情報提供元にはっきりと問い合わせた方がよいですね。

    > いま製作している桐からバーコードに必要と思われるのは、見積番
    > 号と出荷日と局名で構成されるTYPE一覧を表示するのだと思います。
    > 行数は10行くらい今までの最大はありました。

    最大行数は印字できる用紙に影響されませんか?

    桐には2000項目設定できますが、1行で保有可能文字数4000文字
    という制限があります。

    置換式やQRコードのテキストソースも同様ですのでこの際作業項目名
    である[1TYPE]や[2受注]を→[1T]や[2受]に変更して置換式を短くして
    はいかがでしょうか。
    参考までに10行まで([9TYPE])の置換式をテストしてみました。
    同様にご自分で[受注]を作ってみて下さい。

    [1TYPE]=#cond([N]=2,[TYPE]
    ,#直前値([G],0)=[G] .and [N]<2,#直前値([1TYPE],""))
    ,[2TYPE]=#cond([N]=3,[TYPE]
    ,#直前値([G],0)=[G] .and [N]<3,#直前値([2TYPE],""))
    ,[3TYPE]=#cond([N]=4,[TYPE]
    ,#直前値([G],0)=[G] .and [N]<4,#直前値([3TYPE],""))
    ,[4TYPE]=#cond([N]=5,[TYPE]
    ,#直前値([G],0)=[G] .and [N]<5,#直前値([4TYPE],""))
    ,[5TYPE]=#cond([N]=6,[TYPE]
    ,#直前値([G],0)=[G] .and [N]<6,#直前値([5TYPE],""))
    ,[6TYPE]=#cond([N]=7,[TYPE]
    ,#直前値([G],0)=[G] .and [N]<7,#直前値([6TYPE],""))
    ,[7TYPE]=#cond([N]=8,[TYPE]
    ,#直前値([G],0)=[G] .and [N]<8,#直前値([7TYPE],""))
    ,[8TYPE]=#cond([N]=9,[TYPE]
    ,#直前値([G],0)=[G] .and [N]<9,#直前値([8TYPE],""))
    ,[9TYPE]=#cond([N]=10,[TYPE]
    ,#直前値([G],0)=[G] .and [N]<10,#直前値([9TYPE],""))
    ,[1受注]=#COND([N]=2,[受注]
    ,#直前値([G],0)=[G] .and [N]<2,#直前値([1受注],"")
    ,1,#U)
    ,[2受注]=#cond([N]=3,[受注]
    ,#直前値([G],0)=[G] .and [N]<3,#直前値([2受注],#u)
    ,1,#U)
引用返信 [メール受信/OFF] 削除キー/
■7774 / inTopicNo.7)  Re[5]: レポートでQRコード作成
□投稿者/ 今村 誠 -(2014/01/03(Fri) 18:54:26)
    たろんさん見ていないとは思いますがフォームを使ってボタンで印刷する
    イベントを作ってみたので書いておきます。

    > ##1545,1,20130212060,2013/02/18,宇部川上,1,8701903,ATCC-1-D AISGアン,ATCC010-3502,1,2,8701903,ATCC-1-D AISGアン,ATCC010-3503,1,3,8701903,ATCC-1-D AISGアン,ATCC055-0324,1,4,8701903,防水キャッフ,AMNB,1,5,8701903,防水キャッフ,AVCX,1$
    > となっています。

    上のデータは5行有りぎりぎり300バイト以内です。

    > 行数は10行くらい今までの最大はありました。

    TYPEがおなじ桁数とすると桐のQRバーコード規格のバイト数制限で印刷は
    不可です。

    画面伝票でボタンの機能名で手続き実行を選んで右のパラメーターに
    「バーコード作成」と記載してイベントタブでイベントファイル名を
    指定して下記の手続きを設定して下さい。
    サンプルの表の[発送日][搬入日]等の日時を表示する項目のデータ型が
    文字列となっていますが全て日時型に変更して下さい。
    表のサンプルは[TYPE]と1項目ですが[品名]も「,」で区切ってあるので
    項目を追加した方がよいでしょう。
    いずれにしても最大行数(10)と最大文字数で桁数次第では印刷できない
    バーコードでは仕事には役に立たないと思います。

    手続き定義開始 バーコード作成()
     if ( #グループ選択状態 = 0 )
      確認 "グループ選択状態が解除中です。選択に切り換えて下さい。"
     else
      &STR = "" /* バーコード印刷用の変数をリセット */
      変数宣言 自動,整数 { &end , &Imode }
      method @フォーム.更新モード取得( &Imode )
      条件 ( &Imode <> 0 ) method @フォーム.更新モード設定( 0 )
      &STR ="##"+#STR([番号])+","+#STR([DKK手配No.])+","+#S(#TISTR([搬入日],9,1,2),"/","")\
      +"060"+","+#tistr([発送日],9,1,2)+","+[局名]
      検索 [TYPE]{#計算(#代入(&STR \
      ,&STR+","+#str(#行番号)+","+[納品契番]+","+[品名]+","+[TYPE]+","+#str([受注]))\
      ,#cond([],"",1,"A"))}\
      , 文字比較方法=自動,部分一致検索=しない,自動調整=しない,終了状態 = &end
      &STR = &STR + "$"
      クリップボード 設定,&STR, 終了状態=&end, 制御文字変換=しない
      レポート印刷 "rfs出荷指示.rpt", 部数=1, 罫線印字=する,カラー印刷=する,編集表=する\
      ,会話=しない,プレビュー=する, ソート=しない, 印刷ページ=両方,作業表=しない,終了状態=&end
     end
    手続き定義終了

引用返信 [メール受信/OFF] 削除キー/



トピック内ページ移動 / << 0 >>

このトピックに書きこむ

過去ログには書き込み不可

Mode/  Pass/

HOME HELP 新規作成 新着記事 トピック表示 ファイル一覧 検索 過去ログ

- Child Tree -
- Antispam Version -