project hour journals

Hai ,

I want to write code for project hour journal in ax 2009 … but i cant get exact code for it … the given code is in ax 2012 can you please say where i want to modify in this code for ax 2009 project hour journals …

static void ProjectHoursJournalCreate(Args _args)

{

ProjJournalTableData JournalTableData;

ProjJournalTransData journalTransData;

ProjJournalTable journalTable;

ProjJournalTrans journalTrans;

ProjTable projTable;

CommaTextIO csvFile;

container readCon;

counter icount,inserted;

Dialog dialog;

DialogField dfFileName;

FileName fileName;

inserted =0;

#File

dialog = new Dialog(“Pick the file”);

dfFileName = dialog.addField(extendedTypeStr(“FilenameOpen”));

dialog.filenameLookupFilter([“All files”, #AllFiles]);

if (dialog.run())

{

csvFile = new CommaTextIo(dfFileName.value(), ‘r’);

csvFile.inFieldDelimiter(’,’);

readCon = csvFile.read();

ttsBegin;

journalTableData = JournalTableData::newTable(journalTable);

journalTransData = journalTableData.journalStatic().newJournalTransData(journalTrans,journalTableData);

// Init JournalTable

journalTable.clear();

journalTable.JournalId = journalTableData.nextJournalId();

journalTable.JournalType = ProjJournalType::Hour;

journalTable.JournalNameId = “hours”;

while(csvFile.status() == IO_Status::OK)

{

readCon = csvFile.read();

if(readCon)

{

icount++;

// Init JournalTrans

journalTableData.initFromJournalName(journalTableData.journalStatic().findJournalName(journalTable.JournalNameId));

journalTrans.clear();

journalTransData.initFromJournalTable();

projTable = ProjTable::find(conPeek(readCon,1));

journalTrans.TransDate = systemDateGet();

journalTrans.ProjTransDate = systemDateGet();

journalTrans.ProjId = conPeek(readCon,1);

journalTrans.Qty = str2num(conPeek(readCon,2));

journalTrans.SalesPrice = str2num(conPeek(readCon,3));

journalTrans.CostPrice = 1;//str2num(conPeek(readCon,4));

journalTrans.Txt = projTable.psaRetainageBillingDesc();

journalTrans.CurrencyId = ProjInvoiceTable::find(projTable.ProjInvoiceProjId).CurrencyId;

journalTrans.Worker = HcmWorker::userId2Worker(curUserId());

journalTrans.CategoryId = “design”;

journalTrans.LinePropertyId = “charge”;

journalTrans.Voucher = NumberSeq::newGetVoucherFromCode(JournalTable.getNumberSequenceTable().NumberSequence).voucher();

journalTransData.create();

}

}

journalTable.insert();

ttsCommit;

}

}

An example here, \Classes\SMAServiceFunctionLine_Transfer\createProjJournalLine_Hour