scripting help

[malay boy]

Hi guy's,
I inherit the script from my past collegue.But couldn't fully understand the script.Hope you guy's can give some light.It seems dark and gloomy :-)

1) set orasmp_TmpArgv $argv
2) set strinifile [lindex $argv 0]
3) set orasmp_OrigArgs [lrange $argv 4 end]
3) foreach orasmp_Param $orasmp_OrigArgs {
set orasmp_tmp ""
set orasmp_tmp1 ""
set orasmp_tmp2 ""
set orasmp_x [eval set orasmp_tmp [eval set orasmp_tmp1 $orasmp_
Param]]
lappend orasmp_NewArgs [eval set orasmp_tmp2 "{$orasmp_x}"]
set orasmp_x [eval set orasmp_tmp [eval set orasmp_tmp1 $orasmp_
Param]]
}
4)[ catch { set initget [eval gets $fileini strLine] } strERR ]
5)if {[regsub user= $strLine "" strtmp] != 0 } {
set SMP_USER $strtmp }
6)set initget [eval gets $fileini strLine]
7)set argv [lrange $orasmp_NewArgs 0 0]
8)set argc [llength $argv]
9)set status_0 [catch {
# ORASMP V2 TCL TASK CODE SNIPPET ** BEGIN
# For setting up the parameters as argv
if {$argc == 1} {
set argv [lindex $argv 0]
set argc [llength $argv]
}

orajob /oracle/rdbms/backup/backup_hot

} output ]


:-) It seems like the whole script I paste it here.

[Radim Jarosek]

Hi,

its written in oratclsh and seems to me to prepare some arguments for oracle backup.

I'm not really expert for oratclsh, but could you give me an example of arguments ? It should be clear.

Radim

[malay boy]

Anybody ???.Some light on oratclsh.

regards
mB

[malay boy]

Hi,
Curtis you are the man for the scripting.Do you know where can I get the documentation on oratclsh.

regards
arman a.rahim