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

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

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

■8130 / inTopicNo.1) 　（削除）
  ▼■
□投稿者/ -(2014/06/10(Tue) 12:14:39)
    この記事は(投稿者)削除されました
引用返信 [メール受信/OFF] 削除キー/
■8131 / inTopicNo.2) 　書出の時にファイル名を変えたい
□投稿者/ ふうやん -(2014/06/10(Tue) 12:29:04)
    ■No8130に返信(ふうやんさんの記事)
    > ふうやんと申します
    > 久しぶりに質問します。
    >
    > ここに載っていた質問と良く似たものがありましたがちょっと違ったのでご教授下さい。
    > フォームからイベントで見積書をPDFにしてデスクトップに書き出しています。
    > ファイル名が同じなので2個目以降は上書きされます。
    > 連番とかつけて（他のファイル名でも可）上書きされないようにイベントで書き出す記述をご存知の方教えて頂けませんか。
    > よろしくお願いします。
    >
    > 環境　Windows7　9s
    >
引用返信 [メール受信/OFF] 削除キー/
■8132 / inTopicNo.3) 　pdfファイルの連番は？
□投稿者/ 今村　誠 -(2014/06/10(Tue) 12:36:17)
    ふうやんさんこんにちは
    > フォームからイベントで見積書をPDFにしてデスクトップに書き出しています。
    > ファイル名が同じなので2個目以降は上書きされます。
    > 連番とかつけて（他のファイル名でも可）上書きされないようにイベントで書き出す記述をご存知の方教えて頂けませんか。

    例えば書き出すpdfファイル名が"見積書.pdf"としてその名前があった場合
    "見積書01.pdf"か"01見積書.pdf"にして"99見積書.pdf"まで付けることと
    した場合、書き出すフォルダー名で桐の関数「#Fsize」で繰り返しを使い
    存在しないファイル名を付けたらいかがでしょうか。

    &秒=1
    繰り返し
    　if (#Fsize(#桐パス名+"見積書"+#str(&秒,2)+".pdf")>0)
    　　&秒=&秒+1
    　else
    　　&Sfilename=#桐パス名+"見積書"+#str(&秒,2)+".pdf"
    　　繰り返し中止
    　end
    繰り返し終了
引用返信 [メール受信/OFF] 削除キー/
■8133 / inTopicNo.4) 　Re[2]: pdfファイルの連番は？
□投稿者/ ふうやん -(2014/06/10(Tue) 13:52:38)
    ■No8132に返信(今村　誠さんの記事)
    > ふうやんさんこんにちは
    >>フォームからイベントで見積書をPDFにしてデスクトップに書き出しています。
    >>ファイル名が同じなので2個目以降は上書きされます。
    >>連番とかつけて（他のファイル名でも可）上書きされないようにイベントで書き出す記述をご存知の方教えて頂けませんか。
    >
    > 例えば書き出すpdfファイル名が"見積書.pdf"としてその名前があった場合
    > "見積書01.pdf"か"01見積書.pdf"にして"99見積書.pdf"まで付けることと
    > した場合、書き出すフォルダー名で桐の関数「#Fsize」で繰り返しを使い
    > 存在しないファイル名を付けたらいかがでしょうか。
    >
    > &秒=1
    > 繰り返し
    > 　if (#Fsize(#桐パス名+"見積書"+#str(&秒,2)+".pdf")>0)
    > 　　&秒=&秒+1
    > 　else
    > 　　&Sfilename=#桐パス名+"見積書"+#str(&秒,2)+".pdf"
    > 　　繰り返し中止
    > 　end
    > 繰り返し終了


    今村様
    早速返事有り難うございます。

    ちょっと込み入った事はわからないので教えて欲しいのですが教えて頂いた部分をどこに同記述したらいいのかわからず下記のように記述しました。下記のエラーが出ます。

    手続き定義開始　見積PDF::ﾏｳｽ左ｸﾘｯｸ(長整数　&マウス位置[2]，長整数　&明細番号，長整数　&フラグ，参照　長整数　&処理中止)
    &秒=1
    繰り返し
    　if (#Fsize(#桐パス名+"見積書P.RPT", 文書ファイル="C:\Users\tsutomu\Desktop\+"見積書"+#str(&秒,2)+".pdf")>0)
    　　&秒=&秒+1
    　else
    　　&Sfilename=#桐パス名+"見積書P.RPT", 文書ファイル="C:\Users\tsutomu\Desktop\+"見積書"+#str(&秒,2)+".pdf"
    　　繰り返し中止
    　end
    繰り返し終了

    上記の記述がおかしいと思うのですが見積のフォームを開こうとしたら

    KU1107:" がﾊﾞﾗﾝｽしていません

    とでます。

    記述の悪いところを教えて頂けませんか

    よろしくお願い致します。

    ふうやん

引用返信 [メール受信/OFF] 削除キー/
■8134 / inTopicNo.5) 　Re[3]: pdfファイルの連番は？
□投稿者/ 今村　誠 -(2014/06/10(Tue) 15:24:11)
    2014/06/10(Tue) 15:29:23 編集(投稿者)
    2014/06/10(Tue) 15:29:13 編集(投稿者)

    ふうやんさんこんにちは

    手続き定義開始　見積PDF::ﾏｳｽ左ｸﾘｯｸ(長整数　&マウス位置[2]，長整数　&明細番号，長整数　&フラグ，参照　長整数　&処理中止)
    　変数宣言 文字列 { &Sfilename , &Spass = "C:\Users\tsutomu\Desktop\" }
    　&秒 = 1
    　繰り返し
    　　if (#Fsize( &Spass +"見積書"+#str(&秒,2)+".pdf")>0)
    　　&秒=&秒+1
    　else
    　　&Sfilename = &Spass +"見積書"+#str(&秒,2)+".pdf"
    　　繰り返し中止
    　end
    　繰り返し終了
    　レポート印刷　#桐パス名+"見積書P.RPT", 文書ファイル=&Sfilename \
    　,罫線印字=する,カラー印刷=する,編集表=する, 会話=しない, 印刷ページ=両方
    手続き定義終了

    デスクトップにあるpdfファイル名を取得するときはイベント編集中に
    Ctrlキーを押しながらマウスでF6(関数)をクリックします。
    式入力ダイアログの最下行に「ファイル名」ボタンをクリックすると
    ファイル選択画面に変わるのでそこでデスクトップにある適当な
    ファイル名を指定して「ok」してパス名だけを貼り付けます。
引用返信 [メール受信/OFF] 削除キー/
■8135 / inTopicNo.6) 　Re[4]: pdfファイルの連番は？
□投稿者/ ふうやん -(2014/06/10(Tue) 16:41:49)
    ■No8134に返信(今村　誠さんの記事)
    > 2014/06/10(Tue) 15:29:23 編集(投稿者)
    > 2014/06/10(Tue) 15:29:13 編集(投稿者)
    >
    > ふうやんさんこんにちは
    >
    > 手続き定義開始　見積PDF::ﾏｳｽ左ｸﾘｯｸ(長整数　&マウス位置[2]，長整数　&明細番号，長整数　&フラグ，参照　長整数　&処理中止)
    > 　変数宣言 文字列 { &Sfilename , &Spass = "C:\Users\tsutomu\Desktop\" }
    > 　&秒 = 1
    > 　繰り返し
    > 　　if (#Fsize( &Spass +"見積書"+#str(&秒,2)+".pdf")>0)
    > 　　&秒=&秒+1
    > 　else
    > 　　&Sfilename = &Spass +"見積書"+#str(&秒,2)+".pdf"
    > 　　繰り返し中止
    > 　end
    > 　繰り返し終了
    > 　レポート印刷　#桐パス名+"見積書P.RPT", 文書ファイル=&Sfilename \
    > 　,罫線印字=する,カラー印刷=する,編集表=する, 会話=しない, 印刷ページ=両方
    > 手続き定義終了
    >
    > デスクトップにあるpdfファイル名を取得するときはイベント編集中に
    > Ctrlキーを押しながらマウスでF6(関数)をクリックします。
    > 式入力ダイアログの最下行に「ファイル名」ボタンをクリックすると
    > ファイル選択画面に変わるのでそこでデスクトップにある適当な
    > ファイル名を指定して「ok」してパス名だけを貼り付けます。

    今村様
    有り難うございます。

    できました。
    レポート印刷　#桐パス名のところを"C:\新伝票本番\見積書P.RPT"としたら出来ました。
    ただ書いて頂いた内容がちんぷんかんぷんです。
    ちょっとずつ勉強してみます。
    関数を勉強しただけでは出来ないですよね。
    2つ3つ繋ぐところがまだまだわからないです。
    いつも有り難うございます。

解決済み!
引用返信 [メール受信/OFF] 削除キー/
■8136 / inTopicNo.7) 　Re[5]: pdfファイルの連番は？
□投稿者/ 今村　誠 -(2014/06/10(Tue) 17:13:46)
    ふうやんさんこんにちは
    > レポート印刷　#桐パス名のところを"C:\新伝票本番\見積書P.RPT"としたら出来ました。
    私も実験してみました。
    #桐パス だと桐のインストールフォルダーを探しに行って
    ファイル名を桐のダイアログで表示して「ファイルは見つかりません」
    となるようです。
    解らない関数はイベント編集時に一度「＃」を削除してもう一度
    半角で「#」を押して右矢印→を１〜２回押すと関数ヘルプが画面に
    表示されませんか？
    そこにマウスを合わせるとどういう関数かが表示されると思います。
    そういう簡単な行動を面倒がらないで実行することで上達していくと思います。

    ※返信は不要です
    無駄な全文引用はやめて頂きたいと思います。見にくいだけです。
    #データパス名　を桐を起動してヘルプ→関数一覧→システム
    と辿っていくと参考になると思います。
引用返信 [メール受信/OFF] 削除キー/
■8137 / inTopicNo.8) 　参考になれば
□投稿者/ 宇治茶 -(2014/06/11(Wed) 05:54:05)
    当方では見積書をメールに添付ファイルする場合に活用しています。
    見積書.TBLに別途項目(ファイル名称)を設けて計算式には[お客様名]+[見積書番号]
    +[見積書日付]を連結し、連結したデータをファイル名称とし、そのファイル名を変数に取り込んでいます。但し、お客様名はアルファベットにて登録済み)
    PDF変換したデータは見積書作成データと同じホルダー内にPDF書庫ホルダーを
    設けてその書庫保存しています。

    なお、メール送信は桐に付属しているメールソフトを活用しています。
    一覧用見積形式・詳細印刷とも同様にイベントを組んでいて
    印刷と同時にPDF形式にてテータバックアップも兼ねています。
    (桐データが飛んだ時の予防策)

    サウンドファイルはファックスソフトに使用されいてるファイルを使っています。



    ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
    ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
    ＊＊＊＊＊ // 見積書　メール送信用 一覧表 ＰＤＦ印刷 システム //
    ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
    手続き定義開始　メールＰＤＦ一覧表保存()
    プリンタ　"LBP-1420",終了状態=&OK

    ＊＊＊＊＊// ＰＤＦファイル出力　メッセージ内容　//＊＊＊＊＊
    　　　　＊　d05.wav＝電話番号がありません。
    　　　　＊　d03.wav＝ＯＫを押すと送信を開始します。
    　　　　＊　a11.wav＝終了します。
    　　　　＊　a05.wav＝ＦＡＸデータを送信しています。
    　　　　＊　a12.wav＝強制的に終了します。
    ＊　n01.wav＝原稿がセットされました。

    代入　&ファイル名称=[ファイル名称]
    条件 (&ファイル名称="") サウンド 再生,"b27.wav",非同期, 終了状態=&OK
    　　　　 ＊　b27.wav＝ファィﾙを作成できません？
    条件 (&ファイル名称="") メッセージボックス　"ファィルが作成できませんので排出を中止します。",アイコン=?,ボタン指定=2,制御文字展開=しない,&確認
    条件 (&ファイル名称=[ファイル名称]) サウンド 再生,"d03.wav",非同期, 終了状態=&OK
    　　　　 ＊　d03.wav＝ＯＫを押すと送信を開始します。
    条件 (&確認=2) サウンド 再生,"a12.wav",非同期, 終了状態=&OK
    　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　＊　a12.wav＝強制的に終了しました。
    条件 (&ファイル名称="") プリンタ　"LBP-1420", 終了状態=&OK
    条件 (&ファイル名称="") 手続き終了

    メッセージボックス　"『 見積書をＰＤＦファイルで排出します 』確認 ☆☆☆ 印刷プレビューは、しません！！。☆☆☆"," § 排出する場合は［ ＯＫ ］を 中止する場合は［ キャンセル ］を押して下さい。§ ",アイコン=?,ボタン指定=2,制御文字展開=しない,&確認
    ケース開始
    　 ケース　(&確認=1)
    条件 (&確認=1)サウンド 再生,"n01.wav",非同期, 終了状態=&確認
    　　　　 ＊　n01.wav＝原稿がセットされました。
    代入　&pdf=[ファイル名称]+".pdf"
    　　 　　　 レポート印刷　"見積印刷.rpt",文書ファイル=&ファイル名称

    　 ファイル複写　&pdf,"見積書庫\",終了状態=&OK
    　 ファイル移動　&pdf, "Mail\送信箱\", 上書き, 終了状態=&OK
    サウンド 再生,"a11.wav",非同期, 終了状態=&OK
    　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　＊　a11.wav＝終了します。
    　 ケース　(&確認=2)
    条件 (&確認=2) サウンド 再生,"a12.wav",非同期, 終了状態=&OK
    　　　　 ＊　a12.wav＝強制的に終了します。
    ケース終了
    プリンタ　"LBP-1420",終了状態=&OK
    手続き定義終了


引用返信 [メール受信/OFF] 削除キー/
■8138 / inTopicNo.9) 　Re[2]: 書出の時にファイル名を変えたい
□投稿者/ 尾形 -(2014/06/11(Wed) 08:52:21)
    どうも、こんにちは

    &ファイル名 = #文字列(#西暦年(#年月日),4)\
    　　　　　　　　+ #文字列(#月(#年月日),2)\
    　　　　　　　　+ #文字列(#日(#年月日),2)\
    　　　　　　　　+ #文字列(#時(#時刻),2)\
    　　　　　　　　+ #文字列(#分(#時刻),2)\
    　　　　　　　　+ #文字列(#秒(#時刻),2)

    こんな感じでは

引用返信 [メール受信/OFF] 削除キー/
■8145 / inTopicNo.10) 　Re[3]: 書出の時にファイル名を変えたい
□投稿者/ ふうやん -(2014/06/12(Thu) 16:50:21)

    > &ファイル名 = #文字列(#西暦年(#年月日),4)\
    > 　　　　　　　　+ #文字列(#月(#年月日),2)\
    > 　　　　　　　　+ #文字列(#日(#年月日),2)\
    > 　　　　　　　　+ #文字列(#時(#時刻),2)\
    > 　　　　　　　　+ #文字列(#分(#時刻),2)\
    > 　　　　　　　　+ #文字列(#秒(#時刻),2)
    >


    尾形様
    有り難うございます。
    今村様のアドバイスで解決したのでちょっと見てませんでしたので返事が送れてすみません

    これはファイル名の後に年号、月、日、時間、分、秒、の14桁の数字が並ぶという事でしょうか。秒が変わるので同じファイル名にはならないという事でしょうか。
    もしそうならちょっとファイル名が長くなりすぎるのでちょっとかな…。
    外していたらごめんなさい。
    今回は今村様のアドバイスをいただきました。
    色んな方法があるのですね

    ありがとうございます。


引用返信 [メール受信/OFF] 削除キー/
■8147 / inTopicNo.11) 　Re[3]: 参考になれば
□投稿者/ ふうやん -(2014/06/13(Fri) 20:10:19)
    宇治茶様

    有り難うございます。
    今の私にはちょっとハードルの高い内容ですが時間をかけて
    内容を理解できるように頑張ってみたいと思います。
    皆さん色々工夫をされているのですね。
    参考になります。

    ありがとうございました。
引用返信 [メール受信/OFF] 削除キー/


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

このトピックに書きこむ

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

Mode/　 Pass/

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

- Child Tree -
- Antispam Version -