FSN#39055 BCS/2000 functionaliteit in FACILITOR - customization

svn path=/Customer/trunk/; revision=34793
This commit is contained in:
Erik Groener
2017-08-01 14:45:47 +00:00
parent 4dd1a1bee1
commit 26eacee587

View File

@@ -2290,8 +2290,8 @@ AS
v_groep_omschr VARCHAR2 (256); --004 GROEP_OMSCHRIJVING
v_soort_code VARCHAR2 (256); --005 SOORT_CODE
v_soort_omschr VARCHAR2 (256); --006 SOORT_OMSCHRIJVING
v_soort_heeft_btw VARCHAR2 (256); --007 HEEFT_BTW
v_soort_btw_perc VARCHAR2 (256); --008 BTW_PERCENTAGE
v_soort_btw_perc VARCHAR2 (256); --007 BTW_PERCENTAGE
v_soort_btw_oms VARCHAR2 (256); --008 BTW_OMSCHRIJVING
s_valid_header NUMBER(1);
BEGIN
s_valid_header := 0;
@@ -2301,8 +2301,8 @@ AS
fac.imp_getfield (p_line, c_delim, v_groep_omschr);
fac.imp_getfield (p_line, c_delim, v_soort_code);
fac.imp_getfield (p_line, c_delim, v_soort_omschr);
fac.imp_getfield (p_line, c_delim, v_soort_heeft_btw);
fac.imp_getfield (p_line, c_delim, v_soort_btw_perc);
fac.imp_getfield (p_line, c_delim, v_soort_btw_oms);
--
v_rubriek_code := TRIM(UPPER(v_rubriek_code));
v_rubriek_omschr := TRIM(UPPER(v_rubriek_omschr));
@@ -2310,8 +2310,8 @@ AS
v_groep_omschr := TRIM(UPPER(v_groep_omschr));
v_soort_code := TRIM(UPPER(v_soort_code));
v_soort_omschr := TRIM(UPPER(v_soort_omschr));
v_soort_heeft_btw := TRIM(UPPER(v_soort_heeft_btw));
v_soort_btw_perc := TRIM(UPPER(v_soort_btw_perc));
v_soort_btw_oms := TRIM(UPPER(v_soort_btw_oms));
--
IF ( v_rubriek_code = 'RUBRIEK_CODE'
AND v_rubriek_omschr = 'RUBRIEK_OMSCHRIJVING'
@@ -2319,8 +2319,8 @@ AS
AND v_groep_omschr = 'GROEP_OMSCHRIJVING'
AND v_soort_code = 'SOORT_CODE'
AND v_soort_omschr = 'SOORT_OMSCHRIJVING'
AND v_soort_heeft_btw = 'HEEFT_BTW'
AND v_soort_btw_perc = 'BTW_PERCENTAGE'
AND v_soort_btw_oms = 'BTW_OMSCHRIJVING'
)
THEN
s_valid_header := 1;
@@ -2422,8 +2422,8 @@ AS
IS
v_soort_code VARCHAR2 (256); --005 SOORT_CODE
v_soort_omschr VARCHAR2 (256); --006 SOORT_OMSCHRIJVING
v_soort_heeftbtw VARCHAR2 (256); --007 HEEFT_BTW
v_soort_perc VARCHAR2 (256); --008 BTW_PERCENTAGE
v_soort_perc VARCHAR2 (256); --007 BTW_PERCENTAGE
v_soort_perc_oms VARCHAR2 (256); --008 BTW_OMSCHRIJVING
s_project_nummer VARCHAR2 (256); --:projectnummer (discipline)
s_subproject_code VARCHAR2 (256); --:code subproject (project)
s_rubriek_code VARCHAR2 (256); --001 RUBRIEK_CODE
@@ -2432,8 +2432,8 @@ AS
BEGIN
fac.imp_getfield (p_line, c_delim, v_soort_code);
fac.imp_getfield (p_line, c_delim, v_soort_omschr);
fac.imp_getfield (p_line, c_delim, v_soort_heeftbtw);
fac.imp_getfield (p_line, c_delim, v_soort_perc);
fac.imp_getfield (p_line, c_delim, v_soort_perc_oms);
--
p_soort_code := NULL;
v_soort_code := TRIM(v_soort_code);
@@ -2469,7 +2469,7 @@ AS
, TRIM(s_groep_code)
, v_soort_code
, TRIM(v_soort_omschr)
, TRIM(v_soort_heeftbtw)
, TRIM(v_soort_perc_oms)
, fac.safe_To_Integer(v_soort_perc)
);
END IF;