- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
- 69
- 70
- 71
- 72
- 73
- 74
- 75
- 76
- 77
- 78
- 79
- 80
- 81
- 82
- 83
- 84
- 85
- 86
- 87
- 88
- 89
- 90
- 91
- 92
- 93
- 94
CREATE PROCEDURE "auot".uot_inv_procs2
(
NumFunc Integer, -- Номер функции :
-- 1 - Вставляет строку
-- 2 - Создает временную таблицу
-- 3 - Удаляет временную таблицу
-- 4 - Создает временную таблицу
-- 5 - Удаляет временную таблицу
-- 6 - Возвращает Dogovor.Dog_id
-- 7 - Создает TempTableInvoice
-- 8 - Создает TmpTabDeclInv
-- 9 - Создает TmpTabDeclSel
--10 - Заолняет TmpTabDeclSel
--11 - Добавляет в TmpTabVCSel
--12 - Обновляет информацию
n_Numb_inv NVarChar(10,0) DEFAULT NULL,
n_Date_inv Date DEFAULT NULL,
n_Code_exp Char(2) DEFAULT NULL,
n_Prod_code Char(3) DEFAULT NULL,
n_Code_Transport Char(1) DEFAULT NULL,
n_Code_Date_Cen Char(1) DEFAULT NULL,
n_Contract NVarChar(30,0) DEFAULT NULL,
n_DateContract Date DEFAULT NULL,
n_Weight Numeric(10,3) DEFAULT NULL,
n_Price Numeric(8,2) DEFAULT NULL,
n_Total Numeric(15,2) DEFAULT NULL,
n_Kod_val_id Integer DEFAULT NULL,
n_Date_konos Date DEFAULT NULL,
n_SHB_Signature Char(6) DEFAULT NULL,
n_Seller_Sign Char(6) DEFAULT NULL,
n_Date_prix Date DEFAULT NULL,
n_Date_move Date DEFAULT NULL,
n_SUM_CLS Numeric(15,2) DEFAULT NULL,
n_Consignee NVarChar(150,0) DEFAULT NULL,
n_Buyer NVarChar(150,0) DEFAULT NULL,
n_Pnt_departure NVarChar(150,0) DEFAULT NULL,
n_Destination NVarChar(150,0) DEFAULT NULL,
n_Steam_vessel NVarChar(50,0) DEFAULT NULL,
n_Delivery_terms NVarChar(18,0) DEFAULT NULL,
n_Status Char(1) DEFAULT 'N',
n_Dogovor_id Integer DEFAULT NULL,
n_Date_min Date DEFAULT NULL,
n_Date_max Date DEFAULT NULL,
n_Invoice_id Integer DEFAULT NULL,
n_Res_Code Char(8) DEFAULT NULL,
n_Date_Sale_Uved Date DEFAULT NULL,
n_Month Date DEFAULT NULL
)
RETURNING INTEGER;
DEFINE GLOBAL __current_user INTEGER DEFAULT NULL;
DEFINE GLOBAL err_sqlcode INTEGER DEFAULT 0;
DEFINE GLOBAL err_isamcode INTEGER DEFAULT 0;
DEFINE GLOBAL err_detail CHAR(80) DEFAULT '';
DEFINE _inv_id Integer;
DEFINE _Name_exp NVarChar(40,0);
DEFINE _Name_rus NVarChar(50,0);
DEFINE _Smlval Char(3);
DEFINE _rlw_id Integer;
DEFINE _weight_brutto Decimal(12,3);
DEFINE _Bes_inv Decimal(12,3);
DEFINE _Sum_inv Numeric(15,2);
DEFINE _Bes_free Decimal(12,3);
DEFINE _Sum_free Numeric(15,2);
DEFINE _Sum_Weight_Inv DECIMAL(12,3);
DEFINE _SHB_Name NVARCHAR(60,0);
DEFINE _dogovor NChar(15);
DEFINE _dlv_id Integer;
DEFINE _Decl_num Char(23);
DEFINE _Decl_date Date;
DEFINE _Buyer NVarChar(80);
DEFINE _Currency_rate Money(16,2);
DEFINE _CenaRus Money(16,2);
DEFINE _Prod_All NVarChar(93);
DEFINE _org_name NVarChar(80,0);
DEFINE _SumRUR Money(16,2);
DEFINE _SumKinef Money(16,2);
DEFINE _Delta Money(16,2);
DEFINE _Effect Money(16,2);
DEFINE _Dog_id Integer;
DEFINE _Res_code Char(8);
DEFINE _carriage_num NChar(18);
DEFINE _nom_nakl NChar(10);
DEFINE _Shpok_char Char(4);
DEFINE _Parent SmallInt;
DEFINE _Date_otgr DateTime YEAR TO SECOND;
IF NumFunc=2 THEN -- Создаем временную табл. SprInvByProd
CREATE TEMP TABLE SprInvByProd......
и так далее по каждому из 12 пунктов.....просто процедура на все случаи жизни..чувак реально попотел когда сие изобретал....
guest 15.03.2010 18:41 # −10
guest 15.03.2010 22:21 # +4.6
guest 15.03.2010 19:01 # −1.8
Это же из базы данных. Мы узнаем все их секреты!
Grizzly 16.03.2010 09:20 # 0
guest 24.03.2010 13:31 # +1