apm_test_callback_proc (private)

 apm_test_callback_proc -arg1 arg1 -arg2 arg2

Defined in packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl

Writes the arbitrary values of arg1 and arg2 to a file so that we can check that the proc was executed.

Switches:
-arg1 (required)
Arbitrary value.
-arg2 (required)
Arbitrary value.

Partial Call Graph (max 5 caller/called nodes):
%3 test_apm__test_callback_invoke apm__test_callback_invoke (test acs-tcl) apm_test_callback_proc apm_test_callback_proc test_apm__test_callback_invoke->apm_test_callback_proc apm_test_callback_file_path apm_test_callback_file_path (private) apm_test_callback_proc->apm_test_callback_file_path

Testcases:
apm__test_callback_invoke
Source code:
    # Write something to a file so that can check that the proc executed
    set file_path [apm_test_callback_file_path]
    set file_id [open $file_path w]
    puts $file_id "$arg1 $arg2"
    close $file_id
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: