1. SQL / Говнокод #2799

    −157.8

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    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......

    и так далее по каждому из 12 пунктов.....просто процедура на все случаи жизни..чувак реально попотел когда сие изобретал....

    Запостил: Grizzly, 15 Марта 2010

    Комментарии (5) RSS

    • показать все, что скрытоГде здесь С++?
      Ответить
      • Блин, убейте кто-нибудь этого придурка.
        Ответить
    • Хватит уже постить код в таких количествах.
      Это же из базы данных. Мы узнаем все их секреты!
      Ответить
      • )))))) Флаг тебе в руки! Если бы нашлись какие-нибудь кулхацкеры, которые смогли бы получить доступ к БД, я думаю они бы заплакали :)
        Ответить
    • афигеть, у вас неймспейс платный чтоли? создал новую процидурку - оплати в кассу
      Ответить

    Добавить комментарий