| プログラミング質問広場 |
本掲示板は、プログラミングに関する情報を作者様同士で共有・議論していただく場として用意いたしました。
JV-Link、JV-Dataに直接関連しない(一般論としてのプログラミング方法やAPI・メソッドの利用法などの)スレッドはこちらに立ててください。
|
|
| |
提供されているサンプルプログラムでこれまでAccessのデータを
ダウンロードしていましたが、8/8の仕様変更以後、ダウンロードしてもデータ
無しになってしまいます。
修正が必要な場合、どこを修正すればよいでしょうか？
＜使っているプログラム＞
'マスタ系データのRACEを20000101000000以降について取り込み呼び
出し
retval = JVLink1.JVOpen("DIFF", DFrom, DownType, readcoun
t, dlcount, lastfiletimestamp)
If retval = -1 Then
MsgBox "該当データなし(" & retval & ")&q
uot;
Exit Sub
Else
If retval < 0 Then
MsgBox "JVOPENでエラーが発生しました(" & retva
l & ")"
Exit Sub
End If
End If
status = 0
While status <> dlcount
status = JVLink1.JVStatus
StatusText.Value = dlcount & "ファイル中 " &
status & " ファイルダウンロード完了"
DoEvents
'Sleep (120)
Wend |
|
| |
更新日は、20230807132643になっていました。よって、
試しに20230801132643に修正してダウンロードをしたところ、
正常にダウンロードされ、更新日が20230807132643になりました。
マスタ系の更新日は8/14の14時時点でこの値で正しいのでしょうか？ |
|
| タイトル | ： Re: MS-Accessダウンロード不可 |
| 記事No | ： 5077 |
| 投稿日 | ： 2023/08/14(Mon) 17:38 |
| 投稿者 | ： サメの餌 |
| |
JTさん、こんにちは。
自分自身はAccessのサンプルとか利用してませんのでちょっとした情報としてですが...
> retval = JVLink1.JVOpen("DIFF", DFrom, DownType, rea
dcoun
新しいバージョンのJV-Linkでは"DIFN"を指定しないと新仕様データの取得が出来ません。で、データフォーマットも変わってたりするので単に"DIFF"を"DIFN"にして動くとも思えません。サンプルプログラムを理解してフォーマットが変わった部分に修正を加えてデータが取り込める様になるとは思います。
JRA-VANさんの方針とか諸々までは分かりませんが、自社の提供サービスの仕様が変わるなら、提供するサンプルも変更後に対応したものを提供するべきだとは思います。今サンプルをダウンロードすると対応しているのかも自分は確認してませんが、もし対応してなくて、ご自身で修正されるとすると、変更内容とそもそものサンプルがどの様に実装してるかも把握して修正する必要はあるかと思います。
まあ、JRA-VANさんが対応してくれるものと思われますので、分からない場合はお待ち頂くしかないかもです。全く参考にならない書込みかもですが、書かせて頂きました。 |
|
| |
サメの餌さん
ありがとうございます。
試しにDIFFをDIFNにしたところ、ダウンロードされてタイムスタンプが8/14の
最新になりました。
ご指摘いただいたように、その修正だけですべて解決なのかわかりませんが、MS-Accessに正常に取り込むことはできました。
なお、仕様書の以下の記述だけだと、DIFFをDIFNにしてなぜ解決するのかわかりませんが・・・・
−−−−−
なお、dataspec にて以下のデータ種別ID を指定する場合、全データを取得するため、読み出し終了ポイント時刻を指定することができません。指定した場合、「戻り値：-1(該当データなし)」が出力されます。
・TOKU（特別登録馬情報）
・DIFF、DIFN（蓄積系ソフト用 蓄積情報） |
|
| |
登録自体はできましたが、JV-Link質問箱のNo.7314と同じ事象で、
UMAテーブルに登録されたデータがおかしいですね。
Ketto3InfoBamei1以降のデータが桁ズレしたような状態になっています。 |
|
| タイトル | ： Re^3: MS-Accessダウンロード不可 |
| 記事No | ： 5080 |
| 投稿日 | ： 2023/08/15(Tue) 15:37 |
| 投稿者 | ： JRA-VANソフトサポート |
| |
JRA-VANソフトサポート 吉本です。
DataLab.サービスをご利用頂きまして誠にありがとうございます。
8/8より、JVOpenで取得時に指定するデータ種別ID、および、
JVDataのフォーマットの桁数が一部変更となっております。
詳細は以下の仕様書をご確認頂ければと存じます。
■JV-Data仕様書
ソフトウェア開発キット（SDK）提供コーナー
JV-Data 仕様書Excel版
フォーマット：「フォーマット」シート
データ種別ID：「データ種別一覧」シート
取込されているデータが、フォーマット変更されていないものであれば、
既に修正いただきましたDIFF→DIFNの修正だけで問題ございません。
以上、よろしくお願い致します。 |
|
| |
回答ありがとうございます。
１．HansyokuNumを取り込むUMAなどのテーブルの桁数を修正
２．DIFF→DIFNに修正
３．No.5079で投稿しましたように値ずれの事象が発生
その後調べたところ、サンプルDBの標準モジュールにあるデータセット関数のH
ansyokuNum関連の桁数も変更する必要がありました。
例：競走馬
For i = 0 To 13
With .Ketto3Info(i)
.HansyokuNum = IncMid(bytBuf, p, 10) '' 繁殖
登録番号
p, 8 → P,10に変更
その他、繁殖馬マスタ、産駒マスタも同様に修正したところ、正常になりまし
た。
同じ理屈で生産者マスタの生産者コードも、テーブルだけでなくデータセット
関数も6→8に修正しました。
SDKの構造体の中に含めて提供していただきたいです。 |
|
| タイトル | ： Re^5: MS-Accessダウンロード不可 |
| 記事No | ： 5089 |
| 投稿日 | ： 2023/08/22(Tue) 13:01 |
| 投稿者 | ： JRA-VANソフトサポート |
| |
JRA-VANソフトサポート 吉本です。
DataLab.サービスをご利用頂きまして誠にありがとうございます。
＞SDKの構造体の中に含めて提供していただきたいです。
SDK構造体定義につきましては、該当の定義が
VB6のものとなっており現在提供しておりません。
何卒ご了承くださいますようお願いいたします。
なお、VBAサンプルプログラムに記述している構造体定義が
古い状態のままとなっておりましたので更新いたしました。
こちらにてご確認いただきますようお願い申し上げます。
■VBAサンプルプログラム
プログラミングパーツ・開発支援ツール提供コーナー
VBAサンプルプログラム
以上、よろしくお願い致します。 |
|
|
|
|
copyright ©2007 JRA SYSTEM SERVICE CO.,LTD. All Rights Reserved.
|
|
|
