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

AAIT#66025 -- Interface met Com4/Topdesk omzetten naar AUTOTASK - uitsluiten omhangen meldingen

Browse Source 
svn path=/Customer/trunk/; revision=50585
This commit is contained in:
Jos Migo
2021-03-31 13:18:01 +00:00
parent a2c9f61c00
commit e93326d68c
1 changed files with 1 additions and 138 deletions
Download Patch File Download Diff File Expand all files Collapse all files

139
AA/AAIT/aait.sql
View File

@@ -1343,144 +1343,7 @@ BEGIN
END IF;
-- Probeer de melding om te hangen naar de classificatie die COM4IT er aan toegekend heeft.
BEGIN
IF v_soort_call IS NOT NULL
AND v_categorie IS NOT NULL
AND v_subcategorie IS NOT NULL
THEN
v_errormsg := 'Bepalen huidige gegevens.';
SELECT 'Melding '
|| sd.ins_srtdiscipline_prefix
|| m.mld_melding_key
|| ' ('
|| ins_discipline_omschrijving
|| '/'
|| mld_stdmelding_omschrijving
|| ') is gewijzigd '
|| CHR (10)
|| 'Melding: '
|| std.mld_stdmelding_omschrijving
|| ' --> '
INTO v_track_info
FROM mld_stdmelding std,
ins_tab_discipline d,
ins_srtdiscipline sd,
mld_melding m
WHERE sd.ins_srtdiscipline_key = d.ins_srtdiscipline_key
AND d.ins_discipline_key = std.mld_ins_discipline_key
AND std.mld_stdmelding_key = m.mld_stdmelding_key
AND m.mld_melding_key = rec.mld_melding_key;
v_errormsg := 'Bepalen vakgroeptype.';
CASE v_soort_call
WHEN 'Storing'
THEN
v_prefix := 'ST';
WHEN 'Change'
THEN
v_prefix := 'SA';
WHEN 'Informatieverzoek'
THEN
v_prefix := 'IV';
WHEN 'Klacht'
THEN
v_prefix := 'KL';
WHEN 'Wens'
THEN
v_prefix := 'SA';
WHEN 'Onderhoud'
THEN
v_prefix := 'SA';
WHEN 'Project'
THEN
v_prefix := 'PR';
WHEN 'Verkoop'
THEN
v_prefix := 'SA';
END CASE;
v_errormsg := 'Bepalen vakgroep.';
IF INSTR (v_categorie, '-') = 2
AND fac.safe_to_number (SUBSTR (v_categorie, 1, 1)) IS NOT NULL
THEN
v_vakgroep := SUBSTR (v_categorie, 3);
ELSE
v_vakgroep := v_categorie;
END IF;
v_errormsg := 'Bepalen stdmelding.';
IF INSTR (v_subcategorie, '-') = 2
AND fac.safe_to_number (SUBSTR (v_subcategorie, 1, 1)) IS NOT NULL
THEN
v_stdmelding := SUBSTR (v_subcategorie, 3);
ELSE
v_stdmelding := v_subcategorie;
END IF;
v_errormsg := 'Opzoeken vakgroep en stdmelding keys.';
SELECT mld_ins_discipline_key, mld_stdmelding_key
INTO v_discipline_key, v_stdmelding_key
FROM mld_stdmelding std,
ins_tab_discipline d,
ins_srtdiscipline sd
WHERE sd.ins_srtdiscipline_key = d.ins_srtdiscipline_key
AND d.ins_discipline_key = std.mld_ins_discipline_key
AND UPPER (sd.ins_srtdiscipline_prefix) = UPPER (v_prefix)
AND UPPER (d.ins_discipline_omschrijving) =
UPPER (v_vakgroep)
AND UPPER (std.mld_stdmelding_omschrijving) =
UPPER (v_stdmelding)
AND std.mld_stdmelding_verwijder IS NULL
AND d.ins_discipline_verwijder IS NULL
AND sd.ins_srtdiscipline_verwijder IS NULL;
v_errormsg := 'Omhangen vakgroep en stdmelding keys.';
UPDATE mld_melding
SET mld_stdmelding_key = v_stdmelding_key
WHERE mld_melding_key = rec.mld_melding_key;
INSERT INTO fac_tracking (fac_srtnotificatie_key,
fac_tracking_oms,
fac_tracking_refkey,
prs_perslid_key)
VALUES (28,
v_track_info || v_stdmelding,
rec.mld_melding_key,
v_api_user_key);
END IF;
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg :=
v_errormsg
|| ' ORACLE (error '
|| oracle_err_num
|| '/'
|| oracle_err_mes
|| ')';
fac.writelog (p_applname,
'W',
v_aanduiding || v_errormsg,
'Fout bij omhangen opdrachtstatusbericht.');
INSERT INTO fac_tracking (fac_srtnotificatie_key,
fac_tracking_oms,
fac_tracking_refkey,
prs_perslid_key)
VALUES (28,
'Fout bij omhangen melding: ' || v_aanduiding,
rec.mld_melding_key,
v_api_user_key);
END;
-- Ps. Dit 'Omhangen v/d melding' is bij overgang naar AutoTask gedisabled (zie ticket AAIT#66025)
-- Sluit opdracht (als msg_type=AFM); de bovenliggende melding wordt
-- tevens gesloten als het de laatste opdracht is!