Monthly Archives: July 2012

Interrupt Port Handling

Posted on 26/07/2012 by Paul Fox

// this moved out here so it can be used by other methods
static OutputPort LED;

public static void Main()
{
	LED = new OutputPort((Cpu.Pin)FEZ_Pin.Digital.LED, true);
	// the pin will generate interrupt on high and low edges
	InterruptPort IntButton =
		new InterruptPort((Cpu.Pin)FEZ_Pin.Interrupt.LDR, true,
	Port.ResistorMode.PullUp,
	Port.InterruptMode.InterruptEdgeBoth);
	// add an interrupt handler to the pin
	IntButton.OnInterrupt += new NativeEventHandler(IntButton_OnInterrupt);
	//do anything you like here
	Thread.Sleep(Timeout.Infinite);
}

static void IntButton_OnInterrupt(uint port, uint state,
		DateTime time)
{
	// set LED to the switch state
	LED.Write(state == 0);
}

// this moved out here so it can be used by other methods

static OutputPort LED;

public static void Main()

{

LED = new OutputPort((Cpu.Pin)FEZ_Pin.Digital.LED, true);

// the pin will generate interrupt on high and low edges

InterruptPort IntButton =

new InterruptPort((Cpu.Pin)FEZ_Pin.Interrupt.LDR, true,

Port.ResistorMode.PullUp,

Port.InterruptMode.InterruptEdgeBoth);

// add an interrupt handler to the pin

IntButton.OnInterrupt += new NativeEventHandler(IntButton_OnInterrupt);

//do anything you like here

Thread.Sleep(Timeout.Infinite);

}

static void IntButton_OnInterrupt(uint port, uint state,

DateTime time)

{

// set LED to the switch state

LED.Write(state == 0);

}

Posted in .Net Micro | Comments Off

Switch Statement

Posted on 26/07/2012 by Paul Fox

DateTime currentTime = DateTime.Now;
int day = (int)currentTime.DayOfWeek;
switch (day)
{
	case 0:
		Debug.Print("Sunday");
		break;
	case 1:
		Debug.Print("Monday");
		break;
	case 2:
		Debug.Print("Tuesday");
		break;
	case 3:
		Debug.Print("Wednsday");
		break;
	case 4:
		Debug.Print("Thursday");
		break;
	case 5:
		Debug.Print("Friday");
		break;
	case 6:
		Debug.Print("Saturday");
		break;
	default:
		Debug.Print("We should never see this");
		break;
}

DateTime currentTime = DateTime.Now;

int day = (int)currentTime.DayOfWeek;

switch (day)

{

case 0:

Debug.Print("Sunday");

break;

case 1:

Debug.Print("Monday");

break;

case 2:

Debug.Print("Tuesday");

break;

case 3:

Debug.Print("Wednsday");

break;

case 4:

Debug.Print("Thursday");

break;

case 5:

Debug.Print("Friday");

break;

case 6:

Debug.Print("Saturday");

break;

default:

Debug.Print("We should never see this");

break;

}

Posted in .Net Micro | Comments Off

Enumeration

Posted on 26/07/2012 by Paul Fox

An Enumeration is very similar to a constant.

enum Command
{
	MOVE = 1,
	STOP = 2,
	RIGHT = 3,
	LEFT = 4,
}
//now we can send a command...
SendCommand(Command.LEFT);
SendCommand(Command.STOP);

enum Command

{

MOVE = 1,

STOP = 2,

RIGHT = 3,

LEFT = 4,

}

//now we can send a command...

SendCommand(Command.LEFT);

SendCommand(Command.STOP);

Posted in .Net Micro | Comments Off

Classes

Posted on 26/07/2012 by Paul Fox

class MyClass
{
	int Add(int a, int b)
	{
		return a + b;
	}
}


Example of a public method using a private method

public int Add(int a, int b)
{
	// the object can use private methods
	// inside the class only
	DoSomething();
	return a + b;
}

private void DoSomething()
{
}

class MyClass

{

int Add(int a, int b)

{

return a + b;

}

Example of a public method using a private method

public int Add(int a, int b)

{

// the object can use private methods

// inside the class only

DoSomething();

return a + b;

}

private void DoSomething()

{

}

Posted in .Net Micro | Comments Off

Methods

Posted on 26/07/2012 by Paul Fox

int Add(int var1, int var2)
{
	int var3;
	var3 = var1 + var2;
	return var3;
}


string Add(int var1, int var2)
{
	int var3;
	var3 = var1 + var2;
	string MyString;
	MyString = var3.ToString();
	return MyString;
}


string Add(int var1, int var2)
{
	return (var1+var2).ToString();
}

int Add(int var1, int var2)

{

int var3;

var3 = var1 + var2;

return var3;

}

string Add(int var1, int var2)

{

int var3;

var3 = var1 + var2;

string MyString;

MyString = var3.ToString();

return MyString;

}

string Add(int var1, int var2)

{

return (var1+var2).ToString();

}

Posted in .Net Micro | Comments Off

AX BC- Query with Joins

Posted on 26/07/2012 by Paul Fox

try
{
    AxaptaRecord[] tableArray = new AxaptaRecord[2];
    AxaptaRecord APMObjectTableRecord = DynAx.CreateAxaptaRecord("APMObjectTable");
    AxaptaRecord WarrantyTableRecord = DynAx.CreateAxaptaRecord("WarrantyInvoiceTable");
    tableArray[0] = APMObjectTableRecord;
    tableArray[1] = WarrantyTableRecord;
    
    DynAx.ExecuteStmt("select * from %1 join %2", tableArray);

    while (APMObjectTableRecord.Found)
    {
        string Id = (string)APMObjectTableRecord.get_Field("APMObjectId").ToString();
        string Amount = (string)WarrantyTableRecord.get_Field("Amount").ToString().ToString();

        APMObjectTableRecord.Next();
    }
}
catch (Exception ex)
{
    MessageBox.Show(ex.Message, "Don't Panic!");
}

try

{

AxaptaRecord[] tableArray = new AxaptaRecord[2];

AxaptaRecord APMObjectTableRecord = DynAx.CreateAxaptaRecord("APMObjectTable");

AxaptaRecord WarrantyTableRecord = DynAx.CreateAxaptaRecord("WarrantyInvoiceTable");

tableArray[0] = APMObjectTableRecord;

tableArray[1] = WarrantyTableRecord;

DynAx.ExecuteStmt("select * from %1 join %2", tableArray);

while (APMObjectTableRecord.Found)

{

string Id = (string)APMObjectTableRecord.get_Field("APMObjectId").ToString();

string Amount = (string)WarrantyTableRecord.get_Field("Amount").ToString().ToString();

APMObjectTableRecord.Next();

}

catch (Exception ex)

{

MessageBox.Show(ex.Message, "Don't Panic!");

}

Posted in C# Development | Comments Off

AX BC- Read a Record

Posted on 26/07/2012 by Paul Fox

try
{
    DynRec = DynAx.CreateAxaptaRecord("smmBusRelTable");

    string fieldName = ("Status");
    string fieldValue = ("Active");

    DynRec.ExecuteStmt(string.Format("select * from %1 where %1.{0} == '{1}'", fieldName, fieldValue));

    List<String> QueryList = new List<string>();


    while (DynRec.Found)
    {
        QueryList.Add((string)DynRec.get_Field("BusRelAccount"));
        DynRec.Next();
    }

    MainGrid.DataSource = (from item in QueryList select new { item }).ToList();
}
catch (Exception ex)
{
    MessageBox.Show(ex.Message, "Don't Panic!");
}

try

{

DynRec = DynAx.CreateAxaptaRecord("smmBusRelTable");

string fieldName = ("Status");

string fieldValue = ("Active");

DynRec.ExecuteStmt(string.Format("select * from %1 where %1.{0} == '{1}'", fieldName, fieldValue));

List<String> QueryList = new List<string>();

while (DynRec.Found)

{

QueryList.Add((string)DynRec.get_Field("BusRelAccount"));

DynRec.Next();

}

MainGrid.DataSource = (from item in QueryList select new { item }).ToList();

}

catch (Exception ex)

{

MessageBox.Show(ex.Message, "Don't Panic!");

}

Posted in C# Development | Comments Off

AX BC- Update a Record

Posted on 26/07/2012 by Paul Fox

try
{
    // Create an Axapta record for the StateAddress table.
    DynRec = DynAx.CreateAxaptaRecord("APMObjectTable");

    // Execute a query to retrieve an editable record where the name is MyState.
    DynRec.ExecuteStmt("select forupdate * from %1 where %1.APMObjectId == 'HLH000001'");

    // If the record is found then update the name.
    if (DynRec.Found)
    {
        // Start a transaction that can be committed.
        DynAx.TTSBegin();
        string _text = @"";
        _text += "Line One\n";
        _text += "Line Two\n";
        _text += "Line Three\n";
        _text += "Line Four\n";

        DynRec.set_Field("APMObjectDescription", _text);
        DynRec.Update();

        // Commit the transaction.
        DynAx.TTSCommit();
    }
}
catch (Exception ex)
{
    MessageBox.Show(ex.Message, "Don't Panic!");
}

try

{

// Create an Axapta record for the StateAddress table.

DynRec = DynAx.CreateAxaptaRecord("APMObjectTable");

// Execute a query to retrieve an editable record where the name is MyState.

DynRec.ExecuteStmt("select forupdate * from %1 where %1.APMObjectId == 'HLH000001'");

// If the record is found then update the name.

if (DynRec.Found)

{

// Start a transaction that can be committed.

DynAx.TTSBegin();

string _text = @"";

_text += "Line One\n";

_text += "Line Two\n";

_text += "Line Three\n";

_text += "Line Four\n";

DynRec.set_Field("APMObjectDescription", _text);

DynRec.Update();

// Commit the transaction.

DynAx.TTSCommit();

}

catch (Exception ex)

{

MessageBox.Show(ex.Message, "Don't Panic!");

}

Posted in C# Development | Comments Off

AX BC- Log Off

Posted on 26/07/2012 by Paul Fox

try
{
    DynAx.Logoff();
    Application.DoEvents();
}
catch (Exception ex)
{
    MessageBox.Show(ex.Message, "Don't Panic!");
}

try

{

DynAx.Logoff();

Application.DoEvents();

}

catch (Exception ex)

{

MessageBox.Show(ex.Message, "Don't Panic!");

}

Posted in C# Development | Comments Off

AX BC- Log On

Posted on 26/07/2012 by Paul Fox

try
{
    StatusBar.Text = "Logging On...";
    Application.DoEvents();

    // Authenticate the user and establish a session.
    DynAx.Logon(null, null, null, @"\\ediaxsql01v\DynamicsAX\Application\Share\config\64bit\AX09SP1-Capital-TEST.axc");
    Application.DoEvents();
}
catch (Exception ex)
{
    MessageBox.Show(ex.Message, "Don't Panic!");
}

try

{

StatusBar.Text = "Logging On...";

Application.DoEvents();

// Authenticate the user and establish a session.

DynAx.Logon(null, null, null, @"\\ediaxsql01v\DynamicsAX\Application\Share\config\64bit\AX09SP1-Capital-TEST.axc");

Application.DoEvents();

}

catch (Exception ex)

{

MessageBox.Show(ex.Message, "Don't Panic!");

}

Posted in C# Development | Comments Off