admin/Database
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DJIN#41675: DJIN - BES: Bevestiging levering/ontvangst door besteller va.

Browse Source 
svn path=/Database/trunk/; revision=37340
This commit is contained in:
Maykel Geerdink
2018-03-13 14:51:42 +00:00
parent fb9e405ea0
commit 6f365db4e3
2 changed files with 33 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

50
BES/BES_PAC.SRC
View File

@@ -1217,50 +1217,50 @@ AS
THEN
eventcode := 'BESREJ';
END IF;
WHEN 2 -- Ingevoerd. Dit is de default, dus leeg kan niet; we rekenen 2>2 ook goed
WHEN 2 -- Nieuw. Dit is de default, dus leeg kan niet; we rekenen 2>2 ook goed
THEN
eventcode := 'BESAP2';
WHEN 3 -- Ingezien (voor de eerste keer, voordat acceptatie)
WHEN 3 -- Gefiatteerd (voor de eerste keer, voordat acceptatie)
THEN
IF currentstatus <> 3
THEN
eventcode := 'BESFIT';
END IF;
WHEN 4 -- Geaccepteerd (ongezien of gezien)
WHEN 4 -- Geaccepteerd
THEN
IF currentstatus <> 4
THEN
eventcode := 'BESACP';
END IF;
WHEN 5 -- Afgemeld
WHEN 5 -- Besteld
THEN
IF currentstatus <> 5
THEN
eventcode := 'BESBES';
END IF;
WHEN 6 -- Verwerkt
WHEN 6 -- Geleverd
THEN
IF currentstatus <> 6
THEN
eventcode := 'BESOTV';
END IF;
WHEN 7 -- Uitgegeven
WHEN 7 -- Verwerkt
THEN
IF currentstatus <> 7
THEN
eventcode := 'BESVER';
END IF;
WHEN 8 -- Annuleer
WHEN 8 -- Geannuleerd
THEN
IF currentstatus <> 8
THEN
eventcode := 'BESCAN';
END IF;
WHEN 9 -- Uitgegeven
WHEN 9 -- Ontvangen
THEN
IF currentstatus <> 9
THEN
eventcode := 'BESOT2'; -- Ontvangen
eventcode := '#BESOT2'; -- Alleen tracken en geen notificatie omdat die bij het ontvangen(6) wordt verstuurd.
END IF;
ELSE
-- Invalid statuschange or no change
@@ -1290,50 +1290,50 @@ AS
WHERE bes_bestelopdr_key = pbestelopdrkey;
CASE pstatus
WHEN 1 -- Afgewezen
WHEN 1 -- Afgewezen
THEN
IF currentstatus <> 1
THEN
eventcode := 'BES2RE'; -- afgewezen
eventcode := 'BES2RE';
END IF;
WHEN 2
WHEN 2 -- Unused
THEN
eventcode := NULL; -- unused
eventcode := NULL;
WHEN 3
THEN
IF currentstatus <> 3
IF currentstatus <> 3 -- In behandeling
THEN
eventcode := 'BES2NE'; -- in behandeling
eventcode := 'BES2NE';
END IF;
WHEN 4 -- Geaccepteerd (ongezien of gezien)
WHEN 4 -- In Bestelling (bevestigd)
THEN
IF currentstatus <> 4
THEN
eventcode := 'BES2CO'; -- In Bestelling (bevestigd)
eventcode := 'BES2CO';
END IF;
WHEN 5 -- Afgemeld
WHEN 5 -- Ter Bevesting
THEN
IF currentstatus <> 5
THEN
eventcode := 'BES2BE'; -- Ter Bevesting
eventcode := 'BES2BE';
END IF;
WHEN 6 -- Verwerkt
WHEN 6 -- Geleverd
THEN
IF currentstatus <> 6
THEN
eventcode := 'BES2AF'; -- geleverd
eventcode := 'BES2AF';
END IF;
WHEN 7 -- Uitgegeven
WHEN 7 -- Verwerkt
THEN
IF currentstatus <> 7
THEN
eventcode := 'BES2VE'; -- verwerkt
eventcode := 'BES2VE';
END IF;
WHEN 8 -- Uitgegeven
WHEN 8 -- Geannuleerd
THEN
IF currentstatus <> 8
THEN
eventcode := 'BES2CA'; -- Geannuleerd
eventcode := 'BES2CA';
END IF;
ELSE
-- Invalid statuschange or no change