Also, if you want to pass in @PARMS (not @PARAMS(NN)) from a dictionary
Derived field: B('P.CALLSYSS9075.1,VIA,':SHIP_VIA)
Your subroutine should look like this:
Subroutine SYSS9075.1
include DMSKELCODE COMMON
type = field(PARMS,',',1)
shipVia = field(PARMS,',',2)
Etc
However this wil only work from within an SB+ account. If you ever need to call
the dictionary from a non-SB+ environment (eg a uniobjects session) use the
method below.
Cheers
Stuart
-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Boydell, Stuart
Sent: Sunday, 23 May 2010 08:27
To: U2 Users List
Subject: Re: [U2] SB Dict with User Subroutine and TCL
If the first parameter of your subroutine is the return value then you can just
use a SB+ derived field like: I(SUBR('SYSS9075.1','VIA',SHIP_VIA))
Your subroutine should look like this:
Subroutine SYSS9075.1(retVal,type,shipVia)
Etc
Stuart Boydell
-----Original Message-----
I need help building a SB Dict that calls a User Subroutine with several
arguments. This needs to work from both within SB screens and from TCL.
Originally, I have a derived field defined as:
(B("SYSS9075.1,'VIA',SHIP_VIA"))
where SYSS9075.1 had three arguments, 'VIA' was hard coded and SHIP_VIA was
whatever value was in that field (in this case, field 10). This worked fine
from TCL, but SB was blowing up with an error about incorrect number of
arguments (and would likely not have a clue what SHIP_VIA meant).
I then tried:
(B("SYSS9075.1,'VIA','10'"))
where SYSS9075.1 had no arguments, and extract the info from PARAMS. This
works from SB screens, but I am clueless how to pass the arguments in the DICT
used at TCL.
Any Gurus out there have a suggestion or two?
John Israel
Senior Programmer/Analyst
Dayton Superior Corporation
721 Richard St.
Miamisburg, OH 45342
937-866-0711 x44380
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
