bapi-vbscript error

Question: I tried to create sales order through BAPI with VBScript, but getting error

Error: type missmatch.

getting error at "CreateFromData" method.

here is my html page please do favour...to find my error.


<HTML>
<HEAD>

<TITLE>Document Title</TITLE>
</HEAD>
<BODY>
<script type="text/vbscript">
dim bapictrl
dim boorder
dim opartner
dim oheader
dim oreturn
dim oitemin


set bapictrl=CreateObject("sap.bapi.1")
bapictrl.connection.user="sapuser"
bapictrl.connection.password="india"
bapictrl.connection.applicationserver="john"
bapictrl.connection.system="00"
bapictrl.connection.client="800"
bapictrl.connection.language="en"

bapictrl.connection.logon 0. true


set boorder=bapictrl.getsapobject("SalesOrder")
set opartner=bapictrl.dimas(boorder,"createfromdata","orderpartners")
set oitemin=bapictrl.dimas(boorder,"createfromdata","orderitemsin")
set oheader=bapictrl.dimas(boorder,"createfromdata","orderheaderin")



oheader.value("DOC_TYPE")="OR"
oheader.value("SALES_ORG")="1000"
oheader.value("DISTR_CHAN")="10"
oheader.value("DIVISION")="00"

opartner.rows.add
opartner.value(1,"PARTN_ROLE")="SP"
opartner.value(1,"PARTN_NUMB")="2000"

otemin.row.add
otemin.value(1,"REQ_QTY")=2
otemin.value(1,"MATERIAL")="p-109"


boorder.CreateFromData orderheader=oheader,orderpartner=opartner,orderitemsin=oitemin,return=oreturn


if (oreturn.value("message") = "" then

msgbox "Transcation completed"
else
msgbox oreturn.value("message")
end if



</script>
</BODY>
</HTML>

Answer:
Which BAPI do you try to call with this ?

Regards Peter Carroll
_________________
Regards Peter Carroll
Copyright ?2007 - 2008 www.jt77.com