AX – D365FO: Runnable Class with Parameters

This is a runnable class that extensds Runbase thet we want to obtain :

class ABJ_RunnableClassUnpostPayrollPayStatement extends RunBase
{
PayrollPayStatement payrollPayStatement;
PayrollPayStatementRecId payrollPayStatementRecId;
DialogField fldPayrollPayStatement;

public container pack()
{
return conNull();
}

public boolean unpack(container packedClass)
{
return true;
}

public Object dialog()
{
Dialog dialog = super();

dialog.caption(‘Unpost Payroll Pay Statement’);
fldPayrollPayStatement = dialog.addField(extendedTypeStr(PayrollPayStatementRecId), ‘Payroll Pay Statement’);
return dialog;
}

public boolean getFromDialog()
{
payrollPayStatementRecId = fldPayrollPayStatement.value();
return super();
}

public void run()
{
ttsbegin;
select forupdate payrollPayStatement
where payrollPayStatement.RecId == payrollPayStatementRecId ;

if (payrollPayStatement)
{
payrollPayStatement.PostedStatus = PayrollPayStatementPostedStatus::None;
payrollPayStatement.update();
}
ttscommit;
}

public static void main(Args _args)
{
ABJ_RunnableClassUnpostPayrollPayStatement unpostPayrollPayStatement = new ABJ_RunnableClassUnpostPayrollPayStatement();

if (unpostPayrollPayStatement.prompt())
{
unpostPayrollPayStatement.run();
}
}

}

Rispondi

Inserisci i tuoi dati qui sotto o clicca su un'icona per effettuare l'accesso:

Logo di WordPress.com

Stai commentando usando il tuo account WordPress.com. Chiudi sessione /  Modifica )

Google photo

Stai commentando usando il tuo account Google. Chiudi sessione /  Modifica )

Foto Twitter

Stai commentando usando il tuo account Twitter. Chiudi sessione /  Modifica )

Foto di Facebook

Stai commentando usando il tuo account Facebook. Chiudi sessione /  Modifica )

Connessione a %s...