Rocksolid Light

Welcome to RetroBBS

mail  files  register  newsreader  groups  login

Message-ID:  

Somebody's terminal is dropping bits. I found a pile of them over in the corner.

devel / comp.lang.clipper.visual-objects / Data Type Error Argument 6 FWriteline

SubjectAuthor
* Data Type Error Argument 6 FWritelinejrol...@gmail.com
+* Re: Data Type Error Argument 6 FWritelineD.J.W. van Kooten
|`- Re: Data Type Error Argument 6 FWritelinejrol...@gmail.com
`- Re: Data Type Error Argument 6 FWritelineSteve

1
Data Type Error Argument 6 FWriteline

<7027b753-2806-4291-80cc-79b2746d9b37n@googlegroups.com>

  copy mid

https://www.rocksolidbbs.com/devel/article-flat.php?id=997&group=comp.lang.clipper.visual-objects#997

  copy link   Newsgroups: comp.lang.clipper.visual-objects
X-Received: by 2002:a05:620a:e0c:: with SMTP id y12mr6039101qkm.109.1640387209947;
Fri, 24 Dec 2021 15:06:49 -0800 (PST)
X-Received: by 2002:a05:620a:2949:: with SMTP id n9mr5919172qkp.39.1640387209693;
Fri, 24 Dec 2021 15:06:49 -0800 (PST)
Path: i2pn2.org!i2pn.org!weretis.net!feeder6.news.weretis.net!news.misty.com!border2.nntp.dca1.giganews.com!nntp.giganews.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.clipper.visual-objects
Date: Fri, 24 Dec 2021 15:06:49 -0800 (PST)
Injection-Info: google-groups.googlegroups.com; posting-host=101.166.37.163; posting-account=eMWFMQoAAADaPtL6doi-G2M9FDy4zXzQ
NNTP-Posting-Host: 101.166.37.163
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <7027b753-2806-4291-80cc-79b2746d9b37n@googlegroups.com>
Subject: Data Type Error Argument 6 FWriteline
From: jrollo64@gmail.com (jrol...@gmail.com)
Injection-Date: Fri, 24 Dec 2021 23:06:49 +0000
Content-Type: text/plain; charset="UTF-8"
Lines: 19
 by: jrol...@gmail.com - Fri, 24 Dec 2021 23:06 UTC

Hi I'm getting a "Function: _GET_LONG" error (Type String, requested type LONGINT)

What am I missing please? Heres the code involved:

For i := 1 to oDb:Fcount
AAdd(aRay, {oDb:FieldInfo(DBS_NAME, i), oDb:FieldInfo(DBS_TYPE, i), oDb:FieldInfo(DBS_LEN, i), oDb:FieldInfo(DBS_DEC, i)})
FWriteLine(ptrHandle, "AAdd(aDBF,{ " + '"' + AllTrim(oDb:FieldInfo(DBS_NAME, i)) + '", ' + '"' + AllTrim(oDb:FieldInfo(DBS_TYPE, i)) + '", ' + AllTrim(Str(oDb:FieldInfo(DBS_LEN, i))) + ', ' , AllTrim(Str(oDb:FieldInfo(DBS_DEC, i))))
? "AAdd(aDBF,{ " + '"' + AllTrim(oDb:FieldInfo(DBS_NAME, i)) + '", ' + '"' + AllTrim(oDb:FieldInfo(DBS_TYPE, i)) + '", ' + AllTrim(Str(oDb:FieldInfo(DBS_LEN, i))) + ', ' , AllTrim(Str(oDb:FieldInfo(DBS_DEC, i)))
Next

This line of code gives the error,
FWriteLine(ptrHandle, "AAdd(aDBF,{ " + '"' + AllTrim(oDb:FieldInfo(DBS_NAME, i)) + '", ' + '"' + AllTrim(oDb:FieldInfo(DBS_TYPE, i)) + '", ' + AllTrim(Str(oDb:FieldInfo(DBS_LEN, i))) + ', ' , AllTrim(Str(oDb:FieldInfo(DBS_DEC, i))))

While this line does not and works fine
? "AAdd(aDBF,{ " + '"' + AllTrim(oDb:FieldInfo(DBS_NAME, i)) + '", ' + '"' + AllTrim(oDb:FieldInfo(DBS_TYPE, i)) + '", ' + AllTrim(Str(oDb:FieldInfo(DBS_LEN, i))) + ', ' , AllTrim(Str(oDb:FieldInfo(DBS_DEC, i)))

What am I missing please?

Re: Data Type Error Argument 6 FWriteline

<f2qcsgdq7h51g72n176p48st6ejikfi44t@4ax.com>

  copy mid

https://www.rocksolidbbs.com/devel/article-flat.php?id=998&group=comp.lang.clipper.visual-objects#998

  copy link   Newsgroups: comp.lang.clipper.visual-objects
Path: i2pn2.org!i2pn.org!aioe.org!EkPdo1gWLtWTKO760KWasQ.user.46.165.242.91.POSTED!not-for-mail
From: vankooten@removethis.ic2.com (D.J.W. van Kooten)
Newsgroups: comp.lang.clipper.visual-objects
Subject: Re: Data Type Error Argument 6 FWriteline
Date: Sat, 25 Dec 2021 01:44:54 +0100
Organization: IC2
Message-ID: <f2qcsgdq7h51g72n176p48st6ejikfi44t@4ax.com>
References: <7027b753-2806-4291-80cc-79b2746d9b37n@googlegroups.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Injection-Info: gioia.aioe.org; logging-data="61903"; posting-host="EkPdo1gWLtWTKO760KWasQ.user.gioia.aioe.org"; mail-complaints-to="abuse@aioe.org";
X-Notice: Filtered by postfilter v. 0.9.2
X-Newsreader: Forte Free Agent 3.1/32.783
 by: D.J.W. van Kooten - Sat, 25 Dec 2021 00:44 UTC

Replying on message of Fri, 24 Dec 2021 15:06:49 -0800 (PST) from
jrol...@gmail.com:

Hello jrol...@gmail.com

>What am I missing please?

Not an obvious one. I would first assign the line to a string variable
and then see if FWriteLine(ptrHandle,cString) works. If not, replace
the string with something simple.

FWriteLine is not strong typed and you do not need to supply nCount as
this will then take the length of the string. So a longint requested
error doesn't directly make sense.

Maybe something is wrong with the string due to the construction with
single and double quots and this should become clear by assigning to a
string variable (and then add to it part by part)

Dick

Re: Data Type Error Argument 6 FWriteline

<d8d88ddc-6cad-4ed6-9296-cec39fe52d88n@googlegroups.com>

  copy mid

https://www.rocksolidbbs.com/devel/article-flat.php?id=1001&group=comp.lang.clipper.visual-objects#1001

  copy link   Newsgroups: comp.lang.clipper.visual-objects
X-Received: by 2002:ac8:5e4d:: with SMTP id i13mr13208206qtx.232.1640568631891;
Sun, 26 Dec 2021 17:30:31 -0800 (PST)
X-Received: by 2002:a05:620a:461e:: with SMTP id br30mr10656440qkb.363.1640568631704;
Sun, 26 Dec 2021 17:30:31 -0800 (PST)
Path: i2pn2.org!i2pn.org!weretis.net!feeder6.news.weretis.net!news.misty.com!border2.nntp.dca1.giganews.com!nntp.giganews.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.clipper.visual-objects
Date: Sun, 26 Dec 2021 17:30:31 -0800 (PST)
In-Reply-To: <f2qcsgdq7h51g72n176p48st6ejikfi44t@4ax.com>
Injection-Info: google-groups.googlegroups.com; posting-host=101.166.37.163; posting-account=eMWFMQoAAADaPtL6doi-G2M9FDy4zXzQ
NNTP-Posting-Host: 101.166.37.163
References: <7027b753-2806-4291-80cc-79b2746d9b37n@googlegroups.com> <f2qcsgdq7h51g72n176p48st6ejikfi44t@4ax.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <d8d88ddc-6cad-4ed6-9296-cec39fe52d88n@googlegroups.com>
Subject: Re: Data Type Error Argument 6 FWriteline
From: jrollo64@gmail.com (jrol...@gmail.com)
Injection-Date: Mon, 27 Dec 2021 01:30:31 +0000
Content-Type: text/plain; charset="UTF-8"
Lines: 20
 by: jrol...@gmail.com - Mon, 27 Dec 2021 01:30 UTC

On Saturday, 25 December 2021 at 11:44:55 UTC+11, D.J.W. van Kooten wrote:
> Replying on message of Fri, 24 Dec 2021 15:06:49 -0800 (PST) from
> jrol...@gmail.com:
>
>
> Hello jrol...@gmail.com
> >What am I missing please?
> Not an obvious one. I would first assign the line to a string variable
> and then see if FWriteLine(ptrHandle,cString) works. If not, replace
> the string with something simple.
>
> FWriteLine is not strong typed and you do not need to supply nCount as
> this will then take the length of the string. So a longint requested
> error doesn't directly make sense.
>
> Maybe something is wrong with the string due to the construction with
> single and double quots and this should become clear by assigning to a
> string variable (and then add to it part by part)
>
> Dick
Thank you very much Dick, you were correct, assigning the string to a variable solved it. Thank you again

Re: Data Type Error Argument 6 FWriteline

<c7f28226-0f5c-4ac5-9d9f-09a4bfffd52bn@googlegroups.com>

  copy mid

https://www.rocksolidbbs.com/devel/article-flat.php?id=1002&group=comp.lang.clipper.visual-objects#1002

  copy link   Newsgroups: comp.lang.clipper.visual-objects
X-Received: by 2002:a05:6214:cc2:: with SMTP id 2mr14132907qvx.90.1640599687870;
Mon, 27 Dec 2021 02:08:07 -0800 (PST)
X-Received: by 2002:a05:6214:d01:: with SMTP id 1mr13529190qvh.6.1640599687695;
Mon, 27 Dec 2021 02:08:07 -0800 (PST)
Path: i2pn2.org!i2pn.org!weretis.net!feeder6.news.weretis.net!news.misty.com!border2.nntp.dca1.giganews.com!nntp.giganews.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.clipper.visual-objects
Date: Mon, 27 Dec 2021 02:08:07 -0800 (PST)
In-Reply-To: <7027b753-2806-4291-80cc-79b2746d9b37n@googlegroups.com>
Injection-Info: google-groups.googlegroups.com; posting-host=94.8.13.252; posting-account=X-YWaQkAAADkLdB63XraXX0zZsgL1dTE
NNTP-Posting-Host: 94.8.13.252
References: <7027b753-2806-4291-80cc-79b2746d9b37n@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <c7f28226-0f5c-4ac5-9d9f-09a4bfffd52bn@googlegroups.com>
Subject: Re: Data Type Error Argument 6 FWriteline
From: semmett1955@gmail.com (Steve)
Injection-Date: Mon, 27 Dec 2021 10:08:07 +0000
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
Lines: 52
 by: Steve - Mon, 27 Dec 2021 10:08 UTC

On Friday, December 24, 2021 at 11:06:50 PM UTC, jrol...@gmail.com wrote:
> Hi I'm getting a "Function: _GET_LONG" error (Type String, requested type LONGINT)
>
> What am I missing please? Heres the code involved:
>
> For i := 1 to oDb:Fcount
> AAdd(aRay, {oDb:FieldInfo(DBS_NAME, i), oDb:FieldInfo(DBS_TYPE, i), oDb:FieldInfo(DBS_LEN, i), oDb:FieldInfo(DBS_DEC, i)})
> FWriteLine(ptrHandle, "AAdd(aDBF,{ " + '"' + AllTrim(oDb:FieldInfo(DBS_NAME, i)) + '", ' + '"' + AllTrim(oDb:FieldInfo(DBS_TYPE, i)) + '", ' + AllTrim(Str(oDb:FieldInfo(DBS_LEN, i))) + ', ' , AllTrim(Str(oDb:FieldInfo(DBS_DEC, i))))
> ? "AAdd(aDBF,{ " + '"' + AllTrim(oDb:FieldInfo(DBS_NAME, i)) + '", ' + '"' + AllTrim(oDb:FieldInfo(DBS_TYPE, i)) + '", ' + AllTrim(Str(oDb:FieldInfo(DBS_LEN, i))) + ', ' , AllTrim(Str(oDb:FieldInfo(DBS_DEC, i)))
> Next
>
> This line of code gives the error,
>
> FWriteLine(ptrHandle, "AAdd(aDBF,{ " + '"' + AllTrim(oDb:FieldInfo(DBS_NAME, i)) + '", ' + '"' + AllTrim(oDb:FieldInfo(DBS_TYPE, i)) + '", ' + AllTrim(Str(oDb:FieldInfo(DBS_LEN, i))) + ', ' , AllTrim(Str(oDb:FieldInfo(DBS_DEC, i))))
>
>
> While this line does not and works fine
> ? "AAdd(aDBF,{ " + '"' + AllTrim(oDb:FieldInfo(DBS_NAME, i)) + '", ' + '"' + AllTrim(oDb:FieldInfo(DBS_TYPE, i)) + '", ' + AllTrim(Str(oDb:FieldInfo(DBS_LEN, i))) + ', ' , AllTrim(Str(oDb:FieldInfo(DBS_DEC, i)))
>
>
> What am I missing please?
It's the last part of the line that is wrong, + ', ' , AllTrim(Str(oDb:FieldInfo(DBS_DEC, i))). I think the final , (comma) should be a + (plus sign), or the final ' (apostrophy) should be at the end of the line. If you break the line down you will see what I mean
"AAdd(aDBF,{ "
+ '"'
+ AllTrim(oDb:FieldInfo(DBS_NAME, i))
+ '", '
+ '"'
+ AllTrim(oDb:FieldInfo(DBS_TYPE, i))
+
'", '
+
AllTrim(Str(oDb:FieldInfo(DBS_LEN, i)))
+ ', ' , AllTrim(Str(oDb:FieldInfo(DBS_DEC, i)))

1
server_pubkey.txt

rocksolid light 0.9.8
clearnet tor