X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDev%2FRecord.pm;h=012b3d232f2b6d60c4257889b03e497d48b6efcc;hb=25517b3d6cab7eb6c01a512979970ea4075e4a34;hp=8b7d6a717b6006cfe334cdfeb123730eb123ba27;hpb=d3e504378e060ef31798ba969f52c21d04430972;p=kivitendo-erp.git diff --git a/SL/Dev/Record.pm b/SL/Dev/Record.pm index 8b7d6a717..012b3d232 100644 --- a/SL/Dev/Record.pm +++ b/SL/Dev/Record.pm @@ -333,9 +333,10 @@ Example with params: Create a credit note (sales). Use positive quantities when adding items. -Example including creation of parts and of credit_note - my $part1 = SL::Dev::Part::create_part( partnumber => 'T4254')->save; - my $part2 = SL::Dev::Part::create_service(partnumber => 'Serv1')->save; +Example including creation of parts and of credit_note: + + my $part1 = SL::Dev::Part::new_part( partnumber => 'T4254')->save; + my $part2 = SL::Dev::Part::new_service(partnumber => 'Serv1')->save; my $credit_note = SL::Dev::Record::create_credit_note( invnumber => '34', taxincluded => 0, @@ -351,16 +352,17 @@ Examples: Create a sales order and save it directly via rose, without running calculate_prices_and_taxes: - my $order = SL::Dev::Record::create_sales_order()->save; + my $order = SL::Dev::Record::create_sales_order()->save; Let create_sales_order run calculate_prices_and_taxes and save: - my $order = SL::Dev::Record::create_sales_order(save => 1); + my $order = SL::Dev::Record::create_sales_order(save => 1); + +Example including creation of part and of sales order: -Example including creation of part and of sales order. - my $part1 = SL::Dev::Part::create_part( partnumber => 'T4254')->save; - my $part2 = SL::Dev::Part::create_service(partnumber => 'Serv1')->save; + my $part1 = SL::Dev::Part::new_part( partnumber => 'T4254')->save; + my $part2 = SL::Dev::Part::new_service(partnumber => 'Serv1')->save; my $order = SL::Dev::Record::create_sales_order( save => 1, taxincluded => 0, @@ -371,7 +373,7 @@ Example including creation of part and of sales order. Example: create 100 orders with the same part for 100 new customers: - my $part1 = SL::Dev::Part::create_part(partnumber => 'T6256')->save; + my $part1 = SL::Dev::Part::new_part(partnumber => 'T6256')->save; SL::Dev::Record::create_sales_order( save => 1, taxincluded => 0, @@ -383,18 +385,22 @@ Example: create 100 orders with the same part for 100 new customers: See comments for C. Example: - my $purchase_order = SL::Dev::Record::create_purchase_order(save => 1); + + my $purchase_order = SL::Dev::Record::create_purchase_order(save => 1); =head2 C Creates an item from a part object that can be added to a record. -Required params: record_type (sales_invoice, sales_order, sales_delivery_order) - part (an SL::DB::Part object) +Required params: + + record_type (sales_invoice, sales_order, sales_delivery_order) + part (an SL::DB::Part object) Example including creation of part and of invoice: - my $part = SL::Dev::Part::create_part( partnumber => 'T4254')->save; + + my $part = SL::Dev::Part::new_part( partnumber => 'T4254')->save; my $item = SL::Dev::Record::create_invoice_item(part => $part, qty => 2.5); my $invoice = SL::Dev::Record::create_sales_invoice( taxincluded => 0, @@ -406,6 +412,7 @@ Example including creation of part and of invoice: Creates a default project. Minimal example, creating a project with status "running" and type "Standard": + my $project = SL::Dev::Record::create_project(); $project = SL::Dev::Record::create_project( @@ -423,6 +430,7 @@ C<%params> should only contain alterable keys from the object Project. Creates a default department. Minimal example: + my $department = SL::Dev::Record::create_department(); my $department = SL::Dev::Record::create_department( @@ -435,8 +443,6 @@ default value 'Test Department'. C<%params> should only contain alterable keys from the object Department. -=head1 TODO - =head1 BUGS Nothing here yet.