スクリプトの実行

例 1

コーヒー・ショップを所有していて、クライアントとアイテムによる注文を追跡したいとします。 データベースには、以下の 4 つの表が必要です。

• クライアント: この表には、クライアントに関する情報 (クライアントの名前や E メール・アドレスなど) が保管されます。
• 注文: この表には、注文 ID やクライアント ID など、注文に関する情報が保管されます。
• 商品: この表には、商品 ID、商品の名前、および価格など、商品に関する情報が保管されます。
• オーダー・アイテム: この表には、オーダー ID や商品 ID など、オーダーごとのアイテムに関する情報が保管されます。

ショップで最も多くの金額を支払ったクライアントの名前と合計購入金額を取得するためのタスクが提供されます。

このデータベースを作成、取り込み、および照会するには、必要に応じてスクリプトのロジックを異なるファイルに分離し、 「スクリプトの実行」 コマンドを使用してメイン・スクリプトから各スクリプトを呼び出すことができます。

この例を実行するには、4 つの別個の WAL スクリプト・ファイルを作成し、それらをデスクトップに配置します。

connectToDb.wal:

defVar --name databasePath --type String --parameter  --required
defVar --name sqliteConnection --type DbConnection --output
defVar --name connectionSuccess --type Boolean
defVar --name pathExists --type Boolean
defVar --name path --type String
ifFile --file "${databasePath}" pathExists=value
if --left "${pathExists}" --operator "Is_True"
	sqliteConnect --connectionString "Data Source=\"${databasePath}\";Version=3;UseUTF16Encoding=True;" sqliteConnection=connection
else
	sqliteConnect --createNew  --path "${databasePath}" sqliteConnection=connection connectionSuccess=success
	sqlExecute --connection ${sqliteConnection} --statement "CREATE TABLE IF NOT EXISTS clients (client_id INTEGER PRIMARY KEY AUTOINCREMENT,first_name TEXT NOT NULL,last_name TEXT NOT NULL,email TEXT NOT NULL);"
	sqlExecute --connection ${sqliteConnection} --statement "CREATE TABLE IF NOT EXISTS products (product_id INTEGER PRIMARY KEY AUTOINCREMENT,name TEXT NOT NULL,price REAL NOT NULL);"
	sqlExecute --connection ${sqliteConnection} --statement "CREATE TABLE IF NOT EXISTS orders (order_id INTEGER PRIMARY KEY AUTOINCREMENT,client_id INTEGER,FOREIGN KEY(client_id) REFERENCES clients(client_id));"
	sqlExecute --connection ${sqliteConnection} --statement "CREATE TABLE IF NOT EXISTS order_items (order_item_id INTEGER PRIMARY KEY AUTOINCREMENT,order_id INTEGER,product_id INTEGER NOT NULL,quantity INTEGER NOT NULL,FOREIGN KEY(order_id) REFERENCES orders(order_id),FOREIGN KEY(product_id) REFERENCES products(product_id));"
endIf

checkDb.wal:

defVar --name databaseConnection --type DbConnection --parameter  --required
defVar --name result --type Numeric --output
sqlExecuteScalar --connection ${databaseConnection} --statement "SELECT COUNT(*) FROM orders;" result=value

insertData.wal:

defVar --name databaseConnection --type DbConnection --parameter  --required
sqlExecute --connection ${databaseConnection} --statement "INSERT INTO clients (first_name, last_name, email)\r\nVALUES\r\n(\'John\', \'Doe\', \'john.doe@example.com\'),\r\n(\'Jane\', \'Doe\', \'jane.doe@example.com\'),\r\n(\'Peter\', \'Parker\', \'peter.parker@example.com\'),\r\n(\'Bruce\', \'Wayne\', \'bruce.wayne@example.com\'),\r\n(\'Clark\', \'Kent\', \'clark.kent@example.com\');"
sqlExecute --connection ${databaseConnection} --statement "INSERT INTO products (name, price)\r\nVALUES\r\n(\'Espresso\', 3.99),\r\n(\'Latte\', 4.99),\r\n(\'Capuccino\', 5.99),\r\n(\'Macchiato\', 4.50),\r\n(\'Americano\', 3.50),\r\n(\'Iced coffee\', 4.50),\r\n(\'Cold brew coffee\', 5.00),\r\n(\'Frappuccino\', 6.00),\r\n(\'Mocha\', 5.50),\r\n(\'White chocolate mocha\', 6.00);"
sqlExecute --connection ${databaseConnection} --statement "INSERT INTO orders (client_id)\r\nVALUES\r\n(1),\r\n(2),\r\n(3),\r\n(4),\r\n(5);"
sqlExecute --connection ${databaseConnection} --statement "INSERT INTO order_items (order_id, product_id, quantity)\r\nVALUES\r\n(1, 1, 2),\r\n(1, 2, 1),\r\n(2, 3, 3),\r\n(2, 4, 1),\r\n(3, 5, 2),\r\n(3, 6, 1),\r\n(4, 7, 3),\r\n(4, 8, 1),\r\n(5, 9, 2),\r\n(5, 10, 1);"

queryDb.wal:

defVar --name databaseConnection --type DbConnection --parameter  --required
defVar --name dataTable --type DataTable --output
sqlExecuteReader --connection ${databaseConnection} --statement "SELECT first_name, last_name, SUM(quantity * products.price) AS total_spent\r\nFROM clients\r\nJOIN orders ON clients.client_id = orders.client_id\r\nJOIN order_items ON orders.order_id = order_items.order_id\r\nJOIN products ON order_items.product_id = products.product_id\r\nWHERE products.price IS NOT NULL\r\nGROUP BY clients.client_id\r\nORDER BY total_spent DESC\r\nLIMIT 1;" dataTable=value

これらのスクリプトを使用するには、以下のスクリプトを作成します。

defVar --name databasePath --type String
defVar --name path --type String
defVar --name sqliteConnection --type DbConnection
defVar --name result --type Numeric
defVar --name dataTable --type DataTable
defVar --name firstName --type String
defVar --name lastName --type String
defVar --name totalSpent --type Numeric
getSpecialFolder --folder "Desktop" path=value
setVar --name "${databasePath}" --value "${path}\\clients.db"
// Connects to database. Creates the database file if it doesn't exist.
executeScript --name "${path}\\connectToDb.wal" --parameters "{\"databasePath\":\"${databasePath}\"}" --output "{\"sqliteConnection\":\"${sqliteConnection}\"}"
// Checks if the database is populated.
executeScript --name "${path}\\checkDb.wal" --parameters "{\"databaseConnection\":\"${sqliteConnection}\"}" --output "{\"result\":\"${result}\"}"
// If the database is not populated, then it inserts data into the database. This avoids data duplication.
if --left "${result}" --operator "Greater_Than" --right 0 --negate
	//Inserts data into the database. It only does that if the database has no data.
	executeScript --name "${path}\\insertData.wal" --parameters "{\"databaseConnection\":\"${sqliteConnection}\"}"
endIf
// Gets the client that spent the highest amount in your coffee shop, with the amount spent.
executeScript --name "${path}\\queryDb.wal" --parameters "{\"databaseConnection\":\"${sqliteConnection}\"}" --output "{\"dataTable\":\"${dataTable}\"}"
mapTableRow --dataTable ${dataTable} --row 1 --mappings "[{\"Name\":\"first_name\",\"Number\":\"1\",\"Output\":\"${firstName}\"},{\"Name\":\"last_name\",\"Number\":\"2\",\"Output\":\"${lastName}\"},{\"Name\":\"total_spent\",\"Number\":\"3\",\"Output\":\"${totalSpent}\"}]"
// Prints the result of the query.
logMessage --message "${firstName} ${lastName} has spent a total of US$ ${totalSpent} in your coffee shop." --type "Info"
// The output is: "Jane Doe has spent a total of US$ 22.47 in your coffee shop."

このメイン・スクリプトは、他のすべてのスクリプトを呼び出して、以下のタスクを実行します。

1. データベースに接続します。 データベースが存在しない場合は、デスクトップに clients.db ファイルが作成されます。 データベース接続変数は connectToDb.wal スクリプトによって返され、同じデータベースに接続するために他のスクリプトによって使用されます。
2. データベースにデータが取り込まれているかどうかを検査します。
3. データベースにデータが取り込まれていない場合は、データベースにデータが挿入されます。
4. データベースを照会して、ショッピングで最も多くの金額を費やしたクライアントを取得します。 これは、クライアントの名前と合計消費量を返します。
5. クライアントの名前と合計消費量を表示します。

例 2

実行時にエラーが発生した場合は、 Handle Error パラメーターを使用してエラー・メッセージを取り込むことができます。 このパラメーターが有効になっている場合、実行時に取り込まれるエラーはメイン・スクリプトに影響しません。 エラーは基本的に無視され、スクリプトは正常に終了するまで続行されます。 取り込まれたエラー・メッセージは、後でログに記録して分析することができます。

コーヒー・ショップに Espresso Latte という名前の新製品があり、新製品の売上を追跡したいとします。 これを行うには、既存のスクリプトを少し変更する必要があります。 デスクトップに espressoLatteQuery.wal ファイルを作成します。

espressoLatteQuery.wal:

defVar --name dbConnection --type DbConnection --parameter
defVar --name result --type String --output
sqlExecuteScalar --connection ${dbConnection} --statement "SELECT SUM(order_items.quantity) FROM AS espresso_latte_quantity FROM order_items JOIN products ON order_items.product_id = products.product_id WHERE products.name = \"Espresso Latte\";" result=value

次に、 executeScript.wal ファイルを編集します。

executeScript.wal:

defVar --name databasePath --type String
defVar --name path --type String
defVar --name sqliteConnection --type DbConnection
defVar --name result --type Numeric
defVar --name resultLatte --type String
getSpecialFolder --folder "Desktop" path=value
setVar --name "${databasePath}" --value "${path}\\clients.db"
// Connects to database. Creates the database file if it doesn't exist.
executeScript --name "${path}\\connectToDb.wal" --parameters "{\"databasePath\":\"${databasePath}\"}" --output "{\"sqliteConnection\":\"${sqliteConnection}\"}"
// Checks if the database is populated.
executeScript --name "${path}\\checkDb.wal" --parameters "{\"databaseConnection\":\"${sqliteConnection}\"}" --output "{\"result\":\"${result}\"}"
// If the database is not populated, then it inserts data into the database. This avoids data duplication.
if --left "${result}" --operator "Greater_Than" --right 0 --negate
	//Inserts data into the database. It only does that if the database has no data.
	executeScript --name "${path}\\insertData.wal" --parameters "{\"databaseConnection\":\"${sqliteConnection}\"}"
endIf
// Gets the client that spent the highest amount in your coffee shop, with the amount spent.
executeScript --name "${path}\\espressoLatteQuery.wal" --parameters "{\"databaseConnection\":\"${sqliteConnection}\"}" --output "{\"result\":\"${resultLatte}\"}"
// Prints the result of the query.
logMessage --message "A total of ${resultLatte} Espresso Lattes have been sold in your coffe shop." --type "Info"

ただし、データベースには新製品に関連するデータがなく、 executeScript.wal ファイルを実行しようとしても何も返されず、「合計 Espresso Lattes がコーヒー・ショップで販売されました」というメッセージのみが表示されます。 スクリプトは失敗しません。より複雑な状況では、明示的なエラー・メッセージがないと、解決策を見つけるのが困難な問題になる可能性があります。

この例では、エラー処理の能力と、エラーをキャプチャーして IBM RPAで処理する方法を示すために、 Throw Exception (failTest) コマンドを使用して「espressoLatteQuery.wal」でエラーを発生させ、照会に問題があったことを明示することができます。

defVar --name dbConnection --type DbConnection --parameter
defVar --name result --type String --output
defVar --name errorMessage --type String --value "No Espresso Latte data found!"
defVar --name hasResult --type Boolean
sqlExecuteScalar --connection ${dbConnection} --statement "SELECT SUM(order_items.quantity) FROM AS espresso_latte_quantity FROM order_items JOIN products ON order_items.product_id = products.product_id WHERE products.name = \"Espresso Latte\";" result=value hasResult=hasresult
if --left "${hasResult}" --operator "Is_True" --negate
	failTest --message "${errorMessage}"
endIf

ここで executeScript.wal を実行しようとすると、ボットによるタスクの完了を停止するエラー・メッセージが表示されます。 エラー・メッセージをキャプチャーできるようにするには、 Handle error パラメーターを有効にする必要があります。

defVar --name databasePath --type String
defVar --name path --type String
defVar --name sqliteConnection --type DbConnection
defVar --name result --type Numeric
defVar --name success --type Boolean
defVar --name errorMessage --type String
defVar --name resultLatte --type String
defVar --name errorLineNumber --type Numeric
defVar --name errorRoutine --type String
defVar --name error --type Error
getSpecialFolder --folder "Desktop" path=value
setVar --name "${databasePath}" --value "${path}\\clients.db"
// Connects to database. Creates the database file if it doesn't exist.
executeScript --name "${path}\\connectToDb.wal" --parameters "{\"databasePath\":\"${databasePath}\"}" --output "{\"sqliteConnection\":\"${sqliteConnection}\"}"
// Checks if the database is populated.
executeScript --name "${path}\\checkDb.wal" --parameters "{\"databaseConnection\":\"${sqliteConnection}\"}" --output "{\"result\":\"${result}\"}"
// If the database is not populated, then it inserts data into the database. This avoids data duplication.
if --left "${result}" --operator "Greater_Than" --right 0 --negate
	//Inserts data into the database. It only does that if the database has no data.
	executeScript --name "${path}\\insertData.wal" --parameters "{\"databaseConnection\":\"${sqliteConnection}\"}"
endIf
// Gets the client that spent the highest amount in your coffee shop, with the amount spent.
executeScript --handleError  --name "${path}\\espressoLatteQuery.wal" --parameters "{\"databaseConnection\":\"${sqliteConnection}\"}" --output "{\"result\":\"${resultLatte}\"}" success=value errorMessage=errormessage errorLineNumber=linenumber errorRoutine=errorsubname error=error
// Prints the result of the query.
if --left "${success}" --operator "Is_True" --negate
	setVar --name "${resultLatte}" --value 0
endIf
logMessage --message "A total of ${resultLatte} Espresso Lattes have been sold in your coffe shop." --type "Info"

スクリプトは失敗しなくなり、呼び出されたスクリプトのいずれかでエラーが発生した後でも実行を継続します。 IBM RPA Studioの最後の行にブレークポイントを追加することによって、デバッグ・モードでエラー・メッセージを確認できるようになりました。また、ボットが IBM RPA Control Centerで公開されている場合は、ボットの詳細でエラー変数を確認できます。 この例では、スクリプトはエラー・メッセージを無視し、「espressoLatteQuery.wal」スクリプトが正常に実行されたかどうかを検査します。 正しくない場合は、正しくない出力を回避するために、値「0」を resultLatte 変数に割り当てます。