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

VNOG#83559: Objectenimport voorzien van parent-kolommen voor onderdelen.

Browse Source 
svn path=/Database/trunk/; revision=66800
This commit is contained in:
Maykel Geerdink
2024-10-29 12:44:23 +00:00
parent 3325941ced
commit a9c33e58ef
1 changed files with 294 additions and 89 deletions
Download Patch File Download Diff File Expand all files Collapse all files

383
FAC/FAC_PACF.SRC
View File

@@ -8462,10 +8462,78 @@ EXCEPTION
END fac_update_mldafmtxt;
/
--//////////////////////////////////////////////////INS IMPORT STUFF///////////////////////////////////////////
CREATE OR REPLACE PROCEDURE fac_import_ins (p_import_key IN NUMBER)
AS
-- Standaard volgorde van de kolommen in het CSV-formaat, waarbij 3 velden VERPLICHT (minimaal door Facilitor vereist)
-- Variabelelijst
--v_ins_discipline_omschrijving: 1 (VERPLICHT)
--v_ins_discipline_kostensoort: 2
--v_ins_srtgroep_omschrijving: 3 (VERPLICHT)
--v_ins_srtdeel_code: 4 (VERPLICHT)
--v_ins_srtdeel_omschrijving: 5 (VERPLICHT)
--v_ins_deel_omschrijving: 6 (VERPLICHT)
--v_ins_deel_opmerking: 7
--v_reserveerbaar: 8
--v_res_deel_eenheid: 9
--v_res_deel_prijs: 10
--v_alg_locatie_code: 11
--v_alg_gebouw_code: 12
--v_alg_verdieping_volgnr: 13
--v_alg_ruimte_nr: 14
--v_res_deel_alg_level: 15
--v_res_discipline_type: 16
--v_res_discipline_omschrijving: 17
--v_res_discipline_kostensoort: 18
--v_prs_perslid_matchcode: 19
--v_prs_perslid_matchwaarde: 20
--v_ins_deel_aanmaak: 21
--v_ins_deel_vervaldatum: 22
--v_ins_deel_aantal: 23
--v_ins_deel_externnr: 24
--v_ins_kenmerkwaarde1: 25
--v_ins_kenmerkwaarde2: 26
--v_ins_kenmerkwaarde3: 27
--v_ins_kenmerkwaarde4: 28
--v_ins_kenmerkwaarde5: 29
--v_ins_kenmerkwaarde6: 30
--v_ins_kenmerkwaarde7: 31
--v_ins_kenmerkwaarde8: 32
--v_ins_kenmerkwaarde9: 33
--v_ins_kenmerkwaarde10: 34
--v_ins_kenmerkwaarde11: 35
--v_ins_kenmerkwaarde12: 36
--v_ins_kenmerkwaarde13: 37
--v_ins_kenmerkwaarde14: 38
--v_ins_kenmerkwaarde15: 39
--v_ins_kenmerkwaarde16: 40
--v_ins_kenmerkwaarde17: 41
--v_ins_kenmerkwaarde18: 42
--v_ins_kenmerkwaarde19: 43
--v_ins_kenmerkwaarde20: 44
-- Via een string, en ook op slimme wijze, nl alsof het een ingelezen deel-record is met p_fielddelimitor
v_seq_of_columns VARCHAR(255); -- (1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44);
-- Afwijkingen op deze volgorde zijn in eigen cust_import_factuur te regelen.
-- Als discipline_omschrijving en discipline_kostensoort b.v. zijn omgedraaid in het CSV-formaat,
-- dan is de lijst van integers: v_seq_of_columns := "2,1,3,4,5,6,7,8,9,10,11,12.....";
-- Als discipline_omschrijving NIET in CSV staat, dan factuurimport v_seq_of_columns := "0,2,3,4,5,6,7,8,9,10,11,12.....";
-- v_seq_of_columns := "0;2;3;4;5;6;7;8;9;10;11;12.....";
-- M.a.w. waar een 0 staat, wordt de variabele niet ingelezen en blijft LEEG.
BEGIN
v_seq_of_columns := '1;2;3;4;5;6;7;8;9;10;11;12;13;14;15;16;17;18;19;20;21;22;23;24;25;26;27;28;29;30;31;32;33;34;35;36;37;38;39;40;41;42;43;44';
fac_import_ins_body(p_import_key, v_seq_of_columns);
END;
/
--//////////////////////////////////////////////////INS IMPORT STUFF///////////////////////////////////////////
CREATE OR REPLACE PROCEDURE fac_import_ins_body (p_import_key IN NUMBER, p_seq_of_columns IN VARCHAR2)
IS
c_delim VARCHAR2 (2) := fac.import_delimiter(p_import_key);
v_fielddelimitor VARCHAR2 (2) := fac.import_delimiter(p_import_key);
v_newline fac_imp_file.fac_imp_file_line%TYPE; -- Input line
v_errormsg VARCHAR2 (1000);
v_errorhint VARCHAR2 (1000);
@@ -8550,6 +8618,53 @@ IS
v_ins_deel_externnr VARCHAR2 (400);
v_file_index NUMBER;
v_seq_of_columns VARCHAR2(255);
v_colnr VARCHAR2 (2);
v_colnr1 NUMBER;
v_colnr2 NUMBER;
v_colnr3 NUMBER;
v_colnr4 NUMBER;
v_colnr5 NUMBER;
v_colnr6 NUMBER;
v_colnr7 NUMBER;
v_colnr8 NUMBER;
v_colnr9 NUMBER;
v_colnr10 NUMBER;
v_colnr11 NUMBER;
v_colnr12 NUMBER;
v_colnr13 NUMBER;
v_colnr14 NUMBER;
v_colnr15 NUMBER;
v_colnr16 NUMBER;
v_colnr17 NUMBER;
v_colnr18 NUMBER;
v_colnr19 NUMBER;
v_colnr20 NUMBER;
v_colnr21 NUMBER;
v_colnr22 NUMBER;
v_colnr23 NUMBER;
v_colnr24 NUMBER;
v_colnr25 NUMBER;
v_colnr26 NUMBER;
v_colnr27 NUMBER;
v_colnr28 NUMBER;
v_colnr29 NUMBER;
v_colnr30 NUMBER;
v_colnr31 NUMBER;
v_colnr32 NUMBER;
v_colnr33 NUMBER;
v_colnr34 NUMBER;
v_colnr35 NUMBER;
v_colnr36 NUMBER;
v_colnr37 NUMBER;
v_colnr38 NUMBER;
v_colnr39 NUMBER;
v_colnr40 NUMBER;
v_colnr41 NUMBER;
v_colnr42 NUMBER;
v_colnr43 NUMBER;
v_colnr44 NUMBER;
-- Overige velden:
CURSOR c1
IS
@@ -8637,6 +8752,56 @@ BEGIN
header_is_valid := 0;
v_prs_perslid_matchcode := '';
-- Init
v_seq_of_columns := p_seq_of_columns;
v_errorhint := 'Bepalen volgorde kolommen';
-- De volgorde van de te importeren kolommen in de CSV uitlezen uit v_seq_of_columns
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr1);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr2);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr3);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr4);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr5);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr6);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr7);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr8);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr9);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr10);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr11);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr12);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr13);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr14);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr15);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr16);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr17);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr18);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr19);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr20);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr21);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr22);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr23);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr24);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr25);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr26);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr27);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr28);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr29);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr30);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr31);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr32);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr33);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr34);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr35);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr36);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr37);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr38);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr39);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr40);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr41);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr42);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr43);
fac.imp_getfield (v_seq_of_columns, v_fielddelimitor, v_colnr44);
FOR rec1 IN c1
LOOP
BEGIN
@@ -8646,50 +8811,95 @@ BEGIN
v_aanduiding := '';
v_ongeldig := 0;
-- Lees alle veldwaarden
fac.imp_getfield (v_newline, c_delim, v_ins_discipline_omschrijving);
fac.imp_getfield (v_newline, c_delim, v_ins_discipline_kostensoort);
fac.imp_getfield (v_newline, c_delim, v_ins_srtgroep_omschrijving);
fac.imp_getfield (v_newline, c_delim, v_ins_srtdeel_code);
fac.imp_getfield (v_newline, c_delim, v_ins_srtdeel_omschrijving);
fac.imp_getfield (v_newline, c_delim, v_ins_deel_omschrijving);
fac.imp_getfield (v_newline, c_delim, v_ins_deel_opmerking);
fac.imp_getfield (v_newline, c_delim, v_reserveerbaar);
fac.imp_getfield (v_newline, c_delim, v_res_deel_eenheid);
fac.imp_getfield (v_newline, c_delim, v_res_deel_prijs);
fac.imp_getfield (v_newline, c_delim, v_alg_locatie_code);
fac.imp_getfield (v_newline, c_delim, v_alg_gebouw_code);
fac.imp_getfield (v_newline, c_delim, v_alg_verdieping_volgnr);
fac.imp_getfield (v_newline, c_delim, v_alg_ruimte_nr);
fac.imp_getfield (v_newline, c_delim, v_res_deel_alg_level);
fac.imp_getfield (v_newline, c_delim, v_res_discipline_type);
fac.imp_getfield (v_newline, c_delim, v_res_discipline_omschrijving);
fac.imp_getfield (v_newline, c_delim, v_res_discipline_kostensoort);
fac.imp_getfield (v_newline, c_delim, v_prs_perslid_matchcode);
fac.imp_getfield (v_newline, c_delim, v_prs_perslid_matchwaarde);
fac.imp_getfield (v_newline, c_delim, v_ins_deel_aanmaak);
fac.imp_getfield (v_newline, c_delim, v_ins_deel_vervaldatum);
fac.imp_getfield (v_newline, c_delim, v_ins_deel_aantal);
fac.imp_getfield (v_newline, c_delim, v_ins_deel_externnr);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde1);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde2);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde3);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde4);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde5);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde6);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde7);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde8);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde9);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde10);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde11);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde12);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde13);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde14);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde15);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde16);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde17);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde18);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde19);
fac.imp_getfield (v_newline, c_delim, v_ins_kenmerkwaarde20);
v_aanduiding := 'Inlezen ins_discipline_omschrijving kolom:' || v_colnr1;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr1), v_ins_discipline_omschrijving);
v_aanduiding := 'Inlezen ins_discipline_kostensoort kolom:' || v_colnr2;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr2), v_ins_discipline_kostensoort);
v_aanduiding := 'Inlezen ins_srtgroep_omschrijving kolom:' || v_colnr3;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr3), v_ins_srtgroep_omschrijving);
v_aanduiding := 'Inlezen ins_srtdeel_code kolom:' || v_colnr4;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr4), v_ins_srtdeel_code);
v_aanduiding := 'Inlezen ins_srtdeel_omschrijving kolom:' || v_colnr5;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr5), v_ins_srtdeel_omschrijving);
v_aanduiding := 'Inlezen ins_deel_omschrijving kolom:' || v_colnr6;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr6), v_ins_deel_omschrijving);
v_aanduiding := 'Inlezen ins_deel_opmerking kolom:' || v_colnr7;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr7), v_ins_deel_opmerking);
v_aanduiding := 'Inlezen reserveerbaar kolom:' || v_colnr8;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr8), v_reserveerbaar);
v_aanduiding := 'Inlezen res_deel_eenheid kolom:' || v_colnr9;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr9), v_res_deel_eenheid);
v_aanduiding := 'Inlezen res_deel_prijs kolom:' || v_colnr10;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr10), v_res_deel_prijs);
v_aanduiding := 'Inlezen alg_locatie_code kolom:' || v_colnr11;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr11), v_alg_locatie_code);
v_aanduiding := 'Inlezen alg_gebouw_code kolom:' || v_colnr12;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr12), v_alg_gebouw_code);
v_aanduiding := 'Inlezen alg_verdieping_volgnr kolom:' || v_colnr13;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr13), v_alg_verdieping_volgnr);
v_aanduiding := 'Inlezen alg_ruimte_nr kolom:' || v_colnr14;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr14), v_alg_ruimte_nr);
v_aanduiding := 'Inlezen res_deel_alg_level kolom:' || v_colnr15;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr15), v_res_deel_alg_level);
v_aanduiding := 'Inlezen v_res_discipline_type kolom:' || v_colnr16;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr16), v_res_discipline_type);
v_aanduiding := 'Inlezen v_res_discipline_omschrijving kolom:' || v_colnr17;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr17), v_res_discipline_omschrijving);
v_aanduiding := 'Inlezen v_res_discipline_kostensoort kolom:' || v_colnr18;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr18), v_res_discipline_kostensoort);
v_aanduiding := 'Inlezen v_prs_perslid_matchcode kolom:' || v_colnr19;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr19), v_prs_perslid_matchcode);
v_aanduiding := 'Inlezen v_prs_perslid_matchwaarde kolom:' || v_colnr20;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr20), v_prs_perslid_matchwaarde);
v_aanduiding := 'Inlezen v_ins_deel_aanmaak kolom:' || v_colnr21;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr21), v_ins_deel_aanmaak);
v_aanduiding := 'Inlezen v_ins_deel_vervaldatum kolom:' || v_colnr22;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr22), v_ins_deel_vervaldatum);
v_aanduiding := 'Inlezen v_ins_deel_aantal kolom:' || v_colnr23;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr23), v_ins_deel_aantal);
v_aanduiding := 'Inlezen v_ins_deel_externnr kolom:' || v_colnr24;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr24), v_ins_deel_externnr);
v_aanduiding := 'Inlezen kenmerk1 kolom:' || v_colnr25;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr25), v_ins_kenmerk_key1);
v_aanduiding := 'Inlezen kenmerk2 kolom:' || v_colnr26;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr26), v_ins_kenmerk_key2);
v_aanduiding := 'Inlezen kenmerk3 kolom:' || v_colnr27;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr27), v_ins_kenmerk_key3);
v_aanduiding := 'Inlezen kenmerk4 kolom:' || v_colnr28;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr28), v_ins_kenmerk_key4);
v_aanduiding := 'Inlezen kenmerk5 kolom:' || v_colnr29;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr29), v_ins_kenmerk_key5);
v_aanduiding := 'Inlezen kenmerk6 kolom:' || v_colnr30;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr30), v_ins_kenmerk_key6);
v_aanduiding := 'Inlezen kenmerk7 kolom:' || v_colnr31;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr31), v_ins_kenmerk_key7);
v_aanduiding := 'Inlezen kenmerk8 kolom:' || v_colnr32;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr32), v_ins_kenmerk_key8);
v_aanduiding := 'Inlezen kenmerk9 kolom:' || v_colnr33;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr33), v_ins_kenmerk_key9);
v_aanduiding := 'Inlezen kenmerk10 kolom:' || v_colnr34;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr34), v_ins_kenmerk_key10);
v_aanduiding := 'Inlezen kenmerk11 kolom:' || v_colnr35;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr35), v_ins_kenmerk_key11);
v_aanduiding := 'Inlezen kenmerk12 kolom:' || v_colnr36;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr36), v_ins_kenmerk_key12);
v_aanduiding := 'Inlezen kenmerk13 kolom:' || v_colnr37;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr37), v_ins_kenmerk_key13);
v_aanduiding := 'Inlezen kenmerk14 kolom:' || v_colnr38;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr38), v_ins_kenmerk_key14);
v_aanduiding := 'Inlezen kenmerk15 kolom:' || v_colnr39;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr39), v_ins_kenmerk_key15);
v_aanduiding := 'Inlezen kenmerk16 kolom:' || v_colnr40;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr40), v_ins_kenmerk_key16);
v_aanduiding := 'Inlezen kenmerk17 kolom:' || v_colnr41;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr41), v_ins_kenmerk_key17);
v_aanduiding := 'Inlezen kenmerk18 kolom:' || v_colnr42;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr42), v_ins_kenmerk_key18);
v_aanduiding := 'Inlezen kenmerk19 kolom:' || v_colnr42;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr43), v_ins_kenmerk_key19);
v_aanduiding := 'Inlezen kenmerk20 kolom:' || v_colnr44;
fac.imp_getfield_nr (v_newline, v_fielddelimitor, fac.safe_to_number(v_colnr44), v_ins_kenmerk_key20);
v_aanduiding :=
'['
@@ -9335,7 +9545,7 @@ EXCEPTION
'E',
v_aanduiding || v_errormsg,
'Inleesproces objecten afgebroken! regel:' || v_file_index);
END fac_import_ins;
END fac_import_ins_body;
/
@@ -13215,43 +13425,42 @@ IS
v_prs_bedrijf_uurloon_n NUMBER (6, 2); -- N6,2
v_prs_overeenkomst_date DATE; -- DATE
-- De kolommen
v_seq_of_columns VARCHAR2(255);
v_colnr1 NUMBER;
v_colnr2 NUMBER;
v_colnr3 NUMBER;
v_colnr4 NUMBER;
v_colnr5 NUMBER;
v_colnr6 NUMBER;
v_colnr7 NUMBER;
v_colnr8 NUMBER;
v_colnr9 NUMBER;
v_colnr10 NUMBER;
v_colnr11 NUMBER;
v_colnr12 NUMBER;
v_colnr13 NUMBER;
v_colnr14 NUMBER;
v_colnr15 NUMBER;
v_colnr16 NUMBER;
v_colnr17 NUMBER;
v_colnr18 NUMBER;
v_colnr19 NUMBER;
v_colnr20 NUMBER;
v_colnr21 NUMBER;
v_colnr22 NUMBER;
v_colnr23 NUMBER;
v_colnr24 NUMBER;
v_colnr25 NUMBER;
v_colnr26 NUMBER;
v_colnr27 NUMBER;
v_colnr28 NUMBER;
v_colnr29 NUMBER;
v_colnr30 NUMBER;
v_colnr31 NUMBER;
v_colnr32 NUMBER;
v_colnr33 NUMBER;
v_colnr34 NUMBER;
-- De kolommen
v_seq_of_columns VARCHAR2(255);
v_colnr1 NUMBER;
v_colnr2 NUMBER;
v_colnr3 NUMBER;
v_colnr4 NUMBER;
v_colnr5 NUMBER;
v_colnr6 NUMBER;
v_colnr7 NUMBER;
v_colnr8 NUMBER;
v_colnr9 NUMBER;
v_colnr10 NUMBER;
v_colnr11 NUMBER;
v_colnr12 NUMBER;
v_colnr13 NUMBER;
v_colnr14 NUMBER;
v_colnr15 NUMBER;
v_colnr16 NUMBER;
v_colnr17 NUMBER;
v_colnr18 NUMBER;
v_colnr19 NUMBER;
v_colnr20 NUMBER;
v_colnr21 NUMBER;
v_colnr22 NUMBER;
v_colnr23 NUMBER;
v_colnr24 NUMBER;
v_colnr25 NUMBER;
v_colnr26 NUMBER;
v_colnr27 NUMBER;
v_colnr28 NUMBER;
v_colnr29 NUMBER;
v_colnr30 NUMBER;
v_colnr31 NUMBER;
v_colnr32 NUMBER;
v_colnr33 NUMBER;
v_colnr34 NUMBER;
CURSOR c1
IS
@@ -13320,10 +13529,7 @@ BEGIN
v_newline := rec1.fac_imp_file_line;
v_errormsg := 'Fout opvragen te importeren rij';
v_aanduiding := '';
v_ongeldig := 0;
v_ongeldig := 0;
-- Lees alle veldwaarden
v_aanduiding := '[' || v_prs_bedrijf_naam || '] veld: BEDRIJFSNAAM';
@@ -13396,7 +13602,6 @@ BEGIN
fac.imp_getfield_nr (v_newline, c_delim, fac.safe_to_number(v_colnr34), v_prs_bedrijf_overig3);
v_aanduiding := '[' || v_prs_bedrijf_naam || '] ';
-- Ik controleer of ik een geldige header heb, dat is: in de juiste kolommen
-- de juiste kolomkop. Ik controleer daarbij ALLE kolommen!
-- Ik negeer alles totdat ik een geldige header ben gepasseerd.