BigJohn
1st May 2002, 20:59
Gordon/Steve/Krishna,
I changed the start option to get defaults.
It was working yesterday ... I was excited all day long.
But today when I tried to run it with some other values it failed.

So ... I guess the problem still persists.

We are using Baan IV c3.

o/p of ba6.1 - v is as shown below

Please advice ... my users are killing me !!!

Thanks
Big John

-------------------------------------------------------

Portingset : 6.1c.06.02
Port no. : PA.1735
Date : Wed Jul 25 16:31:08 MET DST 2001
Uname : SunOS sun 5.5.1 Generic_103640-31 sun4m sparc SUNW,SPARCstation-20
Machine-id : SUN_SPARC
OS-release : SOLARIS2.5.1
CFLAGS : -xtarget=ultra -xO3 -xdepend -xlibmil -I/port.6.1c.06.02/vobs/tt/h
eaders -I/port.6.1c.06.02/vobs/tt/ba/cu_4 -I/port.6.1c.06.02/vobs/tt/lib/ds_1 -I
/port.6.1c.06.02/vobs/tt/lib/mb -I/port.6.1c.06.02/vobs/tt/lib/al_1 -DSUN_SPARC
-DSOLARIS2_5 -DREL6_1 -DSTD_NLS -DTTYBUG -DINCLSTDLIB -DSYSV_PT -DFORCED_ALIGN -
I/usr/openwin/include -Dfork=fork1 -DSOLARIS -D_TSS -DSOCKET -DLOCAL_SOCKET -DPI
PE -DMQ -DSHM -DUNIQUE -DDWORDSIZ -DDIRENT -DCUSERIDBUG -DVOID_PTR -DSCANF_OK -D
SYSMEMFUN -DIS_OPEN_BUG -DSLOTIO -DWRITEV -DHIGH_LOW -DWAITPID -DNOWAIT3 -DSIGNA
L_TYPE=void -DSEM_LOCK
LOADFLAGS : -xO3 -L/usr/openwin/lib
-------------------------------------------------------

mark_h
1st May 2002, 21:38
Hello BigJohn!

I thought it was time to split the thread since your problem appears to be a little different.

Also how about a little more info - like what session and possibly a snippet of the find. This may help me or someone else solve the problem.

Good Luck!!

Mark

mark_h
1st May 2002, 22:51
Just so you all know. I do have one function server that works that has "find" as it's start option. The session is ticpr9152m00b(Maintain Mauc). I am posting a snippet of the code and the library I get from ttstpcreatdll.


| Attempt to locate the part in mauc table.
f9152m00b.put.Item(adj.item)
f9152m00b.put.Project(adj.proj)
f9152m00b.put.MBCS_indicator(adj.mbcs)
rc = f9152m00b.set.view()
if(rc<>1) then
msg = "No view for part/project/mbcs."
rc = seq.close(maucfile)
f9152m00b.end()
return(0)
endif

| Find first CPC Code for adjustment.
rc = f9152m00b.first()
if(rc<>1) then
msg = "No CPC's found for part."
rc = seq.close(maucfile)
f9152m00b.end()
return(0)
endif


And this is from the library:

function extern long f9152m00b.set.view( )
{
DLLUSAGE
Function to define another view in session ticpr9152m00b
ENDDLLUSAGE
return( stpapi.change.view( "ticpr9152m00b" ) )
}


Thought I would include this. I am also going to be developing one for tppss9161m00b(Maintain Manufacturing Dependent Demand). This should be interesting since I have modified the session with a qkey program. It will be interesting to see if the function server will update my new table from the session.

Mark

ekrishna
2nd May 2002, 18:24
Mark

Please set the AFS Log and let us know what the log file entries are when u run the script.

Thanks
Krishna

mark_h
2nd May 2002, 20:02
Here is a list of the log from the current FS I am working on. So far all it does is a find using tppss9161m00b. This session has find as its start option. I have to finish this quick.

The maintain MAUC function server requires me to do some research before I can run a test. This FS actually adjusts inventory off of one peg and on to another. The MAUC must remain the same for the PEG that loses the inventory. So I track it and modify it after losing the inventory. There are reasons for this, but that is another story.

Here is the log:

LOGGING STARTED
05-02-2002
6->get.fields
6<-get.fields0tppss961.cprj1tppdm600.desc0tppss961.cspa1tpptc100.desc0tppss961.s
ern1tpptc100.stat0tppss961.seqn1tppss961.orno1tppss961.pono1tppss961.ponb1tppss9
61.item0tiitm001.dsca0tppss961.ccot0tppss961.butm0tipgc800.dsca0tppss961.sbtm0ti
pgc805.dsca0tppss961.prog0tipgc002.desc0tppss961.eser0tppss961.eseq0tppss961.pdd
t1tiitm001.cuni0tppss961.cqan0tiitm001.cuni0tppss961.oqan1tiitm001.cuni0tppss961
.dqan0tppss961.cwar0tiitm001.cuni0tppss961.aqan0tppss961.stat0key.code1txta.yn0
>tppss9161m00b put.field:tppss961.cprj LSIM0
>tppss9161m00b Find
6->def.find
6<-def.find01
<tppss9161m00b record found (1)
>tppss9161m00b get.field:tppss961.cprj
<tppss9161m00b get.field:tppss961.cprj= LSIM0
>tppss9161m00b get.field:tppss961.cspa
<tppss9161m00b get.field:tppss961.cspa= 1000
>tppss9161m00b end.session
6->end.program
6<-end.program1


Mark