error not all variables bound

i am getting this error ORA-01008 not all variables bound.

Set pt_code_1 = cmdterm.CreateParameter(, 129, 1, 1)
cmdterm.Parameters.Append pt_code_1
Set pt_code_2 = cmdterm.CreateParameter(, 129, 1, 1)
cmdterm.Parameters.Append pt_code_2
Set pt_is_citeable = cmdterm.CreateParameter(, 3, 1, 1)
cmdterm.Parameters.Append pt_is_citeable
Set pt_tname = cmdterm.CreateParameter(, 200, 1, 512)
cmdterm.Parameters.Append pt_tname


'MsgBox 3

Set terms = eh.selectNodes("//gchier:term-type")
For Each term In terms
If term.getAttribute("code") <> "." Then
pt_code_1.value = term.getAttribute("code")
pt_code_2.value = term.getAttribute("code")
pt_is_citeable.value = term.getAttribute("citeable")
pt_tname.value = term.getAttribute("name")

cmdterm.Execute
End If
'MsgBox 4
Next


This full code is running in my machine but on my colleugues machine which is the same OP as mine. I have checked the version of ADO also, its the same in both of us.

Please tell what may be the problem.

thanks
rajiv