Revision ea931d16
Von Bernd Bleßmann vor etwa 1 Jahr hinzugefügt
| SL/DB/Order/TypeData.pm | ||
|---|---|---|
| 6 | 6 |
use SL::Locale::String qw(t8); |
| 7 | 7 |
|
| 8 | 8 |
use constant {
|
| 9 |
SALES_ORDER_TYPE => 'sales_order', |
|
| 10 |
PURCHASE_ORDER_TYPE => 'purchase_order', |
|
| 11 |
SALES_QUOTATION_TYPE => 'sales_quotation', |
|
| 12 |
REQUEST_QUOTATION_TYPE => 'request_quotation', |
|
| 9 |
SALES_ORDER_TYPE => 'sales_order', |
|
| 10 |
PURCHASE_ORDER_TYPE => 'purchase_order', |
|
| 11 |
SALES_QUOTATION_TYPE => 'sales_quotation', |
|
| 12 |
REQUEST_QUOTATION_TYPE => 'request_quotation', |
|
| 13 |
PURCHASE_QUOTATION_INTAKE_TYPE => 'purchase_quotation_intake', |
|
| 14 |
SALES_ORDER_INTAKE_TYPE => 'sales_order_intake', |
|
| 13 | 15 |
}; |
| 14 | 16 |
|
| 15 |
my @export_types = qw(SALES_ORDER_TYPE PURCHASE_ORDER_TYPE REQUEST_QUOTATION_TYPE SALES_QUOTATION_TYPE); |
|
| 17 |
my @export_types = qw(SALES_ORDER_TYPE PURCHASE_ORDER_TYPE REQUEST_QUOTATION_TYPE SALES_QUOTATION_TYPE |
|
| 18 |
PURCHASE_QUOTATION_INTAKE_TYPE SALES_ORDER_INTAKE_TYPE); |
|
| 16 | 19 |
my @export_subs = qw(valid_types validate_type is_valid_type get get3); |
| 17 | 20 |
|
| 18 | 21 |
our @EXPORT_OK = (@export_types, @export_subs); |
| ... | ... | |
| 201 | 204 |
subversions => 1, |
| 202 | 205 |
}, |
| 203 | 206 |
}, |
| 207 |
PURCHASE_QUOTATION_INTAKE_TYPE() => {
|
|
| 208 |
text => {
|
|
| 209 |
delete => t8('The quotation intake has been deleted'),
|
|
| 210 |
saved => t8('The quotation intake has been saved'),
|
|
| 211 |
add => t8('Add Purchase Quotation Intake'),
|
|
| 212 |
edit => t8('Edit Purchase Quotation Intake'),
|
|
| 213 |
list => t8('Purchase Quotation Intakes'),
|
|
| 214 |
attachment => t8('purchase_quotation_intake_list'),
|
|
| 215 |
}, |
|
| 216 |
show_menu => {
|
|
| 217 |
save_and_quotation => 1, |
|
| 218 |
save_and_rfq => 0, |
|
| 219 |
save_and_sales_order => 1, |
|
| 220 |
save_and_purchase_order => 1, |
|
| 221 |
save_and_delivery_order => 0, |
|
| 222 |
save_and_supplier_delivery_order => 0, |
|
| 223 |
save_and_reclamation => 0, |
|
| 224 |
save_and_invoice_for_advance_payment => 0, |
|
| 225 |
save_and_final_invoice => 0, |
|
| 226 |
save_and_ap_transaction => 0, |
|
| 227 |
save_and_invoice => 0, |
|
| 228 |
delete => 1, |
|
| 229 |
}, |
|
| 230 |
properties => {
|
|
| 231 |
customervendor => "vendor", |
|
| 232 |
is_customer => 0, |
|
| 233 |
nr_key => "quonumber", |
|
| 234 |
}, |
|
| 235 |
defaults => {
|
|
| 236 |
reqdate => sub { return; },
|
|
| 237 |
}, |
|
| 238 |
part_classification_query => [ "used_for_purchase" => 1 ], |
|
| 239 |
rights => {
|
|
| 240 |
edit => "request_quotation_edit", |
|
| 241 |
view => "request_quotation_edit | request_quotation_view", |
|
| 242 |
}, |
|
| 243 |
features => {
|
|
| 244 |
price_tax => 1, |
|
| 245 |
stock => 0, |
|
| 246 |
subversions => $::instance_conf->get_lock_oe_subversions, |
|
| 247 |
}, |
|
| 248 |
}, |
|
| 249 |
SALES_ORDER_INTAKE_TYPE() => {
|
|
| 250 |
text => {
|
|
| 251 |
delete => t8('The order intake has been deleted'),
|
|
| 252 |
saved => t8('The order intake has been saved'),
|
|
| 253 |
add => t8("Add Sales Order Intake"),
|
|
| 254 |
edit => t8("Edit Sales Order Intake"),
|
|
| 255 |
list => t8("Sales Order Intakes"),
|
|
| 256 |
attachment => t8("sales_order_intake_list"),
|
|
| 257 |
}, |
|
| 258 |
show_menu => {
|
|
| 259 |
save_and_quotation => 1, |
|
| 260 |
save_and_rfq => 1, |
|
| 261 |
save_and_sales_order => 1, |
|
| 262 |
save_and_purchase_order => 1, |
|
| 263 |
save_and_delivery_order => 0, |
|
| 264 |
save_and_supplier_delivery_order => 0, |
|
| 265 |
save_and_reclamation => 0, |
|
| 266 |
save_and_invoice_for_advance_payment => 0, |
|
| 267 |
save_and_final_invoice => 0, |
|
| 268 |
save_and_ap_transaction => 0, |
|
| 269 |
save_and_invoice => 0, |
|
| 270 |
delete => sub { $::instance_conf->get_sales_order_show_delete },
|
|
| 271 |
}, |
|
| 272 |
properties => {
|
|
| 273 |
customervendor => "customer", |
|
| 274 |
is_customer => 1, |
|
| 275 |
nr_key => "ordnumber", |
|
| 276 |
}, |
|
| 277 |
defaults => {
|
|
| 278 |
reqdate => sub {
|
|
| 279 |
if ($::instance_conf->get_deliverydate_on) {
|
|
| 280 |
return DateTime->today_local->next_workday( |
|
| 281 |
extra_days => $::instance_conf->get_delivery_date_interval()); |
|
| 282 |
} else {
|
|
| 283 |
return ; |
|
| 284 |
} |
|
| 285 |
}, |
|
| 286 |
}, |
|
| 287 |
part_classification_query => [ "used_for_sale" => 1 ], |
|
| 288 |
rights => {
|
|
| 289 |
edit => "sales_order_edit", |
|
| 290 |
view => "sales_order_edit | sales_order_view", |
|
| 291 |
}, |
|
| 292 |
features => {
|
|
| 293 |
price_tax => 1, |
|
| 294 |
stock => 0, |
|
| 295 |
subversions => $::instance_conf->get_lock_oe_subversions, |
|
| 296 |
}, |
|
| 297 |
}, |
|
| 204 | 298 |
); |
| 205 | 299 |
|
| 206 | 300 |
my @valid_types = ( |
| ... | ... | |
| 208 | 302 |
PURCHASE_ORDER_TYPE, |
| 209 | 303 |
SALES_QUOTATION_TYPE, |
| 210 | 304 |
REQUEST_QUOTATION_TYPE, |
| 305 |
PURCHASE_QUOTATION_INTAKE_TYPE, |
|
| 306 |
SALES_ORDER_INTAKE_TYPE, |
|
| 211 | 307 |
); |
| 212 | 308 |
|
| 213 | 309 |
my %valid_types = map { $_ => $_ } @valid_types;
|
Auch abrufbar als: Unified diff
S:D:Order:TypeData: Daten für Angebots- und Auftrags-Eingänge