Ejemplo n.º 1
0
 function saldi_update($insert_id)
 {
     global $url;
     $debitorgruppe = 1;
     #Den debitorgruppe som webdebitorer tilhører.
     if (!$insert_id) {
         return 'missing insert_id';
     }
     $q = mysql_query("select * from orders where orders_id = '{$insert_id}'");
     if ($r = mysql_fetch_array($q)) {
         $customers_id = $r['customers_id'];
         $customers_name = $r['customers_name'];
         $customers_company = $r['customers_company'];
         $customers_street_address = $r['customers_street_address'];
         $customers_city = $r['customers_city'];
         $customers_postcode = $r['customers_postcode'];
         $customers_country = $r['customers_country'];
         $customers_telephone = $r['customers_telephone'];
         $customers_email_address = $r['customers_email_address'];
         $delivery_name = $r['delivery_name'];
         $delivery_company = $r['delivery_company'];
         $delivery_street_address = $r['delivery_street_address'];
         $delivery_city = $r['delivery_city'];
         $delivery_postcode = $r['delivery_postcode'];
         $delivery_country = $r['delivery_country'];
         $billing_name = $r['billing_name'];
         $billing_company = $r['billing_company'];
         $billing_street_address = $r['billing_street_address'];
         $billing_city = $r['billing_city'];
         $billing_postcode = $r['billing_postcode'];
         $billing_country = $r['billing_country'];
         $date_purchased = $r['date_purchased'];
         $payment_method = $r['payment_method'];
         $currency = $r['currency'];
         $currency_value = $r['currency_value'];
     } else {
         return 'order not found';
     }
     $x = 0;
     $q = mysql_query("select * from orders_products where orders_id = '{$insert_id}'");
     while ($r = mysql_fetch_array($q)) {
         $x++;
         $orders_products_id[$x] = $r['orders_products_id'];
         $products_id[$x] = $r['products_id'];
         $products_model[$x] = $r['products_model'];
         $products_name[$x] = $r['products_name'];
         $products_price[$x] = $r['products_price'];
         $products_tax[$x] = $r['products_tax'];
         $products_quantity[$x] = $r['products_quantity'];
         $stregkode[$x] = $products_model[$x];
     }
     $item_quantity = $x;
     if (!$item_quantity) {
         return 'no items in order';
     }
     if (file_exists("soapklient/soapfunc.php")) {
         $filnavn = "soapklient/soapfunc.log";
     } else {
         $filnavn = "soapfunc.log";
     }
     $fp = fopen($filnavn, 'a');
     fwrite($fp, "------------" . date("Y-m-d H:i:s") . "------------\n");
     #		medshop hack.
     if ($billing_country == 'Denmark') {
         $debitorgruppe = "1";
     } elseif ($billing_country == 'Norway') {
         $debitorgruppe = "3";
     } elseif ($billing_company) {
         $debitorgruppe = "4";
     } else {
         $debitorgruppe = "2";
     }
     for ($x = 1; $x <= $item_quantity; $x++) {
         $y = 0;
         $select = "products_options.products_options_id as products_options_id,products_options_values.products_options_values_id as products_options_values_id";
         $from = "orders_products_attributes,products_options,products_options_values";
         $where = "orders_products_attributes.orders_id = '{$insert_id}' and orders_products_attributes.orders_products_id='{$orders_products_id[$x]}' ";
         $where .= "and products_options.products_options_name=orders_products_attributes.products_options and ";
         $where .= "products_options_values.products_options_values_name=orders_products_attributes.products_options_values";
         fwrite($fp, __LINE__ . " - SELECT {$select} FROM {$from} WHERE {$where}\n");
         $q = mysql_query("SELECT {$select} FROM {$from} WHERE {$where}");
         while ($r = mysql_fetch_array($q)) {
             $y++;
             $products_options_id[$x][$y] = $r['products_options_id'];
             $products_options_values_id[$x][$y] = $r['products_options_values_id'];
             fwrite($fp, __LINE__ . $products_options_id[$x][$y] . " -:-" . $products_options_values_id[$x][$y] . "\n");
         }
     }
     if (file_exists("soapklient/soapfunc.php")) {
         include "soapklient/soapfunc.php";
     } else {
         include "soapfunc.php";
     }
     if (file_exists("soapklient/saldi_connect.php")) {
         include "soapklient/saldi_connect.php";
     } else {
         include "saldi_connect.php";
     }
     fwrite($fp, __LINE__ . "{$url} logon({$regnskab},{$brugernavn},{$adgangskode})\n");
     list($fejl, $svar) = explode(chr(9), logon($regnskab, $brugernavn, $adgangskode));
     fwrite($fp, __LINE__ . "fejl {$fejl} - svar {$svar}\n");
     $fejl *= 1;
     if ($fejl) {
         return $fejl . chr(9) . $svar;
     } else {
         $s_id = $svar;
     }
     fwrite($fp, __LINE__ . " - saldi_id from shop_adresser where shop_id='{$customers_id}'\n");
     list($fejl, $svar) = explode(chr(9), singleselect($s_id, "saldi_id from shop_adresser where shop_id='{$customers_id}'"));
     fwrite($fp, __LINE__ . " - svar {$svar}\n");
     if ($fejl) {
         return $svar;
     } elseif ($svar) {
         $konto_id = $svar;
         fwrite($fp, __LINE__ . " - kontonr from adresser where id='{$konto_id}'\n");
         list($fejl, $svar) = explode(chr(9), singleselect($s_id, "kontonr from adresser where id='{$konto_id}'"));
         fwrite($fp, __LINE__ . " - svar {$svar}\n");
         if ($fejl) {
             return $svar;
         } else {
             $kontonr = $svar;
         }
     } else {
         if ($customers_company) {
             $kontotype = 'Erhverv';
             $fornavn = NULL;
             $efternavn = NULL;
             $kontakt = $customers_name;
         } else {
             $kontotype = 'Privat';
             $customers_company = $customers_name;
             $delivery_company = $delivery_name;
             $billing_company = $billing_name;
             list($fornavn, $tmp) = explode(" ", $customers_name);
             $efternavn = trim(substr($customers_name, strlen($fornavn)));
             $kontakt = '';
         }
         fwrite($fp, __LINE__ . " - id,kontonr,firmanavn,addr1 from adresser where art='D' and tlf='{$customers_telephone}'\n");
         # tjekker om der er en kunde i saldi med samme telefonnummer.
         list($fejl, $svar) = explode(chr(9), singleselect($s_id, "id,kontonr,firmanavn,addr1 from adresser where art='D' and tlf='{$customers_telephone}'"));
         fwrite($fp, __LINE__ . " - svar {$svar}\n");
         if ($fejl) {
             return $svar;
         } else {
             list($konto_id, $kontonr, $firmanavn, $addr1) = explode(',', $svar);
         }
         if ($kontonr && strtolower($customers_company) == strtolower($firmanavn) && strtolower($customers_street_address) == strtolower($addr1)) {
             return "0" . chr(9) . $id;
         } elseif ($customers_telephone) {
             fwrite($fp, __LINE__ . " - id,kontonr,firmanavn,addr1 from adresser where art='D' and kontonr='{$customers_telephone}'\n");
             # tjekker om der er en kunde i saldi med samme kontonummer som kundens telefonnummer.
             list($fejl, $svar) = explode(chr(9), singleselect($s_id, "id,kontonr,firmanavn,addr1 from adresser where art='D' and kontonr='{$customers_telephone}'"));
             fwrite($fp, __LINE__ . " - svar {$fejl} - {$svar}\n");
             if ($fejl) {
                 return $svar;
             } else {
                 list($konto_id, $kontonr, $firmanavn, $addr1) = explode(',', $svar);
             }
             #				if ($kontonr && strtolower($customers_company)==strtolower($firmanavn) && strtolower($customers_street_address)==strtolower($addr1)) {
             #				return("0".chr(9).$id);
         } elseif (!$customers_telephone) {
             fwrite($fp, __LINE__ . " - max(kontonr) as kontonr from adresser where art='D'\n");
             list($fejl, $svar) = explode(chr(9), singleselect($s_id, "max(kontonr) as kontonr from adresser where art='D'"));
             fwrite($fp, __LINE__ . " - svar {$svar}\n");
             if ($fejl) {
                 return '1' . chr(9) . $svar;
             } else {
                 $kontonr = $svar + 1;
             }
         }
         if (!$kontonr) {
             $kontonr = str_replace("+", "", $customers_telephone);
         }
         fwrite($fp, __LINE__ . "- {$kontonr}=" . str_replace("z", "", $customers_telephone) . " - \n");
         $kontonr = str_replace(" ", "", $kontonr);
         fwrite($fp, __LINE__ . "- {$kontonr} - \n");
         $kontonr *= 1;
         fwrite($fp, __LINE__ . " -{$kontonr} - \n");
         if (!$konto_id) {
             fwrite($fp, __LINE__ . " - adresser (kontonr,firmanavn,fornavn,efternavn,kontakt,addr1,bynavn,postnr,land,tlf,email,lev_kontakt,lev_firmanavn,lev_addr1,lev_bynavn,lev_postnr,lev_land,lev_tlf,art,kontotype,gruppe) values ('{$kontonr}','{$customers_company}','{$fornavn}','{$efternavn}','{$kontakt}','{$customers_street_address}','{$customers_city}','{$customers_postcode}','{$customers_country}','{$customers_telephone}','{$customers_email_address}','{$delivery_name}','{$delivery_company}','{$delivery_street_address}','{$delivery_city}','{$delivery_postcode}','{$delivery_country}','{$delivery_telephone}','D','{$kontotype}','{$debitorgruppe}')\n");
             list($fejl, $svar) = explode(chr(9), singleinsert($s_id, "adresser (kontonr,firmanavn,fornavn,efternavn,kontakt,addr1,bynavn,postnr,land,tlf,email,lev_kontakt,lev_firmanavn,lev_addr1,lev_bynavn,lev_postnr,lev_land,lev_tlf,art,kontotype,gruppe) values ('{$kontonr}','{$customers_company}','{$fornavn}','{$efternavn}','{$kontakt}','{$customers_street_address}','{$customers_city}','{$customers_postcode}','{$customers_country}','{$customers_telephone}','{$customers_email_address}','{$delivery_name}','{$delivery_company}','{$delivery_street_address}','{$delivery_city}','{$delivery_postcode}','{$delivery_country}','{$delivery_telephone}','D','{$kontotype}','{$debitorgruppe}')"));
             fwrite($fp, __LINE__ . " - svar {$svar}\n");
             if ($fejl) {
                 return $fejl . chr(9) . $svar;
             } else {
                 $konto_id = $svar;
             }
             fwrite($fp, __LINE__ . " - shop_adresser (shop_id,saldi_id) values ('{$customers_id}','{$konto_id}')\n");
             list($fejl, $svar) = explode(chr(9), singleinsert($s_id, "shop_adresser (shop_id,saldi_id) values ('{$customers_id}','{$konto_id}')"));
             fwrite($fp, __LINE__ . " - svar {$svar}\n");
             if ($fejl) {
                 return '1' . chr(9) . $svar;
             }
             if ($kontotype == 'Erhverv') {
                 fwrite($fp, __LINE__ . " - ansatte (navn,konto_id) values ('{$customers_name}','{$konto_id}')\n");
                 list($fejl, $svar) = explode(chr(9), singleinsert($s_id, "ansatte (navn,konto_id) values ('{$customers_name}','{$konto_id}')"));
                 fwrite($fp, __LINE__ . " - svar {$svar}\n");
                 if ($fejl) {
                     return $fejl . chr(9) . $svar;
                 }
             }
         }
     }
     fwrite($fp, __LINE__ . " - saldi_id from shop_ordrer where shop_id='{$insert_id}'\n");
     list($fejl, $svar) = explode(chr(9), singleselect($s_id, "saldi_id from shop_ordrer where shop_id='{$insert_id}'"));
     fwrite($fp, __LINE__ . " - svar {$svar}\n");
     if ($fejl) {
         return $svar;
     } elseif ($svar) {
         $ordre_id = $svar;
     } else {
         fwrite($fp, __LINE__ . " - max(ordrenr) as ordrenr from ordrer where art='DO'\n");
         list($fejl, $svar) = explode(chr(9), singleselect($s_id, "max(ordrenr) as ordrenr from ordrer where art='DO'"));
         fwrite($fp, __LINE__ . " - fejl {$fejl}, svar {$svar}\n");
         if ($fejl) {
             return $fejl . chr(9) . $svar;
         } else {
             $ordrenr = $svar + 1;
         }
         $ordredate = date("Y-m-d");
         if (!$billing_company) {
             $billing_company = $billing_name;
             $billing_name = '';
         }
         if (!$delivery_company) {
             $delivery_company = $delivery_name;
             $delivery_name = '';
         }
         #cho "ordrer (konto_id,kontonr,firmanavn,kontakt,addr1,bynavn,postnr,land,email,lev_kontakt,lev_navn,lev_addr1,lev_bynavn,lev_postnr,art) values ('$konto_id','$kontonr','$billing_company','$billing_name','$billing_street_address','$billing_city','$billing_postcode','$billing_country','$customers_email_address','$delivery_name','$delivery_company','$delivery_street_address','$delivery_city','$delivery_postcode','DO')";
         list($fejl, $svar) = explode(chr(9), singleselect($s_id, "box2 as momssats from grupper where art='SM' and kodenr='{$debitorgruppe}'"));
         fwrite($fp, __LINE__ . " - fejl {$fejl}, svar {$svar}\n");
         if ($fejl) {
             return $fejl . chr(9) . $svar;
         } else {
             $momssats = $svar * 1;
         }
         fwrite($fp, __LINE__ . " - ordrer (ordrenr,konto_id,kontonr,firmanavn,kontakt,addr1,bynavn,postnr,land,email,lev_kontakt,lev_navn,lev_addr1,lev_bynavn,lev_postnr,art,momssats,kundeordnr) values ('{$ordrenr}','{$ordredate}','{$konto_id}','{$kontonr}','{$billing_company}','{$billing_name}','{$billing_street_address}','{$billing_city}','{$billing_postcode}','{$billing_country}','{$customers_email_address}','{$delivery_name}','{$delivery_company}','{$delivery_street_address}','{$delivery_city}','{$delivery_postcode}','DO','{$momssats}','{$insert_id}')\n");
         list($fejl, $svar) = explode(chr(9), singleinsert($s_id, "ordrer (ordrenr,ordredate,konto_id,kontonr,firmanavn,kontakt,addr1,bynavn,postnr,land,email,lev_kontakt,lev_navn,lev_addr1,lev_bynavn,lev_postnr,art,status,momssats,kundeordnr) values ('{$ordrenr}','{$ordredate}','{$konto_id}','{$kontonr}','{$billing_company}','{$billing_name}','{$billing_street_address}','{$billing_city}','{$billing_postcode}','{$billing_country}','{$customers_email_address}','{$delivery_name}','{$delivery_company}','{$delivery_street_address}','{$delivery_city}','{$delivery_postcode}','DO','2','{$momssats}','{$insert_id}')"));
         fwrite($fp, __LINE__ . " - svar {$svar}\n");
         if ($fejl) {
             return $fejl . chr(9) . $svar;
         } else {
             $ordre_id = $svar;
         }
         fwrite($fp, __LINE__ . " - shop_ordrer (shop_id,saldi_id) values ('{$insert_id}','{$ordre_id}')\n");
         list($fejl, $svar) = explode(chr(9), singleinsert($s_id, "shop_ordrer (shop_id,saldi_id) values ('{$insert_id}','{$ordre_id}')"));
         fwrite($fp, __LINE__ . " - svar {$svar}\n");
         if ($fejl) {
             return '1' . chr(9) . $svar;
         }
     }
     # Tilføjer ordrelinjer
     for ($x = 1; $x <= $item_quantity; $x++) {
         # Tjekker om varerelation eksisterer i Saldi
         fwrite($fp, __LINE__ . " - saldi_id from shop_varer where shop_id='{$products_id[$x]}'\n");
         list($fejl, $svar) = explode(chr(9), singleselect($s_id, "saldi_id from shop_varer where shop_id='{$products_id[$x]}'"));
         fwrite($fp, "svar {$svar}\n");
         if ($fejl) {
             return $svar;
         } elseif ($svar) {
             $vare_id[$x] = $svar;
         } else {
             # Tjekker om varenummeret eksisterer i Saldi
             fwrite($fp, __LINE__ . " - id from varer where varenr='{$products_model[$x]}'\n");
             list($fejl, $svar) = explode(chr(9), singleselect($s_id, "id from varer where varenr='{$products_model[$x]}'"));
             fwrite($fp, __LINE__ . " - svar {$svar}\n");
             if ($fejl) {
                 return $svar;
             } elseif ($svar) {
                 $vare_id[$x] = $svar;
             } else {
                 #Hvis varen ikke eksisterer i Saldi oprettes den.
                 fwrite($fp, __LINE__ . " - varer (varenr,beskrivelse,salgspris,gruppe) values ('{$products_model[$x]}','{$products_name[$x]}','{$products_price[$x]}','1')\n");
                 list($fejl, $svar) = explode(chr(9), singleinsert($s_id, "varer (varenr,beskrivelse,salgspris,gruppe) values ('{$products_model[$x]}','{$products_name[$x]}','{$products_price[$x]}','1')"));
                 fwrite($fp, __LINE__ . " - svar {$svar}\n");
                 if ($fejl) {
                     return '1' . chr(9) . $svar;
                 } else {
                     $vare_id = $svar;
                 }
             }
             # Og der oprettes relation mellem Saldi & osc vare ID
             fwrite($fp, __LINE__ . " - shop_varer (shop_id,saldi_id) values ('{$products_id[$x]}','{$ordre_id}')\n");
             list($fejl, $svar) = explode(chr(9), singleinsert($s_id, "shop_varer (shop_id,saldi_id) values ('{$products_id[$x]}','{$ordre_id}')"));
             fwrite($fp, __LINE__ . " - svar {$svar}\n");
             if ($fejl) {
                 return '1' . chr(9) . $svar;
             }
         }
         fwrite($fp, __LINE__ . " - Tjekker om varen indeholder varianter\n");
         #Tjekker om varen indeholder varianter.
         if (count($products_options_values_id[$x])) {
             $tmp = count($products_options_values_id[$x]);
             for ($y = 1; $y <= $tmp; $y++) {
                 fwrite($fp, __LINE__ . " - products_options_values_id: " . $products_options_values_id[$x][$y] . "\n");
                 if ($products_options_values_id[$x][$y]) {
                     fwrite($fp, __LINE__ . " - id from variant_typer where shop_id='" . $products_options_values_id[$x][$y] . "'\n");
                     list($fejl, $svar) = explode(chr(9), singleselect($s_id, "id from variant_typer where shop_id='" . $products_options_values_id[$x][$y] . "'"));
                     fwrite($fp, __LINE__ . " - svar {$svar}\n");
                     if ($fejl) {
                         return '1' . chr(9) . $svar;
                     } else {
                         $variant_type_id[$x][$y] = $svar;
                     }
                 }
             }
             sort($variant_type_id[$x]);
             $tmp = count($variant_type_id[$x]);
             $variant[$x] = NULL;
             for ($y = 0; $y < $tmp; $y++) {
                 $variant[$x] ? $variant[$x] .= chr(9) . $variant_type_id[$x][$y] : ($variant[$x] = $variant_type_id[$x][$y]);
             }
             fwrite($fp, __LINE__ . " - variant_stregkode from variant_varer where variant_type='{$variant[$x]}'\n");
             list($fejl, $svar) = explode(chr(9), singleselect($s_id, "variant_stregkode from variant_varer where variant_type='{$variant[$x]}'"), 2);
             fwrite($fp, __LINE__ . " - stregkode {$svar}\n");
             if ($fejl) {
                 return '1' . chr(9) . $svar;
             } else {
                 $stregkode[$x] = $svar;
             }
         }
         # Ordrelinjen operettes.
         fwrite($fp, __LINE__ . " - \"{$ordre_id}\",\"{$stregkode[$x]}\",\"{$products_name[$x]}\",\"{$products_quantity[$x]}\",\"{$products_price[$x]}\",\"{$products_tax[$x]}\",\"{$x}\"\n");
         list($fejl, $svar) = explode(chr(9), addorderline("{$s_id}", "{$ordre_id}", "{$stregkode[$x]}", "{$products_name[$x]}", "{$products_quantity[$x]}", "{$products_price[$x]}", "{$products_tax[$x]}", "{$x}"));
         fwrite($fp, __LINE__ . " - svar {$svar}\n");
         if ($fejl) {
             return '1' . chr(9) . $svar;
         }
     }
     return '0' . chr(9) . $konto_id . chr(9) . $ordre_id;
     fclose($fp);
 }
Ejemplo n.º 2
0
        $opret_i_saldi[$x] = 0;
    }
}
$looptjek = 0;
while (in_array(0, $opret_i_saldi) && $looptjek < 10) {
    $looptjek++;
    for ($x = 1; $x <= count($categories_id); $x++) {
        if ($parent_id[$x]) {
            for ($y = 1; $y <= count($categories_id); $y++) {
                if ($parent_id[$x] == $categories_id[$y] && !$saldi_master_id[$x]) {
                    $tmp = $x - 1;
                    if ($saldi_id[$y] == $saldi_master_id[$tmp]) {
                        $saldi_master_id[$x] = $saldi_id[$y];
                    } else {
                        #echo "$y select box2 from grupper where id = '$saldi_id[$y]'<br>";
                        list($fejl, $svar) = explode(chr(9), singleselect($s_id, "box2 from grupper where id = '{$saldi_id[$y]}'"), 2);
                        if ($fejl) {
                            echo $svar;
                        }
                        if (trim($svar)) {
                            $saldi_master_id[$x] = $svar . "<TAB>" . $saldi_id[$y];
                        } else {
                            $saldi_master_id[$x] = $saldi_id[$y];
                        }
                        #						$sa_id[$x]=$saldi_id[$y];
                    }
                    #echo "$x master_id $saldi_master_id[$x]<br>";
                }
            }
        }
    }