baanprog
17th January 2007, 17:28
Hi,
Iam trying create Patch automatically from "Components by patch Code" and "cont.process". My code is as below
ret = stpapi.find("ttiex4110m000",errmsg)
stpapi.put.field("ttiex4110m000", "ttiex410.paco", "DF12345")
ret = stpapi.find("ttiex4110m000",errmsg)
if ret = 1 then
stpapi.set.report("ttiex4110m000", "rttiex128001000", spool.dev, errmsg)
stpapi.enum.answer( "ttiex4110m000", "ttiex41101", tcyesno.yes )
stpapi.form.command( "ttiex4110m000", 1, "exec.cont.process", errmsg )
stpapi.end.session("ttiex4110m000")
endif
Also the AFS Log is as below, which also doesnt raise a trigger
>ttiex4110m000 Find
79->get.fields
79<-get.fields0ttiex410.paco1ttiex410.comp1ttiex410.cpac1ttiex410.code1ttiex410.clan1ttiex410.clan(2)1ttiex410.clan(3)1ttiex410.clan(4)1ttiex410.clan(5)1ttiex410.clan(6)1
79->def.find
79<-def.find01
<ttiex4110m000 record found (1)
>ttiex4110m000 put.field:ttiex410.paco DF12345
>ttiex4110m000 Find
79->def.find
79<-def.find01
<ttiex4110m000 record found (1)
>ttiex4110m000 set.report
79->set.reportrttiex128001000D
79<-set.report0
<ttiex4110m000
>ttiex4110m000 enum.answer ttiex41101:1
79->enum.answerttiex411011
79<-enum.answer0
>ttiex4110m000 form.command command type: 1 command prog: exec.cont.process
79->form.command1exec.cont.process
80<-api.child.startedttiex1280s00079
79<-form.command0
<ttiex4110m000
>ttiex4110m000 end.session
79->end.program
79<-end.program0
79<-exit.child
Unfortunately still the patch does NOT get created.
Thanks for your help
Iam trying create Patch automatically from "Components by patch Code" and "cont.process". My code is as below
ret = stpapi.find("ttiex4110m000",errmsg)
stpapi.put.field("ttiex4110m000", "ttiex410.paco", "DF12345")
ret = stpapi.find("ttiex4110m000",errmsg)
if ret = 1 then
stpapi.set.report("ttiex4110m000", "rttiex128001000", spool.dev, errmsg)
stpapi.enum.answer( "ttiex4110m000", "ttiex41101", tcyesno.yes )
stpapi.form.command( "ttiex4110m000", 1, "exec.cont.process", errmsg )
stpapi.end.session("ttiex4110m000")
endif
Also the AFS Log is as below, which also doesnt raise a trigger
>ttiex4110m000 Find
79->get.fields
79<-get.fields0ttiex410.paco1ttiex410.comp1ttiex410.cpac1ttiex410.code1ttiex410.clan1ttiex410.clan(2)1ttiex410.clan(3)1ttiex410.clan(4)1ttiex410.clan(5)1ttiex410.clan(6)1
79->def.find
79<-def.find01
<ttiex4110m000 record found (1)
>ttiex4110m000 put.field:ttiex410.paco DF12345
>ttiex4110m000 Find
79->def.find
79<-def.find01
<ttiex4110m000 record found (1)
>ttiex4110m000 set.report
79->set.reportrttiex128001000D
79<-set.report0
<ttiex4110m000
>ttiex4110m000 enum.answer ttiex41101:1
79->enum.answerttiex411011
79<-enum.answer0
>ttiex4110m000 form.command command type: 1 command prog: exec.cont.process
79->form.command1exec.cont.process
80<-api.child.startedttiex1280s00079
79<-form.command0
<ttiex4110m000
>ttiex4110m000 end.session
79->end.program
79<-end.program0
79<-exit.child
Unfortunately still the patch does NOT get created.
Thanks for your help