Skip to content

I
intranet-timesheet2-invoices
Commit fcfc98e2 authored by Frank Bergmann's avatar Frank Bergmann
Browse files
Options

- Timesheet Invoicing: 

  Fixed sample price list and fixed price list import
parent e02e85dd
Hide whitespace changes
Inline Side-by-side
Showing with 28 additions and 81 deletions
www/price-lists/pricelist_sample.csv
View file @ fcfc98e2
uom;company;task_type;target_language;source_language;subject_area;valid_from;valid_through;price;currency
uom;company;task_type;material;price;currency
# The system ignores empty lines and lines starting with a '#' (comments);;;;;;;;;
# Please save this file to your local disc an replace 'company_path' by the...;;;;;;;;;
# ... path of your company;;;;;;;;;
# The system ignores empty lines and lines starting with a '#' (comments);;;;;
# Please save this file to your local disc an replace 'company_path' by the...;;;;;
# ... path of your company.;;;;;
# Default prices for EUR;;;;;;;;;
S-Word;company_path;;;;;;;0,15;EUR
T-Word;company_path;;;;;;;0,15;EUR
S-Line;company_path;;;;;;;1,5;EUR
Hour;company_path;;;;;;;70;EUR
Day;company_path;;;;;;;500;EUR
# Default prices for USD;;;;;;;;;
S-Word;company_path;;;;;;;0,15;USD
T-Word;company_path;;;;;;;0,15;USD
S-Line;company_path;;;;;;;1,5;USD
Hour;company_path;;;;;;;70;USD
Day;company_path;;;;;;;500;USD
# Default prices for EUR - These prices are used if no other information is specified;;;;;
Hour;company_path;;;100;EUR
Day;company_path;;;800;EUR
# Default prices for GBP;;;;;;;;;
S-Word;company_path;;;;;;;0,4;GBP
T-Word;company_path;;;;;;;0,4;GBP
S-Line;company_path;;;;;;;2,5;GBP
Hour;company_path;;;;;;;70;GBP
Day;company_path;;;;;;;560;GBP
# Hourly prices for specific materials;;;;;
Hour;company_path;;sw_java_hour;80;EUR
Hour;company_path;;sw_testing_hour;40;EUR
Hour;company_path;;pm_pm_hour;120;EUR
# Default prices with translation task EUR;;;;;;;;;
S-Word;company_path;Trans Only;;;;;;0,15;EUR
T-Word;company_path;Trans Only;;;;;;0,15;EUR
S-Line;company_path;Trans Only;;;;;;1,5;EUR
Hour;company_path;Trans Only;;;;;;70;EUR
S-Word;company_path;Trans + Int. Spotcheck;;;;;;0,15;EUR
T-Word;company_path;Trans + Int. Spotcheck;;;;;;0,15;EUR
S-Line;company_path;Trans + Int. Spotcheck;;;;;;1,5;EUR
Hour;company_path;Trans + Int. Spotcheck;;;;;;70;EUR
S-Word;company_path;Trans + Edit;;;;;;0,22;EUR
T-Word;company_path;Trans + Edit;;;;;;0,22;EUR
S-Line;company_path;Trans + Edit;;;;;;1,2;EUR
Hour;company_path;Trans + Edit;;;;;;70;EUR
S-Word;company_path;Trans + Edit + Proof;;;;;;0,22;EUR
T-Word;company_path;Trans + Edit + Proof;;;;;;0,22;EUR
S-Line;company_path;Trans + Edit + Proof;;;;;;1,2;EUR
Hour;company_path;Trans + Edit + Proof;;;;;;70;EUR
Hour;company_path;Edit Only;;;;;;70;EUR
# Daily prices for specific materials;;;;;
Day;company_path;;sw_java_hour;800;EUR
Day;company_path;;sw_testing_hour;400;EUR
Day;company_path;;pm_pm_hour;1000;EUR
# Default prices with translation task USD;;;;;;;;;
S-Word;company_path;Trans Only;;;;;;0,15;USD
T-Word;company_path;Trans Only;;;;;;0,15;USD
S-Line;company_path;Trans Only;;;;;;1,5;USD
Hour;company_path;Trans Only;;;;;;70;USD
S-Word;company_path;Trans + Int. Spotcheck;;;;;;0,15;USD
T-Word;company_path;Trans + Int. Spotcheck;;;;;;0,15;USD
S-Line;company_path;Trans + Int. Spotcheck;;;;;;1,5;USD
Hour;company_path;Trans + Int. Spotcheck;;;;;;70;USD
S-Word;company_path;Trans + Edit;;;;;;0,22;USD
T-Word;company_path;Trans + Edit;;;;;;0,22;USD
S-Line;company_path;Trans + Edit;;;;;;1,2;USD
Hour;company_path;Trans + Edit;;;;;;70;USD
S-Word;company_path;Trans + Edit + Proof;;;;;;0,22;USD
T-Word;company_path;Trans + Edit + Proof;;;;;;0,22;USD
S-Line;company_path;Trans + Edit + Proof;;;;;;1,2;USD
Hour;company_path;Trans + Edit + Proof;;;;;;70;USD
Hour;company_path;Edit Only;;;;;;70;USD
# Prices for Japanese are twice the normal rate. We only consider EUR;;;;;;;;;
S-Word;company_path;Trans Only;jp;;;;;0,3;EUR
T-Word;company_path;Trans Only;jp;;;;;0,3;EUR
S-Line;company_path;Trans Only;jp;;;;;3;EUR
Hour;company_path;Trans Only;jp;;;;;140;EUR
S-Word;company_path;Trans + Int. Spotcheck;jp;;;;;0,3;EUR
T-Word;company_path;Trans + Int. Spotcheck;jp;;;;;0,3;EUR
S-Line;company_path;Trans + Int. Spotcheck;jp;;;;;3;EUR
Hour;company_path;Trans + Int. Spotcheck;jp;;;;;140;EUR
S-Word;company_path;Trans + Edit;jp;;;;;0,44;EUR
T-Word;company_path;Trans + Edit;jp;;;;;0,44;EUR
S-Line;company_path;Trans + Edit;jp;;;;;2,4;EUR
Hour;company_path;Trans + Edit;jp;;;;;140;EUR
S-Word;company_path;Trans + Edit + Proof;jp;;;;;0,44;EUR
T-Word;company_path;Trans + Edit + Proof;jp;;;;;0,44;EUR
S-Line;company_path;Trans + Edit + Proof;jp;;;;;2,4;EUR
Hour;company_path;Trans + Edit + Proof;jp;;;;;140;EUR
Hour;company_path;Edit Only;jp;;;;;140;EUR
# Default prices for USD - These prices are used if no other information is specified;;;;;
Hour;company_path;;;120;USD
Day;company_path;;;1000;USD
www/price-lists/upload-prices-2.tcl
View file @ fcfc98e2
......@@ -85,6 +85,7 @@ for {set i 1} {$i < $csv_files_len} {incr i} {
set valid_through ""
set price ""
set currency ""
set price_company_id $company_id
for {set j 0} {$j < $header_len} {incr j} {
set var_name [lindex $header_csv_fields $j]
......@@ -98,7 +99,7 @@ for {set i 1} {$i < $csv_files_len} {incr i} {
if { [catch {
set result [eval $cmd]
} err_msg] } {
append page_body \n<font color=red>$err_msg</font>\n";
append page_body "<font color=red>$err_msg</font>\n";
}
# append page_body "set $var_name '$var_value' : $result\n"
}
......@@ -124,14 +125,19 @@ for {set i 1} {$i < $csv_files_len} {incr i} {
if {$task_type_id == 0} { append errmsg "<li>Didn't find Task Type '$task_type'\n" }
}
set material_id [db_string get_uom_id "select category_id from im_categories where category_type='Intranet Translation Subject Area' and category=:material" -default ""]
if {![string equal "" $material]} {
set material_id [db_string matid "select material_id from im_materials where lower(trim(material_name)) = lower(trim(:material))" -default ""]
if {"" == $material_id} {
set material_id [db_string matid "select material_id from im_materials where lower(trim(material_nr)) = lower(trim(:material))" -default ""]
}
}
# It doesn't matter whether prices are given in European "," or American "." decimals
regsub {,} $price {.} price
# append page_body "\n"
# append page_body "uom_id=$uom_id\n"
# append page_body "company_id=$company_id\n"
# append page_body "price_company_id=$price_company_id\n"
# append page_body "task_type_id=$task_type_id\n"
# append page_body "material_id=$material_id\n"
# append page_body "valid_from=$valid_from\n"
......@@ -143,7 +149,7 @@ for {set i 1} {$i < $csv_files_len} {incr i} {
price_id, uom_id, company_id, task_type_id, material_id,
valid_from, valid_through, currency, price
) VALUES (
nextval('im_timesheet_prices_seq'), :uom_id, :company_id, :task_type_id, :material_id,
nextval('im_timesheet_prices_seq'), :uom_id, :price_company_id, :task_type_id, :material_id,
:valid_from, :valid_through, :currency, :price
)"
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment