1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170

<?php

/*
Released under the GNU General Public License

Felles kode for bruk av Bring Fraktguide (http://fraktguide.bring.no/) av Arne Unneland (http://www.unneland.com) i februar 2009. 
  - Modulen benytter Bring Fraktguide XML API. Dette er gratis og krever ikke registrering, men forutsetter aksept av bruksvilkår som er tilgjengelig på http://fraktguide.bring.no/. De som bruker denne modulen anbefales å registrere seg på Bring Fraktguide da kun registrerte brukere får beskjed om endringer i underliggende tjenester. Anbefaler også å lese informasjon om XML API da det er noen forutsetninger for de prisene som presenteres. Bla. må pakkene være forhåndsmeldt m/EDI.
  - Denne modulen er et privat initativ og på ingen måte er et Bring eller Posten produkt. Modulen brukes på eget ansvar og dersom man finner feil er det bare å fikse + melde tilbake til forumet på Zen Cart Norge eller osCommerce :-)
  - Modulen leverer fraktkostnad for angitt produkt, samt produkttekster, hjelpetekster og transporttid. Noe av dette vises i den enkelte fraktmodul og kan tilpasses til den enkeltes behov.
  
  
  Arne Unneland, mars 2009
  www.unneland.com
  
  
*/


/*
Denne metoden henter XML fra Bring Fraktguide. Se dokumentasjon på XML API på http://fraktguide.bring.no/
*/
function getXmlForProducts($productCode, $from, $to, $weightInGrams, $postingAtPostoffice) {
	$http = new httpClient();
	$http->timeout = 2;
	
	global $db, $order;
	// Get iso code for stores country - Default Norway
	$fromCountry = 'NO';
	$fromCountry_query = "select countries_iso_code_2
                                 from " . TABLE_COUNTRIES . "
                                 where countries_id = " . STORE_COUNTRY;
  if($fromCountry_id = $db->Execute($fromCountry_query)) {
    $fromCountry = $fromCountry_id->fields['countries_iso_code_2'];
  }
	//print_r($fromCountry);

	// Get iso code for delivery country
	$toCountry = $order->delivery['country']['iso_code_2'];
	//Om Svalbard og Jan Mayen bruker vi også NO fra Norge.
	if ($toCountry == 'SJ') { $toCountry = 'NO'; }
  		
	$request = join('&', array('fromCountry=' . $fromCountry,
                               'from=' . $from,
                               'toCountry=' . $toCountry,
                               'to=' . $to,
                               'weightInGrams=' . $weightInGrams,
                               'postingAtPostoffice=' . $postingAtPostoffice));
	if ($http->Connect('fraktguide.bring.no', 80)) {
		$http->addHeader('Host', 'fraktguide.bring.no');
		$http->addHeader('User-Agent', 'Zen Cart Fraktpriser v1.7 - '. STORE_NAME);
		$http->addHeader('Connection', 'close');

		if ($http->Get('/fraktguide/products/' . $productCode . '/all.xml?' . $request)) {
			$body = $http->getBody();
			if ($http->reply == 200) {
				$result['xml'] = new SimpleXMLElement($body);
			} else {
				if (strpos($body, "FG_INPUT_021")) {
					$result['error'] = "Oppgitt postnummer er ikke gyldig";
				} elseif (strpos($body, "FG_INPUT_022")) {
					$result['error'] = "Vekt eller volum ikke oppgitt";
				} elseif (strpos($body, "FG_INPUT_002")) {
					$result['error'] = "Feil format på oppgitt postnummer";
				} else {
					$result['error'] = "Ikke tilgjengelig til oppgitt postnummer";
				}
			}
		}
		$http->Disconnect();
    }
	return $result;
}

/*
Denne metoden henter ut verdier fra XML og legger inn de interessante i en array som kan benyttes i det enkelte fraktalternativ.
*/
function getValuesForProduct($productCode, $from, $to, $shipping_weight, $shipping_num_boxes, $weightMassType = 'Kilo', $postingAtPostoffice) {
	if ($weightMassType == 'Kilo') {
		$weightInGrams = round($shipping_weight * 1000);
	} else {
		$weightInGrams = round($shipping_weight);
	}
	$result = getXmlForProducts($productCode, $from, $to, $weightInGrams, $postingAtPostoffice);

	if ($result['xml'] != null) {
		$xml = $result['xml'];
		$priceElement = $xml->xpath('/Package/Product[ProductId=\'' . $productCode. '\']/Price/PackagePriceWithoutAdditionalServices/AmountWithoutVAT');  //hent ut pris eksl. mva
		$productNameElement = $xml->xpath('/Package/Product[ProductId=\'' . $productCode. '\']/GuiInformation/ProductName');  //offisielt produktnavn
		$displayNameElement = $xml->xpath('/Package/Product[ProductId=\'' . $productCode. '\']/GuiInformation/DisplayName');  //nettbutikkvennlig produktnavn
		$descriptionTextElement = $xml->xpath('/Package/Product[ProductId=\'' . $productCode. '\']/GuiInformation/DescriptionText');  //beskrivelsestekst
		$helpTextElement = $xml->xpath('/Package/Product[ProductId=\'' . $productCode. '\']/GuiInformation/HelpText');  //hjelpetekst
		$workingDaysElement = $xml->xpath('/Package/Product[ProductId=\'' . $productCode. '\']/ExpectedDelivery/WorkingDays');  //antall transportdager
		$userMessageElement = $xml->xpath('/Package/Product[ProductId=\'' . $productCode. '\']/ExpectedDelivery/UserMessage');  //melding gjeldende transporttid
		
		if ($priceElement != null) {
			$fraktArray = array(
				//gang først pris (cost) med antall kolli og rund opp til nærmeste hele krone
				'cost' => $fraktpris = ceil(floatval($priceElement[0])*$shipping_num_boxes),
				'productname' => utf8_decode(strval($productNameElement[0])),
				'displayname' => utf8_decode(strval($displayNameElement[0])),
				'workingdays' => utf8_decode(strval($workingDaysElement[0])),
				'usermessage' => utf8_decode(strval($userMessageElement[0])),
				'helptext' => utf8_decode(strval($helpTextElement[0])),
				'description' => utf8_decode(strval($descriptionTextElement[0])),
			);
		} else {
			$fraktArray['error'] = "Frakt kunne ikke beregnes, eller valget er ikke tilgjengelig for denne handlekurven.";
		}
		//free memory - just in case...
		unset($xml);
		unset($priceElement);
		unset($productNameElement);
		unset($displayNameElement);
		unset($descriptionTextElement);
		unset($workingDaysElement);
		unset($userMessageElement);
	} else {
		$fraktArray['error'] = $result['error'];
	}
	return $fraktArray;
}

/* Helper function for Zen Cart and osCommerce */
function getQuoteForFraktArray($productCode, $fraktArray, $code, $feeType, $feeValue, $errorTitle) {
	if ($fraktArray['cost'] != null) {
	  
	  // Sjekk om eventuelt påslag er angitt i prosent eller beløp og legg til verdien ut fra dette.
	  // Om prosent er valg må det være en verdi høyere enn 1 for at det skal bli påslag.
	  if ($feeType == 'Percent' && $feeValue > 1) {
	    $cost = $fraktArray['cost'] * $feeValue;
	  } elseif ($feeType == 'Amount') {
	    $cost = $fraktArray['cost'] + $feeValue;
	  } else {
	    $cost = $fraktArray['cost'];
	  }

    //Sjekk om transporttid er oppgitt
    if ($fraktArray['workingdays'] == 1) {
      $fraktTime = '1 virkedag.';
    } elseif ($fraktArray['workingdays'] > 1) {
      $fraktTime = $fraktArray['workingdays'] . ' virkedager.';
    } else {
      $fraktTime = 'ukjent. ' . $fraktArray['usermessage'];
    }

		$quotes = array('id' => $code,
			'module' => strip_tags($fraktArray['productname']),
			'methods' => array(array('id' => $code,
			'title' => strip_tags($fraktArray['displayname']),
			'description' => "<br /><i>" . $fraktArray['description'] . "<br />Forventet transporttid er " . $fraktTime . "</i>",
			'cost' => $cost)));
	} else {
		//Feilhåndtering - Vis standardpris for Servicepakke om dette er angitt i modulen
		if ($productCode == "SERVICEPAKKE" && MODULE_SHIPPING_BRING_SERVICEPAKKE_ERRORCOST > 0) {
		  $quotes = array('id' => "bringservicepakke",
			  'module' => substr($errorTitle, 0, strpos($errorTitle, "(")-1),
			  'methods' => array(array('id' => "bringservicepakke",
			  'title' => MODULE_SHIPPING_BRING_SERVICEPAKKE_TEXT_DESCRIPTION,
			  'description' => "<br /><i>" . MODULE_SHIPPING_BRING_SERVICEPAKKE_TEXT_HELP . "</i>",
			  'cost' => MODULE_SHIPPING_BRING_SERVICEPAKKE_ERRORCOST)));
		//Feilhåndtering - Om standardpris ikke er angitt viser vi bare feilmelding.
		} elseif ($productCode == "SERVICEPAKKE") {
		  $quotes['module'] = substr($errorTitle, 0, strpos($errorTitle, "(")-1);
			$quotes['error'] = $fraktArray['error'];
		}
	}
	return $quotes;
}

?>