public RefillLayout(Model ReadySS, ABaseMode CallObj)
: base(ReadySS, CallObj)
{
CurrentMode = Mode.RefillLayout;
DocAP = (CallObj as RefillChoise).DocAP;
lineno_ = 0;
Adress0 = new RefSection(SS);
Adress1 = new RefSection(SS);
LastMove = new RefPalleteMove(SS);
Item = new RefItem(SS);
PreviousAction = "";
RemainItems = new DataTable();
}
} // ReactionKeyDo
internal override ABaseMode Init()
{
Task = new RefPalleteMove(SS);
if (FindTaskId())
{
return(JumpTo(new Loader(SS, this)));
}
TaskList = null;
string TextQuery = "select * from WPM_fn_ToModeLoaderChoise(:Employer)";
SQL1S.QuerySetParam(ref TextQuery, "Employer", Employer.ID);
SS.ExecuteWithReadNew(TextQuery, out TaskList);
return(Positive("Выберите что будете делать..."));
} // Init()
} // GoUpTask
protected ABaseMode GoLiftTask(string sector)
{
Task = new RefPalleteMove(SS);
string Tail =
"select top 1 Ref.id from $Спр.ПеремещенияПаллет as Ref (nolock) " +
"where " +
"Ref.$Спр.ПеремещенияПаллет.ФлагОперации = 0 " +
"and Ref.$Спр.ПеремещенияПаллет.ТипДвижения = :MoveType " +
"and Ref.$Спр.ПеремещенияПаллет.Адрес1_Сектор = :sector " +
"and Ref.ismark = 0 " +
"order by Ref.id";
SQL1S.QuerySetParam(ref Tail, "sector", sector);
FixTask(5, Tail);
return(GoLodaer());
} // GoUpTask
} // GoUpTask
protected ABaseMode GoDownTask()
{
Task = new RefPalleteMove(SS);
//Задания нет - будем пытаться его выдать через справочник
//Первую пытаемся выдать антрисоль
FixTask(3);
if (!Task.Selected)
{
//Антрисоли нет - теперь пробуем подъем
//GoUpTask();
if (!Task.Selected)
{
//все равно - нихуя! пытаемся еще раз через хранимую процедуру (обычный спуск)
GetTaskLoaderDown();
}
}
return(GoLodaer());
} // GoDownTask
} // GoLodaer
protected ABaseMode GoUpTask()
{
Task = new RefPalleteMove(SS);
string Tail =
"select top 1 Ref.id " +
"from $Спр.ПеремещенияПаллет as Ref (nolock) " +
"left join RT_refill as refill (nolock) " +
"on refill.adress0 = Ref.$Спр.ПеремещенияПаллет.Адрес0 " +
"and (refill.flag in (0,1) " +
"and refill.id <= dbo.fn_RT_GetBoundID(:warehouse)) " +
"where " +
"Ref.$Спр.ПеремещенияПаллет.ФлагОперации = 0 " +
"and Ref.$Спр.ПеремещенияПаллет.ТипДвижения = :MoveType " +
"and refill.id is null " +
"and ref.ismark = 0 " +
"and ref.$Спр.ПеремещенияПаллет.Склад = :warehouse " +
"order by Ref.id";
SQL1S.QuerySetParam(ref Tail, "warehouse", Employer.Warehouse.ID);
FixTask(2, Tail);
return(GoLodaer());
} // GoUpTask
} // GoDownTask
protected ABaseMode GoTransportTask()
{
Task = new RefPalleteMove(SS);
FixTask(4);
return(GoLodaer());
} // GoTransportTask
