Re: [BLACKBOX] File names

From: Campbell, Robert (SELEX GALILEO, UK) <robert.d.campbell{([at]})nowhere.xy>
Date: Fri, 21 May 2010 08:57:52 +0100

----boundary-LibPST-iamunique-262283694_-_-
Content-type: text/plain

Thanks - just what I needed.

Cheers

Robert

>> -----Original Message-----
>> From: BlackBox [mailto:BLACKBOX{([at]})nowhere.xy
>> Of luowy{([at]})nowhere.xy
>> Sent: 21 May 2010 07:23
>> To: BLACKBOX{([at]})nowhere.xy
>> Subject: Re: [BLACKBOX] File names
>>
>>
>> *** WARNING ***
>>
>> This message has originated outside your organisation,
>> either from an external partner or the Global Internet.
>> Keep this in mind if you answer this message.
>>
>>
>> text for file name :
>>
>>
>>
>> PROCEDURE GetFileName* (rd: Files.Reader; VAR name: ARRAY OF CHAR);
>> TYPE Str = POINTER TO ARRAY [untagged] OF CHAR;
>> VAR str: Str;
>> BEGIN
>> str := SYSTEM.VAL(Str, SYSTEM.VAL(INTEGER, rd.Base()) +
>> 40); (* f(HostFiles.File).name *)
>> name := str$;
>> END GetFileName;
>>
>>
>> ----
>> To unsubscribe, send a message with body "SIGNOFF BLACKBOX"
>> to LISTSERV{([at]})nowhere.xy
>>
>>
SELEX Galileo Ltd
Registered Office: Sigma House, Christopher Martin Road, Basildon, Essex SS14 3EL
A company registered in England & Wales. Company no. 02426132
********************************************************************
This email and any attachments are confidential to the intended
recipient and may also be privileged. If you are not the intended
recipient please delete it from your system and notify the sender.
You should not copy it or use it for any purpose nor disclose or
distribute its contents to any other person.
********************************************************************

----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-262283694_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIFRoYW5rcyAtIGp1c3Qgd2hhdCBJIG5lZWRlZC5c
cGFyDQpccGFyDQpDaGVlcnNccGFyDQpccGFyDQpSb2JlcnQgXHBhcg0KXHBhcg0KPj4gLS0tLS1P
cmlnaW5hbCBNZXNzYWdlLS0tLS1ccGFyDQo+PiBGcm9tOiBCbGFja0JveCBbbWFpbHRvOkJMQUNL
Qk9YQExJU1RTLk9CRVJPTi5DSF0gT24gQmVoYWxmIFxwYXINCj4+IE9mIGx1b3d5QFNPSFUuQ09N
XHBhcg0KPj4gU2VudDogMjEgTWF5IDIwMTAgMDc6MjNccGFyDQo+PiBUbzogQkxBQ0tCT1hATElT
VFMuT0JFUk9OLkNIXHBhcg0KPj4gU3ViamVjdDogUmU6IFtCTEFDS0JPWF0gRmlsZSBuYW1lc1xw
YXINCj4+IFxwYXINCj4+IFxwYXINCj4+ICAgICAgICAgICAgICAgICAgICAgKioqIFdBUk5JTkcg
KioqXHBhcg0KPj4gXHBhcg0KPj4gIFRoaXMgbWVzc2FnZSBoYXMgb3JpZ2luYXRlZCBvdXRzaWRl
IHlvdXIgb3JnYW5pc2F0aW9uLFxwYXINCj4+ICAgZWl0aGVyIGZyb20gYW4gZXh0ZXJuYWwgcGFy
dG5lciBvciB0aGUgR2xvYmFsIEludGVybmV0LiBccGFyDQo+PiAgICAgICBLZWVwIHRoaXMgaW4g
bWluZCBpZiB5b3UgYW5zd2VyIHRoaXMgbWVzc2FnZS5ccGFyDQo+PiAgXHBhcg0KPj4gXHBhcg0K
Pj4gdGV4dCBmb3IgZmlsZSBuYW1lIDpccGFyDQo+PiBccGFyDQo+PiBccGFyDQo+PiBccGFyDQo+
PiBQUk9DRURVUkUgR2V0RmlsZU5hbWUqIChyZDogRmlsZXMuUmVhZGVyOyBWQVIgbmFtZTogQVJS
QVkgT0YgQ0hBUik7XHBhcg0KPj4gICBUWVBFIFN0ciA9IFBPSU5URVIgVE8gQVJSQVkgW3VudGFn
Z2VkXSBPRiBDSEFSO1xwYXINCj4+ICAgICAgVkFSIHN0cjogU3RyO1xwYXINCj4+IEJFR0lOXHBh
cg0KPj4gICAgc3RyIDo9IFNZU1RFTS5WQUwoU3RyLCBTWVNURU0uVkFMKElOVEVHRVIsIHJkLkJh
c2UoKSkgKyBccGFyDQo+PiA0MCk7ICAgICgqIGYoSG9zdEZpbGVzLkZpbGUpLm5hbWUgKilccGFy
DQo+PiAgICBuYW1lIDo9IHN0ciQ7XHBhcg0KPj4gRU5EIEdldEZpbGVOYW1lO1xwYXINCj4+IFxw
YXINCj4+IFxwYXINCj4+IC0tLS1ccGFyDQo+PiBUbyB1bnN1YnNjcmliZSwgc2VuZCBhIG1lc3Nh
Z2Ugd2l0aCBib2R5ICJTSUdOT0ZGIEJMQUNLQk9YIiBccGFyDQo+PiB0byBMSVNUU0VSVkBMSVNU
Uy5PQkVST04uQ0hccGFyDQo+PiBccGFyDQo+PiBccGFyDQpTRUxFWCBHYWxpbGVvIEx0ZFxwYXIN
ClJlZ2lzdGVyZWQgT2ZmaWNlOiBTaWdtYSBIb3VzZSwgQ2hyaXN0b3BoZXIgTWFydGluIFJvYWQs
IEJhc2lsZG9uLCBFc3NleCBTUzE0IDNFTFxwYXINCkEgY29tcGFueSByZWdpc3RlcmVkIGluIEVu
Z2xhbmQgJiBXYWxlcy4gIENvbXBhbnkgbm8uIDAyNDI2MTMyXHBhcg0KKioqKioqKioqKioqKioq
KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKipccGFy
DQpUaGlzIGVtYWlsIGFuZCBhbnkgYXR0YWNobWVudHMgYXJlIGNvbmZpZGVudGlhbCB0byB0aGUg
aW50ZW5kZWRccGFyDQpyZWNpcGllbnQgYW5kIG1heSBhbHNvIGJlIHByaXZpbGVnZWQuIElmIHlv
dSBhcmUgbm90IHRoZSBpbnRlbmRlZFxwYXINCnJlY2lwaWVudCBwbGVhc2UgZGVsZXRlIGl0IGZy
b20geW91ciBzeXN0ZW0gYW5kIG5vdGlmeSB0aGUgc2VuZGVyLlxwYXINCllvdSBzaG91bGQgbm90
IGNvcHkgaXQgb3IgdXNlIGl0IGZvciBhbnkgcHVycG9zZSBub3IgZGlzY2xvc2Ugb3JccGFyDQpk
aXN0cmlidXRlIGl0cyBjb250ZW50cyB0byBhbnkgb3RoZXIgcGVyc29uLlxwYXINCioqKioqKioq
KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioq
KioqXHBhcg0KXHBhcg0KXHBhcg0KLS0tLVxwYXINClRvIHVuc3Vic2NyaWJlLCBzZW5kIGEgbWVz
c2FnZSB3aXRoIGJvZHkgIlNJR05PRkYgQkxBQ0tCT1giIHRvIExJU1RTRVJWQExJU1RTLk9CRVJP
Ti5DSFxwYXINCn0
----boundary-LibPST-iamunique-262283694_-_---

Received on Fri May 21 2010 - 09:57:52 UTC