|
|
cpy2view32: COBOLコピーブック・ファイルからOracle Tuxedo VIEW32定義ファイルを生成します。
このユーティリティは、COBOLコピーブック・ファイルを解析し、対応するOracle Tuxedo VIEW32定義ファイルを生成します。
-i
-n
-e
-o
.vに変更します。たとえば、abc.cblはabc.vに変換されます。
このユーティリティは、ソース・コピーブックで次のアノテーションをサポートします。
* @binary: デフォルトでは、次の修飾子が含まれないコピーブック・データ型は文字列に変換されます: BINARY、COMP、COMP-1、COMP-2、COMP-3、COMP-4、COMP-5、PACKED-DECIMAL。* @binary=trueアノテーションでは、当該修飾子が含まれないコピーブック・データ型はCARRAYに変換されます。* @binary=falseは変換ルールをデフォルトに戻します。このアノテーションがグループ上で定義されるとき、グループ内のすべての下位アイテムが影響を受けます。
PATH
abc_orig.cblをビュー・ファイルabc_orig.vに変換します。abc.vに変換します。abc_orig.cblを変換し、ビュー・ファイルxyz.vに出力します。 cpy2view32 -o xyz.v /home/abc_orig.cbl
#########################
01 BOOK-INFO.
05 BOOK-ID PIC 9(9) COMP-5.
05 BOOK-NAME PIC X(100).
05 PUBLISHER PIC X(100).
05 PRICE USAGE COMP-1.
#########################
#########################
#type cname fbname count flag size null
VIEW book_info
unsignedint book_id - 1 - - -
string book_name - 1 - 100 -
string publisher - 1 - 100 -
float price - 1 - - -
END
#########################
#########################
01 COMPUTER.
05 COMPUTER-ID PIC 9(9) COMP-5.
05 COMPUTER-NAME PIC X(20).
05 PRODUCER PIC X(40).
05 FILLER PIC X(4).
05 SELL-PRICE USAGE COMP-2.
05 RENTAL-PRICE PIC S9999V999 PACKED-DECIMAL.
05 KEYBOARD-PRICE PIC S9(4) SIGN IS LEADING SEPARATE.
05 MOUSE-PRICE PIC S9(4) SIGN IS LEADING.
05 FILLER PIC X(4).
* define other computer components below
05 CPU.
10 MODEL PIC X(20).
10 PRODUCER PIC X(40).
10 PRICE USAGE COMP-1.
05 COMPUTER-MEMORY OCCURS 4 TIMES.
10 MODEL PIC X(20).
10 PRODUCER PIC X(40).
10 PRICE USAGE COMP-1.
05 MAINBOARD.
10 MODEL PIC X(20).
10 PRODUCER PIC X(40).
10 PRICE USAGE COMP-1.
05 MONITOR.
10 MODEL PIC X(20).
10 PRODUCER PIC X(40).
10 PRICE USAGE COMP-1.
05 HARDDISK.
10 MODEL PIC X(20).
10 PRODUCER PIC X(40).
10 PRICE USAGE COMP-1.
#########################
#########################
#type cname fbname count flag size null
VIEW cpu
string model - 1 - 20 -
string producer - 1 - 40 -
float price - 1 - - -
END
VIEW computer_memory
string model - 1 - 20 -
string producer - 1 - 40 -
float price - 1 - - -
END
VIEW mainboard
string model - 1 - 20 -
string producer - 1 - 40 -
float price - 1 - - -
END
VIEW monitor
string model - 1 - 20 -
string producer - 1 - 40 -
float price - 1 - - -
END
VIEW harddisk
string model - 1 - 20 -
string producer - 1 - 40 -
float price - 1 - - -
END
VIEW computer
unsignedint computer_id - 1 - - -
string computer_name - 1 - 20 -
string producer - 1 - 40 -
string filler1 - 1 - 4 -
double sell_price - 1 - - -
carray rental_price - 1 - 4 -
string keyboard_price - 1 - 5 -
string mouse_price - 1 - 4 -
string filler2 - 1 - 4 -
struct cpu cpu 1 - - -
struct computer_memory computer_memory 4 - - -
struct mainboard mainboard 1 - - -
struct monitor monitor 1 - - -
struct harddisk harddisk 1 - - -
END
#########################
Mif2View32: メタデータ入力ファイルに従ってVIEW32定義を生成し、指定のFML32定義ファイルを更新します。
Mif2View32-i miffile -o viewfile -f fml32file -w webservice.desc [-v]
Mif2View32は、メタデータ入力ファイルに従ってVIEW32定義を生成し、指定のFML32定義ファイルを更新します。生成されたネスト構造のVIEW32定義ファイルはMIFと同じ構造を保持しているため、C構造をFML32構造にマップできます。
Mif2View32では、次のオプションがサポートされます。
############
# SERVICE: * DFH0XCMNOperation
############
service=DFH0XCMNOperation
servicetype=service
export=Y
inbuf=FML32
outbuf=FML32
tuxservice=DFH0XCMNOperation
errbuf=FML32
servicemode=webservice
param=DFH0XCMNOperation
count=1
requiredcount=0
fldnum=10025
type=fml32
access=in
paramschema=XSD_E:DFH0XCMNOperation@http://www.DFH0XCMN.DFH0XCP3.Request.com
(
param=ca_request_id
count=1
requiredcount=0
fldnum=10019
type=string
access=in
paramschema=XSD_E:ca_request_id@http://www.DFH0XCMN.DFH0XCP3.Request.com
primetype=string
param=ca_response_message
count=1
requiredcount=0
fldnum=10021
type=string
access=in
paramschema=XSD_E:ca_response_message@http://www.DFH0XCMN.DFH0XCP3.Request.com
primetype=string
param=ca_inquire_request
count=1
requiredcount=0
fldnum=10009
type=fml32
access=in
paramschema=XSD_E:ca_inquire_request@http://www.DFH0XCMN.DFH0XCP3.Request.com
(
param=ca_list_start_ref
count=1
requiredcount=0
fldnum=10017
type=short
access=in
paramschema=XSD_E:ca_list_start_ref@http://www.DFH0XCMN.DFH0XCP3.Request.com
primetype=unsignedShort
param=ca_cat_item
count=15
requiredcount=0
fldnum=10001
type=fml32
access=in
paramschema=XSD_E:ca_cat_item@http://www.DFH0XCMN.DFH0XCP3.Request.com
(
param=ca_item_ref
count=1
requiredcount=0
fldnum=10013
type=short
access=in
paramschema=XSD_E:ca_item_ref@http://www.DFH0XCMN.DFH0XCP3.Request.com
primetype=unsignedShort
param=on_order
count=1
requiredcount=0
fldnum=10029
type=short
access=in
paramschema=XSD_E:on_order@http://www.DFH0XCMN.DFH0XCP3.Request.com
primetype=unsignedShort
)
)
)
VIEW ca_cat_item_v
#TYPE CNAME FBNAME COUNT FLAG SIZE NULL
short ca_item_ref_v_times ca_item_ref_times 1 - - 0
short ca_item_ref_v ca_item_ref 1 - - 0
short on_order_v_times on_order_times 1 - - 0
short on_order_v on_order 1 - - 0
END
VIEW ca_inquire_request_v
#TYPE CNAME FBNAME COUNT FLAG SIZE NULL
short ca_list_start_ref_v_times ca_list_start_ref_times 1 - - 0
short ca_list_start_ref_v ca_list_start_ref 1 - - 0
short ca_cat_item_v_times ca_cat_item_times 1 - - 0
struct ca_cat_item_v ca_cat_item 15 - - 0
END
VIEW DFH0XCMNOperation_v
#TYPE CNAME FBNAME COUNT FLAG SIZE NULL
short ca_request_id_v_times ca_request_id_times 1 - - 0
string ca_request_id_v ca_request_id 1 - 255 '\0'
short ca_response_message_v_times ca_response_message_times 1 - - 0
string ca_response_message_v ca_response_message 1 - 255 '\0'
short ca_inquire_request_v_times ca_inquire_request_times 1 - - 0
struct ca_inquire_request_v ca_inquire_request 1 - - 0
END
tcxcsdcvt -- RDOファイルをすべてのz/OSリソース構成ファイルに変換します。
tcxcsdcvt [-option] [Filename]
tcxcsdcvtは、RDOファイルをすべてのz/OSリソース構成ファイルに変換します。生成されたリソース構成ファイルは、このツールが実行される現在のディレクトリにデフォルトで配置されます。
tcxcsdcvt では、以下のオプションがサポートされます。
-h
-d <director>
-D
RDOファイル「lirgao.cicsb.dfhcsd」を変換するには、次のコマンドを入力します。
tcxmapgen — CICS Runtime MAPSETジェネレータ。
tcxmapgen [-options] <file>
CICS Runtimeはマップセット・ジェネレータを提供します。このジェネレータは、BMSマクロ・ソース・ファイルをコンパイルし、物理(バイナリ)ファイルとシンボリック(コピーブック)ファイルを生成します。また、リスティング・ファイルを生成するオプションもあります。実行中、マップセット・ジェネレータは、各BMSマクロ文の構文とサポート・レベルを検証します。
生成された物理(バイナリ)ファイルは、MAPSET構成ファイルで使用されます。「CICS Runtime構成ファイル」のマップセット構成ファイルに関する項を参照してください。
生成されたシンボリック(コピーブック)ファイルは、このMAPSETのMAPを使用するCICS/COBOLプログラムをコンパイルする場合にインクルードされます。
[-c]
[-l]
[-m]
[-o file]
[-u]
[-A]
| 注意: | -Aを使用すると、ユーザーは位置合せされたマップを生成できます。-Aを使用しない場合は、位置合せされていないマップを生成できます(デフォルト動作)。 |
BMSソース・ファイルfile.mapをコンパイルするには、次のコマンドを使用します。
$ tcxmapgen -o file file.map
結果として作成されるバイナリ・マップセット・ファイルは、file.mpdefです。
artadmin — ART CICS Runtime管理。
artadmin [-p <profile>] [-v]
Profile
genappprofileを使用して作成する必要があります。ファイル名を指定しない場合、デフォルトの~/.ADMINappProfileに指定されます。
-v
場合によっては、システムの稼働中に構成を変更する必要があります。通常、パフォーマンスに関連する構成の変更は、コマンド(tmadminなど)またはOracle Tuxedo動的構成用Oracle TSAMを使用して、Oracle TuxedoまたはRDBMSレベルによって管理されます。
ただし、要件の機能性がさらに高い場合(たとえば、一部のトランザクションをオンラインで実行する必要がある場合、一部のプログラムや画面にホット・フィックスをインストールする場合、または一部のリソース構成変更する場合など)、artadminを使用する必要があります。
artadminは、稼働中のART CICSシステムのCICSリソースで最新の構成変更を実行するときに役立ちます。これによって、管理者は次を実行できます。
artadminはインタラクティブに起動します(tmadminと類似しています)。artdminが起動され、Oracle Tuxedoに正常に接続されると、コマンドを入力するよう求めるプロンプトを返します。
コマンドは、完全な名前または省略形(カッコ内に示す形式)で入力できます。その後に適切な引数を指定します。大カッコ[]で囲まれている引数はオプションで、中カッコ{}で囲まれている引数は、相互に排他的な選択を示します。
一連のコマンドを一斉に実行する場合、入力した管理コマンドはバッファに保持され、管理者が実行コマンドを入力した場合にのみ実行されます。
構成の変更を伝播し、アプリケーション・サーバーに対して構成の変更内容を受け入れるようリクエストします。
コマンドの引数を指定する場合、コマンドのシノプシスを出力します。
バッファが空の場合、警告: バッファにコマンドがありません。が表示されます。
画面またはプログラムのオブジェクト・タイプにあわせてnewcopyコマンドを入力します。
サーバーに送信されたコマンドを実行し、コマンド・バッファを消去します。
バッファが空ではない場合、バッファ・コンテナが表示され、確認が必要になります。
送信が失敗すると、「実行が取り消されました。」が表示され、エラーがUSERLOGに記録されます。
バッファが空ではない場合、バッファ・コンテナが表示され、確認が必要になります。
ARTSHMによって割り当てられたGETMAIN SHAREDの統計が表示されます。
デフォルトでは、管理コマンドはART CICSシステム内の全サーバーに送信されます。構成はグローバルです。newcopyコマンドは、場合によっては一部の特定サーバーに制限する必要があります。sysidコマンドは、コマンドの効果を特定のSYSIDを持つサーバーに制限するために使用されます。
共有プールのTSMODELの下にTSキュー統計情報を表示します。このコマンドでは、次のような出力が表示されます。
> tspstat TSM00000
QueName NumItem TRNID TotLen MinLen MaxLen ReadCnt WritCnt ReWrCnt LifeTm ElapTm
------- ------- ----- ------ ------ ------ ------- ------- ------- ------ ------
LOGQHELO 3 HELO 118 56 56 0 3 0 5m 13s
LOGQSTCA 6 STCA 180 16 52 0 6 0 8m 25s
共有プールのTSMODELにあるTSキューqnameを削除します。
共有プールのTSMODELにあるTSキューqnameの項目itemnoメッセージを表示します。このコマンドによって、キューの読み取りカーソルが変更されることはありません。メッセージが大きすぎる場合、その一部の実が表示されます。
Clears all queues in TSプールpoolname内のキューをすべてクリアします。
kixrpt.sh — ARTKIXトランザクション/コマンド・レポート・ユーティリティ。
kixrpt.sh [-d "YYYY/MM/DD[hh:mm:ss]"] [-D "YYYY/MM/DD[hh:mm:ss]"] [-c] trace
kixrptは、トランザクション/コマンドのタイミング統計情報(指定時間スロット内のトランザクション/コマンド実行合計数、合計時間コスト、平均実行時間など)を報告します。トランザクション/コマンドごとに、こうしたツールが実行情報の詳細(合計数、合計時間コスト、平均時間コストおよび失敗数など)を報告します。
kixrptは、ARTKIXサーバーの標準出力を分析して、サーバー内のトランザクション/コマンドの処理時間の概要を提供します。レポートには、対象期間での各トランザクション/コマンドのディスパッチ回数および平均経過時間(ミリ秒単位)が表示されます。kixrptの入力は、ARTKIXトレース・ファイルまたはトレース・ファイルがあるディレクトリ(KIX_TRACE_PATHなど)からのものです。次のように設定されたトレースが有効です。
KIX_TRACE_LEVEL=1 (またはより高いレベル)
-d "YYYY/MM/DD[ hh:mm:ss]"
-D "YYYY/MM/DD[ hh:mm:ss]"
-c
ARTKIXシステムが起動される前に、次の環境変数を設定します。 TRACE_PATH=${APPHOME}/LOGS/traces
kixrpt.shを使用して、指定した時間スロットでレポートを生成できます。 $ kixrpt.sh -d 2012/06/21 -D 2012/06/22 $TRACE_PATH
Transactions:
------------------------------------------------------------
CPMI(10000)totalTime(2254147)avgTime(225)errNum(0)
------------------------------------------------------------
totals(10000)totalTime(2254147)avgTime(225)
Commands:
------------------------------------------------------------
KIX__LINK(10000)totalTime(1047970)avgTime(104)errNum(0)
KIX__DELETEQ_TS(20000)totalTime(9377)avgTime(0)errNum(0)
KIX__RETURN(20000)totalTime(1016)avgTime(0)errNum(0)
KIX__WRITEQ_TS(380000)totalTime(153888)avgTime(0)errNum(0)
KIX__ASSIGN(300000)totalTime(19702)avgTime(0)errNum(0)
------------------------------------------------------------
totals(730000)totalTime(1231953)avgTime(1)
Programs:
------------------------------------------------------------
TUX2CXD(10000)totalTime(1047970)avgTime(104)
------------------------------------------------------------
totals(10000)totalTime(1047970)avgTime(104)
checkcicsbinver - COBOLプログラムがコンパイルされたローリング・パッチ番号を確認します。
checkcicsbinverは、COBOLプログラムがコンパイルされたローリング・パッチ番号を確認します。
checkcicsbinverでは、次のオプションがサポートされます。
PROGRAM-ID
checkcicsbinverを実行するには、前提条件として次の環境変数を宣言します。
Micro Focus COBOLの場合、次のようにします。
COBDIR
LD_LIBRARY_PATH (LinuxおよびSolarisプラットフォーム) / LIBPATH (AIXプラットフォーム)
COBPATH
PATH
COBOLITDIR
LD_LIBRARY_PATH (LinuxおよびSolarisプラットフォーム) / LIBPATH (AIXプラットフォーム)
COB_LIBRARY_PATH
PATH
12.1.3.0.0 GAから12.1.3.0.0ローリング・パッチ018まででビルドされたCOBOLプログラムの場合、出力は次のとおりです。
Program <xxxx> version No.12.1.3.0.0 RP000
12.1.3.0.0ローリング・パッチ019以上でビルドされたCOBOLプログラムの場合、出力は次のとおりです。
Program <xxxx> version No.12.1.3.0.0 RP019 or higher
artcicsutil - ART for CICS制御ユーティリティ。
artcicsutil [-t command_mode] [-p <profile>] [-d]
artcicsutilは、ART for BatchからCICS関連のリソースを追跡および管理するための重要な制御ユーティリティです。
常にART for Batchジョブによってトリガーされます。ART for Batchジョブは、1つのコマンドでファイルの開閉、CICSトランザクションの有効化/無効化、CICSトランザクションの開始などを行えます。
現在artcicsutilには、IPCPとCAFCの2種類のサブコマンド・セットがあります。それ以外にartcicsutilにはネイティブ・モードがあり、ART for Batchを使用せずにネイティブOracle Tuxedoクライアントとして機能します。
artcicsutilでは、次のオプションがサポートされます。
-t command_mode
IPCPBTCHは、artcicsutilがIPCPコマンド・セットを受け入れる(artcicsutilがIPCPユーティリティとして機能する)ことを意味します。サポートされるIPCPコマンド・セットを次にリストします。CICS CC ONLY=cics1[,cics2,...](このリクエストを処理するART for CICSリージョンを選択します)CLOS|CLOSE [DB] ddname1[,ddname2,ddname3,....] (SET FILE OPEN/CLOSEと似ています)OPEN [DB] filea[,fileb,filec,filed,...]DISA KC trna[,trnb,trnc,trnd,...] (SET TRANSACTION DISABLEDと似ています)ENAB KC trna[,trnb,trnc,trnd,...] (SET TRANSACTION ENABLEDと似ています)INIT KC trna[,data] (START TRANSIDと似ています)CAFCは、artcicsutilがCAFCコマンド・セットを受け入れる(artcicsutilがCAFCユーティリティとして機能する)ことを意味します。サポートされるCAFCコマンド・セットを次にリストします。NATIVE(デフォルト値)は、artcicsutilが対話型コマンド・セットを受け入れる(artcicsutilがネイティブ・クライアントとして機能し、エンド・ユーザーによって対話式に起動される)ことを意味します。サポートされる対話型コマンド・セットを次にリストします。サブコマンドは完全な名前または省略形で、その後に適切な引数が続きます。大カッコ[]で囲まれている引数はオプションです。transidを有効/無効にするサブコマンドの場合、最大18個のtransidアイテムを設定できます。VSAMファイルを開く/閉じるサブコマンドの場合、最大18個のファイル・アイテムを設定できます。applid (ap) [SSSSSSSS]: applidを取得/設定しますenable (ena) trna [trnb trnc ...]: トランザクションを有効にしますdisable (dis) trna [trnb trnc ...]: トランザクションを無効にしますstart (str) trna ['data']: 1つのトランザクションを開始しますopen (op) FILE: VSAMファイルを開きますclose (cs) FILE: VSAMファイルを閉じますinquire (inq) FILE: VSAMファイルを問い合せますhelp (h) [command]: ヘルプですquit (q): ツールを終了します-p profile
genappprofileを使用して作成する必要があります。ファイル名を指定しない場合、デフォルトの~/.ADMINappProfileに指定されます。
-d
CESNトランザクションは、MAPSET CSIGNONを使用します。このため、CESNトランザクションが必要とされる場合、MAPSET構成ファイル${KIXCONFIG}/mapsets.descに、次のMAPSET定義を追加する必要があります。
filename="<${KIXDIR}>/sysmap/csignon.mpdef"
このデフォルトMAPSET定義を使用することによって、CESNは最大8文字のユーザー名および最大8文字のパスワードをサポートします。次のMAPSET定義をMAPSET構成ファイルに追加する場合、CESNは最大20文字のユーザー名および最大32文字のパスワードを許可します。
filename="<${KIXDIR}>/sysmap/lsignon.mpdef"
2つのMAPSET定義を両方ともMAPSET構成ファイルに追加する場合、デフォルトのMAPSET定義CSIGNONが使用されます。この場合、CESNは最大8文字のユーザー名および最大8文字のパスワードを許可します。
CESNトランザクションは、TYPETERM構成ファイルのUCTRAN設定を無視します。どの種類のUCTRAN値が設定されようと、ターミナルから入力されるユーザー名とパスワードは常に大文字と小文字が区別されます。
Oracle Tuxedo Application Runtime for CICSには、デフォルトの「Good Morning」トランザクションCSGMが用意されていて、トランザクション構成ファイル${KIXCONFIG}/transactions.descに追加できます。
デフォルトCSGMトランザクションは、MAPSET ABANNERを使用します。このため、デフォルトCSGMトランザクションが構成されている場合、次のMAPSET定義をMAPSET構成ファイルに追加する必要があります。
[mapset]
name=ABANNER
filename="<${KIXDIR}>/sysmap/abanner.mpdef"ALST (アプリケーション・リスト・トランザクション)は、複数セッション管理を行うために使用します。これはユーザー・プラグインと統合され、アプリケーション・リストを取得および表示できるようにします。
このトランザクションを使用するには、transactions.desc構成ファイルで定義し、次のようにそのPROGRAMとしてDFHALSTを指定する必要があります。DFHALSTはC言語で記述され、ART for CICSによりALSTを実装するために提供されます。
ALST;SIMPAPP;Application list transaction;DFHALST
詳細は、『Oracle Tuxedo Application Runtime for CICSユーザー・ガイド』の「複数セッション管理を使用した実装」を参照してください。
  
|