CREATE PROCEDURE
Command Run_read_edit_
— Pan Shin
@p1 int, @p2 int, @p3 int
AS
--print 'CommandRun_read_edit_'
declare
@No varchar(128),
@Name varchar(128),
@Pr Key varchar(255),
@str varchar(128),
@special int
select @Name=Name, @No=No from Docs where UDN=@p1
select @Pr Key = (select Pr Key from TCT_CommandRun where UDN = @p1)
declare @cnt int,@lev int
select @cnt=max(No),@lev=0 from Detailed where u=@@spid and UDN=@p1
update Detailed set String Old='Указатель командл' where UDN=@p1 and u=@@spid and No=0
select @cnt=@cnt+1000
insert into Detailed (No,u,UDN,Lev,Recycable,
Acc Mode,
Value Type,
Value Id,
Value Format,
String Value)
select @cnt,@@spid,@p1,@lev,0, 1,1, 'Name', 'sИмя указателя командл', @Name
select @cnt=@cnt+1000
insert into Detailed (No,u,UDN,Lev,Recycable,
Acc Mode,
Value Type,
Value Id,
Value Format,
String Value)
select @cnt,@@spid,@p1,@lev,0, 0,1, 'No', 'sНомер указателя командл', @No
select @cnt=@cnt+1000
insert into Detailed (No,u,UDN,Lev,Recycable,
Acc Mode,
Value Type,
Value Id,
Value Format,
String Value)
select @cnt,@@spid,@p1,@lev,0, 1,1, 'PrKey', 'sФайл исполняемой командл', @
Pr Key
update Detailed set Money Old=-9.99 where UDN=@p1 and u=@@spid and No=0
GO
