毎度質問ばかりで申し訳ありません。 ネットワーク北海道の成田です。 添付ファイルが使えるか分からないのですが 添付しますファイルをHAKAMAの指定しているディレクトリ においてsite-upgrade.shを走らせたあと 動かしてみました。 その後ruby test.rbで動かしてみたところ tbl_yykにアクセスできない事象が発生いたしました。 以前もこのメーリングリストに質問したのですが そのときはjma-receipt-dbsをインストールすれば解決 したのですが、今回はtbl_ptnumを追加した途端に tbl_yykへのアクセスができなくなってしまいました。 添付ファイルが使えないとしたら困りますのでさわりだけ 記述いたします ------------------------- dbs.dbd name dbs; arraysize 40; textsize 800; db { tbl_yyk; tbl_ptinf; tbl_ptnum; }; db "shell"{ shell; }; --------------------------- test.rbsqldata=[["1", "4", "", "10001", "20110710", "1300", "1"], ["1", "1", "", "10001", "20110710", "1200", "1"]]
i=0 tbl_yyk["tbl_yyk.DRCD"] = sqldata[i][3]; tbl_yyk["tbl_yyk.YYKYMD"] =sqldata[i][4]; tbl_yyk["tbl_yyk.KEYYYKTIME"] = sqldata[i][5]; rc = server.recordops("DBSELECT","tbl_yyk","kensu",tbl_yyk); hasCountTbl = false; yykcnt = 0; loop do server.recordops("DBFETCH","tbl_yyk","kensu",tbl_yyk); p "here:",tbl_yyk["tbl_yyk.YYKCNT"] tbl_yyk.each{|name,value| if tbl_yyk==nil yykcnt =0 else yykcnt = tbl_yyk["tbl_yyk.YYKCNT"].to_i; hasCountTbl=true end } break if server.rc !=0 end ------------------------ tbl_yyk.db path kensu { DBSELECT { DECLARE tbl_yyk_kensu_csr CURSOR FOR SELECT YYKMAXCNT,YYKCNT FROM TBL_YYK WHERE YYKID = 0 AND DRCD = :DRCD AND YYKYMD = :YYKYMD AND KEYYYKTIME = :KEYYYKTIME ; }; }; 以上です。何卒よろしくお願いします ∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞ 成田 恭一 株式会社ネットワーク北海道 開発室 札幌市西区二十四軒1-4加森ビル⑧3階 ℡011-614-9130 fax011-614-2699 http://www.ntwork.co.jp mail:ntnarita_prn@xxxxxxxxx 本 社 札幌市西区西町南17−2−40 ℡011-661-6618 fax011-661-6931 東京支店 東京都新宿区西新宿6−10−1 日土地新宿ビル 8階 ℡ 03-5325-3370 ∞∞∞∞∞∞∞ Network Hokkaido Inc. ∞∞∞∞∞∞
Attachment:
yoyaku3.tar.gz
Description: Binary data