[ExtensionOf(classStr(JournalCheckPost))]
final class JournalCheckPost_VanAway_Extension
{
protected void postJournal(JournalTransList _journalTransList)
{
int switchValue = 0;
str 50 journalNum;
NoYes vanaway;
Dialog dialog;
dialogGroup dialogGroup;
dialogField dialogField;
DAWLoadRequest _dawLoadRequest;
InventJournalTable journalTable;
JournalCheckPost inventJournalCheckPost;
dialog = new Dialog("Load Request OTP");
dialogGroup = dialog.addGroup("Please Enter OTP");
dialogField = dialog.addField(extendedTypeStr(OTP));
journalNum = _journalTransList.journalTableData().journalTable().JournalId;
vanaway = InventJournalTable::find(journalNum).VanAway;
select *from _dawLoadRequest where _dawLoadRequest.JournalNum == journalNum;
info(strFmt("JournNum %1", journalNum));
if(_dawLoadRequest.JournalNum)
{
if(vanaway == NoYes::Yes )
{
if (dialog.run())
{
if(_dawLoadRequest.ActivationCode == dialogField.value())
{
switchValue = 1;
}
switch (switchValue)
{
case 1:
journalTable = InventJournalTable::find(journalNum);
inventJournalCheckPost = InventJournalCheckPost::newJournalCheckPost(JournalCheckpostType::Post,journalTable);
inventJournalCheckPost.run();
break;
default:
break;
}
}
}
}
next postJournal(_journalTransList);
}
}
André Arnaud de Cal...
291,965
Super User 2025 Season 1
Martin Dráb
230,817
Most Valuable Professional
nmaenpaa
101,156