Index
2009-10-14 16:08 – MB Software Solutions General Account : Confusing code
2009-10-14 16:34 – Lew : Re: Confusing code
2009-10-14 16:42 – Tracy Pearson : RE: Confusing code
Back to top
Confusing code

Author: MB Software Solutions General Account

Posted: 2009-10-14 16:08:40   Link

Here's the code:

USE (THIS.cPath+"QuitApp.dbf") IN (SELECT("QuitApp")) SHARED

SELECT (SELECT("QuitApp"))

Is this basically saying "use the table if it's not already being used;

otherwise, use it in a new area....and then select the area where it is.

Seems to me like it could have been written easier with a simple

IF NOT USED("QuitApp") THEN

USE this.cPath + "QuitApp" in 0

ENDIF

SELECT QuitApp

???

tia!

--Mike

©2009 MB Software Solutions General Account
Back to top
Re: Confusing code

Author: Lew

Posted: 2009-10-14 16:34:57   Link

Tm90IHRoZSBzYW1lIEkgdGhpbmsuIFRoZSBmb3JtZXIgZm9yY2VzIHRoZSB0YWJsZSB0byBjbG9z

ZSBmaXJzdCAodGhlcmVieSBmbHVzaGluZyBhbnl0aGluZyBub3QgaGFyZCB3cml0dGVuIHlldCkg

YW5kIHRoZW4gcmVvcGVucyBpdCwgd2hlcmVhcyB0aGUgbGF0dGVyIHNraXBzIHRoZSBjbG9zZSBp

ZiBvcGVuIHN0ZXAuDQotLS0tLU9yaWdpbmFsIE1lc3NhZ2UtLS0tLQ0KRnJvbTogIk1CIFNvZnR3

YXJlIFNvbHV0aW9ucyBHZW5lcmFsIEFjY291bnQiDQoJPG1ic29mdHdhcmVzb2x1dGlvbnNAbWJz

b2Z0d2FyZXNvbHV0aW9ucy5jb20+DQpEYXRlOiBXZWQsIDE0IE9jdCAyMDA5IDE2OjA4OjQwIA0K

VG86IDxwcm9mb3h0ZWNoQGxlYWZlLmNvbT4NClN1YmplY3Q6IENvbmZ1c2luZyBjb2RlDQoNCkhl

cmUncyB0aGUgY29kZToNCiAgVVNFIChUSElTLmNQYXRoKyJRdWl0QXBwLmRiZiIpIElOIChTRUxF

Q1QoIlF1aXRBcHAiKSkgU0hBUkVEDQogIFNFTEVDVCAoU0VMRUNUKCJRdWl0QXBwIikpDQoNCklz

IHRoaXMgYmFzaWNhbGx5IHNheWluZyAidXNlIHRoZSB0YWJsZSBpZiBpdCdzIG5vdCBhbHJlYWR5

IGJlaW5nIHVzZWQ7DQpvdGhlcndpc2UsIHVzZSBpdCBpbiBhIG5ldyBhcmVhLi4uLmFuZCB0aGVu

IHNlbGVjdCB0aGUgYXJlYSB3aGVyZSBpdCBpcy4NCg0KU2VlbXMgdG8gbWUgbGlrZSBpdCBjb3Vs

ZCBoYXZlIGJlZW4gd3JpdHRlbiBlYXNpZXIgd2l0aCBhIHNpbXBsZQ0KDQpJRiBOT1QgVVNFRCgi

UXVpdEFwcCIpIFRIRU4NCiAgVVNFIHRoaXMuY1BhdGggKyAiUXVpdEFwcCIgaW4gMA0KRU5ESUYN

ClNFTEVDVCBRdWl0QXBwDQoNCg0KPz8/DQoNCnRpYSENCi0tTWlrZQ0KDQoNCg0KDQpfX19fX19f

X19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fXw0KUG9zdCBNZXNzYWdlcyB0

bzogUHJvRm94QGxlYWZlLmNvbQ0KU3Vic2NyaXB0aW9uIE1haW50ZW5hbmNlOiBodHRwOi8vbGVh

ZmUuY29tL21haWxtYW4vbGlzdGluZm8vcHJvZm94DQpPVC1mcmVlIHZlcnNpb24gb2YgdGhpcyBs

aXN0OiBodHRwOi8vbGVhZmUuY29tL21haWxtYW4vbGlzdGluZm8vcHJvZm94dGVjaA0KU2VhcmNo

YWJsZSBBcmNoaXZlOiBodHRwOi8vbGVhZmUuY29tL2FyY2hpdmVzL3NlYXJjaC9wcm9mb3gNClRo

aXMgbWVzc2FnZTogaHR0cDovL2xlYWZlLmNvbS9hcmNoaXZlcy9ieU1JRC9wcm9mb3gvNjljYzEz

NGNhNWJlZGI5YmVmZWIzMDhiOGZiN2U2ZDEuc3F1aXJyZWxAd2VibWFpbC5kc3Njby5uZXQNCioq

IEFsbCBwb3N0aW5ncywgdW5sZXNzIGV4cGxpY2l0bHkgc3RhdGVkIG90aGVyd2lzZSwgYXJlIHRo

ZSBvcGluaW9ucyBvZiB0aGUgYXV0aG9yLCBhbmQgZG8gbm90IGNvbnN0aXR1dGUgbGVnYWwgb3Ig

bWVkaWNhbCBhZHZpY2UuIFRoaXMgc3RhdGVtZW50IGlzIGFkZGVkIHRvIHRoZSBtZXNzYWdlcyBm

b3IgdGhvc2UgbGF3eWVycyB3aG8gYXJlIHRvbyBzdHVwaWQgdG8gc2VlIHRoZSBvYnZpb3VzLg0K

DQoNClJlcG9ydCBbT1RdIEFidXNlOiBodHRwOi8vbGVhZmUuY29tL3JlcG9ydEFidXNlLzY5Y2Mx

MzRjYTViZWRiOWJlZmViMzA4YjhmYjdlNmQxLnNxdWlycmVsQHdlYm1haWwuZHNzY28ubmV0DQo=

©2009 Lew
Back to top
RE: Confusing code

Author: Tracy Pearson

Posted: 2009-10-14 16:42:01   Link

Doesn't the top one flush the table and release all the relations too?

Tracy

-----Original Message-----

From: MB Software Solutions General Account

Sent: Wednesday, October 14, 2009 4:09 PM

Here's the code:

USE (THIS.cPath+"QuitApp.dbf") IN (SELECT("QuitApp")) SHARED

SELECT (SELECT("QuitApp"))

Is this basically saying "use the table if it's not already being used;

otherwise, use it in a new area....and then select the area where it is.

Seems to me like it could have been written easier with a simple

IF NOT USED("QuitApp") THEN

USE this.cPath + "QuitApp" in 0

ENDIF

SELECT QuitApp

???

tia!

--Mike

©2009 Tracy Pearson