romfast/gomag-vending
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

adaugare adauga_comanda_pe_factura()

Browse Source
This commit is contained in:
Claude Agent
2026-04-15 14:42:17 +00:00
parent 5cdd919226
commit 5397bec35d
1 changed files with 188 additions and 164 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
api/database-scripts/04_pack_comenzi.pck
View File

@@ -4,8 +4,6 @@ create or replace package PACK_COMENZI is
-- Created : 18/08/2006
-- Purpose :
-- 20.03.2026 - duplicate CODMAT pe comanda: discriminare pe PRET + SIGN(CANTITATE)
id_comanda COMENZI.ID_COMANDA%TYPE;
procedure adauga_masina(V_ID_MODEL_MASINA IN NUMBER,
@@ -122,6 +120,9 @@ create or replace package PACK_COMENZI is
V_ID_UTIL IN NUMBER,
V_ID_SECTIE IN NUMBER);
procedure adauga_comanda_pe_factura(V_ID_COMANDA IN NUMBER,
V_ID_VANZARE IN NUMBER);
procedure livreaza_comanda(V_ID_COMANDA IN NUMBER,
V_ID_AGENT IN NUMBER,
V_ID_DELEGAT IN NUMBER,
@@ -315,6 +316,10 @@ create or replace package body PACK_COMENZI is
-- 19.03.2026
-- adauga_articol_comanda permite de 2 ori acelasi articol cu cote tva diferite (ex: discount 11% si discount 21%)
-- 20.03.2026 - duplicate CODMAT pe comanda: discriminare pe PRET + SIGN(CANTITATE)
-- 15.04.2026 - adaugare adauga_comanda_pe_factura()
----------------------------------------------------------------------------------
procedure adauga_masina(V_ID_MODEL_MASINA IN NUMBER,
V_NRINMAT IN VARCHAR2,
@@ -927,6 +932,25 @@ create or replace package body PACK_COMENZI is
V_ID_UTIL,
V_ID_SECTIE);
end;
----------------------------------------------------------------------------------
-- asociez comanda cu vanzari.id_comanda pe o factura fara comanda
-- ca sa inchid comenzile facturate separat prin facturi lista preturi
----------------------------------------------------------------------------------
procedure adauga_comanda_pe_factura(V_ID_COMANDA IN NUMBER,
V_ID_VANZARE IN NUMBER) is
V_EXISTA NUMBER(10);
begin
SELECT COUNT(*) INTO V_EXISTA FROM VANZARI WHERE ID_VANZARE = V_ID_VANZARE AND NVL(ID_COMANDA,0) <> 0;
IF V_EXISTA > 0 THEN
RAISE_APPLICATION_ERROR(-20000,
'Factura are deja o comanda asociata. Alegeti alta factura!');
ELSE
UPDATE VANZARI SET ID_COMANDA = V_ID_COMANDA, TIP = 3
WHERE ID_VANZARE = V_ID_VANZARE AND NVL(ID_COMANDA, 0) = 0;
END IF;
end;
----------------------------------------------------------------------------------
procedure livreaza_comanda(V_ID_COMANDA IN NUMBER,
V_ID_AGENT IN NUMBER,