Use stord procedure MS-SQL

smoochy boys on tour
Coly

Coly

LOMCN Developer
Developer
Mar 31, 2005
1,399
33
195
Germany
I post / release some SPs from my server and hope some one can use / learn from....

The function handle a own Quest System, one Quest Flag can hold 9 Staus Information...

Code: 
set[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]ANSI_NULLS[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]OFF[/COLOR][/SIZE]
[SIZE=2][COLOR=#0000ff]set[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]QUOTED_IDENTIFIER[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]OFF[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2]GO[/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]ALTER[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]FUNCTION[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] [dbo][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080].[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][ilu_Quest_Check_1][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@UID [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]int[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE]
[SIZE=2]@CHARACTER [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]char[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]50[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]))[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]RETURNS[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]Table[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]AS[/COLOR][/SIZE][/COLOR][/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]RETURN[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]select[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ff00ff][SIZE=2][COLOR=#ff00ff]SUBSTRING[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]FLD_QUEST_1[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] @UID [/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] 1[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080])[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]as[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_QUEST_1 [/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]from[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] dbo[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080].[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]TBL_ILLUSION_QUEST [/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]where[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080])[/COLOR][/SIZE]
[/COLOR][/SIZE]


Code: 
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]set[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]ANSI_NULLS[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]OFF[/COLOR][/SIZE]
[SIZE=2][COLOR=#0000ff]set[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]QUOTED_IDENTIFIER[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]ON[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2]GO[/SIZE]
[SIZE=2][COLOR=#008000]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]ALTER[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]FUNCTION[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] [dbo][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080].[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][ilu_Quest_FormatSet][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@QuestTyp [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]int[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2]@UID [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]int[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2]@USET [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]char[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]1[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]),[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2]@CHARACTER [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]char[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]50[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]))[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]RETURNS[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] @inTabel [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]Table[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]vFLD_CHARACTER [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]varchar[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]50[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]),[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] vFLD_STATUS [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]int[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE]
[SIZE=2]vFLD_QUEST_1 [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]varchar[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]256[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080])[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] vFLD_QUEST_2 [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]varchar[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]256[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]))[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]AS[/COLOR][/SIZE][/COLOR][/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]BEGIN[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]IF[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@QuestTyp [/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]1[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080])[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]BEGIN[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]INSERT[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] @inTabel [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]SELECT[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_CHARACTER [/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_STATUS [/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_QUEST_1[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_QUEST_2[/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]FROM[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] dbo[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080].[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]TBL_ILLUSION_QUEST [/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]WHERE[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@CHARACTER[/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]UPDATE[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] @inTabel [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]SET[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] vFLD_QUEST_1[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]SELECT[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ff00ff][SIZE=2][COLOR=#ff00ff]STUFF[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]FLD_QUEST_1[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@UID[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]1[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@USET[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080])[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]FROM[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] dbo[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080].[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]TBL_ILLUSION_QUEST [/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]WHERE[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080])[/COLOR][/SIZE][/COLOR][/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]FROM[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] dbo[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080].[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]TBL_ILLUSION_QUEST [/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]WHERE[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@CHARACTER[/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]END[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]IF[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@QuestTyp [/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]2[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080])[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]BEGIN[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]INSERT[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] @inTabel [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]SELECT[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_CHARACTER [/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_STATUS [/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_QUEST_1[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_QUEST_2[/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]FROM[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] dbo[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080].[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]TBL_ILLUSION_QUEST [/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]WHERE[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@CHARACTER[/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]UPDATE[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] @inTabel [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]SET[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] vFLD_QUEST_2[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]SELECT[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ff00ff][SIZE=2][COLOR=#ff00ff]STUFF[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]([/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]FLD_QUEST_2[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@UID[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]1[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080],[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@USET[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080])[/COLOR][/SIZE]
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]FROM[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] dbo[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080].[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]TBL_ILLUSION_QUEST [/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]WHERE[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080])[/COLOR][/SIZE][/COLOR][/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]FROM[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] dbo[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080].[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]TBL_ILLUSION_QUEST [/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]WHERE[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] FLD_CHARACTER[/SIZE][SIZE=2][COLOR=#808080][SIZE=2][COLOR=#808080]=[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2]@CHARACTER[/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]END[/COLOR][/SIZE]
[/COLOR][/SIZE]
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]RETURN[/COLOR][/SIZE]
[SIZE=2][COLOR=#0000ff]END[/COLOR][/SIZE]
[/COLOR][/SIZE]
 
Coly

Coly

LOMCN Developer
Developer
Mar 31, 2005
1,399
33
195
Germany
Code: 
setANSI_NULLSOFF
setQUOTED_IDENTIFIERON
GO
 
ALTERFUNCTION [dbo].[ilu_Quest_Book](@QuestBook int,
@CHARACTER char(50))
RETURNS @inTabel Table(vFLD_CHARACTER varchar(50), vFLD_STATUS int,
vFLD_ENDQUEST int, vFLD_QUEST_1_2 varchar(2),
vFLD_QUEST_3 varchar(1), vFLD_QUEST_4 varchar(1),
vFLD_QUEST_5 varchar(1), vFLD_QUEST_6 varchar(1))
AS
BEGIN
declare @Quest1 varchar(1)
declare @Quest2 varchar(1)
IF(@QuestBook =1)
BEGIN
INSERTINTO @inTabel VALUES(@CHARACTER , 0, 0,'0','0','0','0','0')
UPDATE @inTabel SET vFLD_ENDQUEST=(SELECT FLD_ENDQUEST
FROM dbo.TBL_ILLUSION_QUEST 
WHERE [EMAIL="FLD_CHARACTER=@CHARACTER"]FLD_CHARACTER=@CHARACTER[/EMAIL])
select @Quest1=(SELECTSUBSTRING(FLD_QUEST_1, 1 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE [EMAIL="FLD_CHARACTER=@CHARACTER"]FLD_CHARACTER=@CHARACTER[/EMAIL])
select @Quest2=(SELECTSUBSTRING(FLD_QUEST_1, 2 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE [EMAIL="FLD_CHARACTER=@CHARACTER"]FLD_CHARACTER=@CHARACTER[/EMAIL])
UPDATE @inTabel SET vFLD_QUEST_1_2=(@Quest1 + @Quest2)
UPDATE @inTabel SET vFLD_QUEST_3=(SELECTSUBSTRING(FLD_QUEST_1, 3 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE [EMAIL="FLD_CHARACTER=@CHARACTER"]FLD_CHARACTER=@CHARACTER[/EMAIL])
UPDATE @inTabel SET vFLD_QUEST_4=(SELECTSUBSTRING(FLD_QUEST_1, 4 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE [EMAIL="FLD_CHARACTER=@CHARACTER"]FLD_CHARACTER=@CHARACTER[/EMAIL])
UPDATE @inTabel SET vFLD_QUEST_5=(SELECTSUBSTRING(FLD_QUEST_1, 5 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE [EMAIL="FLD_CHARACTER=@CHARACTER"]FLD_CHARACTER=@CHARACTER[/EMAIL])
UPDATE @inTabel SET vFLD_QUEST_6=(SELECTSUBSTRING(FLD_QUEST_1, 6 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE [EMAIL="FLD_CHARACTER=@CHARACTER"]FLD_CHARACTER=@CHARACTER[/EMAIL])
FROM dbo.TBL_ILLUSION_QUEST 
WHERE [EMAIL="FLD_CHARACTER=@CHARACTER"]FLD_CHARACTER=@CHARACTER[/EMAIL]
END
 
Coly

Coly

LOMCN Developer
Developer
Mar 31, 2005
1,399
33
195
Germany
Code: 
IF(@QuestBook =2)
BEGIN
INSERTINTO @inTabel VALUES(@CHARACTER , 0, 0,'0','0','0','0','0')
UPDATE @inTabel SET vFLD_ENDQUEST=(SELECT FLD_ENDQUEST
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
select @Quest1=(SELECTSUBSTRING(FLD_QUEST_1, 7 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
select @Quest2=(SELECTSUBSTRING(FLD_QUEST_1, 8 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_1_2=(@Quest1 + @Quest2)
UPDATE @inTabel SET vFLD_QUEST_3=(SELECTSUBSTRING(FLD_QUEST_1, 9 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_4=(SELECTSUBSTRING(FLD_QUEST_1, 10 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_5=(SELECTSUBSTRING(FLD_QUEST_1, 11 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_6=(SELECTSUBSTRING(FLD_QUEST_1, 12 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER
END
 
Coly

Coly

LOMCN Developer
Developer
Mar 31, 2005
1,399
33
195
Germany
Code: 
IF(@QuestBook =3)
BEGIN
INSERTINTO @inTabel VALUES(@CHARACTER , 0, 0,'0','0','0','0','0')
UPDATE @inTabel SET vFLD_ENDQUEST=(SELECT FLD_ENDQUEST
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
select @Quest1=(SELECTSUBSTRING(FLD_QUEST_1, 13 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
select @Quest2=(SELECTSUBSTRING(FLD_QUEST_1, 14 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_1_2=(@Quest1 + @Quest2)
UPDATE @inTabel SET vFLD_QUEST_3=(SELECTSUBSTRING(FLD_QUEST_1, 15 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_4=(SELECTSUBSTRING(FLD_QUEST_1, 16 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_5=(SELECTSUBSTRING(FLD_QUEST_1, 17 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_6=(SELECTSUBSTRING(FLD_QUEST_1, 18 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER
END

IF(@QuestBook =4)
BEGIN
INSERTINTO @inTabel VALUES(@CHARACTER , 0, 0,'0','0','0','0','0')
UPDATE @inTabel SET vFLD_ENDQUEST=(SELECT FLD_ENDQUEST
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
select @Quest1=(SELECTSUBSTRING(FLD_QUEST_1, 19 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
select @Quest2=(SELECTSUBSTRING(FLD_QUEST_1, 20 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_1_2=(@Quest1 + @Quest2)
UPDATE @inTabel SET vFLD_QUEST_3=(SELECTSUBSTRING(FLD_QUEST_1, 21 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_4=(SELECTSUBSTRING(FLD_QUEST_1, 22 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_5=(SELECTSUBSTRING(FLD_QUEST_1, 23 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_6=(SELECTSUBSTRING(FLD_QUEST_1, 24 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER
END
 
Coly

Coly

LOMCN Developer
Developer
Mar 31, 2005
1,399
33
195
Germany
Code: 
IF(@QuestBook =5)

BEGIN
INSERTINTO @inTabel VALUES(@CHARACTER , 0, 0,'0','0','0','0','0')
UPDATE @inTabel SET vFLD_ENDQUEST=(SELECT FLD_ENDQUEST
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
select @Quest1=(SELECTSUBSTRING(FLD_QUEST_1, 25 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
select @Quest2=(SELECTSUBSTRING(FLD_QUEST_1, 26 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_1_2=(@Quest1 + @Quest2)
UPDATE @inTabel SET vFLD_QUEST_3=(SELECTSUBSTRING(FLD_QUEST_1, 27 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_4=(SELECTSUBSTRING(FLD_QUEST_1, 28 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_5=(SELECTSUBSTRING(FLD_QUEST_1, 29 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_6=(SELECTSUBSTRING(FLD_QUEST_1, 30 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER
END

IF(@QuestBook =6)
BEGIN
INSERTINTO @inTabel VALUES(@CHARACTER , 0, 0,'0','0','0','0','0')
UPDATE @inTabel SET vFLD_ENDQUEST=(SELECT FLD_ENDQUEST
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
select @Quest1=(SELECTSUBSTRING(FLD_QUEST_1, 31 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
select @Quest2=(SELECTSUBSTRING(FLD_QUEST_1, 32 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_1_2=(@Quest1 + @Quest2)
UPDATE @inTabel SET vFLD_QUEST_3=(SELECTSUBSTRING(FLD_QUEST_1, 33 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_4=(SELECTSUBSTRING(FLD_QUEST_1, 34 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_5=(SELECTSUBSTRING(FLD_QUEST_1, 35 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
UPDATE @inTabel SET vFLD_QUEST_6=(SELECTSUBSTRING(FLD_QUEST_1, 36 , 1)as FLD_QUEST_1 
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER)
FROM dbo.TBL_ILLUSION_QUEST 
WHERE FLD_CHARACTER=@CHARACTER
END
RETURN
END

calling from Game Script :

Code: 
#ACT
 FormatStr "vFLD_CHARACTER='%s' " %USERNAME
 MOV A8 %A9
 FormatStr "ilu_Quest_FormatSet(1,33,'2','%s')" %USERNAME
 ReadValueSql  %A9 %A8 "vFLD_QUEST_1" [@NPC_Q2QuestSet_1]

#ACT
 Mov A6 %ARG(1)
 FormatStr "FLD_CHARACTER='%s'" %USERNAME
 MOV A8 %A9
 FormatStr "FLD_QUEST_1='%s'" %A6
 UPDATEVALUESQL "TBL_ILLUSION_QUEST" %A8 %A9
 SysMsg " Questlog modified "

I hope it give some one a idea to work things out... ;-)

[/CODE]
 
You must log in or register to reply here.
Top Bottom