Revision 1fd17b36
Von Tamino Steinert vor etwa 1 Jahr hinzugefügt
| SL/XMLInvoice.pm | ||
|---|---|---|
| 5 | 5 |
|
| 6 | 6 |
use XML::LibXML; |
| 7 | 7 |
|
| 8 |
require SL::XMLInvoice::UBL; |
|
| 9 |
require SL::XMLInvoice::CrossIndustryInvoice; |
|
| 10 |
|
|
| 11 | 8 |
use constant RES_OK => 0; |
| 12 | 9 |
use constant RES_XML_PARSING_FAILED => 1; |
| 13 | 10 |
use constant RES_UNKNOWN_ROOT_NODE_TYPE => 2; |
| ... | ... | |
| 288 | 285 |
return $self; |
| 289 | 286 |
} |
| 290 | 287 |
|
| 288 |
eval {require $type}; # Load the parser class
|
|
| 291 | 289 |
bless $self, $type; |
| 292 | 290 |
|
| 293 | 291 |
# Implementation sanity check for child classes: make sure they are aware of |
Auch abrufbar als: Unified diff
XMLInvoice: lade Subklassen dynamisch
Subklassen erst zur Laufzeit laden, da diese miteinander im Konflikt
stehen.