Example: lr_start_transaction_instance

Example 1:

In the following example,lr_start_transaction measures the time of a transaction that performs a withdrawal from a bank server. Once the server API call is completed and returns a value to the status variable, the transaction is complete. However the test also wants to verify how long an unsuccessful withdrawal transaction will take if the customer is over the withdrawal limit. An instance of the transaction "withdraw" is created with lr_start_transaction_instance for this purpose.

long id;
int status;
int amount_overdrawn = get_amount_overdrawn(); /* Call to server API */
while (amount_overdrawn < LIMIT) {

     /* Notify that a transaction is starting */

    id = lr_start_transaction("withdraw");
    status = bank_withdraw(500); /* Call to server API */

     /* End transaction with operation result - pass or fail */

    if (status == 0)
        lr_end_transaction("withdraw", LR_PASS);
    else
        lr_end_transaction("withdraw", LR_FAIL);
    amount_overdrawn = get_amount_overdrawn();
}

     /* The client is unable to withdraw anymore as the overdraft 
    limit has been reached. Try to withdraw anyway to record
    the server response time */

    id = lr_start_transaction_instance("withdraw", 0);
    status = bank_withdraw(500); /* This call will fail, but we want to time it */
    lr_end_transaction_instance(id, LR_PASS);

Example 2:

This example demonstrates nesting of parent and child transaction instances.

#include "as_web.h"
Action() {
    long parent_trans_handle;
    long child1_handle;
    long child2_handle;
    double trans_time;
    int rc;

    /* Start the main transaction instance.
        Passing 0 as the parent handle indicates that 
        the transaction has no parent.
        The function return value is the handle used in other 
        transaction instance functions.     */

    parent_trans_handle = lr_start_transaction_instance("ParentTransaction",0);

    lr_output_message("Parent transaction instance handle is %ld.", parent_trans_handle);

    /*Perform the business process, represented here with a single web_url call. */

    web_url("web_url", "URL=http://www.ABC.com",LAST ); 
    rc = lr_get_trans_instance_status(parent_trans_handle);
    lr_output_message("Parent Transaction status is %d.", rc);
    if (rc == LR_FAIL) {

     /* web_url has failed the transaction. 
        No point in continuing, because
        future calls will probably fail too */

     lr_end_transaction_instance(parent_trans_handle, LR_FAIL);
     return;
    }
    /* Start the child transaction instance.
        Passing the handle returned from another 
        lr_start_transaction_instance call as the 
        handle argument makes this transaction a
        child instance.     */

    child1_handle = lr_start_transaction_instance("ChildTransInstance", parent_trans_handle);
    lr_output_message("First child transaction instance handle is %ld.", child1_handle);

    // Perform the business process

    web_url("web_url",
        "URL=http://www.ABC.com/services/index.html",LAST );
    /* Get the child transaction instance durations. 
        Pass the instance handle. 
        The duration in seconds is the return value. */

    //Total duration

    trans_time =
        lr_get_trans_instance_duration(child1_handle);
    lr_output_message
        ("First child instance time is %lf seconds.", 
            trans_time);

    //Think time

    trans_time = lr_get_trans_instance_think_time(child1_handle);
    lr_output_message("First child instance think time is %lf seconds.", trans_time);

    //Wasted time

    trans_time = lr_get_trans_instance_wasted_time (child1_handle);
    lr_output_message("First child instance waste time is %lf seconds.", trans_time);

    /*Start a second child transaction of the same name.
    This is possible even though the first is still active
    because we are using handles, not names. 
    In a real script you would use instances with the
    same name to track the same process under 
    different conditions.
    This example, showing that transaction instances 
    can be nested, is to caution you that this is technically
    possible, so that you take care to avoid doing it. 
    The transaction times with nested transactions
    of the same name are not data you can analyze in any
    meaningful way. */

    // Start second instance of the same name

    child2_handle = lr_start_transaction_instance("ChildTransInstance",parent_trans_handle);

    lr_output_message("Second child instance handle is %ld.", 
            child2_handle);

    // Perform the business process

    web_url("web_url", "URL=http://ABC.com",LAST );
    trans_time = lr_get_trans_instance_duration(child2_handle);
    lr_output_message("Second child instance duration is %lf seconds.",trans_time );

    // End the second child transaction instance

    lr_end_transaction_instance(child2_handle, LR_PASS);

    // End the first child transaction instance

    lr_end_transaction_instance(child1_handle, LR_PASS);

    /* Get the Parent transaction instance duration. */

    trans_time = lr_get_trans_instance_duration(parent_trans_handle);
    lr_output_message("Parent Transaction duration is %lf seconds.", trans_time );

    //End the parent transaction instance

    lr_end_transaction_instance(parent_trans_handle, LR_PASS);
    return 0;
}