DataFlex Wiki - User contributions [en]

StartProg

2024-10-23T09:24:39Z

Wil:

StartProg is a small CreateProcess wrapper function originally written by Bernhard Ponemayr.

You can use it as an alternative to RunProgram and RunProgram Wait.

This package has been sitting at the library section of the forum for years.

The reason I put it at the wiki is to make it easier to find it back as searching for this at the forum always takes more time then it should be.

Latest version is here: [https://support.dataaccess.com/Forums/showthread.php?50143-New-Startprog-pkg&p=356484#post356484 New StartProg DF 20.0+ version]

StartProg

2024-10-23T09:24:21Z

Wil: Created page with "StartProg is a small CreateProcess wrapper function originally written by Bernhard Ponemayr. You can use it as an alternative to RunProgram and RunProgram Wait. This package has been sitting at the library section of the forum for years. The reason I put it at the wiki is to make it easier to find it back as searching for this at the forum always takes more time then it should be. Latest version is here: https://support.dataaccess.com/Forums/showthread.php?50143-Ne..."

StartProg is a small CreateProcess wrapper function originally written by Bernhard Ponemayr.

You can use it as an alternative to RunProgram and RunProgram Wait.

This package has been sitting at the library section of the forum for years.

The reason I put it at the wiki is to make it easier to find it back as searching for this at the forum always takes more time then it should be.

Latest version is here: [[https://support.dataaccess.com/Forums/showthread.php?50143-New-Startprog-pkg&p=356484#post356484 New StartProg DF 20.0+ version]

Rounding Numbers

2024-10-10T18:09:02Z

Wil: /* Links */

= Rounding Numbers =

'' The following has been taken from the DAW newsgroup, User Contributed Oct 6 2000 ''

== MARF - A Mutually Agreed Rounding Function?! ==

Aside from UI issues, OS and hardware problems, perhaps one of the most
frequently recurring themes in both the old DAC CompuServe Forum, and now
here, has been 'How to perform proper rounding of numeric values'.

Interestingly, each time the topic reappears as a new thread, nobody ever
refers the questioner back to the previous threads on the subject. It is
always a great opportunity to air one's own (usually strictly limited)
solution to the problem!

Well, I propose that we use this message thread to, if possible, finally
agree upon a proper specification and solution to this problem ... the one
that DAC forgot to supply us ... and finally lay this ghost to rest!

So let me kick-off.

Here is what I expect of a proper Rounding function:-

(a) It should be able to cope with all numbers in the DataFlex numeric range
ie. ± 99,999,999,999,999.99999999.

(b) Rounding '''up''' should occur when the digit to the right of the rounding
position is 5 or above, otherwise rounding '''down''' should occur. I take this to be a reasonably 'international'
convention.

(c) It should be possible to round to any degree of precision. In other
words, it should be capable of rounding to any position to the left of the
decimal delimiter as well as to the right of it. This, after all, is a
frequent requirement in financial reporting. So, for example, if I wish to
round to the nearest thousand, then a value of 72637.54 should be returned
as 73000.

I have attached a file named ROUNDNUM.FNC which contains a global function
that attempts to meet these requirements. Use of the function, named
ROUND_NUMBER, is fully documented therein.

My approach is substantially based on some code originally presented by
Hendrick van Niekerk in a CompuServe message in October 1997. I note that
he has repeated the code in a message reply in the VDF NG on 11-Jun-2000.

I prefer Hendrick's method to all the others I have yet seen. His code is
actually contained in a macro command named ROUND THEN. Basically all I
have done is to convert his macro into a global function and then extended
the scope of the code to provide for rounding to a more flexible degree of
precision.

So ... well ... thanks Hendrick!

Regards,

Michael Pilsworth

= Source =
<source lang="dataflex">
// ===========================================================================
//
// The ROUND_NUMBER global function has been designed to return the rounded
// value of a given 'numeric' argument at a specified rounding precision.
//
// The function requires two arguments, as follows:-
//
// (a) The numeric value to be rounded, where the range of valid values is
// +/- 99,999,999,999,999.99999999.
//
// (b) The rounding precision required. This must be an integer value in the
// range -13 to +8. If a value outside this range is used, the nearest
// threshold value is substituted.
//
// Values in the range +1 to +7 perform rounding on the decimal part of
// the number. A value of +8 will perform no rounding at all. A zero
// value will round to the nearest whole number. Values -1 to -13 will
// round progressively to the left of the decimal point (a frequent
// requirement in financial reporting).
//
// If the result of the rounding produces a value outside the valid numeric
// range (+/- 99,999,999,999,999.99999999) then a zero value is returned.
//
// Assumptions:- The only assumptions made have been that the range of
// numeric values and the limit of eight decimal places are unlikely to change
// in the forseeable future.
//
// Examples:-
//
// 1st Argument 2nd Argument Return Value
// ------------ ------------ ------------
// 123456.87654321 8 123456.87654321
// 123456.87654321 2 123456.88
// -123456.87654321 2 -123456.88
// 123456.98765432 0 123457
// -123456.98765432 -1 -123460
// 123456.98765432 -2 123500
// 123456.98765432 -3 123000
// 987654 -4 990000
// 987654 -5 1000000
// 987654 -6 1000000
// 987654 -7 0
//
// ===========================================================================

Function Round_Number GLOBAL number nVal integer iRnd returns Number
// If the rounding precision falls in the range -5 to +8, then return:-
If (iRnd >= -5) Function_Return ;
(Number(Abs(nVal) / nVal) * 0.5 / (Number(10 ^ (iRnd min 8))) + nVal ;
/ (Number(10 ^ (8 - (iRnd min 8)))) * (Number(10 ^ (8 - (iRnd min 8)))))
// Else, where the rounding precision is in the range -6 to -13, return:-
Function_Return ;
(Number(Abs(nVal) / nVal) * 0.5 * (Number(10 ^ (Abs(iRnd) min 13))) ;
+ nVal / (Number(10 ^ 13)) / (Number(10 ^ ((Abs(iRnd) - 5) min 8))) ;
* (Number(10 ^ 13)) * (Number(10 ^ ((Abs(iRnd) - 5) min 8))))
End_Function
</source>

= Links =
* https://support.dataaccess.com/Forums/showthread.php?55971-Rounding-to-nearest-5-cents
* https://support.dataaccess.com/Forums/showthread.php?70658-Multiplying-two-numbers-together-and-rounding-them-up-handy

[[Category: Basics]]

Codejock

2024-07-31T17:29:02Z

Wil:

Code Jock is a suite of components that enhance the graphical interface to DataFlex.
It is included in the development environment since Visual DataFlex version 12.0.

* [[Code Jock menus]]
* [[Dynamic codejock menus from a database]]
* [[How to add your own items to the default Codejock Context menu]]
* [[Add icons with subset of images to CodeJock CommandBars]]
* [[Codejock Grid with ProgressBar]]
* [[Time edit grid column for cCJGrid]]
* [[Apply color to codejock grid column headers]]
* [[cCJGrid custom row height]]

* [https://support.dataaccess.com/Forums/showthread.php?39317-Where-to-download VDFSig Codejock Library (Where to download post at teh forum) ]

[[Category:Codejock]]

REST

2024-03-16T14:07:56Z

Wil: /* External references */

With DataFlex you can create RESTful web services as well as consume those web services.

== Client side ==
Consuming [https://en.wikipedia.org/wiki/Representational_state_transfer REST] services was made a lot easier since DataFlex 19.0 when it added native [[JSON]] support.

Consume a REST service:
See [https://docs.dataaccess.com/dataflexhelp/mergedProjects/VDFClassRef/cJsonHttpTransfer.htm cJsonHttpTransfer] and [https://docs.dataaccess.com/dataflexhelp/mergedProjects/Welcome/JSON_Parsing_and_Transfer.htm JSON Parsing and Transfer]

You can find a demo of how-to use cJsonHttpTransfer in DAWs WebOrder workspace.

== Server side ==
Creating REST web services has been made easy since DataFlex 19.1 with the introduction of the [https://docs.dataaccess.com/dataflexhelp/mergedProjects/VDFClassRef/cWebHttpHandler.htm cWebHttpHandler] handler.

For an example see the DemoSimpleRestService.wo file in the WebOrder example workspace.

You can create a REST service with earlier DataFlex versions, see [https://www.unicorninterglobal.com/Company-White-Papers-Creating-RESTful-JSON-Web-Services-in-DataFlex-868 here] for how-to do so in DataFlex 19.0, but it is probably better to use DataFlex 19.1 in that case.

==See also==
*[[RESTful Service Theory]]
*[[RESTful Services in DataFlex]]
*[[Consuming RESTful Services in DataFlex]]
*[[Creating RESTful Services in DataFlex]]
*[[A Simple RESTful Service]]
*[[Using the REST Library]]

== External references ==

*[http://salzlechner.com/dev/2016/03/02/interfacing-dataflex-restful-web-services/ Interfacing DataFlex RESTful web services] ([[User: Starzen|Michael Salzlechner]])
*[https://docs.google.com/document/d/1N3BvvygKfjKO_5TMosWrR8aahI-5VOz6-z-8jSqA_to/edit?usp=sharing Synergy 2019 REST APIs Course Exercise Instructions] ([[User: Mikepeat|Mike Peat]])
*[https://learning.dataaccess.com/courses/synergy-2019/how-to-build-a-restful-api-in-dataflex-19.1/ Synergy 2019 presentation "Building RESTful APIs in DataFlex"] ([[User: Mikepeat|Mike Peat]])
*[https://support.dataaccess.com/Forums/forumdisplay.php?59-OAuth-RESTFul-amp-Web-API-Integration OAuth Restful & Web API integration] section of the [https://support.dataaccess.com/Forums/forum.php Data Access Support Forum]
Sourced from [https://support.dataaccess.com/Forums/showthread.php?64503-New-REST-support forum post: New REST support]
* https://tools.chilkat.io/curl.cshtml (generate DataFlex code to use with Chilkat)
* [https://github.com/DataFlexCode/RestGen2022 RestGen2022] A tool to generate a DataFlex struct from JSON

[[Category:REST]]
[[Category:Web Services]]
[[Category:System Integration]]
[[Category:JSON]]

JSON and Nullable elements

2024-03-08T21:46:53Z

Wil:

=== The nullable JSON issue ===

Using DataFlex it is very convenient to fill up your JSON data from a struct when using the [https://docs.dataaccess.com/dataflexhelp/mergedProjects/VDFClassRef/cJsonObject.htm cJSONOjbect] class. See for example our [[Create JSON from struct]] article.

Quite often that [[JSON]] data is then send to a [[REST]] service and depending on that service they might not want to receive all the elements in your JSON in order to work correctly.

There's also the issue of receiving JSON data with a null in there and not being able to process that automatically via a struct as DataFlex variables are not nullable.

This has been debated before in the forum (1) a few times and currently the official way to do so is by traversing the JSON data structure and then removing the members that the other side does not want to process by using the [https://docs.dataaccess.com/dataflexhelp/mergedProjects/VDFClassRef/cJsonObject-Procedure-RemoveMember.htm RemoveMember] method.

<source lang="dataflex">
Send RemoveMember of hoJSON "myElement"
</source>

Please note that when you use JsonToDataType to go from JSON to a struct that you now have to turn off the strict checking if all members are available with
<source lang="dataflex">
Set pbRequireAllMembers of hoJSON to False
</source>

That works fine for simple JSON structures.
If your structure has another level then your code becomes more difficult to write pretty fast.

Take for example the following simplified JSON

{
"type": "Sales",
"companyCode": "DEMO",
"date": "2013-06-29",
"customerCode": "ABC",
"addresses": {
"shipTo": {
"line1": "143 Main Street",
"city": "Irvine",
"region": "CA",
"country": "US",
"postalCode": "92614",
"longitude": 0.0,
"latitude": 0.0
},
"shipFrom": {
... more details ...
}
}}

If that's filled in from a struct and your REST service gets confused if you pass both address as well as long/lat coordinates with value 0.0 then you have to remove the longitude/latitude elements.

To do this your code could look like:

<source lang="dataflex">
..
Get Create (RefClass(cJsonObject)) to hoJsonRequest
If (hoJsonRequest) Begin
Send DataTypeToJson Of hoJsonRequest data
If (data.addresses.shipto.latitude=0.0 and data.addresses.shipto.longitude=0.0) Begin
Send RemoveAddressCoordinates hoJsonRequest "shipTo" "latitude"
Send RemoveAddressCoordinates hoJsonRequest "shipTo" "longitude"
End
..
</source>

with the RemoveAddressCoordinates method looking like this:
<source lang="dataflex">
//
// Used to strip longitude/latitude data from json
//
Procedure RemoveAddressCoordinates Handle hoJsonRequest String sAddressType String sCoord
Integer eType
Handle hoAddresses hoAddressType

Get MemberJsonType of hoJsonRequest "addresses" to eType
If (eType=jsonTypeObject) Begin
Get Member of hoJsonRequest "addresses" to hoAddresses
If (hoAddresses) Begin
Get MemberJsonType of hoAddresses sAddressType to eType // "shipTo"
If (eType=jsonTypeObject) Begin
Get Member Of hoAddresses sAddressType To hoAddressType
If (hoAddressType) Begin
Send RemoveMember Of hoAddressType sCoord // "latitude"
Send Destroy Of hoAddressType
End
End
Send Destroy Of hoAddresses
End
End
End_Procedure
</source>

Yes it's readable, No it's not so easy to support once you get multiple levels deep for your address element as you now have to make sure you destroy the objects etc..

=== The RemoveNamedMember method ===

So when looking at the line with the actual condition on when to remove a specific element :
<source lang="dataflex">
If (data.addresses.shipto.latitude=0.0 and data.addresses.shipto.longitude=0.0) Begin
</source>
it looked like it would be good to have a method that could take care of this in one line as well.

eg. this would be nice to have:
<source lang="dataflex">
If (data.addresses.shipto.latitude=0.0 and data.addresses.shipto.longitude=0.0) Begin
Get RemoveNamedMember hoJsonRequest "addresses.shipTo.latitude"
Get RemoveNamedMember hoJsonRequest "addresses.shipTo.longitude"
End
</source>

it will then also work for a json structure where the address is a level deeper without having to write new code.

eg.
<source lang="dataflex">
Get RemoveNamedMember hoJsonRequest "Returns.addresses.shipTo.longitude"
</source>

Turned out it was fairly easy to write (easier than writing this post!)
<source lang="dataflex">

//
// Used to strip a named/value pair from json
// You can use this to directly remove a JSON member at a lower level from the JSON
// object passed via hoJSON.
// The member to be removed uses the exact JSON member names separated by dots.
// Beware that JSON member names are case sensitive!
//
// If the member does not exist a runtime error will be triggered.
// Eg.
// Send RemoveNamedMember hoJsonRequest "Order.addresses.shipTo.latitude"
//
Procedure RemoveNamedMember Handle hoJson String sName
Integer iDotPos
Integer eType
Handle hoChild
String sMember

Move (Pos(".",sName)) to iDotPos
If (iDotPos>0) Begin
Move (Left(sName,iDotPos-1)) To sMember
Move (Replace(sMember+".",sName,"")) To sName
//Get HasMember of hoJson sMember to bHasMember <-- use this if you want to filter the runtime error (we currently do not)
Get MemberJsonType of hoJson sMember to eType
If (eType=jsonTypeObject) Begin
Get Member of hoJson sMember to hoChild
If (hoChild) Begin
Send RemoveNamedMember hoChild sName
Send Destroy Of hoChild
End
End
End
Else Begin
Send RemoveMember Of hoJson sName
End
End_Procedure
</source>

Note that if you don't want the runtime error that you can use the HasMember test.

We don't use that as we always first convert from struct so we know the element exists. If the element is not there then there's likely a case sensitivity issue, so getting a runtime error helps when debugging your code.

Of course a little while later I bump into a more complicated issue where the removed member is in an array. Lucky for me, in an single dimension array. This can be taken care of like this:
<source lang="dataflex">

//
// Used to strip longitude/latitude data from json in a CreateTransactionModel
// You can use it to directly remove a JSON member at a lower level from the JSON
// object passed via hoJSON.
// The member to be removed uses the exact JSON member names separated by dots and
// this is case sensitive.
//
// If the member does not exist a runtime error will be triggered.
// Eg.
// Send RemoveNamedMember hoJsonRequest "newTransaction.addresses[2].shipTo.latitude"
//
Procedure RemoveNamedMember Handle hoJson String sName
Integer iDotPos
Integer iLSBPos iIndex
Integer eType
Handle hoChild
Handle hoArray
String sMember sIndex

Move (Pos(".",sName)) to iDotPos
If (iDotPos>0) Begin
Move (Left(sName,iDotPos-1)) To sMember
Move (Replace(sMember+".",sName,"")) To sName
Move (Pos("[",sMember)) To iLSBPos
If (iLSBPos>0) Begin
Move (Right(sMember,(length(sMember)+1)-iLSBPos)) To sIndex
Move (Replace(sIndex,sMember,"")) To sMember
Move (Replace("[",sIndex,"")) To sIndex
Move (Replace("]",sIndex,"")) To sIndex
Move (Cast(sIndex,Integer)) To iIndex
End
//Get HasMember of hoJson sMember to bHasMember <-- use this if you want to filter the runtime error (we currently do not)
Get MemberJsonType of hoJson sMember to eType
If (eType=jsonTypeObject) Begin
Get Member of hoJson sMember to hoChild
If (hoChild) Begin
Send RemoveNamedMember hoChild sName
Send Destroy Of hoChild
End
End
Else If (eType=jsonTypeArray) Begin
Get Member of hoJson sMember to hoArray
If (hoArray) Begin
Get MemberByIndex of hoArray iIndex to hoChild
If (hoChild) Begin
Send RemoveNamedMember hoChild sName
Send Destroy Of hoChild
End
Send Destroy Of hoArray
End
End
End
Else Begin
Send RemoveMember Of hoJson sName
End
End_Procedure
</source>

=== Harm's RemoveEmptyMembers method ===

Harm Wibier posted a solution where you can automatically remove elements which have a value of 0 or in the case of a string element where the string element is an empty string. See also (2)
<source lang="dataflex">
//
// Recursive function going over JSON objects removing all empty strings, 0 and NULL values of objects (not from arrays).
//
// Params:
// hoJsonObj Handle of the JSON object to process.
// bEmptyString If true empty string values will be removed.
// bZeroNumber If true all numeric 0 values will be removed.
// bNull If true all NULL values will be removed.
//
Procedure RemoveEmptyMembers Handle hoJsonObj Boolean bEmptyString Boolean bZeroNumber Boolean bNull
Integer iTo iMember iType
Handle hoMember
String sMemberName
Boolean bRemove

Get MemberCount of hoJsonObj to iTo
For iMember from 0 to (iTo - 1)
Move False to bRemove

Get MemberByIndex of hoJsonObj iMember to hoMember

Get JsonType of hoMember to iType

Case Begin
Case (iType = jsonTypeString)
If (bEmptyString) Begin
Move (JsonValue(hoMember) = "") to bRemove
End
Case Break
Case (iType = jsonTypeInteger)
If (bZeroNumber) Begin
Move (JsonValue(hoMember) = 0) to bRemove
End
Case Break
Case (iType = jsonTypeNull)
Move bNull to bRemove
Case Break
Case (iType = jsonTypeObject or iType = jsonTypeArray) Begin
Send RemoveEmptyMembers hoMember bEmptyString bZeroNumber bNull
Case Break
End
Case End

// Only remove empty members of objects (not from arrays)
If (bRemove and IsOfJsonType(hoJsonObj, jsonTypeObject)) Begin
Get MemberNameByIndex of hoJsonObj iMember to sMemberName
Send RemoveMember of hoJsonObj sMemberName
Decrement iMember
Decrement iTo
End

Send Destroy of hoMember
Loop
End_Procedure

// Use like this:
Send RemoveEmptyMembers hoJson False False True
</source>

That works, but I'm personally a bit cautious about removing all elements that have value "0".
Sometimes we want pass that actual value, empty or zero does not equal null. There might be another element with the value 0 that should not be removed. However, sometimes it is exactly what you need.

If you just want to remove the nulls before you move the data to a struct, then perhaps Mike Peat's variant of Harm's code is a bit more clear:

<source lang="dataflex">
// Version of Harm's procedure, just for nulls.
Procedure RemoveNullMembers Handle hoJsonObj
Integer iTo iMember iType
Handle hoMember
String sMemberName
Boolean bRemove

Get MemberCount of hoJsonObj to iTo
Decrement iTo

For iMember from 0 to iTo
Move False to bRemove
Get MemberByIndex of hoJsonObj iMember to hoMember
Get JsonType of hoMember to iType

If (iType = jsonTypeNull) ;
Move True to bRemove
Else If (iType = jsonTypeObject or iType = jsonTypeArray) ;
Send RemoveNullMembers hoMember

If bRemove Begin

If (IsOfJsonType(hoJsonObj, jsonTypeObject)) Begin
Get MemberNameByIndex of hoJsonObj iMember to sMemberName
Send RemoveMember of hoJsonObj sMemberName
Decrement iMember
Decrement iTo
End
Else If (IsOfJsonType(hoJsonObj, jsonTypeArray)) Begin
Send RemoveMember of hoJsonObj iMember
Decrement iMember
Decrement iTo
End

End

Send Destroy of hoMember
Loop

End_Procedure
</source>
See also (3)

=== External references ===

* (1) [https://support.dataaccess.com/Forums/showthread.php?64157-YAFR-DataTypeToJson-beyond-19-1 YAFR DataTypeToJson beyond 19.1] loong and mostly off topic debate at the forum about null support and JSON
* (2) [https://support.dataaccess.com/Forums/showthread.php?62437-JsonToDataType&p=331876#post331876 JsonToDataType] Harm Wibier's solution
* (3) [https://support.dataaccess.com/Forums/showthread.php?64923-Null-json&p=348369#post348369 Json-Nulls] Mike Peat his variant
* [https://support.dataaccess.com/Forums/showthread.php?62358-Use-of-HasMember-of-cJSON-class-when-used-with-arrays&p=331630#post331630 RemoveNulls function by Mike Peat]

[[Category:REST]]
[[Category:JSON]]

Struct array as a Web Property

2023-07-25T12:30:12Z

Wil: categorizing

Complex web properties, such as structs and/or arrays, have been supported since DataFlex 18.1.

The documentation on this however is extremely thin.
It doesn't exist at the time of writing this, so you are left on your own on how-to figure out how that works.

The usage of a struct requires that you serialize/deserialize the data against a matching javascript object, just like when you pass a parameter.
Perhaps there's a better way, but I am not aware of that.

What follows is a simple code example taken from the syncfusion library, to give you an idea on how this works.

On the DataFlex side:

<source lang="dataflex">

Struct tCarouselItem
String sImage
String sAltText
String sCaption
End_Struct

... snip ....

Procedure Construct_Object
Forward Send Construct_Object

{ WebProperty=Client }
Property tCarouselItem[] pCarouselItems

... snip ....

//
Procedure LoadImages
tCarouselItem CarouselItem
tCarouselItem[] CarouselItems
... some code filling the array and putting that in array variable CarouselItems
Send LoadData sData
WebSet pCarouselItems to CarouselItems
End_Procedure
</source>

So we can use a WebSet to transfer the data, just like with other properties.

On the javascript side:

<source lang="javascript">
//
// carousel data.
//
tActionCarouselItemFormat = {
image : df.tString,
altText : df.tString,
caption : df.tString
};

..snip...

sf.WebCarousel = function WebCarousel(sName, oParent) {
// Forward send constructor
sf.WebCarousel.base.constructor.call(this, sName, oParent);

// Properties:
... snip ....
this.prop(df.tString,"psSyncfusionLicense", "");
this.prop(df.tAdv,"pCarouselItems", "");
..snip ...

carouselItemsChanged : function() {
let carousel=this._osfWebCarousel;
let tData=null;
let tItems=null;
if(carousel){
tData = this.pCarouselItems;
tItems = df.sys.vt.deserialize(tData, [tActionCarouselItemFormat] );
</source>

On the javascript end after getting the advanced client property into a variable, you only have to deserialize it to get at the data.

[[Category: Web Applications]]

Struct array as a Web Property

2023-07-25T12:26:05Z

Wil: Created page with "Complex web properties, such as structs and/or arrays, have been supported since DataFlex 18.1. The documentation on this however is extremely thin. It doesn't exist at the time of writing this, so you are left on your own on how-to figure out how that works. The usage of a struct requires that you serialize/deserialize the data against a matching javascript object, just like when you pass a parameter. Perhaps there's a better way, but I am not aware of that. What fo..."

Using cWebHttpHandler with JSON instead of tWebValueTree

2023-07-10T22:13:30Z

Wil:

From this forum post: https://support.dataaccess.com/Forums/showthread.php?68231-ToDo-Describe-call-mode-and-a-few-more-questions&p=371095#post371095

Reposting it here so I can quickly find it next time I need it (sorry, not sorry)

It is indeed true that for most situations the tWebValueTree is not needed any more. ClientActions and ServerActions can now use JSON Handles or structs & arrays that are directly serialized. So when calling a server action you can now do the following:

<source lang="javascript">
// Create data objects
var oData = {
labels : ["January","February","March","April","May","June","July"],
datasets : [{
strokeColor : "rgba(220,220,220,1)",
data : [65,59,90,81,56,55,40]
},{
strokeColor : "rgba(151,187,205,1)",
data : [28,48,40,19,96,27,100]
}]
};

// Send call to the server
this.serverAction("ProcessData2", [ 2, 1 ], oData, function(oEvent){
alert(oEvent.sReturnValue);
});
</source>

<source lang="dataflex">
// Function called as server action
Function ProcessData2 Integer iParam1 Integer iParam2 Returns String
tActionData tData
Handle hoJson

// Retrieve and deserialize data
Get phoActionJsonData to hoJson
Get JsonToDataType of hoJson to tData

Function_Return tData.labels[3]
End_Function
</source>

So instead of ptActionData you use phoActionJsonData which gives a cJsonObject representing the data. Note that you do not have to cleanup this JSON Handle.

For client actions you can do the following:

<source lang="dataflex">
Procedure ProcessDataOnClient2
// Send the client action
String[] aParams
tActionData tData

// Generate some data
Move "Januari" to tData.labels[0]
Move "Februari" to tData.labels[1]
Move "#FF0000" to tData.datasets[0].strokeColor
Move 55 to tData.datasets[0].data[0]
Move 88 to tData.datasets[0].data[0]

// Call the client action
Send ClientAction "processData2" aParams tData
End_Procedure
</source>

<source lang="javascript">
// Client action called with action data
processData2 : function(){
var tData;

// Retrieve value tree and deserialize
tData = this._tActionData;

// Do something with the data
alert(tData.datasets[0].strokeColor);
}
</source>

Note that ClientAction takes a variant parameter that it serializes to JSON. Both API's are backwards compatible so working with tWebValueTree still works. The value tree's are also still used for client web properties.

[[Category: Web Applications]]

Using cWebHttpHandler with JSON instead of tWebValueTree

2023-07-10T22:10:53Z

Wil: formatting

Using cWebHttpHandler with JSON instead of tWebValueTree

2023-07-10T22:07:58Z

Wil: Created page with "From this forum post: https://support.dataaccess.com/Forums/showthread.php?68231-ToDo-Describe-call-mode-and-a-few-more-questions&p=371095#post371095 Reposting it here so I can quickly find it next time I need it (sorry, not sorry) It is indeed true that for most situations the tWebValueTree is not needed any more. ClientActions and ServerActions can now use JSON Handles or structs & arrays that are directly serialized. So when calling a server action you can now do th..."

From this forum post: https://support.dataaccess.com/Forums/showthread.php?68231-ToDo-Describe-call-mode-and-a-few-more-questions&p=371095#post371095

Reposting it here so I can quickly find it next time I need it (sorry, not sorry)

It is indeed true that for most situations the tWebValueTree is not needed any more. ClientActions and ServerActions can now use JSON Handles or structs & arrays that are directly serialized. So when calling a server action you can now do the following:
Code:

// Create data objects
var oData = {
labels : ["January","February","March","April","May","June","July"],
datasets : [{
strokeColor : "rgba(220,220,220,1)",
data : [65,59,90,81,56,55,40]
},{
strokeColor : "rgba(151,187,205,1)",
data : [28,48,40,19,96,27,100]
}]
};

// Send call to the server
this.serverAction("ProcessData2", [ 2, 1 ], oData, function(oEvent){
alert(oEvent.sReturnValue);
});

Code:

// Function called as server action
Function ProcessData2 Integer iParam1 Integer iParam2 Returns String
tActionData tData
Handle hoJson

// Retrieve and deserialize data
Get phoActionJsonData to hoJson
Get JsonToDataType of hoJson to tData

Function_Return tData.labels[3]
End_Function

So instead of ptActionData you use phoActionJsonData which gives a cJsonObject representing the data. Note that you do not have to cleanup this JSON Handle.

For client actions you can do the following:
Code:

Procedure ProcessDataOnClient2
// Send the client action
String[] aParams
tActionData tData

// Generate some data
Move "Januari" to tData.labels[0]
Move "Februari" to tData.labels[1]
Move "#FF0000" to tData.datasets[0].strokeColor
Move 55 to tData.datasets[0].data[0]
Move 88 to tData.datasets[0].data[0]

// Call the client action
Send ClientAction "processData2" aParams tData
End_Procedure

Code:

// Client action called with action data
processData2 : function(){
var tData;

// Retrieve value tree and deserialize
tData = this._tActionData;

// Do something with the data
alert(tData.datasets[0].strokeColor);
}

Note that ClientAction takes a variant parameter that it serializes to JSON. Both API's are backwards compatible so working with tWebValueTree still works. The value tree's are also still used for client web properties.

File Comparison

2023-03-30T21:29:45Z

Wil: /* Custom filters */

'''File Comparison''' is the process of compare the difference between files. Commonly this is used when merging source code with a [[Version Control]] file repository.

==Why use File Comparison Software?==
When comparing source between different Visual DataFlex versions it is a HUGE time saver to do this using source code compare tools.
Below is a few rules one can use to compare sources between VDF11.1 and VDF12.1

The tips below are for a product called '''Beyond Compare''', but i'm sure your product will do fine too. If you are not using a product for this then GO BUY ONE! it is the best investment you can make EVER.

==File Comparison software==
There are many different file comparison tools out there, the most commonly used being '''Beyond Compare'''. Other alternatives for Windows include Araxis merge, WinDiff and Winmerge.

For [[Linux]] users there is Meld.

For a comparison of file comparison tools visit [http://en.wikipedia.org/wiki/Comparison_of_file_comparison_tools Wikipedia].

==Beyond Compare==
Beyond Compare is a commonly used File Comparison tool developed by Scooter Software.

=== How-to set up Beyond Compare ===

==== Configure File Formats ====

In order to have Beyond Compare recognize DataFlex based on File Type, you can add the following after starting the main program.
Main menu -> Tools -> File Formats -> Press the "+" button to add a new file format --> Text Format

General tab
Mask: *.src;*.pkg;*.dg;*.vw;*.dd;*.sl;*.ddo;*.rv;*.tt?;*.wo;*.utl;*.nui
Description: - Compares DataFlex source.

Save As: DataFlex Source

==== Configure per session ====
In order to change the rules on how BC compares, you should go into compare source mode --> compare two source files --> and then click on the "guy with the cap" in the toolbar

''' General Tab Page '''
Name : DataFlex
Associated with: *.src;*.pkg;*.dg;*.vw;*.dd;*.sl;*.ddo;*.rv;*.tt?;*.wo;*.utl;*.nui

x Whitespace includes TABS and spaces

''' Importance Tab Page '''
Unimportant text group >> put a check in all of the checkboxes
This is also the place where you can add custom rules/filters

=== Custom filters ===
1. Ignore differences in comments.
Click on New, Category Delimited
Beginning with: //
Check "stopping at end of line"

2. Ignore new metadata markup
Click on New, Category Delimited
Beginning with: {
and ending with: }

3. Ignore "current_object" vs "self" syntax
Click on Regular expressions
(?i).*current_object.*|.*self.*

4. Ignore difference between writing "Use foo" and "Use foo.pkg"
Click on Regular expressions
(?i)^\s*use\s+.*|^\s*use.*\.pkg

5. Ignore changed writing style for constants: C$_FOO vs C_$FOO
Click on Regular expressions
(?i)\s+C\$_.*|\s+C_\$.*

6. Ignore "string" vs. "local string"
Click on Regular expressions
(?i)^\s*local\s+string.*|^\s*string.*
Replace string with date / integer / number to filter other similar code.

7. Ignore meta tag documentation changes between 12.1 and 2008
Click on Regular expressions
(?i)\s*\/\/Doc\/.*|\s*\{.*

8. Ignore the public keyword in property declarations
Click on Regular expressions
(?i)^\s*property\s+integer.*public.*|^\s*property\s+integer.*
Repeat the same for the other datatypes

9. Comment vs. No comments
Click On Regex
(?i)^\s*\/\/.*|^\s*

10. Use statement vs missing Use statement
As before a regular expression
(?i)^\s*Use.*\.pkg|^\s*

11. Ignore removed comments after End_Object,End_Class,End_Function,End_Procedure
Using a regular expressions
(?i)\s*end.*\/\/.*|\s*end.*

PS: Begin this year I was promised by Scootersoftware Support that they would implement a way to enable/disable filters on a per filter bases in the next revision of the tool. <--- I wrote that in 2008! This was implemented by using sessions. You can create different sessions with different filters.

==Winmerge==
Winmerge is an [[Open Source]] file comparison tool.

==External Links==
*[http://www.scootersoftware.com/ Beyond Compare]
*[http://winmerge.org/ Winmerge]
*[http://www.araxis.com/ Araxis]

[[Category:Development Tools]]
[[Category: Version Control]]

File Comparison

2023-03-30T21:25:39Z

Wil: Some minor updates for Beyond Compare version 4.x

'''File Comparison''' is the process of compare the difference between files. Commonly this is used when merging source code with a [[Version Control]] file repository.

==Why use File Comparison Software?==
When comparing source between different Visual DataFlex versions it is a HUGE time saver to do this using source code compare tools.
Below is a few rules one can use to compare sources between VDF11.1 and VDF12.1

The tips below are for a product called '''Beyond Compare''', but i'm sure your product will do fine too. If you are not using a product for this then GO BUY ONE! it is the best investment you can make EVER.

==File Comparison software==
There are many different file comparison tools out there, the most commonly used being '''Beyond Compare'''. Other alternatives for Windows include Araxis merge, WinDiff and Winmerge.

For [[Linux]] users there is Meld.

For a comparison of file comparison tools visit [http://en.wikipedia.org/wiki/Comparison_of_file_comparison_tools Wikipedia].

==Beyond Compare==
Beyond Compare is a commonly used File Comparison tool developed by Scooter Software.

=== How-to set up Beyond Compare ===

==== Configure File Formats ====

In order to have Beyond Compare recognize DataFlex based on File Type, you can add the following after starting the main program.
Main menu -> Tools -> File Formats -> Press the "+" button to add a new file format --> Text Format

General tab
Mask: *.src;*.pkg;*.dg;*.vw;*.dd;*.sl;*.ddo;*.rv;*.tt?;*.wo;*.utl;*.nui
Description: - Compares DataFlex source.

Save As: DataFlex Source

==== Configure per session ====
In order to change the rules on how BC compares, you should go into compare source mode --> compare two source files --> and then click on the "guy with the cap" in the toolbar

''' General Tab Page '''
Name : DataFlex
Associated with: *.src;*.pkg;*.dg;*.vw;*.dd;*.sl;*.ddo;*.rv;*.tt?;*.wo;*.utl;*.nui

x Whitespace includes TABS and spaces

''' Importance Tab Page '''
Unimportant text group >> put a check in all of the checkboxes
This is also the place where you can add custom rules/filters

=== Custom filters ===
1. Ignore differences in comments.
Click on New, Category Delimited
Beginning with: //
Check "stopping at end of line"

2. Ignore new metadata markup
Click on New, Category Delimited
Beginning with: {
and ending with: }

3. Ignore "current_object" vs "self" syntax
Click on Regular expressions
(?i).*current_object.*|.*self.*

4. Ignore difference between writing "Use foo" and "Use foo.pkg"
Click on Regular expressions
(?i)^\s*use\s+.*|^\s*use.*\.pkg

5. Ignore changed writing style for constants: C$_FOO vs C_$FOO
Click on Regular expressions
(?i)\s+C\$_.*|\s+C_\$.*

6. Ignore "string" vs. "local string"
Click on Regular expressions
(?i)^\s*local\s+string.*|^\s*string.*
Replace string with date / integer / number to filter other similar code.

7. Ignore meta tag documentation changes between 12.1 and 2008
Click on Regular expressions
(?i)\s*\/\/Doc\/.*|\s*\{.*

8. Ignore the public keyword in property declarations
Click on Regular expressions
(?i)^\s*property\s+integer.*public.*|^\s*property\s+integer.*
Repeat the same for the other datatypes

9. Comment vs. No comments
Click On Regex
(?i)^\s*\/\/.*|^\s*

10. Use statement vs missing Use statement
As before a regular expression
(?i)^\s*Use.*\.pkg|^\s*

11. Ignore removed comments after End_Object,End_Class,End_Function,End_Procedure
Using a regular expressions
(?i)\s*end.*\/\/.*|\s*end.*

PS: Begin this year I was promised by Scootersoftware Support that they would implement a way to enable/disable filters on a per filter bases in the next revision of the tool.

==Winmerge==
Winmerge is an [[Open Source]] file comparison tool.

==External Links==
*[http://www.scootersoftware.com/ Beyond Compare]
*[http://winmerge.org/ Winmerge]
*[http://www.araxis.com/ Araxis]

[[Category:Development Tools]]
[[Category: Version Control]]

DateTime functions

2023-03-16T10:55:38Z

Wil: Moved external links section to the bottom

=== ISO8601TimeStamp ===

Here's a function I use for creating a timestamp, this uses the ISO8601 format as it has advantages such as that it automatically sorts correctly when sorted with ASCII ordering.

This works well even with databases - such as the embedded database - that do not offer native date time formats.

<source lang="dataflex">

//
// Returns an ISO8601 timestamp this is used by for example SQLite in date time columns and works
// wonderfully well within the dataflex database too.
// You'll need an ascii column of 24 characters
// the format is:
// YYYY-MM-DDTHH:MM:SS.SSS
// This is assuming you do not need timezone information.
// See also:
// http://www.sqlite.org/lang_datefunc.html
//
Function ISO8601TimeStamp Returns String
String sYear
String sMonth
String sDay
String sHour
String sMin
String sSec
String smilSec
String sTimeStamp
DateTime dtNow

Move (CurrentDateTime()) to dtNow
Move (DateGetYear(dtNow)) to sYear
Move (DateGetMonth(dtNow)) to sMonth
Move (DateGetDay(dtNow)) to sDay
Move (DateGetHour(dtNow)) to sHour
Move (DateGetMinute(dtNow)) to sMin
Move (DateGetSecond(dtNow)) to sSec
Move (DateGetMillisecond(dtNow)) to smilSec

If (Length(sMonth)=1) Move ("0"+sMonth) to sMonth
If (Length(sDay)=1) Move ("0"+sDay) to sDay
If (Length(sHour)=1) Move ("0"+sHour) to sHour
If (Length(sMin)=1) Move ("0"+sMin) to sMin
If (Length(sSec)=1) Move ("0"+sSec) to sSec
If (Length(smilSec)=1) Move ("0"+smilSec) to smilSec
If (Length(smilSec)=2) Move ("0"+smilSec) to smilSec

Move (SFormat("%1-%2-%3T%4:%5:%6.%7",sYear,sMonth,sDay,sHour,sMin,sSec,smilSec)) to sTimeStamp

Function_Return sTimeStamp
End_Function

</source>

=== XML DateTime functions ===

If you have a SOAP service and you need to convert from / to datetime formats then these functions might come in handy.

<source lang="dataflex">

//
// Gets the data and time for the datetime string as passed by
// XML. Automatic casting strips of the time part and we do
// want the time
//
// Returns:
// dtDateTime with the date and time as passed in xml
//
Function StringToDateTime String sDateTime Returns DateTime
String sDate
String sYear sMonth sDay
String sHours sMinutes sSeconds
String sMilliSeconds
String sTimeString
Integer iPos
DateTime dtTime

Move "" to sTimeString
Move (Pos("T",sDateTime)) to iPos
If (iPos>0) Begin
Move (Left(sDateTime,iPos-1)) to sDate
Move (Left(sDate,4)) to sYear
Move (Mid(sDate,2,6)) to sMonth
Move (Right(sDate,2)) to sDay
//Move sDate to dtTime // does not work, because US has no military date format
Move (Replace(sDate+"T",sDateTime,"")) to sTimeString
// Extract parts
Move (Mid(sTimeString, 2, 1)) to sHours
Move (Mid(sTimeString, 2, 4)) to sMinutes
Move (Mid(sTimeString, 2, 7)) to sSeconds
Move (Mid(sTimeString, 3, 10)) to sMilliSeconds
End

// Set to DateTime
Move (DateSetYear(dtTime, Integer(sYear))) to dtTime
Move (DateSetMonth(dtTime, Integer(sMonth))) to dtTime
Move (DateSetDay(dtTime, Integer(sDay))) to dtTime
Move (DateSetHour(dtTime, Integer(sHours))) to dtTime
Move (DateSetMinute(dtTime, Integer(sMinutes))) to dtTime
Move (DateSetSecond(dtTime, Integer(sSeconds))) to dtTime
Move (DateSetMilliSecond(dtTime, Integer(sMilliSeconds))) to dtTime

Function_Return dtTime
End_Function

//
// Gets the datetime as passed by XML.
// Automatic casting strips of the Time part and we do
// want the time
//
// Returns:
// DateTime string with the date and time as passed in xml
//
Function DateTimeToString DateTime dtTime Returns String
String sYear sMonth sDay
String sHours sMinutes sSeconds
String sMilliSeconds
String sTimeString

Move "" to sTimeString

Move (DateGetYear(dtTime)) to sYear
Move (DateGetMonth(dtTime)) to sMonth
If (Integer(sMonth)<10) Move ("0"+sMonth) to sMonth
Move (DateGetDay(dtTime)) to sDay
If (Integer(sDay)<10) Move ("0"+sDay) to sDay
Move (DateGetHour(dtTime)) to sHours
If (Integer(sHours)<10) Move ("0"+sHours) to sHours
Move (DateGetMinute(dtTime)) to sMinutes
If (Integer(sMinutes)<10) Move ("0"+sMinutes) to sMinutes
Move (DateGetSecond(dtTime)) to sSeconds
If (Integer(sSeconds)<10) Move ("0"+sSeconds) to sSeconds
Move (DateGetMilliSecond(dtTime)) to sMilliSeconds
Move (sYear+"-"+sMonth+"-"+sDay+"T"+sHours+":"+sMinutes+":"+sSeconds+"."+sMilliSeconds) to sTimeString
Function_Return sTimeString
End_Function

</source>

=== External links ===

See also:
* [https://downloads.dataaccess.com/downloads/dataflex/date-time-1467#description DataAccess DateTime Library]

[[Category:How To]]
[[Category:Tutorials]]

DateTime functions

2023-03-16T10:54:44Z

Wil: /* ISO8601TimeStamp */

=== ISO8601TimeStamp ===

Here's a function I use for creating a timestamp, this uses the ISO8601 format as it has advantages such as that it automatically sorts correctly when sorted with ASCII ordering.

This works well even with databases - such as the embedded database - that do not offer native date time formats.

<source lang="dataflex">

//
// Returns an ISO8601 timestamp this is used by for example SQLite in date time columns and works
// wonderfully well within the dataflex database too.
// You'll need an ascii column of 24 characters
// the format is:
// YYYY-MM-DDTHH:MM:SS.SSS
// This is assuming you do not need timezone information.
// See also:
// http://www.sqlite.org/lang_datefunc.html
//
Function ISO8601TimeStamp Returns String
String sYear
String sMonth
String sDay
String sHour
String sMin
String sSec
String smilSec
String sTimeStamp
DateTime dtNow

Move (CurrentDateTime()) to dtNow
Move (DateGetYear(dtNow)) to sYear
Move (DateGetMonth(dtNow)) to sMonth
Move (DateGetDay(dtNow)) to sDay
Move (DateGetHour(dtNow)) to sHour
Move (DateGetMinute(dtNow)) to sMin
Move (DateGetSecond(dtNow)) to sSec
Move (DateGetMillisecond(dtNow)) to smilSec

If (Length(sMonth)=1) Move ("0"+sMonth) to sMonth
If (Length(sDay)=1) Move ("0"+sDay) to sDay
If (Length(sHour)=1) Move ("0"+sHour) to sHour
If (Length(sMin)=1) Move ("0"+sMin) to sMin
If (Length(sSec)=1) Move ("0"+sSec) to sSec
If (Length(smilSec)=1) Move ("0"+smilSec) to smilSec
If (Length(smilSec)=2) Move ("0"+smilSec) to smilSec

Move (SFormat("%1-%2-%3T%4:%5:%6.%7",sYear,sMonth,sDay,sHour,sMin,sSec,smilSec)) to sTimeStamp

Function_Return sTimeStamp
End_Function

</source>

=== External links ===

See also:
* [https://downloads.dataaccess.com/downloads/dataflex/date-time-1467#description DataAccess DateTime Library]

=== XML DateTime functions ===

If you have a SOAP service and you need to convert from / to datetime formats then these functions might come in handy.

<source lang="dataflex">

//
// Gets the data and time for the datetime string as passed by
// XML. Automatic casting strips of the time part and we do
// want the time
//
// Returns:
// dtDateTime with the date and time as passed in xml
//
Function StringToDateTime String sDateTime Returns DateTime
String sDate
String sYear sMonth sDay
String sHours sMinutes sSeconds
String sMilliSeconds
String sTimeString
Integer iPos
DateTime dtTime

Move "" to sTimeString
Move (Pos("T",sDateTime)) to iPos
If (iPos>0) Begin
Move (Left(sDateTime,iPos-1)) to sDate
Move (Left(sDate,4)) to sYear
Move (Mid(sDate,2,6)) to sMonth
Move (Right(sDate,2)) to sDay
//Move sDate to dtTime // does not work, because US has no military date format
Move (Replace(sDate+"T",sDateTime,"")) to sTimeString
// Extract parts
Move (Mid(sTimeString, 2, 1)) to sHours
Move (Mid(sTimeString, 2, 4)) to sMinutes
Move (Mid(sTimeString, 2, 7)) to sSeconds
Move (Mid(sTimeString, 3, 10)) to sMilliSeconds
End

// Set to DateTime
Move (DateSetYear(dtTime, Integer(sYear))) to dtTime
Move (DateSetMonth(dtTime, Integer(sMonth))) to dtTime
Move (DateSetDay(dtTime, Integer(sDay))) to dtTime
Move (DateSetHour(dtTime, Integer(sHours))) to dtTime
Move (DateSetMinute(dtTime, Integer(sMinutes))) to dtTime
Move (DateSetSecond(dtTime, Integer(sSeconds))) to dtTime
Move (DateSetMilliSecond(dtTime, Integer(sMilliSeconds))) to dtTime

Function_Return dtTime
End_Function

//
// Gets the datetime as passed by XML.
// Automatic casting strips of the Time part and we do
// want the time
//
// Returns:
// DateTime string with the date and time as passed in xml
//
Function DateTimeToString DateTime dtTime Returns String
String sYear sMonth sDay
String sHours sMinutes sSeconds
String sMilliSeconds
String sTimeString

Move "" to sTimeString

Move (DateGetYear(dtTime)) to sYear
Move (DateGetMonth(dtTime)) to sMonth
If (Integer(sMonth)<10) Move ("0"+sMonth) to sMonth
Move (DateGetDay(dtTime)) to sDay
If (Integer(sDay)<10) Move ("0"+sDay) to sDay
Move (DateGetHour(dtTime)) to sHours
If (Integer(sHours)<10) Move ("0"+sHours) to sHours
Move (DateGetMinute(dtTime)) to sMinutes
If (Integer(sMinutes)<10) Move ("0"+sMinutes) to sMinutes
Move (DateGetSecond(dtTime)) to sSeconds
If (Integer(sSeconds)<10) Move ("0"+sSeconds) to sSeconds
Move (DateGetMilliSecond(dtTime)) to sMilliSeconds
Move (sYear+"-"+sMonth+"-"+sDay+"T"+sHours+":"+sMinutes+":"+sSeconds+"."+sMilliSeconds) to sTimeString
Function_Return sTimeString
End_Function

</source>

[[Category:How To]]
[[Category:Tutorials]]

DfSplat

2023-03-07T10:50:02Z

Wil: Removing another really old one

'''dfSPlat''' is a free open source third party tool, intended to help with debugging DataFlex applications. It is written in DataFlex and wraps the DataFlex development components in order to run. At this moment it can be used to debug applications from Visual DataFlex 12.0 up to DataFlex 19.1

==Random screenshots==
For context of these screenshots please see the following forum post. https://support.dataaccess.com/Forums/showthread.php?57177-VdfSplat-alfa-1-DataFlex-Debugger&p=299704#post299704

[[File:dfSplat-DDView2.png]]

[[File:dfSplat-DDView3.png]]

[[File:dfSplat-DDViewForeignTab.png]]

[[File:dfSplat-DDViewRelationshipsTab.png]]

[[File:dfSplat-DDViewViewTableTab.png]]

[[File:dfSplat-EvalObjects.png]]

[[File:dfSplat-EvalProperty.png]]

[[File:dfSplat-EvalPropertyOf.png]]

[[File:dfSplat-ObjectInspector.png]]

==Notes==
*This tool is currently (March 2020) in alpha stage.

==Articles==
* [[Using dfSplat to identify object leaks]]

==External Links==
*[https://projects.vdf-guidance.com/projects/dfsplat dfSplat homepage]
*[https://projects.vdf-guidance.com/projects/dfsplat/files dfSplat downloads]

[[Category: Development Tools]]

DfSplat

2023-03-07T10:48:36Z

Wil: Removing another really old one

'''dfSPlat''' is a free open source third party tool, intended to help with debugging DataFlex applications. It is written in DataFlex and wraps the DataFlex development components in order to run. At this moment it can be used to debug applications from Visual DataFlex 12.0 up to DataFlex 19.1

==Random screenshots==
For context of these screenshots please see the following forum post. https://support.dataaccess.com/Forums/showthread.php?57177-VdfSplat-alfa-1-DataFlex-Debugger&p=299704#post299704

[[File:dfSplat-DDView2.png]]

[[File:dfSplat-DDView3.png]]

[[File:dfSplat-DDView4.png]]

[[File:dfSplat-DDViewForeignTab.png]]

[[File:dfSplat-DDViewRelationshipsTab.png]]

[[File:dfSplat-DDViewViewTableTab.png]]

[[File:dfSplat-EvalObjects.png]]

[[File:dfSplat-EvalProperty.png]]

[[File:dfSplat-EvalPropertyOf.png]]

[[File:dfSplat-ObjectInspector.png]]

==Notes==
*This tool is currently (March 2020) in alpha stage.

==Articles==
* [[Using dfSplat to identify object leaks]]

==External Links==
*[https://projects.vdf-guidance.com/projects/dfsplat dfSplat homepage]
*[https://projects.vdf-guidance.com/projects/dfsplat/files dfSplat downloads]

[[Category: Development Tools]]

DfSplat

2023-03-07T10:46:01Z

Wil: /* Random screenshots */

'''dfSPlat''' is a free open source third party tool, intended to help with debugging DataFlex applications. It is written in DataFlex and wraps the DataFlex development components in order to run. At this moment it can be used to debug applications from Visual DataFlex 12.0 up to DataFlex 19.1

==Random screenshots==
For context of these screenshots please see the following forum post. https://support.dataaccess.com/Forums/showthread.php?57177-VdfSplat-alfa-1-DataFlex-Debugger&p=299704#post299704

[[File:dfSplat-DDView1.png]]

[[File:dfSplat-DDView2.png]]

[[File:dfSplat-DDView3.png]]

[[File:dfSplat-DDView4.png]]

[[File:dfSplat-DDViewForeignTab.png]]

[[File:dfSplat-DDViewRelationshipsTab.png]]

[[File:dfSplat-DDViewViewTableTab.png]]

[[File:dfSplat-EvalObjects.png]]

[[File:dfSplat-EvalProperty.png]]

[[File:dfSplat-EvalPropertyOf.png]]

[[File:dfSplat-ObjectInspector.png]]

==Notes==
*This tool is currently (March 2020) in alpha stage.

==Articles==
* [[Using dfSplat to identify object leaks]]

==External Links==
*[https://projects.vdf-guidance.com/projects/dfsplat dfSplat homepage]
*[https://projects.vdf-guidance.com/projects/dfsplat/files dfSplat downloads]

[[Category: Development Tools]]

DfSplat

2023-03-07T10:31:19Z

Wil: Removing some really obsolete images

'''dfSPlat''' is a free open source third party tool, intended to help with debugging DataFlex applications. It is written in DataFlex and wraps the DataFlex development components in order to run. At this moment it can be used to debug applications from Visual DataFlex 12.0 up to DataFlex 19.1

==Random screenshots==

[[File:dfSplat-DDView1.png]]
[[File:dfSplat-DDView2.png]]
[[File:dfSplat-DDView3.png]]
[[File:dfSplat-DDView4.png]]
[[File:dfSplat-DDViewForeignTab.png]]
[[File:dfSplat-DDViewRelationshipsTab.png]]
[[File:dfSplat-DDViewViewTableTab.png]]
[[File:dfSplat-EvalObjects.png]]
[[File:dfSplat-EvalProperty.png]]
[[File:dfSplat-EvalPropertyOf.png]]
[[File:dfSplat-ObjectInspector.png]]

==Notes==
*This tool is currently (March 2020) in alpha stage.

==Articles==
* [[Using dfSplat to identify object leaks]]

==External Links==
*[https://projects.vdf-guidance.com/projects/dfsplat dfSplat homepage]
*[https://projects.vdf-guidance.com/projects/dfsplat/files dfSplat downloads]

[[Category: Development Tools]]

File:DfSplat-ObjectInspectorDDO2.png

2023-03-07T10:30:41Z

Wil:

File:DfSplat-ObjectInspectorDDO.png

2023-03-07T10:29:53Z

Wil:

File:DfSplat-ObjectInspector.png

2023-03-07T10:29:21Z

Wil:

File:DfSplat-EvalPropertyOf.png

2023-03-07T10:28:47Z

Wil:

File:DfSplat-EvalProperty.png

2023-03-07T10:28:19Z

Wil:

File:DfSplat-EvalObjects.png

2023-03-07T10:27:39Z

Wil:

File:DfSplat-DDViewViewTableTab.png

2023-03-07T10:27:12Z

Wil:

File:DfSplat-DDViewRelationshipsTab.png

2023-03-07T10:26:43Z

Wil:

File:DfSplat-DDViewForeignTab.png

2023-03-07T10:25:27Z

Wil:

File:DfSplat-DDView4.png

2023-03-07T10:24:54Z

Wil:

File:DfSplat-DDView3.png

2023-03-07T10:24:29Z

Wil:

File:DfSplat-DDView2.png

2023-03-07T10:24:07Z

Wil:

File:DfSplat-DDView1.png

2023-03-07T10:23:35Z

Wil:

DfSplat

2023-03-07T10:22:47Z

Wil: Adding old screenshots

'''dfSPlat''' is a free open source third party tool, intended to help with debugging DataFlex applications. It is written in DataFlex and wraps the DataFlex development components in order to run. At this moment it can be used to debug applications from Visual DataFlex 12.0 up to DataFlex 19.1

==Random screenshots==

[[File:dfSplat-DDView1.png]]
[[File:dfSplat-DDView2.png]]
[[File:dfSplat-DDView3.png]]
[[File:dfSplat-DDView4.png]]
[[File:dfSplat-DDViewForeignTab.png]]
[[File:dfSplat-DDViewRelationshipsTab.png]]
[[File:dfSplat-DDViewViewTableTab.png]]
[[File:dfSplat-EvalObjects.png]]
[[File:dfSplat-EvalProperty.png]]
[[File:dfSplat-EvalPropertyOf.png]]
[[File:dfSplat-ObjectInspector.png]]
[[File:dfSplat-ObjectInspectorDDO.png]]
[[File:dfSplat-ObjectInspectorDDO2.png]]

==Notes==
*This tool is currently (March 2020) in alpha stage.

==Articles==
* [[Using dfSplat to identify object leaks]]

==External Links==
*[https://projects.vdf-guidance.com/projects/dfsplat dfSplat homepage]
*[https://projects.vdf-guidance.com/projects/dfsplat/files dfSplat downloads]

[[Category: Development Tools]]

Codejock

2022-12-20T11:19:23Z

Wil:

Codejock

2022-12-20T11:17:22Z

Wil: removal "stub" tag

Code Jock adds a new visual interface to Visual DataFlex

* [[Code Jock menus]]
* [[Dynamic codejock menus from a database]]
* [[How to add your own items to the default Codejock Context menu]]
* [[Add icons with subset of images to CodeJock CommandBars]]
* [[Codejock Grid with ProgressBar]]
* [[Time edit grid column for cCJGrid]]
* [[Apply color to codejock grid column headers]]
* [[cCJGrid custom row height]]

[[Category:Codejock]]

Codejock

2022-12-20T11:16:50Z

Wil: Adding a few other codejock articles here

CCJGrid custom row height

2022-12-20T11:12:07Z

Wil: Cleanup code that isn't used (less is more)

Normally you can't set the row height for an individual row in a codejock grid.

The following code shows you how-to do that.

<source lang="dataflex">
Use Windows.pkg
Use DFClient.pkg

Use cCJGrid.pkg
Use cCJGridColumn.pkg

Deferred_View Activate_oListWithImage for ;
Object oListWithImage is a dbView
Set Border_Style to Border_Thick
Set Size to 332 591
Set Location to 2 2
Set Label to "ListWithImage"

Object oThisProductList is a cCJGrid
Set Size to 325 580
Set Location to 4 5

Set pbReadOnly to True

Procedure OnComMeasureRow Variant llRow OLE_HANDLE llhDC Integer llWidth Integer ByRef llHeight
Move 75 to llHeight
Forward Send OnComMeasureRow llRow llhDC llWidth llHeight
End_Procedure

Procedure ResetGrid
Handle hoPaint
Integer iCustomDraw
Boolean bIsVirtual bUseFocusCell
Boolean bFixed

Get phoReportPaintManager to hoPaint
Forward Send ResetGrid
Get pbUseFocusCellRectangle to bUseFocusCell
Move 0 to iCustomDraw
If bUseFocusCell Begin
Move (xtpCustomDrawItem) to iCustomDraw
End
Move (iCustomDraw ior xtpCustomBeforeDrawRow ior xtpCustomMeasureRow) to iCustomDraw

Get ComFixedRowHeight of hoPaint to bFixed // ComSetCustomDraw resets this to True, must be restored
Send ComSetCustomDraw iCustomDraw
Set ComFixedRowHeight of hoPaint to bFixed
End_Procedure

Object oSTMAS_THUMBNAIL is a cCJGridColumn
Set piWidth to 100
Set pbEditable to False
Set pbMultiLine to True

Function DisplayImage String sImageName Returns String
String sXAML

Move "" to sXAML
Append sXAML '<StackPanel HorizontalAlignment="Center" Name="Grid1" VerticalAlignment="Top">'
Append sXAML '<Border HorizontalAlignment="Center" Name="Border1" VerticalAlignment="Top" Background="White" BorderBrush="#FF1FA3EB" BorderThickness="0,0,0,0">'
Append sXAML '<Image Name="Image1" Stretch="Uniform" Width="75px" Height="75px" Source="%1" />'
Append sXAML '</Border>'
Append sXAML '</StackPanel>'

Move (SFormat(sXAML, sImageName)) to sXAML
Function_Return sXAML
End_Function

Procedure OnCreateColumn
Forward Send OnCreateColumn
Delegate Set ComEnableMarkup to True
End_Procedure
End_Object

Object oSTMAS_CODE is a cCJGridColumn
Set piWidth to 197
Set psCaption to "Product"
Set pbEditable to False
End_Object

Procedure LoadData
tDataSourceRow[] MyData
String sXAML
String sPath

Send ResetGrid
Get psBitmapPath of (phoWorkspace(ghoApplication)) to sPath
Get DisplayImage of oSTMAS_THUMBNAIL (sPath+"\01.01.01_t.jpg") to sXAML // Put the image in the bitmap path

Move sXAML to MyData[0].sValue[0]
Move "01.01.01" to MyData[0].sValue[1]

Send ReInitializeData MyData False
End_Procedure

Procedure Activating
Forward Send Activating
Send LoadData
End_Procedure
End_Object

Cd_End_Object
</source>

See also: [https://support.dataaccess.com/Forums/showthread.php?67605-cCJGrid-Row-Height cCJGrid Row Height]

[[Category:Codejock]]

CCJGrid custom row height

2022-12-20T11:08:16Z

Wil: Created page with "Normally you can't set the row height for an individual row in a codejock grid. The following code shows you how-to do that. <source lang="dataflex"> Use Windows.pkg Use DFClient.pkg Use cCJGrid.pkg Use cCJGridColumn.pkg Deferred_View Activate_oListWithImage for ; Object oListWithImage is a dbView Set Border_Style to Border_Thick Set Size to 332 591 Set Location to 2 2 Set Label to "ListWithImage" Object oThisProductList is a cCJGrid Set Size to 325..."

Normally you can't set the row height for an individual row in a codejock grid.

The following code shows you how-to do that.

<source lang="dataflex">
Use Windows.pkg
Use DFClient.pkg

Use cCJGrid.pkg
Use cCJGridColumn.pkg

Deferred_View Activate_oListWithImage for ;
Object oListWithImage is a dbView
Set Border_Style to Border_Thick
Set Size to 332 591
Set Location to 2 2
Set Label to "ListWithImage"

Object oThisProductList is a cCJGrid
Set Size to 325 580
Set Location to 4 5

Set pbReadOnly to True

Procedure OnComMeasureRow Variant llRow OLE_HANDLE llhDC Integer llWidth Integer ByRef llHeight
Move 75 to llHeight
Forward Send OnComMeasureRow llRow llhDC llWidth llHeight
End_Procedure

Procedure ResetGrid
Handle hoPaint
Integer iCustomDraw
Boolean bIsVirtual bUseFocusCell
Boolean bFixed

Get phoReportPaintManager to hoPaint
Forward Send ResetGrid
Get pbUseFocusCellRectangle to bUseFocusCell
Move 0 to iCustomDraw
If bUseFocusCell Begin
Move (xtpCustomDrawItem) to iCustomDraw
End
Move (iCustomDraw ior xtpCustomBeforeDrawRow ior xtpCustomMeasureRow) to iCustomDraw

Get ComFixedRowHeight of hoPaint to bFixed // ComSetCustomDraw resets this to True, must be restored
Send ComSetCustomDraw iCustomDraw
Set ComFixedRowHeight of hoPaint to bFixed
End_Procedure

Object oSTMAS_THUMBNAIL is a cCJGridColumn
Set piWidth to 100
Set pbEditable to False
Set pbMultiLine to True

Function DisplayImage String sImageName Returns String
String sXAML

Send OnSetImageName (&sImageName)

Move "" to sXAML
Append sXAML '<StackPanel HorizontalAlignment="Center" Name="Grid1" VerticalAlignment="Top">'
Append sXAML '<Border HorizontalAlignment="Center" Name="Border1" VerticalAlignment="Top" Background="White" BorderBrush="#FF1FA3EB" BorderThickness="0,0,0,0">'
Append sXAML '<Image Name="Image1" Stretch="Uniform" Width="75px" Height="75px" Source="%1" />'
Append sXAML '</Border>'
Append sXAML '</StackPanel>'

Move (SFormat(sXAML, sImageName)) to sXAML
Function_Return sXAML
End_Function

Procedure OnCreateColumn
Forward Send OnCreateColumn
Delegate Set ComEnableMarkup to True
End_Procedure

Procedure OnSetImageName String ByRef sImageName
End_Procedure

Procedure OnSetCalculatedValue String ByRef sValue
Forward Send OnSetCalculatedValue (&sValue)
End_Procedure

Procedure OnSetDisplayMetrics Handle hoGridItemMetrics Integer iRow String ByRef sValue
Forward Send OnSetDisplayMetrics hoGridItemMetrics iRow (&sValue)
End_Procedure
End_Object

Object oSTMAS_CODE is a cCJGridColumn
Set piWidth to 197
Set psCaption to "Product"
Set pbEditable to False
End_Object

Procedure LoadData
tDataSourceRow[] MyData
String sXAML
String sPath

Send ResetGrid
Get psBitmapPath of (phoWorkspace(ghoApplication)) to sPath
Get DisplayImage of oSTMAS_THUMBNAIL (sPath+"\01.01.01_t.jpg") to sXAML // Put the image in the bitmap path

Move sXAML to MyData[0].sValue[0]
Move "01.01.01" to MyData[0].sValue[1]

Send ReInitializeData MyData False
End_Procedure

Procedure Activating
Forward Send Activating
Send LoadData
End_Procedure
End_Object

Cd_End_Object
</source>

See also: [https://support.dataaccess.com/Forums/showthread.php?67605-cCJGrid-Row-Height cCJGrid Row Height]

[[Category:Codejock]]

Codejock

2022-12-20T11:03:16Z

Wil:

Code Jock adds a new visual interface to Visual DataFlex

* [[Code Jock menus]]
* [[Apply color to codejock grid column headers]]
* [[cCJGrid custom row height]]

[[Category:Codejock]] [[Category:Stub]]

Apply color to codejock grid column headers

2022-12-19T17:45:51Z

Wil:

Sometimes you might want to color your grid column header.
This is not natively supported via the DataFlex wrapper for the codejock grids.

You can however get this by using the following code:

<source lang="dataflex">
// In the cCjDbGrid
Procedure OnCreate
Handle hoMarkUpContext
Variant vMarkUpContext
String sMarkup
Handle hoReportColumns
Handle hoReportColumn
Integer iCols
Integer iDisplayIndex
Integer iMyColumn
Variant vCol

Forward Send OnCreate

// As we use markup, we have to enable it and do so early on
Set ComEnableMarkup to True

// Color one column header yellow
Get phoReportColumns to hoReportColumns
Get phoReportColumn to hoReportColumn
Get ComCount of hoReportColumns to iCols
Move 1 to iMyColumn
For iDisplayIndex from 0 to (iCols-1)
Get ComColumn of hoReportColumns iDisplayIndex to vCol
If (iDisplayIndex=iMyColumn) Begin
Set pvComObject of hoReportColumn to vCol

Move "<Border xmlns='http://schemas.microsoft.com/winfx/2006/xaml/presentation' xmlns:x='http://schemas.microsoft.com/winfx/2006/xaml'>" to sMarkup
Append sMarkup " <Border.Background> "
Append sMarkup ' <LinearGradientBrush StartPoint="0, 0" EndPoint="1,0">'
Append sMarkup ' <GradientStop Color="Yellow" Offset="0"/>'
Append sMarkup " </LinearGradientBrush> "
Append sMarkup " </Border.Background>"
Append sMarkup ' <TextBlock Name="Sent" HorizontalAlignment="Left" Cursor="Hand">Sent items</TextBlock>'
Append sMarkup "</Border>"
Set ComCaption of hoReportColumn to sMarkup
End
Loop
End_Procedure
</source>

See also: [https://support.dataaccess.com/Forums/showthread.php?69298-Colour-(or-Color)-in-cDbCjGrids&p=377675#post377675 Colour (or Color) in cDbCjGrids (DataFlex forums)]

[[Category:Codejock]]

Apply color to codejock grid column headers

2022-12-19T17:44:05Z

Wil: Created page with "Sometimes you might want to color your grid column header. This is not natively supported via the DataFlex wrapper for the codejock grids. You can however get this by using the following code: <source lang="dataflex"> // In the cCjDbGrid Procedure OnCreate Handle hoMarkUpContext Variant vMarkUpContext String sMarkup Handle hoReportColumns Handle hoReportColumn Integer iCols Integer iDisplayIndex I..."

Sometimes you might want to color your grid column header.
This is not natively supported via the DataFlex wrapper for the codejock grids.

You can however get this by using the following code:

<source lang="dataflex">
// In the cCjDbGrid
Procedure OnCreate
Handle hoMarkUpContext
Variant vMarkUpContext
String sMarkup
Handle hoReportColumns
Handle hoReportColumn
Integer iCols
Integer iDisplayIndex
Integer iMyColumn
Variant vCol

Forward Send OnCreate

// As we use markup, we have to enable it and do so early on
Set ComEnableMarkup to True

// Color one column header yellow
Get phoReportColumns to hoReportColumns
Get phoReportColumn to hoReportColumn
Get ComCount of hoReportColumns to iCols
Move 1 to iMyColumn
For iDisplayIndex from 0 to (iCols-1)
Get ComColumn of hoReportColumns iDisplayIndex to vCol
If (iDisplayIndex=iMyColumn) Begin
Set pvComObject of hoReportColumn to vCol

Move "<Border xmlns='http://schemas.microsoft.com/winfx/2006/xaml/presentation' xmlns:x='http://schemas.microsoft.com/winfx/2006/xaml'>" to sMarkup
Append sMarkup " <Border.Background> "
Append sMarkup ' <LinearGradientBrush StartPoint="0, 0" EndPoint="1,0">'
Append sMarkup ' <GradientStop Color="Yellow" Offset="0"/>'
Append sMarkup " </LinearGradientBrush> "
Append sMarkup " </Border.Background>"
Append sMarkup ' <TextBlock Name="Sent" HorizontalAlignment="Left" Cursor="Hand">Sent items</TextBlock>'
Append sMarkup "</Border>"
Set ComCaption of hoReportColumn to sMarkup
End
Loop
End_Procedure
</source>

See also: https://support.dataaccess.com/Forums/showthread.php?69298-Colour-(or-Color)-in-cDbCjGrids&p=377675#post377675

[[Category:Codejock]]

Codejock

2022-12-19T17:40:15Z

Wil:

Code Jock adds a new visual interface to Visual DataFlex

* [[Code Jock menus]]
* [[Apply color to codejock grid column headers]]

[[Category:Codejock]] [[Category:Stub]]

Codejock

2022-12-19T17:39:41Z

Wil:

Code Jock adds a new visual interface to Visual DataFlex

[[Code Jock menus]]
[[Color codejock grid column headers]]

[[Category:Codejock]] [[Category:Stub]]

Get the selected printer device name

2022-09-15T10:34:50Z

Wil: Created page with "DataFlex Reports has a class cPrintDialog which you can use to popup a printer dialog and then retrieve the selected printer from. <source lang="dataflex"> Object oPrintDialog is a cPrintDialog End_Object Object oPrint is a Button Set Location to 0 0 Set Label to "Print" Procedure OnClick Integer iRes String sPrntr Get PrintDialog of oPrintDialog to iRes..."

DataFlex Reports has a class cPrintDialog which you can use to popup a printer dialog and then retrieve the selected printer from.

<source lang="dataflex">
Object oPrintDialog is a cPrintDialog
End_Object

Object oPrint is a Button
Set Location to 0 0
Set Label to "Print"

Procedure OnClick
Integer iRes
String sPrntr

Get PrintDialog of oPrintDialog to iRes

If iRes Begin
Get psDeviceName of oPrintDialog to sPrntr

Direct_Output ("WinLST:" * sPrntr)
Writeln "Hello World!"
Close_Output
End

End_Procedure

End_Object
</source>

=== External links ===

* [https://support.dataaccess.com/Forums/showthread.php?68984-How-to-allow-the-user-to-select-a-printer How to allow the user to select a printer?]

[[Category: Tutorials]]
[[Category: Windows Applications]]

Portal:Windows Applications

2022-09-15T10:28:07Z

Wil: /* Tutorials */

The '''Windows Applications Portal''' is the place to come for articles and tutorials on developing [http://en.wikipedia.org/wiki/Microsoft_Windows Windows] applications with '''[[DataFlex]]'''.

Note: [[DataFlex]] was renamed from [[Visual DataFlex]], by Data Access Worldwide in 2014.

==Articles==
*'''[[Visual DataFlex]]''' (covering the basic stuff)

==Tutorials==
*How to [https://support.dataaccess.com/Forums/showthread.php?64430-HOWTO-Fix-RemoteApp-losing-focus-and-or-crashing-due-to-z-index-issue-on-Win10-Pro How to fix remote app losing focus and/or crashing due to z-index issue on Win10-Pro]
*How to add '''[[Add Workspace Parameter|Workspace Parameters]]''' using the [[cIniFile]] class
*[[Running_VDF_programs_as_Windows_Services]]
*[[Using On_key for undefined keys]]
*[[Passing the workspace as a parameter]]
*Adding [[SMTP Email]] to your application using an [[ActiveX]] control
*[[Run only one instance of your application]]
*[[Customize prompt lookup behavior in a dbgrid]]
*[[Print the content of an embedded IE html control]]
*[[Get the selected printer device name]]
*[[Return data from every object in a dbView]]
*[[Print to a file using reports]]
*[[Visual Modelling of multiple visual objects]]
*[[Using SQL Connectivity|SQL Connectivity]]
*[[Upgrading workspaces to a newer Visual DataFlex version]]
*[[Dynamic codejock menus from a database]]
*[[How to add your own items to the default Codejock Context menu]]
*[[Simulate submitting data from a web browser]]
*[[Using GIT for Dataflex Development]]

==Advanced==
* [[Add icons with subset of images to CodeJock CommandBars]]
* [[Programmatically edit a treeview label]]
* [[Multi-row select for Grid control]]
* [[Calculating the cost of inventory kits]] - Functions that call themselves
* [[External dependencies]]
* [[Enumerate windows fonts]]
* [[Get Datadictionary object from File Number]]
* [[Codejock Grid with ProgressBar]]
* [[Time edit grid column for cCJGrid]]

==External Resources==
* http://www.vdf-guidance.com
* http://www.dataaccess.com
* http://www.dataaccess.nl
* [http://www.sture.com/wasp/ WASP Newsgroup search] engine
* [http://www.starzen.com StarZen Technologies] Addon Tools, Books, Magazines, Consulting
* [http://www.moose-software.com Visual Dataflex for the Spanish speaking community] HelpDesk Software, Web App and Ajax applications, Electos
* [https://www.rdctools.com/ RDC Tools International] Open Source, Consulting & Tools
* http://eriksven.com/
* [https://discord.gg/abyersd DataFlex discord server]

==Requested Articles / Works in progress==

new articles go here! --[[User:Jka|Jka]] 22:49, 22 December 2008 (UTC)

*[[Converting from DOS to Windows]]
*[[COM|Using COM Objects]] (reuse existing functionality)
*[[Scanning / TWAIN components]]

*[[Some Link]]

[[Category:Portals]]
[[Category:DataFlex]]

Handler "DataFlex 20.1 Web Services 64bit" has a bad module "IsapiModule" in its module list

2022-08-10T08:03:51Z

Wil: Updated with Harm's findings from the forum

If you use DataFlex 20.x to create webservices and not webapps that have a fancy new interface using the WebApp framework then you might bump into the following problem.

* WebApps such as "WebOrderMobile" work fine
* Your WebServices using only the cWebAppBasic framework do not work.

You're getting the following error when you try to browse to a .wso file.

[[File:Bad-module-ISAPI-module.png|784px]]

"HTTP Error 500.21 - Internal Server Error
Handler "DataFlex 20.1 Web Services 64bit" has a bad module "IsapiModule" in its module list"

This error actually gives a hint, but as the normal modules in IIS look fine and the same as in normal webapps you might be puzzled like I was.

It wasn't until I ran DataFlex WebApp Check that it dawned upon me what was wrong.

The cBasicWebApp class depends on IIS ASP Classic which installs ISAPI modules!

Normally the DataFlex 20.1 installer takes care of that, but in case it did not, or if IIS was pre configured and you bump in the above error. Then now you know what to do.

So follow the steps from the DataFlex WebApp Check application to install that and your problems are solved.

[[Category:Web Applications]]

Handler "DataFlex 20.1 Web Services 64bit" has a bad module "IsapiModule" in its module list

2022-07-21T13:53:54Z

Wil:

If you use DataFlex 20.x to create webservices and not webapps that have a fancy new interface using the WebApp framework then you might bump into the following problem.

* WebApps such as "WebOrderMobile" work fine
* Your WebServices using only the cWebAppBasic framework do not work.

You're getting the following error when you try to browse to a .wso file.

[[File:Bad-module-ISAPI-module.png|784px]]

"HTTP Error 500.21 - Internal Server Error
Handler "DataFlex 20.1 Web Services 64bit" has a bad module "IsapiModule" in its module list"

This error actually gives a hint, but as the normal modules in IIS look fine and the same as in normal webapps you might be puzzled like I was.

It wasn't until I ran DataFlex WebApp Check that it dawned upon me what was wrong.

The cBasicWebApp class depends on IIS ASP Classic!

Note that while DataFlex 20.1 installs and configures IIS on your behalf, it _does_not_ configure ASP/IIS classic.

So follow the steps from the DataFlex WebApp Check application to install that and your problems are solved.

[[Category:Web Applications]]

Handler "DataFlex 20.1 Web Services 64bit" has a bad module "IsapiModule" in its module list

2022-07-21T13:50:10Z

Wil:

If you use DataFlex 20.x to create webservices and not webapps that have a fancy new interface using the WebApp framework then you might bump into the following problem.

* WebApps such as "WebOrderMobile" work fine
* Your WebServices using only the cWebAppBasic framework do not work.

You're getting the following error when you try to browse to a .wso file.

[[File:Bad-module-ISAPI-module.png|784px]]

"HTTP Error 500.21 - Internal Server Error
Handler "DataFlex 20.1 Web Services 64bit" has a bad module "IsapiModule" in its module list"

This error actually gives a hint, but as the normal modules in IIS look fine and the same as in normal webapps you might be puzzled like I was.

It wasn't until I ran DataFlex WebApp Check that it dawned upon me what was wrong.

The cBasicWebApp class depends on IIS ASP Classic!

So follow the steps from the DataFlex WebApp Check application to install that and your problems are solved.

[[Category:Web Applications]]

Handler "DataFlex 20.1 Web Services 64bit" has a bad module "IsapiModule" in its module list

2022-07-21T13:48:37Z

Wil:

If you use DataFlex 20.x to create webservices and not webapps that have a fancy new interface using the WebApp framework then you might bump into the following problem.

* WebApps such as "WebOrderMobile" work fine
* Your WebServices using only the cWebAppBasic framework do not work.

You're getting the following error when you try to browse to a .wso file.

[[File:Bad-module-ISAPI-module.png]]

"HTTP Error 500.21 - Internal Server Error
Handler "DataFlex 20.1 Web Services 64bit" has a bad module "IsapiModule" in its module list"

This error actually gives a hint, but as the normal modules in IIS look fine and the same as in normal webapps you might be puzzled like I was.

It wasn't until I ran DataFlex WebApp Check that it dawned upon me what was wrong.

The cBasicWebApp class depends on IIS ASP Classic!

So follow the steps from the DataFlex WebApp Check application to install that and your problems are solved.

[[Category:Web Applications]]

Handler "DataFlex 20.1 Web Services 64bit" has a bad module "IsapiModule" in its module list

2022-07-21T13:45:08Z

Wil:

If you use DataFlex 20.x to create webservices and not webapps that have a fancy new interface using the WebApp framework then you might bump into the following problem.

- WebApps such as "WebOrderMobile" work fine
- Your WebServices using only the cWebAppBasic framework do not work.

You're getting the following error when you try to browse to a .wso file.

[[File:Bad-module-ISAPI-module.png]]

"HTTP Error 500.21 - Internal Server Error
Handler "DataFlex 20.1 Web Services 64bit" has a bad module "IsapiModule" in its module list"

This error actually gives a hint, but as the normal modules in IIS look fine and the same as in normal webapps you might be puzzled like I was.

It wasn't until I ran DataFlex WebApp Check that it dawned upon me what was wrong.

The cBasicWebApp class depends on IIS ASP Classic!

So follow the steps from the DataFlex WebApp Check application to install that and your problems are solved.