Sorin and George,
Thank you for caring! :)
Back in the 2.6 days, when there _was_ only one datasession available, I used to dump a display status into an alternate file. It may not be very elegant, but since it is for my own consumption in maintenance, it is appropriate, and face it, in cases of program errors, disp status gives us plenty of information at a very low development price.
... and George, I think you are right, if we want the same functionality in VFP, we will have to work for it and develop something along the lines of what you suggest. It seems silly though, because datasessions as a concept is related to the database rather than to oop, so why is there no way programatically, (from the menu you can under window/datasession long after the owning objects are dead and burried!) , to access existing datasessions?
Marc
It's not necessarily Display Status functionality that we criticize. I
would imagine that, at one point, I'd like to know what tables are open and
what's their status when the error occured. Of course, using .FormCount and
SETting DATASESSION TO every form's DataSessionId would get us closer, but
the duckling is still ugly.
To conclude, I (as a novice) think it would be very helpful, as you
(George) mentioned, to have forms, at least those using Private
Datasession, log themselves into a tablelike structure where they can be
referenced when needed.
Sorin
>Now that's a nice can of worms, isn't it?
>
>One solution I can think of would involve retrieving all the open forms,
and using AMEMBERS() to examine the .DataEnvironment. I guess the .Forms
and .FormCount properties could be used, but I haven't figured out the
actual mechanics. Otherwise, you could have the forms register
eJ8+Ig4IAQaQCAAEAAAAAAABAAEAAQeQBgAIAAAA5AQAAAAAAADoAAEIgAcAGAAAAElQTS5NaWNy
b3NvZnQgTWFpbC5Ob3RlADEIAQ2ABAACAAAAAgACAAEEkAYAXAMAAAIAAAAQAAAAAwAAMAUAAAAL
AA8OAAAAAAIB/w8BAAAAUQAAAAAAAACBKx+kvqMQGZ1uAN0BD1QCAAAAAGZveHByb0B0cmFuc2Zv
cm1hdGlvbi5jb20AU01UUABmb3hwcm9AdHJhbnNmb3JtYXRpb24uY29tAAAAAB4AAjABAAAABQAA
AFNNVFAAAAAAHgADMAEAAAAaAAAAZm94cHJvQHRyYW5zZm9ybWF0aW9uLmNvbQAAAAMAFQwBAAAA
AwD+DwYAAAAeAAEwAQAAABwAAAAnZm94cHJvQHRyYW5zZm9ybWF0aW9uLmNvbScAAgELMAEAAAAf
AAAAU01UUDpGT1hQUk9AVFJBTlNGT1JNQVRJT04uQ09NAAADAAA5AAAAAAsAQDoBAAAAHgD2XwEA
AAAaAAAAZm94cHJvQHRyYW5zZm9ybWF0aW9uLmNvbQAAAAIB918BAAAAUQAAAAAAAACBKx+kvqMQ
GZ1uAN0BD1QCAAAAAGZveHByb0B0cmFuc2Zvcm1hdGlvbi5jb20AU01UUABmb3hwcm9AdHJhbnNm
b3JtYXRpb24uY29tAAAAAAMA/V8BAAAAAwD/XwAAAAACAfYPAQAAAAQAAAAAAAAFEAAAAAMAADAG
AAAACwAPDgEAAAACAf8PAQAAAEEAAAAAAAAAgSsfpL6jEBmdbgDdAQ9UAgAAAQBNYXJjIEdyYWpv
d2VyAFNNVFAAZ3JhbWljaEBjbHViLmlubmV0LmJlAAAAAB4AAjABAAAABQAAAFNNVFAAAAAAHgAD
MAEAAAAWAAAAZ3JhbWljaEBjbHViLmlubmV0LmJlAAAAAwAVDAEAAAADAP4PBgAAAB4AATABAAAA
EAAAACdNYXJjIEdyYWpvd2VyJwACAQswAQAAABsAAABTTVRQOkdSQU1JQ0hAQ0xVQi5JTk5FVC5C
RQAAAwAAOQAAAAALAEA6AAAAAB4A9l8BAAAADgAAAE1hcmMgR3Jham93ZXIAAAACAfdfAQAAAEEA
AAAAAAAAgSsfpL6jEBmdbgDdAQ9UAgAAAQBNYXJjIEdyYWpvd2VyAFNNVFAAZ3JhbWljaEBjbHVi
LmlubmV0LmJlAAAAAAMA/V8BAAAAAwD/XwAAAAACAfYPAQAAAAQAAAAAAAAGarkBBIABADMAAABS
RTogQSBncmVhdCBlcnJvciB0cmFwcGluZyByb3V0aW5lPyBbVVQ6SUQ6MDQxNzExXQBJEAEFgAMA
DgAAAM0HBwAcAAoALwA3AAEAaAEBIIADAA4AAADNBwcAHAAKAC8ANwABAGgBAQmAAQAhAAAAOUIx
Q0I4MEYyQTA3RDExMUI5QkMwMEFBMDBBREU1NjMAOgcBA5AGAGwKAAAhAAAACwACAAEAAAALACMA
AAAAAAMAJgAAAAAACwApAAAAAAADAC4AAAAAAAMANgAAAAAAQAA5AGA42/Aym7wBHgBwAAEAAAAz
AAAAUkU6IEEgZ3JlYXQgZXJyb3IgdHJhcHBpbmcgcm91dGluZT8gW1VUOklEOjA0MTcxMV0AAAIB
cQABAAAAFgAAAAG8myvHSQ+4HJwHKhHRubwAqgCt5WMAAB4AHgwBAAAABQAAAFNNVFAAAAAAHgAf
DAEAAAAWAAAAZ3JhbWljaEBjbHViLmlubmV0LmJlAAAAAwAGELaNyGQDAAcQ3AYAAB4ACBABAAAA
ZQAAAFNPUklOQU5ER0VPUkdFLFRIQU5LWU9VRk9SQ0FSSU5HOilCQUNLSU5USEUyNkRBWVMsV0hF
TlRIRVJFV0FTT05MWU9ORURBVEFTRVNTSU9OQVZBSUxBQkxFLElVU0VEVE9EVU0AAAAAAgEJEAEA
AAAxBwAALQcAAKwKAABMWkZ1ZTOGAAMACgByY3BnMTI1FjIA+Atgbg4QMDMznQH3IAKkA+MCAGNo
CsDgc2V0MCAHEwKDAFChEHZwcnEyEXZ9CoDZCMggOwlvDjA1AoAKgex1YwBQCwNjEhILxAYACwWw
C4AgAHBkIEdlcQWwZ2UsCqIKhAqAVKERAG5rIHkIYCACEA0FwGMKwAuAZyEgOuwpIArjGKZCANAZ
YBeBAHRoZSAyLjYggGRheXMsIHccEAMb4wlwIF93YXNf8iACIGx5HeEcIByAAZDbETAEEGkCIBeg
dgtwC2DDAmAYQCBJIHURMBfQxHRvHHB1bXAXoBxw1wQAC1EeIHMBkHQgEBvBdyBhA5EHQHQEkR6Q
HCBm6QMQZS4aoEkFQADAHiDUbm8FQGIcIHYEkB4gKmUfsGcAcHQcwGJ10wVAAJBuYxwgaQVABAD1
GbNtHiF3A6AFoACAIKH+dB8CF4EAwCHxCfAAcCWw0xzAJeRhcBLAbxLABzD3IpAcwBeyZgDQJcIo
kSbRMx6yHeBmICkxCcBhbX0koHIDYBEgHMAhAiF2Z75pJGAEICHBC1AJ8HQeIf8rUAuAGcEAwCdj
HpAg0SRj3wkAB+ABACRgCQBwB4ACMO8rYQ3gI0AYai4x4BeqH+E/HAALgBlkCsAcIAUQZ2h7KoIr
UHccIB2gMJEcAnP7K8Ai8XUloCdiB0Al4B4g8ReBVkZQHME0kQMQAyD3EQAkYCBSdwWwGWAZwiXh
vxeyMAUhcANwEUAzEWciYf8CIDnwHAI2IB5QKyMc4C8h+xmCJyBnGDAhgCNQI4ERMPxlbQQgAJA3
QB4gHAAIYPc0ACUhBZBhIBEeeijxKPH/JuIlsAUxJhEJcAtgIpAgQ/scAh6CYh6xM9AekB1BG/H7
A5EgYW8pUBzAOXAc0TZR/wQgHTQj8DShHiArdS7BGgD7PREcwCgDUhvzMHEZoBmCfxoAA6A1oASB
NxEXwCawL/seijojYQGAQeMcICaxOdLob2JqBZB0KPEdYQEAPmEX0BeyJUAsAAiQZCE3GpAcwCIS
YyWwBBFleK8EACdgOeE+Wj8Yak0KwM8A4Bh5CvQ2IDM2AUAWkF8BQCkxIpA1wBIEMRxgLX1Rkk8z
4QuAB0AF0B7RYX8YMFGTGGZQpFBxCxNQpmkwLTE0NAFANiAxOI4wAUAM0FUzYiBGA2HqOgyDYhFg
VQMAJGE1QK8DIBkgCXBKoVYEAHVSQXBGb3hQA2AZsiCgIEBbU01UUDoCEHi5KTFAdCuwAIAuhy4F
oPxtXRhlVmAGYAIwVsdWgOZpHIEcwEp1HhEOMBzAkDE5OTccMDM6UWHkUE1bp1RvVsdOkhfg3Suw
aiawBJBbqHVJ01bH+FJlOhFwLSBYEQVAK/N/G/ArsCkgOdIDYCVQOsE/AVmQVVQ6SUQ6MOA0MTcx
MVuWU69Qw7dP9Au2GHNbVoMXRVMikL8k4FlgX2IX5VfgHbBrBJD3ZZcYgiOAJwQgI/IeUEwi+xoR
HhFEIRVpcCGjNZxCEc8FQDSBBQFE0Wl6I0Ef8P8YZDfwXZAX0AdwUrA6wW7jZynBBUAeQnBvIfEf
0SfvF9A2IGrQIFJrI/AH4DtD/wGRH7BKJClQHQEXsnBFO1F7a/EcAWkFwCGFHOZjNW/vTBAIcAmA
I1BPK1AFoAhw7xEwHMAgEDnSLljQLqAIUSMwkXUoU0VUTLNEQQRUQXrgU1NJT069V+BPJKAkYy6C
a/FEHpH7BmAe40kX0HCkGDAFQCHB9mMJABEwciUkGGRA0xYA/ms6sTnwJhFMoTdBO+AeEL8xFV9w
P2MKQAEAH9IoPyP9I/B2MOEakDMEJeFwpCQ26RwQbHA1kGwpwQQgGYL9GGQoF/QakDByHwEJgEuz
/zdzLoIcsS8hH7AdsDTifvH/eSVZAC1AItIYZH0iHsUcwP8JADpTPMAksC1SIfR0FHMD/yGAWWA1
wHghHNIdYRwBHiDvRpIkMRhkCXBmHVEloX3hfxzyHlAJgHhBGGoXUxhqPv5OL9Fu8mvxgzEw4UaD
OxJTiHQEAG4nJfF0TcU+/ZLVTx5ROXAKQCdjH/BGkuczBJSjcMNudgbwN5EJcP9acAiQg3A54wMg
SRN04ohlBxhkF7J5NEFNRU1C8EVSUyiDsSBwTHArwOtxRBwgLn0iRZjgdmACIPswcnACZwpQBBGd
o3miBCH/m1d5mSkyBJAnYAeReLGElP8gEiUkH/A3cpViIxCfIAlx/x3gJVEcAptFjhFSQQeAEPH9
lBFzeGEdMgPxH8FGU3Cz/zd0HBGIY0ARLTAhgEjkjEb/GGQXghnweNF3wgXAIxOV3P9tLGSgk0Ar
MZAQAIAlwSgS/5EhJSRu8zyTNtI3QHkRgWL/eHIYZHi2NFGEMzgQHLF/+/+OIQYxjOMD4AOREsAR
QC4B9HF1DeBrq50X9E7eCoAFE4EAt7AAAAADABAQAAAAAAMAERAAAAAAAwCAEP////9AAAcwgEDP
oCqbvAFAAAgwYDjb8DKbvAELAACACCAGAAAAAADAAAAAAAAARgAAAAADhQAAAAAAAAMAAoAIIAYA
AAAAAMAAAAAAAABGAAAAABCFAAAAAAAAAwAFgAggBgAAAAAAwAAAAAAAAEYAAAAAUoUAALcNAAAe
ACWACCAGAAAAAADAAAAAAAAARgAAAABUhQAAAQAAAAQAAAA4LjAAAwAmgAggBgAAAAAAwAAAAAAA
AEYAAAAAAYUAAAAAAAALAC+ACCAGAAAAAADAAAAAAAAARgAAAAAOhQAAAAAAAAMAMIAIIAYAAAAA
AMAAAAAAAABGAAAAABGFAAAAAAAAAwAygAggBgAAAAAAwAAAAAAAAEYAAAAAGIUAAAAAAAAeAEGA
CCAGAAAAAADAAAAAAAAARgAAAAA2hQAAAQAAAAEAAAAAAAAAHgBCgAggBgAAAAAAwAAAAAAAAEYA
AAAAN4UAAAEAAAABAAAAAAAAAB4AQ4AIIAYAAAAAAMAAAAAAAABGAAAAADiFAAABAAAAAQAAAAAA
AAAeAD0AAQAAAAUAAABSRTogAAAAAAMADTT9NwAA4O0=
If things have the tendency to go your way, do not worry. It won't last. Jules Renard.