.ARG_PASSED() refinements

Print Thread

.ARG_PASSED() refinements #37866 14 Mar 25 12:15 PM
Joined: Jun 2001 Posts: 11,924 Woodland Hills, CA J Jack McGregor OP Member
OP Jack McGregor Member J Joined: Jun 2001 Posts: 11,924 Woodland Hills, CA	FYI, 7.0.1770.2 (compiler 1065) implements a couple of refinements to the behavior of the .ARG_PASSED() function. See the notes below for details: ash70notes.txt compil-7.0.1065-w32.zip ash-7.0.1770.2-w32-upd.zip ash-7.0.1770.2-w32c-upd.zip ash-7.0.1770.2-el7-upd.tz ash-7.0.1770.2-el7-x86_64-upd.tz ash-7.0.1770.2-d12-x86_64-upd.tz ash-7.0.1770.2-el9-upd.tz Also, if you're using any of the .ARG_xxx() functions, you should pull down the latest ashell.def from the SOSLIB repository

Re: .ARG_PASSED() refinements [Re: Jack McGregor] #37867 14 Mar 25 02:49 PM

Joined: Aug 2016

Posts: 403

NW Arkansas

John Andreasen Online Content

Member

John Andreasen

Member

Joined: Aug 2016

Posts: 403

NW Arkansas

Hi Jack,

I am getting illegal subscript errors when I try to compile.

Code

DDSAS:PRGRES.GEN[160,3]:350: ?Illegal subscript  - IF NOT .ISNULL($cntlnames(key$)) THEN

Code

PRIVATE DIMX $cntlnames_post,ordmap(varstr;varstr)
...
FUNCTION fn'dlg'prgres_dialog_control_exists(cntlname$="" as s0:INPUTONLY,cntlnum=0 as f8:INPUTONLY) as f8
MAP1 func$,s,0,.LAST_ROUTINE
MAP1 key$,s,0

	trace.print (2, "cntlnames") + func$ + " cntlnum=["+cntlnum+"] cntlname$=["+cntlname$+"]"
	.fn = False
	IF ((cntlnum = 0) AND (cntlname$ = "")) THEN
		CALL dlg'prgres_error_msg("","Control Number or Name must be passed!", func$)
	ELSEIF (cntlname$ # "") THEN
		key$ = edit$(cntlname$, 40)
		IF NOT .ISNULL($cntlnames(key$)) THEN
			cntlnum = val($cntlnames(key$))
...

Let me know if you need a better example.

Last edited by John Andreasen; 14 Mar 25 02:50 PM.

Re: .ARG_PASSED() refinements [Re: Jack McGregor] #37868 14 Mar 25 04:35 PM
Joined: Jun 2001 Posts: 11,924 Woodland Hills, CA J Jack McGregor OP Member
OP Jack McGregor Member J Joined: Jun 2001 Posts: 11,924 Woodland Hills, CA	Apparently not enough testing on my end! Sorry about that. Turned out to be an 'else' that got accidentally commented out during some code cleanup. Let's try again with 1770.3 ... ash70notes.txt compil-7.0.1066-w32.zip ash-7.0.1770.3-w32-upd.zip ash-7.0.1770.3-w32c-upd.zip ash-7.0.1770.3-el7-upd.tz ash-7.0.1770.3-el7-x86_64-upd.tz ash-7.0.1770.3-d12-x86_64-upd.tz ash-7.0.1770.2-el9-upd.tz ash-7.0.1770.2-cs8-upd.tz Also, if you're using any of the .ARG_xxx() functions, you should pull down the latest ashell.def from the SOSLIB repository Last edited by Jack McGregor; 14 Mar 25 04:45 PM. Reason: Added -cs8

Re: .ARG_PASSED() refinements [Re: Jack McGregor] #37869 14 Mar 25 04:38 PM
Joined: Aug 2016 Posts: 403 NW Arkansas J John Andreasen Member
John Andreasen Member J Joined: Aug 2016 Posts: 403 NW Arkansas	It is working now. Thanks

Moderated by Jack McGregor, Ty Griffin