Yes!

Sep. 6th, 2001 02:41 pm
robinbloke: (Default)
[personal profile] robinbloke
Ha! Finally cracked the swine, see the awesome power of my code... ahem, well actually it's a total mishmash of comments and left over variables as I've only just got it working, but it works dammit!

~

bool SetLink(string ModuleName, string LinkModule)
{
bool Okay = false
AttrDef Attribute
Object Ob
Module Mod
Module m
Object Field
Object Current

m = read("/Test Database Only/Robin/Development/Problem Log", false)

Current = current m

string FieldContents = Current."ECO"

// Step one, obtain the 'module' object from the module name

Mod = read(ModuleName, false)

// Step two, obtain an object for the specified field name in the module

//Attribute = find(Mod, FieldName)

// Step three, locate the object that has the field with the contents of

for Ob in Mod do
{
// Check the attribute in the object...

string Temp = Ob."ECO Number"

if (Temp == FieldContents)
{
ack "Found It " Temp

// Now set the link

Current -> LinkModule -> Ob

break;
}
}


return Okay
}

m = read("/Test Database Only/Robin/Development/Problem Log", false)

Current = current m

SetLink("/Test Database Only/Robin/Development/ECO", "/Test Database Only/Robin/Development/ECO to Problem" )

ack "Link OK"

~

Isn't that just fascinating?

No?

I'm so glad you said that.

Date: 2001-09-06 07:27 am (UTC)
From: [identity profile] suave-steve.livejournal.com
Well its all greek to me...

Date: 2001-09-06 07:31 am (UTC)
From: [identity profile] robinbloke.livejournal.com
Worse, it's DXL, the most god-awful piece of scripting language known to man or beast.

At least in greek you can dictionaries and 'how to learn' manuals, no such thing for this hideous so-called language

Bleh

Date: 2001-09-07 07:53 am (UTC)
From: [identity profile] kizzie.livejournal.com
Hunny... Its very fascinating... and the amount of it that I understood just plain scared me!

Profile

robinbloke: (Default)
robinbloke

January 2016

S M T W T F S
     12
3456789
10111213141516
17181920212223
24 252627282930
31      

Most Popular Tags

Style Credit

Expand Cut Tags

No cut tags
Page generated Oct. 5th, 2025 08:44 am
Powered by Dreamwidth Studios