1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19
20. 20
21. 21
22. 22
23. 23
24. 24
25. 25
26. 26
27. 27
28. 28
29. 29
30. 30
31. 31
32. 32
33. 33
34. 34
35. 35
36. 36
37. 37
38. 38
39. 39
40. 40
41. 41
42. 42
43. 43
44. 44
45. 45
46. 46
47. 47
48. 48
49. 49
50. 50
51. 51
52. 52
53. 53
54. 54
55. 55
56. 56
57. 57
58. 58
59. 59
60. 60
61. 61
62. 62
63. 63
64. 64
65. 65
66. 66
67. 67
68. 68
69. 69
70. 70
71. 71
72. 72
73. 73
74. 74
75. 75
76. 76
77. 77
78. 78
79. 79
80. 80
81. 81
82. 82
83. 83
84. 84
85. 85
86. 86
87. 87
88. 88
89. 89
90. 90
91. 91
92. 92
93. 93
94. 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......