TI アプリケーションが FILLER を参照できない
アプリケーションが FILLER データを参照できない理由には、少なくとも 3 つの原因が考えられます。
メインフレームまたは COBOL の詳細。
オートメーションの詳細。
TI プロジェクトを使用する手順。
これらの 3 つの原因の詳細を次に示します。
メインフレームまたは COBOL の詳細
インポート プロセスで FILLER キーワード (keyword)が検出されると、トランザクション インテグレーター (TI) ランタイム環境では、送信バッファーまたは受信バッファー内のフィラーに続くデータの位置のオフセットが、フィラーの長さによって調整されます。 これにより、ホストに送信 (またはホストから受信) されるバッファーに未変換のギャップが残り、データを記述するデータ宣言に正しくオーバーレイできます。
オートメーションの詳細
Automation メソッドは、入力者データ記述項目を参照しません。
TI プロジェクトを使用する手順
データ宣言の先頭にあるフィラーは、メソッド、レコードセット、データテーブル、ユーザー定義型 (UDT)、または .NET 構造体に関連付けられます。 メソッドに関連付けられているフィラーは、メソッドのプロパティ ページの [ 詳細設定 ] タブから表示または変更できます。 メソッド、レコードセット、または UDT に関連付けられているフィラーを表示または変更するには、メソッド、レコードセット、または UDT を右クリックし、[ プロパティ] をクリックします。
データ記述項目の後に続くフィラーは、データ記述項目 (メソッドの場合はパラメーター、レコードセットの場合は列、UDT の場合はメンバー) に関連付けられます。 パラメーター、列、またはメンバーに関連付けられているフィラーは、パラメーター、列、またはメンバー・プロパティーの COBOL 定義 タブから表示または変更できます。 戻り値として指定したデータ記述項目の後に入力口が続く場合は、メソッドのプロパティーの 「COBOL 定義 」タブからそのフィラーを表示または変更できます。
次の例は、FILLER を使用する COBOL データ宣言を示しています。
01 CUSTOMER-DATA.
05 CUSTOMER-INFO.
10 LAST-NAME PIC X(20).
10 FIRST-NAME PIC X(20).
10 FILLER PIC X(12).
05 DEMOGRAPHICS.
10 DEMO-AGE PIC 999.
10 DEMO-INCOME PIC S9(9)V99 COMP-3.
10 DEMO-SEX PIC X.
10 DEMO-MSTATUS PIC X.
10 FILLER PIC X(40).
結果のメソッドは次のとおりです。
CustomerDemographics(strLastName As String, strFirstName As String, iAge As Integer _
, curIncome As Currency, strSex As String, strMStatus As String)
メソッドを呼び出す Visual Basic コードの例を次に示します。
Dim objCustomer As Object
Dim strLastName As String
Dim strFirstName As String
Dim iAge As Integer
Dim curIncome As Currency
Dim strSex As String
Dim strMStatus As String
strLastName = "Doe"
strFirstName = "John"
'create an instance of the invoicing object
On Error GoTo ErrorHandler1
Set objCustomer = CreateObject("Customer.Invoicing.1")
'invoke the SetInvoices method
On Error GoTo ErrorHandler2
objCustomer.CustomerDemographics strLastName, strFirstName _
, iAge, curIncome, strSex, strMStatus