співробітники зв'яжуться з Вами для надання консультації з питання можливих умов видачі кредиту. Raquo;
Update Request1 Set MessageText =MessageText Where ID=@ IDRequest1 Set Message= NO Where ID =IDnext fromcursor into @ ID @ CURSOR @ CURSORc
Процедура занесення заявки в базу
Виконуваний код процедури описаний у файлі dbo.sp_RequestInsert
CREATE PROCEDURE dbo.sp_RequestInsert (RegionID int,WorkformID int,Secname VarChar (100),Firstname VarChar (100),Thirdname VarChar (100),Bdate datetime,FvcountryID int ,Telnum VarChar (20),Cellnum VarChar (20),Email VarChar (50),Crsum VarChar (50),Wnterm int,GenderID int,Paspnum VarChar (50),Dpasp datetime,Infpasp VarChar (300),Findex VarChar (20),Farea VarChar (50),Fcity VarChar (80),Faddress VarChar (200),Ftime int,FtypeID int,Add_ident binary (1),Rindex VarChar (20),Rarea VarChar (50),Rcity VarChar (80),Raddress VarChar (200),Telreg VarChar (20),FamposID int,EducationID int,ChildrenID int,ComptypeID int, @ Compname VarChar (200),Compinn VarChar (20),Compogrn VarChar (50),Comppos VarChar (100),Worknum VarChar (20),Windex VarChar (20),Warea VarChar (50),Wcity VarChar (80),Waddress VarChar (200),CompamountID int,Wtermpres int,Wtermlast int,Wpaym int,AutomobID int,TravelID int,CommitmentID int,DebtloanID int) AsNoCount Off @ ID Intsp_newhyperkey @ ID OutPutInto Request1 (ID,RegionID,WorkformID,Secname,Firstname,Thirdname,Bdate,FvcountryID,Telnum,Cellnum,Email,Crsum,Wnterm,GenderID,Paspnum,Dpasp,Infpasp,Findex,Farea,Fcity,Faddress,Ftime,FtypeID,Add_ident,Rindex,Rarea,Rcity,Raddress,Telreg,FamposID,EducationID,ChildrenID,ComptypeID,Compname,Compinn,Compogrn,Comppos,Worknum,Windex,Warea,Wcity,Waddress,CompamountID,Wtermpres,Wtermlast,Wpaym,AutomobID,TravelID,CommitmentID,DebtloanID) Values ??(ID,RegionID,WorkformID,Secname,Firstname,Thirdname,Bdate,FvcountryID,Telnum,Cellnum,Email,Crsum,Wnterm,GenderID,Paspnum,Dpasp, Infpasp,Findex,Farea,Fcity,Faddress,Ftime,FtypeID,Add_ident,Rindex,Rarea,Rcity,Raddress,Telreg,FamposID,EducationID,ChildrenID,ComptypeID ,Compname,Compinn,Compogrn,Comppos,Worknum,Windex,Warea,Wcity,Waddress,CompamountID,Wtermpres,Wtermlast,Wpaym,AutomobID,TravelID,CommitmentID, @ DebtloanID)
Процедура генерації унікальних ідентифікаторів
Виконуваний код процедури описаний у файлі dbo.sp_newhyperkey
CREATE procedure dbo.sp_newhyperkeyret int out as @ lastkey int @ empty bit @ empty=1 @ lastkey=id from main_sequence@@rowcount lt; gt; 0 @ empty=0into main_sequence (fdummy) values ??( Y ) @ empty=1 @ ret=id from main_sequencetop 1ret=id from main_sequence where id lt; gt; lastkeyby id descfrom main_sequence where id lt; gt; ret;
