1. structure

This is a multi-part message in MIME format.

------=_NextPart_000_0027_01C115AA.D6FB46A0
	charset="Windows-1252"

Can someone explain the structure here. EU says screen has a length of =
3..

global sequence screen
  screen =3D {}
  screen =3D append ( screen,{1,3,"Customer Number+ =
",1,1,2,0,5,0,6,0,10})
  screen =3D append (screen,{ 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20})
  screen =3D append (screen,{ 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30})
  screen =3D append (screen,{ 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40})
  screen =3D append (screen,{ 10,7,"City..: ",0,1,6,-99,20,0,0,0,50})
  screen =3D append (screen,{ 40,7,"State: ",0,1,7,99,2,0,0,0,60})

EU says that:

    screen [1][1] is 1
    screen [1][2] is 3
    screen [1][3] is "Customer Number+"

but EU says screen[1][8] is out of bounds and I would have thought it =
would be 5!!

thanks for any ensight...

..george

------=_NextPart_000_0027_01C115AA.D6FB46A0
Content-Type: text/html;
	charset="Windows-1252"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=3D"text/html; charset=3Dwindows-1252" =
http-equiv=3DContent-Type>
<META content=3D"MSHTML 5.00.3105.105" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT size=3D2>Can someone explain the structure here. EU =
says&nbsp;screen=20
has a length of 3..</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>global sequence screen<BR>&nbsp; screen =3D =
{}<BR>&nbsp; screen=20
=3D append ( screen,{1,3,"Customer Number+ =
",1,1,2,0,5,0,6,0,10})<BR>&nbsp; screen=20
=3D append (screen,{ 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20})<BR>&nbsp; =
screen =3D=20
append (screen,{ 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30})<BR>&nbsp; =
screen =3D=20
append (screen,{ 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40})<BR>&nbsp; =
screen =3D=20
append (screen,{ 10,7,"City..: ",0,1,6,-99,20,0,0,0,50})<BR>&nbsp; =
screen =3D=20
append (screen,{ 40,7,"State: ",0,1,7,99,2,0,0,0,60})</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>EU says that:</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][1] is 1</FONT></DIV>
<DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][2] is 3</FONT></DIV>
<DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][3] is "Customer=20
Number+"</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>but EU says screen[1][8] is out of bounds and I =
would have=20
thought it would be 5!!</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>thanks for any ensight...</FONT></DIV>
<DIV>&nbsp;</DIV>

------=_NextPart_000_0027_01C115AA.D6FB46A0--

new topic     » topic index » view message » categorize

2. structure

This is a multi-part message in MIME format.

------=_NextPart_000_003D_01C115B2.5D538080
	charset="Windows-1252"

I have found the problem. There was a short item and EU thinks the =
length of the sequence is the length of the shortest element...

Can someone explain the structure here. EU says screen has a length of =
3..

global sequence screen
  screen =3D {}
  screen =3D append ( screen,{1,3,"Customer Number+ =
",1,1,2,0,5,0,6,0,10})
  screen =3D append (screen,{ 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20})
  screen =3D append (screen,{ 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30})
  screen =3D append (screen,{ 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40})
  screen =3D append (screen,{ 10,7,"City..: ",0,1,6,-99,20,0,0,0,50})
  screen =3D append (screen,{ 40,7,"State: ",0,1,7,99,2,0,0,0,60})
  screen =3D append (screen,{50,7,"(y,n)"})  <----- apparently a short =
item like this sets the length to 3 here...why I don't know!

EU says that:

    screen [1][1] is 1
    screen [1][2] is 3
    screen [1][3] is "Customer Number+"

but EU says screen[1][8] is out of bounds and I would have thought it =
would be 5!!

thanks for any ensight...


------=_NextPart_000_003D_01C115B2.5D538080
Content-Type: text/html;
	charset="Windows-1252"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=3D"text/html; charset=3Dwindows-1252" =
http-equiv=3DContent-Type>
<META content=3D"MSHTML 5.00.3105.105" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT size=3D2>I have found the problem. There was a short item and =
EU thinks=20
the length of the sequence is the length of the shortest =
element...</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>
<DIV><FONT size=3D2>Can someone explain the structure here. EU =
says&nbsp;screen=20
has a length of 3..</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>global sequence screen<BR>&nbsp; screen =3D =
{}<BR>&nbsp; screen=20
=3D append ( screen,{1,3,"Customer Number+ =
",1,1,2,0,5,0,6,0,10})<BR>&nbsp; screen=20
=3D append (screen,{ 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20})<BR>&nbsp; =
screen =3D=20
append (screen,{ 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30})<BR>&nbsp; =
screen =3D=20
append (screen,{ 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40})<BR>&nbsp; =
screen =3D=20
append (screen,{ 10,7,"City..: ",0,1,6,-99,20,0,0,0,50})<BR>&nbsp; =
screen =3D=20
append (screen,{ 40,7,"State: ",0,1,7,99,2,0,0,0,60})</FONT></DIV>
<DIV>&nbsp; screen =3D append (screen,{50,7,"(y,n)"})&nbsp; &lt;----- =
apparently a=20
short item like this sets the length to 3 here...why I don't know!</DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>EU says that:</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][1] is 1</FONT></DIV>
<DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][2] is 3</FONT></DIV>
<DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][3] is "Customer=20
Number+"</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>but EU says screen[1][8] is out of bounds and I =
would have=20
thought it would be 5!!</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>thanks for any ensight...</FONT></DIV>

------=_NextPart_000_003D_01C115B2.5D538080--

new topic     » goto parent     » topic index » view message » categorize

3. Re: structure

This is a multi-part message in MIME format.

------=_NextPart_000_0009_01C11628.C8AF0220
	charset="Windows-1252"

It is 5 on my machine.
Here is the code I executed...


global sequence screen
  screen =3D {}
  screen =3D append ( screen,{1,3,"Customer Number+ =
",1,1,2,0,5,0,6,0,10})
  screen =3D append (screen,{ 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20})
  screen =3D append (screen,{ 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30})
  screen =3D append (screen,{ 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40})
  screen =3D append (screen,{ 10,7,"City..: ",0,1,6,-99,20,0,0,0,50})
  screen =3D append (screen,{ 40,7,"State: ",0,1,7,99,2,0,0,0,60})
=20

=20
?    screen [1][1] --is 1
?    screen [1][2] --is 3
?    screen [1][3] --is "Customer Number+"
?    screen [1][8] --is 5


Maybe you have a subtle bug elsewhere?

  ----- Original Message -----=20
  From: gwalters at sc.rr.com=20
  To: EUforum=20
  Sent: Thursday, July 26, 2001 10:13 PM
  Subject: structure



3..

  global sequence screen
    screen =3D {}
    screen =3D append ( screen,{1,3,"Customer Number+ =
",1,1,2,0,5,0,6,0,10})
    screen =3D append (screen,{ 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20})
    screen =3D append (screen,{ 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30})
    screen =3D append (screen,{ 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40})
    screen =3D append (screen,{ 10,7,"City..: ",0,1,6,-99,20,0,0,0,50})
    screen =3D append (screen,{ 40,7,"State: ",0,1,7,99,2,0,0,0,60})

  EU says that:

      screen [1][1] is 1
      screen [1][2] is 3
      screen [1][3] is "Customer Number+"

  but EU says screen[1][8] is out of bounds and I would have thought it =
would be 5!!

  thanks for any ensight...

  ..george
Or send an email To: EUforum-unsubscribe at topica.com
This email was sent to: ddparnell at bigpond.com



------=_NextPart_000_0009_01C11628.C8AF0220
Content-Type: text/html;
	charset="Windows-1252"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Dwindows-1252">
<META content=3D"MSHTML 5.50.4611.1300" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>It is 5 on my machine.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Here is the code I =
executed...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT size=3D2>global sequence screen<BR>&nbsp; screen =3D =
{}<BR>&nbsp; screen=20
=3D append ( screen,{1,3,"Customer Number+ =
",1,1,2,0,5,0,6,0,10})<BR>&nbsp; screen=20
=3D append (screen,{ 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20})<BR>&nbsp; =
screen =3D=20
append (screen,{ 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30})<BR>&nbsp; =
screen =3D=20
append (screen,{ 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40})<BR>&nbsp; =
screen =3D=20
append (screen,{ 10,7,"City..: ",0,1,6,-99,20,0,0,0,50})<BR>&nbsp; =
screen =3D=20
append (screen,{ 40,7,"State: =
",0,1,7,99,2,0,0,0,60})<BR>&nbsp;</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT size=3D2>&nbsp;<BR>?&nbsp;&nbsp;&nbsp; screen [1][1] --is=20
1<BR>?&nbsp;&nbsp;&nbsp; screen [1][2] --is 3<BR>?&nbsp;&nbsp;&nbsp; =
screen=20
[1][3] --is "Customer Number+"<BR>?&nbsp;&nbsp;&nbsp; screen [1][8] --is =

5<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>Maybe you have a subtle bug =
elsewhere?</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
  <DIV style=3D"FONT: 10pt arial">----- Original Message ----- </DIV>
  <DIV=20
  style=3D"BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: =
black"><B>From:</B>=20
  <A title=3Dgwalters at sc.rr.com=20
  href=3D"mailto:gwalters at sc.rr.com">gwalters at sc.rr.com</A> </DIV>
  <DIV style=3D"FONT: 10pt arial"><B>To:</B> <A =
title=3DEUforum at topica.com=20
  href=3D"mailto:EUforum at topica.com">EUforum</A> </DIV>
  <DIV style=3D"FONT: 10pt arial"><B>Sent:</B> Thursday, July 26, 2001 =
10:13=20
  PM</DIV>
  <DIV style=3D"FONT: 10pt arial"><B>Subject:</B> structure</DIV>
<A =
  <DIV><FONT size=3D2>global sequence screen<BR>&nbsp; screen =3D =
{}<BR>&nbsp;=20
  screen =3D append ( screen,{1,3,"Customer Number+=20
  ",1,1,2,0,5,0,6,0,10})<BR>&nbsp; screen =3D append (screen,{ =
10,4,"Name..:=20
  ",0,1,3,-99,40,0,0,0,20})<BR>&nbsp; screen =3D append (screen,{ =
10,5,"Addr 1:=20
  ",0,1,4,-99,25,0,0,0,30})<BR>&nbsp; screen =3D append (screen,{ =
10,6,"Addr 2:=20
  ",0,1,5,-99,25,0,0,0,40})<BR>&nbsp; screen =3D append (screen,{ =
10,7,"City..:=20
  ",0,1,6,-99,20,0,0,0,50})<BR>&nbsp; screen =3D append (screen,{ =
40,7,"State:=20
  ",0,1,7,99,2,0,0,0,60})</FONT></DIV>
  <DIV>&nbsp;</DIV>
  <DIV><FONT size=3D2>EU says that:</FONT></DIV>
  <DIV>&nbsp;</DIV>
  <DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][1] is 1</FONT></DIV>
  <DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][2] is 3</FONT></DIV>
  <DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][3] is "Customer=20
  Number+"</FONT></DIV>
  <DIV>&nbsp;</DIV>
  <DIV><FONT size=3D2>but EU says screen[1][8] is out of bounds and I =
would have=20
  thought it would be 5!!</FONT></DIV>
  <DIV>&nbsp;</DIV>
  <DIV><FONT size=3D2>thanks for any ensight...</FONT></DIV>
  <DIV>&nbsp;</DIV>
  <DIV><FONT =
size=3D2>..george</FONT></DIV><PRE>=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
<A =
href=3D"http://topica.com/u/?b1dd66.${encoded_sub_id}">http://topica.com/=
u/?b1dd66.b2mL5y</A>
Or send an email To: EUforum-unsubscribe at topica.com
This email was sent to: ddparnell at bigpond.com

<A =

------=_NextPart_000_0009_01C11628.C8AF0220--

new topic     » goto parent     » topic index » view message » categorize

4. Re: structure

This is a multi-part message in MIME format.

------=_NextPart_000_0014_01C11629.8E9E6520
	charset="Windows-1252"

The length of the 7th screen element is 3. If I do a '? length(screen)' =
I get 7. Are you sure you are testing the last element and not the =
first?
  ----- Original Message -----=20
  From: gwalters at sc.rr.com=20
  To: EUforum=20
  Sent: Thursday, July 26, 2001 11:07 PM
  Subject: structure




  Can someone explain the structure here. EU says screen has a length of =
3..

  global sequence screen
    screen =3D {}
    screen =3D append ( screen,{1,3,"Customer Number+ =
",1,1,2,0,5,0,6,0,10})
    screen =3D append (screen,{ 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20})
    screen =3D append (screen,{ 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30})
    screen =3D append (screen,{ 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40})
    screen =3D append (screen,{ 10,7,"City..: ",0,1,6,-99,20,0,0,0,50})
    screen =3D append (screen,{ 40,7,"State: ",0,1,7,99,2,0,0,0,60})
    screen =3D append (screen,{50,7,"(y,n)"})  <----- apparently a short =
item like this sets the length to 3 here...why I don't know!

  EU says that:

      screen [1][1] is 1
      screen [1][2] is 3
      screen [1][3] is "Customer Number+"

  but EU says screen[1][8] is out of bounds and I would have thought it =
would be 5!!

  thanks for any ensight...

This email was sent to: ddparnell at bigpond.com



------=_NextPart_000_0014_01C11629.8E9E6520
Content-Type: text/html;
	charset="Windows-1252"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Dwindows-1252">
<META content=3D"MSHTML 5.50.4611.1300" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>The length of the 7th screen element is =
3. If I do=20
a '? length(screen)' I get 7. Are you sure you are testing the last =
element and=20
not the first?</FONT></DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
  <DIV style=3D"FONT: 10pt arial">----- Original Message ----- </DIV>
  <DIV=20
  style=3D"BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: =
black"><B>From:</B>=20
  <A title=3Dgwalters at sc.rr.com=20
  href=3D"mailto:gwalters at sc.rr.com">gwalters at sc.rr.com</A> </DIV>
  <DIV style=3D"FONT: 10pt arial"><B>To:</B> <A =
title=3DEUforum at topica.com=20
  href=3D"mailto:EUforum at topica.com">EUforum</A> </DIV>
  <DIV style=3D"FONT: 10pt arial"><B>Sent:</B> Thursday, July 26, 2001 =
11:07=20
  PM</DIV>
  <DIV style=3D"FONT: 10pt arial"><B>Subject:</B> structure</DIV>
<A =
  <DIV>&nbsp;</DIV>
  <DIV><FONT size=3D2>
  <DIV><FONT size=3D2>Can someone explain the structure here. EU =
says&nbsp;screen=20
  has a length of 3..</FONT></DIV>
  <DIV>&nbsp;</DIV>
  <DIV><FONT size=3D2>global sequence screen<BR>&nbsp; screen =3D =
{}<BR>&nbsp;=20
  screen =3D append ( screen,{1,3,"Customer Number+=20
  ",1,1,2,0,5,0,6,0,10})<BR>&nbsp; screen =3D append (screen,{ =
10,4,"Name..:=20
  ",0,1,3,-99,40,0,0,0,20})<BR>&nbsp; screen =3D append (screen,{ =
10,5,"Addr 1:=20
  ",0,1,4,-99,25,0,0,0,30})<BR>&nbsp; screen =3D append (screen,{ =
10,6,"Addr 2:=20
  ",0,1,5,-99,25,0,0,0,40})<BR>&nbsp; screen =3D append (screen,{ =
10,7,"City..:=20
  ",0,1,6,-99,20,0,0,0,50})<BR>&nbsp; screen =3D append (screen,{ =
40,7,"State:=20
  ",0,1,7,99,2,0,0,0,60})</FONT></DIV>
  <DIV>&nbsp; screen =3D append (screen,{50,7,"(y,n)"})&nbsp; &lt;----- =
apparently=20
  a short item like this sets the length to 3 here...why I don't =
know!</DIV>
  <DIV>&nbsp;</DIV>
  <DIV><FONT size=3D2>EU says that:</FONT></DIV>
  <DIV>&nbsp;</DIV>
  <DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][1] is 1</FONT></DIV>
  <DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][2] is 3</FONT></DIV>
  <DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp; screen [1][3] is "Customer=20
  Number+"</FONT></DIV>
  <DIV>&nbsp;</DIV>
  <DIV><FONT size=3D2>but EU says screen[1][8] is out of bounds and I =
would have=20
  thought it would be 5!!</FONT></DIV>
  <DIV>&nbsp;</DIV>
  <DIV><FONT size=3D2>thanks for any ensight...</FONT></DIV>
  =
<DIV>&nbsp;</DIV></FONT></DIV><PRE>=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
<A =
href=3D"http://topica.com/u/?b1dd66.${encoded_sub_id}">http://topica.com/=
u/?b1dd66.b2mL5y</A>
Or send an email To: EUforum-unsubscribe at topica.com
This email was sent to: ddparnell at bigpond.com

<A =

------=_NextPart_000_0014_01C11629.8E9E6520--

new topic     » goto parent     » topic index » view message » categorize

5. Re: structure

On Thursday 26 July 2001 08:13, gwalters at sc.rr.com wrote:

> Can someone explain the structure here. EU says screen has a length of 3..
>
> global sequence screen
>   screen = {}
>   screen = append ( screen,{1,3,"Customer Number+ ",1,1,2,0,5,0,6,0,10})
>   screen = append (screen,{ 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20})
>   screen = append (screen,{ 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30})
>   screen = append (screen,{ 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40})
>   screen = append (screen,{ 10,7,"City..: ",0,1,6,-99,20,0,0,0,50})
>   screen = append (screen,{ 40,7,"State: ",0,1,7,99,2,0,0,0,60})
>
> EU says that:
>
>     screen [1][1] is 1
>     screen [1][2] is 3
>     screen [1][3] is "Customer Number+"
>
> but EU says screen[1][8] is out of bounds and I would have thought it would
> be 5!!
>
> thanks for any ensight...

Erm.. I copied and pasted your code, and Eu reports screen[1][8] as 
being 5.  

Regards,
Irv

new topic     » goto parent     » topic index » view message » categorize

6. Re: structure

On Thursday 26 July 2001 09:07, gwalters at sc.rr.com wrote:

> I have found the problem. There was a short item and EU thinks the length
> of the sequence is the length of the shortest element...

No, it doesn't. Eu reports the length of screen, (again, copied and 
pasted from your e-mail, as 7.    That's correct, there are seven 
elements,  
1.Customer No, 
2.Name,  
3.Addr1,  
4.Addr2, 
5.City, 
6.State, 
7.(y/n)

If you ask the length of screen[1], you'll get 12, and the length of 
screen[7] is 3.

Regards,
Irv

> Can someone explain the structure here. EU says screen has a length of 3..
>
> global sequence screen
>   screen = {}
>   screen = append ( screen,{1,3,"Customer Number+ ",1,1,2,0,5,0,6,0,10})
>   screen = append (screen,{ 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20})
>   screen = append (screen,{ 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30})
>   screen = append (screen,{ 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40})
>   screen = append (screen,{ 10,7,"City..: ",0,1,6,-99,20,0,0,0,50})
>   screen = append (screen,{ 40,7,"State: ",0,1,7,99,2,0,0,0,60})
>   screen = append (screen,{50,7,"(y,n)"})  <----- apparently a short item
> like this sets the length to 3 here...why I don't know!

> EU says that:
>
>     screen [1][1] is 1
>     screen [1][2] is 3
>     screen [1][3] is "Customer Number+"
>
> but EU says screen[1][8] is out of bounds and I would have thought it would
> be 5!!
>
> thanks for any ensight...
>

new topic     » goto parent     » topic index » view message » categorize

7. Re: structure


new topic     » goto parent     » topic index » view message » categorize

8. Re: structure

On Thursday 26 July 2001 09:35, gwalters at sc.rr.com wrote:

> irv, you've hit it. each one can have a different length...problem is fixed
> now..thanks all for your input..

That, of course, is one of Euphoria's advantages - you can pack 
pretty much anything you want into a sequence, without any arbitrary 
limits or having to pre-define the space.

As an example, the 'normal' way to implement an A/R system is with 
two files: a customer file containing name, addr, balances, etc.
and a transaction file, with current txns.

With Euphoria, I tend to use just one file, which contains:
(hope my indentation makes it thru EuForum intact)

customer key
  -- customer info 
       -- name
       -- addr
       -- balances
            -- current
            -- 30
            -- 60
            -- 90
  -- customer txns (zero or more)
        -- inv #
        -- date
        -- amt...

As customer makes purchases, the new purchase is just appended to
his/her txns sequence.

Number of transactions can be obtained by calling length(customer[txns])
Customer totals are computed by looping 1... length(txns), etc.

This eliminates a lot of lookups and searching, since everything related 
is located within the one file. It also simplifies things such as deleting 
a customer account:
if length(txns) > 0 
or balance != 0 then
  error("Can't delete active account!")

Backups are simple - one file to copy, as are statements.
Reviewing a customer's account is verrry quick, as well. 

EOM reports are less quick, because you have to loop thru all 
customers and consolidate the data. Usually you're printing these 
reports, so there's plenty of time for processing while the printer 
chugs along.  

Starting a new period is just a matter of adjusting the 30/60/90, 
and then setting customer[x][txns] = {} 

You could keep the entire sequence of customers 'in-memory',
but it's better to store these in a EDS database, since EDS will
handle the lookup logic for you and ensure the use of unique keys
automatically.

Regards,
Irv

new topic     » goto parent     » topic index » view message » categorize

9. Re: structure

interesting...i'll think on it some..

..george

----- Original Message -----
From: <irvm at ellijay.com>
To: "EUforum" <EUforum at topica.com>
Subject: Re: structure


>
>
> On Thursday 26 July 2001 09:35, gwalters at sc.rr.com wrote:
>
> > irv, you've hit it. each one can have a different length...problem is
fixed
> > now..thanks all for your input..
>
> That, of course, is one of Euphoria's advantages - you can pack
> pretty much anything you want into a sequence, without any arbitrary
> limits or having to pre-define the space.
>
> As an example, the 'normal' way to implement an A/R system is with
> two files: a customer file containing name, addr, balances, etc.
> and a transaction file, with current txns.
>
> With Euphoria, I tend to use just one file, which contains:
> (hope my indentation makes it thru EuForum intact)
>
> customer key
>   -- customer info
>        -- name
>        -- addr
>        -- balances
>             -- current
>             -- 30
>             -- 60
>             -- 90
>   -- customer txns (zero or more)
>         -- inv #
>         -- date
>         -- amt...
>
> As customer makes purchases, the new purchase is just appended to
> his/her txns sequence.
>
> Number of transactions can be obtained by calling length(customer[txns])
> Customer totals are computed by looping 1... length(txns), etc.
>
> This eliminates a lot of lookups and searching, since everything related
> is located within the one file. It also simplifies things such as deleting
> a customer account:
> if length(txns) > 0
> or balance != 0 then
>   error("Can't delete active account!")
>
> Backups are simple - one file to copy, as are statements.
> Reviewing a customer's account is verrry quick, as well.
>
> EOM reports are less quick, because you have to loop thru all
> customers and consolidate the data. Usually you're printing these
> reports, so there's plenty of time for processing while the printer
> chugs along.
>
> Starting a new period is just a matter of adjusting the 30/60/90,
> and then setting customer[x][txns] = {}
>
> You could keep the entire sequence of customers 'in-memory',
> but it's better to store these in a EDS database, since EDS will
> handle the lookup logic for you and ensure the use of unique keys
> automatically.
>
> Regards,
> Irv
>
>
>
>
>

new topic     » goto parent     » topic index » view message » categorize

10. Re: structure

Try this instead of the OnPaint method....

--------------
procedure SetupARF020()
integer id

for i = 1 to 99 do
 if screen[i][1] = 99 then
   exit
 end if
 x = screen[i][1]*9-8
 y = screen[i][2]*18-45
 xt = x + length(screen[i][3])*9-10
 yt = y
 if screen[i][8]>0 then
   fl = screen[i][8]*9+9
 else
   fl = 0
 end if
 id = create(LText, screen[i][3],ARF020,x,y, 200, 25, 0)
 setFont(id, "Courier New",9,0)
 lbl = append(lbl,id )
 if fl > 0 then
   id = create(EditText,"",ARF020,xt,yt,fl,20,0)
   setFont(id, "Courier New",8,0)
   sle = append(sle, id)
 end if
end for
end procedure
-- Setup SFM name

SetupARF020()
WinMain(ARF020,Normal)
 -----------

This only creates the controls once and does run every time the window needs
repainting.

----- Original Message -----
From: <gwalters at sc.rr.com>
To: "EUforum" <EUforum at topica.com>
Sent: Friday, July 27, 2001 12:29 AM
Subject: Re: structure


>
>
> interesting...i'll think on it some..
>
> ..george
>
> ----- Original Message -----
> From: <irvm at ellijay.com>
> To: "EUforum" <EUforum at topica.com>
> Sent: Thursday, July 26, 2001 10:21 AM
> Subject: Re: structure
>
>
> >
> >
> > On Thursday 26 July 2001 09:35, gwalters at sc.rr.com wrote:
> >
> > > irv, you've hit it. each one can have a different length...problem is
> fixed
> > > now..thanks all for your input..
> >
> > That, of course, is one of Euphoria's advantages - you can pack
> > pretty much anything you want into a sequence, without any arbitrary
> > limits or having to pre-define the space.
> >
> > As an example, the 'normal' way to implement an A/R system is with
> > two files: a customer file containing name, addr, balances, etc.
> > and a transaction file, with current txns.
> >
> > With Euphoria, I tend to use just one file, which contains:
> > (hope my indentation makes it thru EuForum intact)
> >
> > customer key
> >   -- customer info
> >        -- name
> >        -- addr
> >        -- balances
> >             -- current
> >             -- 30
> >             -- 60
> >             -- 90
> >   -- customer txns (zero or more)
> >         -- inv #
> >         -- date
> >         -- amt...
> >
> > As customer makes purchases, the new purchase is just appended to
> > his/her txns sequence.
> >
> > Number of transactions can be obtained by calling length(customer[txns])
> > Customer totals are computed by looping 1... length(txns), etc.
> >
> > This eliminates a lot of lookups and searching, since everything related
> > is located within the one file. It also simplifies things such as
deleting
> > a customer account:
> > if length(txns) > 0
> > or balance != 0 then
> >   error("Can't delete active account!")
> >
> > Backups are simple - one file to copy, as are statements.
> > Reviewing a customer's account is verrry quick, as well.
> >
> > EOM reports are less quick, because you have to loop thru all
> > customers and consolidate the data. Usually you're printing these
> > reports, so there's plenty of time for processing while the printer
> > chugs along.
> >
> > Starting a new period is just a matter of adjusting the 30/60/90,
> > and then setting customer[x][txns] = {}
> >
> > You could keep the entire sequence of customers 'in-memory',
> > but it's better to store these in a EDS database, since EDS will
> > handle the lookup logic for you and ensure the use of unique keys
> > automatically.
> >
> > Regards,
> > Irv
> >
> >
> >
> >
> >
>
>
>
>
>

new topic     » goto parent     » topic index » view message » categorize

11. Re: structure

Also, can I suggest another way of defining your structure...

global sequence screen
  screen = {
  { 1,3,"Customer Number+ ",1,1,2,0,5,0,6,0,10},
  { 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20},
  { 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30},
  { 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40},
  { 10,7,"City..: ",0,1,6,-99,20,0,0,0,50},
  { 40,7,"State: ",0,1,7,99,2,0,0,0,60},
  { 53,7,"Zip: ",0,1,8,99,10,0,0,0,70},
  { 1,9,"Contact Nbr 1..: ",0,1,10,-99,30,0,0,0,80},
  { 1,10,"Contact Nbr 2..: ",0,1,11,-99,30,0,0,0,90},
  { 50,9,"Phone: ",0,1,9,99,17,0,0,0,100},
  { 50,10,"FAX..: ",0,1,32,99,17,0,0,0,110},
  { 50,11,"Email: ",0,1,34,-99,24,0,11,0,110},
  { 1,12,"Salesman Number: ",1,1,12,0,3,0,12,0,120},
  { 1,13,"Statements(Y/N): ",1,1,23,96,1,0,0,5,130},
  { 1,14,"Tax Auth Code..+ ",1,1,24,99,2,0,4,1,140},
  { 25,14,"Taxable: ",1,1,30,96,1,0,0,2,150},
  { 36,14,"(Y/N)",0,0,0,0,0,0,0,0,0},
  { 1,15,"Tax Id.........: ",0,1,33,99,16,0,0,0,150},
  { 1,16,"Default Shp Via+ ",1,1,42,99,2,0,7,0,190},
  { 25,16,"FOB....+ ",1,1,43,99,2,0,8,0,190},
  {1,17,"Customer Group.: ",0,1,26,99,2,0,0,0,160},
  {1,18,"Cust Price Lvl.: ",1,1,14,0,2,0,2,3,170},
  {25,18,"Prod Price Tbl: ",0,1,31,99,2,0,9,0,180},
  {1,19,"Payment Terms..+ ",1,1,29,99,2,0,5,0,190},
  {1,20,"Credit Limit...: ",0,1,27,2,10,0,0,0,200},
  {1,21,"Fin Chg (Y/N)..: ",1,1,25,96,1,0,0,4,210},
  {25,21,"Bill-to Cust #: ",0,1,13,0,5,0,3,0,220},
  {1,22,"Elec. Invoice..: ",0,1,35,99,1,0,10,0,220},
  {21,22,"(N,E,F)",0,0,0,0,0,0,0,0,0},
  {50,12,"Last Invoice Dt.: ",0,1,15,98,8,1,0,0,230},
  {50,13,"Last Invoice Amt: ",0,1,16,2,9,1,0,0,240},
  {50,14,"Last Payment Dt.: ",0,1,17,98,8,1,0,0,250},
  {50,15,"Last Payment Amt: ",0,1,18,2,9,1,0,0,260},
  {50,17,"Avg Days to Pay.: ",0,1,21,0,4,1,0,0,270},
  {50,18,"Invoices Paid...: ",0,1,20,0,4,1,0,0,280},
  {50,19,"Current Balance.: ",0,1,22,2,9,1,0,0,290},
  {50,20,"YTD Sales.......: ",0,1,19,2,9,1,0,0,300},
  {50,21,"Last Year Sales.: ",0,1,28,2,9,1,0,0,310},
  {50,22,"Date Cust Added.:  ",0,1,38,98,8,0,1,0,310},
  {99,0,"",0,0,0,0,0,0,0,0,0}
        }

this is probably faster than all those append statements.

----- Original Message -----
From: <gwalters at sc.rr.com>
To: "EUforum" <EUforum at topica.com>
Sent: Friday, July 27, 2001 12:29 AM
Subject: Re: structure


> >
>
> interesting...i'll think on it some..
>
> ..george
>
> ----- Original Message -----
> From: <irvm at ellijay.com>
> To: "EUforum" <EUforum at topica.com>
> Sent: Thursday, July 26, 2001 10:21 AM
> Subject: Re: structure
>
>
> >
> >
> > On Thursday 26 July 2001 09:35, gwalters at sc.rr.com wrote:
> >
> > > irv, you've hit it. each one can have a different length...problem is
> fixed
> > > now..thanks all for your input..
> >
> > That, of course, is one of Euphoria's advantages - you can pack
> > pretty much anything you want into a sequence, without any arbitrary
> > limits or having to pre-define the space.
> >
> > As an example, the 'normal' way to implement an A/R system is with
> > two files: a customer file containing name, addr, balances, etc.
> > and a transaction file, with current txns.
> >
> > With Euphoria, I tend to use just one file, which contains:
> > (hope my indentation makes it thru EuForum intact)
> >
> > customer key
> >   -- customer info
> >        -- name
> >        -- addr
> >        -- balances
> >             -- current
> >             -- 30
> >             -- 60
> >             -- 90
> >   -- customer txns (zero or more)
> >         -- inv #
> >         -- date
> >         -- amt...
> >
> > As customer makes purchases, the new purchase is just appended to
> > his/her txns sequence.
> >
> > Number of transactions can be obtained by calling length(customer[txns])
> > Customer totals are computed by looping 1... length(txns), etc.
> >
> > This eliminates a lot of lookups and searching, since everything related
> > is located within the one file. It also simplifies things such as
deleting
> > a customer account:
> > if length(txns) > 0
> > or balance != 0 then
> >   error("Can't delete active account!")
> >
> > Backups are simple - one file to copy, as are statements.
> > Reviewing a customer's account is verrry quick, as well.
> >
> > EOM reports are less quick, because you have to loop thru all
> > customers and consolidate the data. Usually you're printing these
> > reports, so there's plenty of time for processing while the printer
> > chugs along.
> >
> > Starting a new period is just a matter of adjusting the 30/60/90,
> > and then setting customer[x][txns] = {}
> >
> > You could keep the entire sequence of customers 'in-memory',
> > but it's better to store these in a EDS database, since EDS will
> > handle the lookup logic for you and ensure the use of unique keys
> > automatically.
> >
> > Regards,
> > Irv
> >
> >
> >
> >
> >
>
>
>
> >
> >

new topic     » goto parent     » topic index » view message » categorize

12. Re: structure

that's very neat... thanks..

..george

----- Original Message -----
From: "Derek Parnell" <ddparnell at bigpond.com>
To: "EUforum" <EUforum at topica.com>
Subject: Re: structure


>
>
> Also, can I suggest another way of defining your structure...
>
> global sequence screen
>   screen = {
>   { 1,3,"Customer Number+ ",1,1,2,0,5,0,6,0,10},
>   { 10,4,"Name..: ",0,1,3,-99,40,0,0,0,20},
>   { 10,5,"Addr 1: ",0,1,4,-99,25,0,0,0,30},
>   { 10,6,"Addr 2: ",0,1,5,-99,25,0,0,0,40},
>   { 10,7,"City..: ",0,1,6,-99,20,0,0,0,50},
>   { 40,7,"State: ",0,1,7,99,2,0,0,0,60},
>   { 53,7,"Zip: ",0,1,8,99,10,0,0,0,70},
>   { 1,9,"Contact Nbr 1..: ",0,1,10,-99,30,0,0,0,80},
>   { 1,10,"Contact Nbr 2..: ",0,1,11,-99,30,0,0,0,90},
>   { 50,9,"Phone: ",0,1,9,99,17,0,0,0,100},
>   { 50,10,"FAX..: ",0,1,32,99,17,0,0,0,110},
>   { 50,11,"Email: ",0,1,34,-99,24,0,11,0,110},
>   { 1,12,"Salesman Number: ",1,1,12,0,3,0,12,0,120},
>   { 1,13,"Statements(Y/N): ",1,1,23,96,1,0,0,5,130},
>   { 1,14,"Tax Auth Code..+ ",1,1,24,99,2,0,4,1,140},
>   { 25,14,"Taxable: ",1,1,30,96,1,0,0,2,150},
>   { 36,14,"(Y/N)",0,0,0,0,0,0,0,0,0},
>   { 1,15,"Tax Id.........: ",0,1,33,99,16,0,0,0,150},
>   { 1,16,"Default Shp Via+ ",1,1,42,99,2,0,7,0,190},
>   { 25,16,"FOB....+ ",1,1,43,99,2,0,8,0,190},
>   {1,17,"Customer Group.: ",0,1,26,99,2,0,0,0,160},
>   {1,18,"Cust Price Lvl.: ",1,1,14,0,2,0,2,3,170},
>   {25,18,"Prod Price Tbl: ",0,1,31,99,2,0,9,0,180},
>   {1,19,"Payment Terms..+ ",1,1,29,99,2,0,5,0,190},
>   {1,20,"Credit Limit...: ",0,1,27,2,10,0,0,0,200},
>   {1,21,"Fin Chg (Y/N)..: ",1,1,25,96,1,0,0,4,210},
>   {25,21,"Bill-to Cust #: ",0,1,13,0,5,0,3,0,220},
>   {1,22,"Elec. Invoice..: ",0,1,35,99,1,0,10,0,220},
>   {21,22,"(N,E,F)",0,0,0,0,0,0,0,0,0},
>   {50,12,"Last Invoice Dt.: ",0,1,15,98,8,1,0,0,230},
>   {50,13,"Last Invoice Amt: ",0,1,16,2,9,1,0,0,240},
>   {50,14,"Last Payment Dt.: ",0,1,17,98,8,1,0,0,250},
>   {50,15,"Last Payment Amt: ",0,1,18,2,9,1,0,0,260},
>   {50,17,"Avg Days to Pay.: ",0,1,21,0,4,1,0,0,270},
>   {50,18,"Invoices Paid...: ",0,1,20,0,4,1,0,0,280},
>   {50,19,"Current Balance.: ",0,1,22,2,9,1,0,0,290},
>   {50,20,"YTD Sales.......: ",0,1,19,2,9,1,0,0,300},
>   {50,21,"Last Year Sales.: ",0,1,28,2,9,1,0,0,310},
>   {50,22,"Date Cust Added.:  ",0,1,38,98,8,0,1,0,310},
>   {99,0,"",0,0,0,0,0,0,0,0,0}
>         }
>
> this is probably faster than all those append statements.
>
> ----- Original Message -----
> From: <gwalters at sc.rr.com>
> To: "EUforum" <EUforum at topica.com>
> Sent: Friday, July 27, 2001 12:29 AM
> Subject: Re: structure
>
>
> > >
> >
> > interesting...i'll think on it some..
> >
> > ..george
> >
> > ----- Original Message -----
> > From: <irvm at ellijay.com>
> > To: "EUforum" <EUforum at topica.com>
> > Sent: Thursday, July 26, 2001 10:21 AM
> > Subject: Re: structure
> >
> >
> > >
> > >
> > > On Thursday 26 July 2001 09:35, gwalters at sc.rr.com wrote:
> > >
> > > > irv, you've hit it. each one can have a different length...problem
is
> > fixed
> > > > now..thanks all for your input..
> > >
> > > That, of course, is one of Euphoria's advantages - you can pack
> > > pretty much anything you want into a sequence, without any arbitrary
> > > limits or having to pre-define the space.
> > >
> > > As an example, the 'normal' way to implement an A/R system is with
> > > two files: a customer file containing name, addr, balances, etc.
> > > and a transaction file, with current txns.
> > >
> > > With Euphoria, I tend to use just one file, which contains:
> > > (hope my indentation makes it thru EuForum intact)
> > >
> > > customer key
> > >   -- customer info
> > >        -- name
> > >        -- addr
> > >        -- balances
> > >             -- current
> > >             -- 30
> > >             -- 60
> > >             -- 90
> > >   -- customer txns (zero or more)
> > >         -- inv #
> > >         -- date
> > >         -- amt...
> > >
> > > As customer makes purchases, the new purchase is just appended to
> > > his/her txns sequence.
> > >
> > > Number of transactions can be obtained by calling
length(customer[txns])
> > > Customer totals are computed by looping 1... length(txns), etc.
> > >
> > > This eliminates a lot of lookups and searching, since everything
related
> > > is located within the one file. It also simplifies things such as
> deleting
> > > a customer account:
> > > if length(txns) > 0
> > > or balance != 0 then
> > >   error("Can't delete active account!")
> > >
> > > Backups are simple - one file to copy, as are statements.
> > > Reviewing a customer's account is verrry quick, as well.
> > >
> > > EOM reports are less quick, because you have to loop thru all
> > > customers and consolidate the data. Usually you're printing these
> > > reports, so there's plenty of time for processing while the printer
> > > chugs along.
> > >
> > > Starting a new period is just a matter of adjusting the 30/60/90,
> > > and then setting customer[x][txns] = {}
> > >
> > > You could keep the entire sequence of customers 'in-memory',
> > > but it's better to store these in a EDS database, since EDS will
> > > handle the lookup logic for you and ensure the use of unique keys
> > > automatically.
> > >
> > > Regards,
> > > Irv
> > >
> > >
> > >
> > >
> > >
> >
> >
> >
> > >
> > >
>
>
>
>
>

new topic     » goto parent     » topic index » view message » categorize

Search



Quick Links

User menu

Not signed in.

Misc Menu