All the function is doing is counting the number of words by "spaces". You could create a function:
FUNCTION GETWORDCOUNT
PARAMETER lcString
lnWordCount = AT(" ",lcString)+1
Return lnWordCount
The reason for the +1 is the last word doesn't get counted because it will have a "." at the end...
...I use this to interface with OpenAI GPT-4o.
ChatGPT suggests this approach:
LOCAL oHTTP
oHTTP = CREATEOBJECT("WinHttp.WinHttpRequest.5.1")
* Obtain the OAuth token
oHTTP.Open("POST", "https://login.microsoftonline.com/{tenant}/oauth2/v2.0/token", .F.)...
SitesMasstec,
I think you mean
SET EXACT ON
SET EXACT = ON
Will generate an error.
You should save the current state first with:
llExact = SET("EXACT")
And if you are changing it's state, you should capture the current state first, SET EXACT ON (do your code) then issue: SET EXACT (llExact)...
EinTerraner....
You're kind of breaking my brain here. I don't understand the question in the context of the example. Your example clearly already has a "sub-classed, base class", and in one tab you are showing all properties, in another you are showing favorite. You can make any property a...
Just sub-class the VFP classes.
The way you do that is, open the class, resave it with a new name into a class library like "girdbase".
Then open the class, right click the property/method you want and "Add to Favorites".
Now when you place that object on a form, the favorites will be there...
...the apparent "selection" (in this case the date of an expense report entry).
The code in the "Change" event of the OLE Date Picker is simple:
*** ActiveX Control Event **** whenever user makes change in control update form with new values
dDate = DATE(This.Year, This.Month, This.Day)
*...
Couple of things you can do.
One, SET STEP ON before WITH, and then check the value of the variables/constants as you step through, and it will tell you what value is actually contained in ThisForm.dtSaida.Value (you can also check the value of YDATASAIDA is.
OR, if you're concerned that...
I have used a combination of EZTWAIN (for getting images from scanners/cameras) and TOCR which have been excellent products, and reasonably easy to integrate. Recently I have been toying with OpenAI and image processing, but it seems to be early days, though they are advancing quickly with it...
...I've defined it as "Invisible" in for screen (by setting the Type radio button to "Invisible". Not that the Picture clause then is PICTURE "@*IHN "
Interestingly, the Help file is NOT helpful here, as it doesn't mention the specialized value in the picture clause "I" to be INVISIBLE. (For...
Rajesh, look at how the "MoveHere" works. This is likely utilizing Windows level call (whether you realize it or not). If you change how that works, then you can make this dialog disappear. But you aren't showing me the code, so I can't help you.
What instruction in the code results in this occurring?
Also, what is the state of the following:
SET TALK
SET SAFETY
SET NOTIFY
You can put in something like the following:
MESSAGEBOX("SET TALK =" + SET("TALK"))
... etc.
And it will give you the state, without SETTING STEP ON, which can...
The OP mentioned they are free tables. (Well, he said "They are not part of a DB", so I assume he meant they are not part of a DBC.
That said, I use essentially this process all the time. I have one table that is prone to corruption because it gets used in a process where images are scanned...
If you don't have an ENDTRY you should be getting a compiler error.
It's like having an IF without an ENDIF or a CASE without and ENDCASE.
There is no such thing as an implicit ENDTRY.
Hi Chris, while I don't disagree with you, isn't that a form of corruption???
I was just looking for a single ubiquitous term, since my "fix" doesn't care what the error specifically is.
...Also, what is the risk that any value of bedgrup, bedposi or bedsubp is greater than 999? In that case your TRANSFORM command will yield ***. If this is happening in more than one record, you may be confusing the index. Indexes work best when they create a "Unique" combined expression.
The...
What indexes exist on the table? Are they compound? Are they creating a unique index?
How big is the table?
Also, why are you doing it this way?
Can you explain what you are trying to achieve (what your business logic is in this case)?
...you want to seem in line with VFP code.
The key is, I found this bit of code, which is impacting the buttons on my screen:
...
PROCEDURE SHOWGETS
*
IF M.EDITING OR M.ADDING && If either of these are true .T.
*
SHOW GET M.SAVERECORD ENABLE
SHOW GET M.CANCEL ENABLE
SHOW GET...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.