dbaccess xyzdb << EOF >> db$abcd.log 2>&1 ------------------- connecting to database
alter table $abcd add ( encrypt char(11) ) ; ------------------- altering the table to add a new column called encrypt with a datatype char of length 11
create index idx_neuker on $abcd(insys_serial) ; ------------------ creating a index named idx_neuker on table on column insys_serial
update statistics high for table $abcd(insys_serial);
create procedure p$abcd() ------- procedure started
returning char(40);
DEFINE acc_num char(20); ---- defining the different variable with datatypes like char an dinteger with different length as mentioned within ()
DEFINE i integer;
DEFINE sum integer;
set debug file to 'pev_rech_yyyymmnn.log'; ------ creating the debugg file with a name pev_rech_yyyymmnn.log
trace 'begin update';
let i = 0; ------ initializing the variable to 0
let sum=0;
begin work; ------ begin here
foreach up_cur with hold for ----- in this loop they are selecting the insys_serial into a variable called acc_num and updating the field encrypt=msisdn
select insys_serial into acc_num from $abcd
update $abcd set encrypt=msisdn where insys_serial=acc_num;
let i=i+1; --------------- this is done till it process for 10000 records the commit is done and it will loop back
let sum=sum+1;
if i=10000 then
trace 'record processed '||sum;
commit work;
let i=0;
begin work;
end if
end foreach ------- ending the if and for loop
commit work;
trace 'procedure ok! total processed records are '||sum;
return "procedure complete!";
end procedure;
execute procedure p$abcd();
drop procedure p$abcd ; -- deleteing the index and procedure here
drop index idx_neuker;
EOF
Hi there,
i am trying to create a script that checks for the existence of users on the system, if they exist then their details should print on the screen with a message that the id is in use. I am having a bit of trouble with it.
Any ideas?
Cheers
Kev! (8 Replies)
The line is like this
+abc+def+mgh+ddsdsd+sa
i.e. words seperated by +. There is a plus in the beginning.
i want to conver this line to
abc, def, mgh, ddsdsd, sa
please provide the logic in the form of a shell script
Thanks in advance (13 Replies)
Hi All,
I have file nodes.txt that contains node names one by one.
I'm running the following command.
/opt/OV/bin/ovet_topodump.ovpl -nodeif <nodename> -detail
Field <nodename> should take (replace) the node names from the nodes.txt one by one till last node.
Pls. give me script for... (1 Reply)
Hello guys,
Need a help.I have a flat file.
QWER 2:35 7044 00001 ROUT 1188 EA SS
ASD 2:36 7044 00010 ROUT
BSD 2:37 7044 00011 ROUT
END
QWER 3:35 7044 00011 ROUT 1088 EA SS
ASD 3:36 7044 00010 ROUT
BSD 3:37 7044 00011 ROUT
END
QWER 2:35 7044 00001 ROUT 1188 EA SS
ASD ... (1 Reply)
My data is something like shown below.
date1 date2 aaa bbbb ccccc
date3 date4 dddd eeeeeee ffffffffff ggggg hh
I want the output like this
date1date2 aaa eeeeee
I serached in the forum but didn't find the exact matching solution. Please help. (7 Replies)
Hi Experts,
I am very beginner in Bash Shell Scripting. Can anyone please guide me to create a script which should show the most busy file systems in sort basis as there are a lot of file systems on the server.
I was told this task to be done by my IT lead and I must have to do this in... (3 Replies)
This is the input file contents
"data",9999,"data",999
"ddd"y"dat","dat","dart"
9999,999,999,"dat"
99,78,"duhu"yes"duhu"
I need the output file contents
"data",9999,"data",999
"dddydat","dat","dart"
9999,999,999,"dat"
99,78,"duhuyesduhu"
Please use code tags when posting data and... (5 Replies)
Hey All,
I am seeking for the script which will do as follows,
1) Login on one Unix server "Server1"
2) Want to access other Unix server "Server2", and want to get the information as, on one go.
df -k /tmp
df -k /
df -k "any file system"
3) Re-direct the output to "space.txt" on... (12 Replies)
Hi Experts,
I have a script as below :
# cat a.sh
var=`mysql -usupport -p'testing' -e "select count(1) from db_test.sampletable;"`
echo $var
the output of this script is :
count(1) 145039
Now i want to remove header from my o/p and modify somewhat like
145039
I have... (9 Replies)
Discussion started by: mukulverma2408
9 Replies
LEARN ABOUT OPENDARWIN
return
return(n) Tcl Built-In Commands return(n)
__________________________________________________________________________________________________________________________________________________NAME
return - Return from a procedure
SYNOPSIS
return ?-code code? ?-errorinfo info? ?-errorcode code? ?string?
_________________________________________________________________DESCRIPTION
Return immediately from the current procedure (or top-level command or source command), with string as the return value. If string is not
specified then an empty string will be returned as result.
EXCEPTIONAL RETURNS
In the usual case where the -code option isn't specified the procedure will return normally (its completion code will be TCL_OK). However,
the -code option may be used to generate an exceptional return from the procedure. Code may have any of the following values:
ok Normal return: same as if the option is omitted.
error Error return: same as if the error command were used to terminate the procedure, except for handling of errorInfo and errorCode
variables (see below).
return The current procedure will return with a completion code of TCL_RETURN, so that the procedure that invoked it will return also.
break The current procedure will return with a completion code of TCL_BREAK, which will terminate the innermost nested loop in the code
that invoked the current procedure.
continue The current procedure will return with a completion code of TCL_CONTINUE, which will terminate the current iteration of the
innermost nested loop in the code that invoked the current procedure.
value Value must be an integer; it will be returned as the completion code for the current procedure.
The -code option is rarely used. It is provided so that procedures that implement new control structures can reflect exceptional condi-
tions back to their callers.
Two additional options, -errorinfo and -errorcode, may be used to provide additional information during error returns. These options are
ignored unless code is error.
The -errorinfo option specifies an initial stack trace for the errorInfo variable; if it is not specified then the stack trace left in
errorInfo will include the call to the procedure and higher levels on the stack but it will not include any information about the context
of the error within the procedure. Typically the info value is supplied from the value left in errorInfo after a catch command trapped an
error within the procedure.
If the -errorcode option is specified then code provides a value for the errorCode variable. If the option is not specified then errorCode
will default to NONE.
SEE ALSO
break(n), continue(n), error(n), proc(n)
KEYWORDS
break, continue, error, procedure, return
Tcl 7.0 return(n)