$! $! dummyemmaddin_SIGN $! $ on error then goto done $ on control_y then goto done $ save_default_dir = f$environment( "DEFAULT" ) $ cdsa_sign_exe == "$sys$system:cdsa$sign.exe" $! $ if( f$trnlnm( "cdsa_tempdir" ) .eqs. "" ) $ then $ write sys$output "" $ write sys$output "Please define the rooted logical """cdsa_tempdir""" to build this example." $ write sys$output "" $ exit $ endif $! $ if( f$search( "cdsa_tempdir:[dummyemmaddin]dummyemmaddin_shr.exe" ) .eqs. "" ) $ then $ write sys$output "" $ write sys$output "Cannot sign, CDSA_TEMPDIR:[DUMMYEMMADDIN]DUMMYEMMADDIN_SHR.EXE Not Found." $ write sys$output "" $ goto done $ endif $! $!********************************************************************** $! The logical 'cdsa_sign' is used internally by the code, don't change. $ define cdsa_sign "/cdsa_tempdir/dummyemmaddin" $!********************************************************************** $ define dummyemmaddin_shr "cdsa_tempdir:[dummyemmaddin]dummyemmaddin_shr.exe" $! $ set default cdsa_sysdir:[sign] $ cdsa_sign_exe dummyemmaddin_shr cdsa_sign A intmods.cer selfsign intchain. - {09D581B0-4541-11d3-A8F3-0090271D266F} "XX" "XX" "XX" "XX" $! cdsa_sign_exe /cdsa_tempdir/dummyemmaddin/dummyemmaddin_shr.esw exmods.cer selfsign exchain. "AAAAAQ==" "XX" "XX" "XX" $! $ done: $ set default 'save_default_dir $ exit