@@ -46,169 +46,169 @@ discard block |
||
| 46 | 46 | |
| 47 | 47 | if ($action == 'setcodeclient') |
| 48 | 48 | { |
| 49 | - if (dolibarr_set_const($db, "SOCIETE_CODECLIENT_ADDON",$value,'chaine',0,'',$conf->entity) > 0) |
|
| 50 | - { |
|
| 51 | - header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 52 | - exit; |
|
| 53 | - } |
|
| 54 | - else |
|
| 55 | - { |
|
| 56 | - dol_print_error($db); |
|
| 57 | - } |
|
| 49 | + if (dolibarr_set_const($db, "SOCIETE_CODECLIENT_ADDON",$value,'chaine',0,'',$conf->entity) > 0) |
|
| 50 | + { |
|
| 51 | + header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 52 | + exit; |
|
| 53 | + } |
|
| 54 | + else |
|
| 55 | + { |
|
| 56 | + dol_print_error($db); |
|
| 57 | + } |
|
| 58 | 58 | } |
| 59 | 59 | |
| 60 | 60 | if ($action == 'setcodecompta') |
| 61 | 61 | { |
| 62 | - if (dolibarr_set_const($db, "SOCIETE_CODECOMPTA_ADDON",$value,'chaine',0,'',$conf->entity) > 0) |
|
| 63 | - { |
|
| 64 | - header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 65 | - exit; |
|
| 66 | - } |
|
| 67 | - else |
|
| 68 | - { |
|
| 69 | - dol_print_error($db); |
|
| 70 | - } |
|
| 62 | + if (dolibarr_set_const($db, "SOCIETE_CODECOMPTA_ADDON",$value,'chaine',0,'',$conf->entity) > 0) |
|
| 63 | + { |
|
| 64 | + header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 65 | + exit; |
|
| 66 | + } |
|
| 67 | + else |
|
| 68 | + { |
|
| 69 | + dol_print_error($db); |
|
| 70 | + } |
|
| 71 | 71 | } |
| 72 | 72 | |
| 73 | 73 | if ($action == 'updateoptions') |
| 74 | 74 | { |
| 75 | - if (GETPOST('COMPANY_USE_SEARCH_TO_SELECT')) |
|
| 76 | - { |
|
| 77 | - $companysearch = GETPOST('activate_COMPANY_USE_SEARCH_TO_SELECT','alpha'); |
|
| 78 | - $res = dolibarr_set_const($db, "COMPANY_USE_SEARCH_TO_SELECT", $companysearch,'chaine',0,'',$conf->entity); |
|
| 79 | - if (! $res > 0) $error++; |
|
| 80 | - if (! $error) |
|
| 81 | - { |
|
| 82 | - setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 83 | - } |
|
| 84 | - else |
|
| 85 | - { |
|
| 86 | - setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 87 | - } |
|
| 88 | - } |
|
| 89 | - |
|
| 90 | - if (GETPOST('CONTACT_USE_SEARCH_TO_SELECT')) |
|
| 91 | - { |
|
| 92 | - $contactsearch = GETPOST('activate_CONTACT_USE_SEARCH_TO_SELECT','alpha'); |
|
| 93 | - $res = dolibarr_set_const($db, "CONTACT_USE_SEARCH_TO_SELECT", $contactsearch,'chaine',0,'',$conf->entity); |
|
| 94 | - if (! $res > 0) $error++; |
|
| 95 | - if (! $error) |
|
| 96 | - { |
|
| 97 | - setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 98 | - } |
|
| 99 | - else |
|
| 100 | - { |
|
| 101 | - setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 102 | - } |
|
| 103 | - } |
|
| 75 | + if (GETPOST('COMPANY_USE_SEARCH_TO_SELECT')) |
|
| 76 | + { |
|
| 77 | + $companysearch = GETPOST('activate_COMPANY_USE_SEARCH_TO_SELECT','alpha'); |
|
| 78 | + $res = dolibarr_set_const($db, "COMPANY_USE_SEARCH_TO_SELECT", $companysearch,'chaine',0,'',$conf->entity); |
|
| 79 | + if (! $res > 0) $error++; |
|
| 80 | + if (! $error) |
|
| 81 | + { |
|
| 82 | + setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 83 | + } |
|
| 84 | + else |
|
| 85 | + { |
|
| 86 | + setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 87 | + } |
|
| 88 | + } |
|
| 89 | + |
|
| 90 | + if (GETPOST('CONTACT_USE_SEARCH_TO_SELECT')) |
|
| 91 | + { |
|
| 92 | + $contactsearch = GETPOST('activate_CONTACT_USE_SEARCH_TO_SELECT','alpha'); |
|
| 93 | + $res = dolibarr_set_const($db, "CONTACT_USE_SEARCH_TO_SELECT", $contactsearch,'chaine',0,'',$conf->entity); |
|
| 94 | + if (! $res > 0) $error++; |
|
| 95 | + if (! $error) |
|
| 96 | + { |
|
| 97 | + setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 98 | + } |
|
| 99 | + else |
|
| 100 | + { |
|
| 101 | + setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 102 | + } |
|
| 103 | + } |
|
| 104 | 104 | } |
| 105 | 105 | |
| 106 | 106 | // Activate a document generator module |
| 107 | 107 | if ($action == 'set') |
| 108 | 108 | { |
| 109 | - $label = GETPOST('label','alpha'); |
|
| 110 | - $scandir = GETPOST('scan_dir','alpha'); |
|
| 109 | + $label = GETPOST('label','alpha'); |
|
| 110 | + $scandir = GETPOST('scan_dir','alpha'); |
|
| 111 | 111 | |
| 112 | - $type='company'; |
|
| 113 | - $sql = "INSERT INTO ".MAIN_DB_PREFIX."document_model (nom, type, entity, libelle, description)"; |
|
| 114 | - $sql.= " VALUES ('".$db->escape($value)."','".$type."',".$conf->entity.", "; |
|
| 115 | - $sql.= ($label?"'".$db->escape($label)."'":'null').", "; |
|
| 116 | - $sql.= (! empty($scandir)?"'".$db->escape($scandir)."'":"null"); |
|
| 117 | - $sql.= ")"; |
|
| 112 | + $type='company'; |
|
| 113 | + $sql = "INSERT INTO ".MAIN_DB_PREFIX."document_model (nom, type, entity, libelle, description)"; |
|
| 114 | + $sql.= " VALUES ('".$db->escape($value)."','".$type."',".$conf->entity.", "; |
|
| 115 | + $sql.= ($label?"'".$db->escape($label)."'":'null').", "; |
|
| 116 | + $sql.= (! empty($scandir)?"'".$db->escape($scandir)."'":"null"); |
|
| 117 | + $sql.= ")"; |
|
| 118 | 118 | |
| 119 | - $resql=$db->query($sql); |
|
| 120 | - if (! $resql) dol_print_error($db); |
|
| 119 | + $resql=$db->query($sql); |
|
| 120 | + if (! $resql) dol_print_error($db); |
|
| 121 | 121 | } |
| 122 | 122 | |
| 123 | 123 | // Disable a document generator module |
| 124 | 124 | if ($action== 'del') |
| 125 | 125 | { |
| 126 | - $type='company'; |
|
| 127 | - $sql = "DELETE FROM ".MAIN_DB_PREFIX."document_model"; |
|
| 128 | - $sql.= " WHERE nom='".$db->escape($value)."' AND type='".$type."' AND entity=".$conf->entity; |
|
| 129 | - $resql=$db->query($sql); |
|
| 130 | - if (! $resql) dol_print_error($db); |
|
| 126 | + $type='company'; |
|
| 127 | + $sql = "DELETE FROM ".MAIN_DB_PREFIX."document_model"; |
|
| 128 | + $sql.= " WHERE nom='".$db->escape($value)."' AND type='".$type."' AND entity=".$conf->entity; |
|
| 129 | + $resql=$db->query($sql); |
|
| 130 | + if (! $resql) dol_print_error($db); |
|
| 131 | 131 | } |
| 132 | 132 | |
| 133 | 133 | // Define default generator |
| 134 | 134 | if ($action == 'setdoc') |
| 135 | 135 | { |
| 136 | - $label = GETPOST('label','alpha'); |
|
| 137 | - $scandir = GETPOST('scan_dir','alpha'); |
|
| 136 | + $label = GETPOST('label','alpha'); |
|
| 137 | + $scandir = GETPOST('scan_dir','alpha'); |
|
| 138 | 138 | |
| 139 | - $db->begin(); |
|
| 139 | + $db->begin(); |
|
| 140 | 140 | |
| 141 | - dolibarr_set_const($db, "COMPANY_ADDON_PDF",$value,'chaine',0,'',$conf->entity); |
|
| 141 | + dolibarr_set_const($db, "COMPANY_ADDON_PDF",$value,'chaine',0,'',$conf->entity); |
|
| 142 | 142 | |
| 143 | - // On active le modele |
|
| 144 | - $type='company'; |
|
| 145 | - $sql_del = "DELETE FROM ".MAIN_DB_PREFIX."document_model"; |
|
| 146 | - $sql_del.= " WHERE nom = '".$db->escape(GETPOST('value','alpha'))."'"; |
|
| 147 | - $sql_del.= " AND type = '".$type."'"; |
|
| 148 | - $sql_del.= " AND entity = ".$conf->entity; |
|
| 143 | + // On active le modele |
|
| 144 | + $type='company'; |
|
| 145 | + $sql_del = "DELETE FROM ".MAIN_DB_PREFIX."document_model"; |
|
| 146 | + $sql_del.= " WHERE nom = '".$db->escape(GETPOST('value','alpha'))."'"; |
|
| 147 | + $sql_del.= " AND type = '".$type."'"; |
|
| 148 | + $sql_del.= " AND entity = ".$conf->entity; |
|
| 149 | 149 | dol_syslog("societe.php ".$sql); |
| 150 | - $result1=$db->query($sql_del); |
|
| 150 | + $result1=$db->query($sql_del); |
|
| 151 | 151 | |
| 152 | - $sql = "INSERT INTO ".MAIN_DB_PREFIX."document_model (nom, type, entity, libelle, description)"; |
|
| 153 | - $sql.= " VALUES ('".$db->escape($value)."', '".$type."', ".$conf->entity.", "; |
|
| 154 | - $sql.= ($label?"'".$db->escape($label)."'":'null').", "; |
|
| 155 | - $sql.= (! empty($scandir)?"'".$db->escape($scandir)."'":"null"); |
|
| 156 | - $sql.= ")"; |
|
| 152 | + $sql = "INSERT INTO ".MAIN_DB_PREFIX."document_model (nom, type, entity, libelle, description)"; |
|
| 153 | + $sql.= " VALUES ('".$db->escape($value)."', '".$type."', ".$conf->entity.", "; |
|
| 154 | + $sql.= ($label?"'".$db->escape($label)."'":'null').", "; |
|
| 155 | + $sql.= (! empty($scandir)?"'".$db->escape($scandir)."'":"null"); |
|
| 156 | + $sql.= ")"; |
|
| 157 | 157 | dol_syslog("societe.php", LOG_DEBUG); |
| 158 | - $result2=$db->query($sql); |
|
| 159 | - if ($result1 && $result2) |
|
| 160 | - { |
|
| 161 | - $db->commit(); |
|
| 162 | - } |
|
| 163 | - else |
|
| 164 | - { |
|
| 165 | - $db->rollback(); |
|
| 166 | - } |
|
| 158 | + $result2=$db->query($sql); |
|
| 159 | + if ($result1 && $result2) |
|
| 160 | + { |
|
| 161 | + $db->commit(); |
|
| 162 | + } |
|
| 163 | + else |
|
| 164 | + { |
|
| 165 | + $db->rollback(); |
|
| 166 | + } |
|
| 167 | 167 | } |
| 168 | 168 | |
| 169 | 169 | //Activate Set ref in list |
| 170 | 170 | if ($action=="setaddrefinlist") { |
| 171 | - $setaddrefinlist = GETPOST('value','int'); |
|
| 172 | - $res = dolibarr_set_const($db, "SOCIETE_ADD_REF_IN_LIST", $setaddrefinlist,'yesno',0,'',$conf->entity); |
|
| 173 | - if (! $res > 0) $error++; |
|
| 174 | - if (! $error) |
|
| 175 | - { |
|
| 176 | - setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 177 | - } |
|
| 178 | - else |
|
| 179 | - { |
|
| 180 | - setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 181 | - } |
|
| 171 | + $setaddrefinlist = GETPOST('value','int'); |
|
| 172 | + $res = dolibarr_set_const($db, "SOCIETE_ADD_REF_IN_LIST", $setaddrefinlist,'yesno',0,'',$conf->entity); |
|
| 173 | + if (! $res > 0) $error++; |
|
| 174 | + if (! $error) |
|
| 175 | + { |
|
| 176 | + setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 177 | + } |
|
| 178 | + else |
|
| 179 | + { |
|
| 180 | + setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 181 | + } |
|
| 182 | 182 | } |
| 183 | 183 | |
| 184 | 184 | //Activate Set adress in list |
| 185 | 185 | if ($action=="setaddadressinlist") { |
| 186 | - $val = GETPOST('value','int'); |
|
| 187 | - $res = dolibarr_set_const($db, "COMPANY_SHOW_ADDRESS_SELECTLIST", $val,'yesno',0,'',$conf->entity); |
|
| 188 | - if (! $res > 0) $error++; |
|
| 189 | - if (! $error) |
|
| 190 | - { |
|
| 191 | - setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 192 | - } |
|
| 193 | - else |
|
| 194 | - { |
|
| 195 | - setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 196 | - } |
|
| 186 | + $val = GETPOST('value','int'); |
|
| 187 | + $res = dolibarr_set_const($db, "COMPANY_SHOW_ADDRESS_SELECTLIST", $val,'yesno',0,'',$conf->entity); |
|
| 188 | + if (! $res > 0) $error++; |
|
| 189 | + if (! $error) |
|
| 190 | + { |
|
| 191 | + setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 192 | + } |
|
| 193 | + else |
|
| 194 | + { |
|
| 195 | + setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 196 | + } |
|
| 197 | 197 | } |
| 198 | 198 | |
| 199 | 199 | //Activate Ask For Preferred Shipping Method |
| 200 | 200 | if ($action=="setaskforshippingmet") { |
| 201 | - $setaskforshippingmet = GETPOST('value','int'); |
|
| 202 | - $res = dolibarr_set_const($db, "SOCIETE_ASK_FOR_SHIPPING_METHOD", $setaskforshippingmet,'yesno',0,'',$conf->entity); |
|
| 203 | - if (! $res > 0) $error++; |
|
| 204 | - if (! $error) |
|
| 205 | - { |
|
| 206 | - setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 207 | - } |
|
| 208 | - else |
|
| 209 | - { |
|
| 210 | - setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 211 | - } |
|
| 201 | + $setaskforshippingmet = GETPOST('value','int'); |
|
| 202 | + $res = dolibarr_set_const($db, "SOCIETE_ASK_FOR_SHIPPING_METHOD", $setaskforshippingmet,'yesno',0,'',$conf->entity); |
|
| 203 | + if (! $res > 0) $error++; |
|
| 204 | + if (! $error) |
|
| 205 | + { |
|
| 206 | + setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 207 | + } |
|
| 208 | + else |
|
| 209 | + { |
|
| 210 | + setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 211 | + } |
|
| 212 | 212 | } |
| 213 | 213 | |
| 214 | 214 | //Activate "Disable prospect/customer type" |
@@ -229,81 +229,81 @@ discard block |
||
| 229 | 229 | //Activate ProfId unique |
| 230 | 230 | if ($action == 'setprofid') |
| 231 | 231 | { |
| 232 | - $status = GETPOST('status','alpha'); |
|
| 232 | + $status = GETPOST('status','alpha'); |
|
| 233 | 233 | |
| 234 | - $idprof="SOCIETE_".$value."_UNIQUE"; |
|
| 235 | - if (dolibarr_set_const($db, $idprof, $status, 'chaine', 0, '', $conf->entity) > 0) |
|
| 236 | - { |
|
| 237 | - //header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 238 | - //exit; |
|
| 239 | - } |
|
| 240 | - else |
|
| 241 | - { |
|
| 242 | - dol_print_error($db); |
|
| 243 | - } |
|
| 234 | + $idprof="SOCIETE_".$value."_UNIQUE"; |
|
| 235 | + if (dolibarr_set_const($db, $idprof, $status, 'chaine', 0, '', $conf->entity) > 0) |
|
| 236 | + { |
|
| 237 | + //header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 238 | + //exit; |
|
| 239 | + } |
|
| 240 | + else |
|
| 241 | + { |
|
| 242 | + dol_print_error($db); |
|
| 243 | + } |
|
| 244 | 244 | } |
| 245 | 245 | |
| 246 | 246 | //Activate ProfId mandatory |
| 247 | 247 | if ($action == 'setprofidmandatory') |
| 248 | 248 | { |
| 249 | - $status = GETPOST('status','alpha'); |
|
| 249 | + $status = GETPOST('status','alpha'); |
|
| 250 | 250 | |
| 251 | - $idprof="SOCIETE_".$value."_MANDATORY"; |
|
| 252 | - if (dolibarr_set_const($db, $idprof, $status, 'chaine', 0, '', $conf->entity) > 0) |
|
| 253 | - { |
|
| 254 | - //header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 255 | - //exit; |
|
| 256 | - } |
|
| 257 | - else |
|
| 258 | - { |
|
| 259 | - dol_print_error($db); |
|
| 260 | - } |
|
| 251 | + $idprof="SOCIETE_".$value."_MANDATORY"; |
|
| 252 | + if (dolibarr_set_const($db, $idprof, $status, 'chaine', 0, '', $conf->entity) > 0) |
|
| 253 | + { |
|
| 254 | + //header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 255 | + //exit; |
|
| 256 | + } |
|
| 257 | + else |
|
| 258 | + { |
|
| 259 | + dol_print_error($db); |
|
| 260 | + } |
|
| 261 | 261 | } |
| 262 | 262 | |
| 263 | 263 | //Activate ProfId invoice mandatory |
| 264 | 264 | if ($action == 'setprofidinvoicemandatory') |
| 265 | 265 | { |
| 266 | - $status = GETPOST('status','alpha'); |
|
| 266 | + $status = GETPOST('status','alpha'); |
|
| 267 | 267 | |
| 268 | - $idprof="SOCIETE_".$value."_INVOICE_MANDATORY"; |
|
| 269 | - if (dolibarr_set_const($db, $idprof, $status, 'chaine', 0, '', $conf->entity) > 0) |
|
| 270 | - { |
|
| 271 | - //header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 272 | - //exit; |
|
| 273 | - } |
|
| 274 | - else |
|
| 275 | - { |
|
| 276 | - dol_print_error($db); |
|
| 277 | - } |
|
| 268 | + $idprof="SOCIETE_".$value."_INVOICE_MANDATORY"; |
|
| 269 | + if (dolibarr_set_const($db, $idprof, $status, 'chaine', 0, '', $conf->entity) > 0) |
|
| 270 | + { |
|
| 271 | + //header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 272 | + //exit; |
|
| 273 | + } |
|
| 274 | + else |
|
| 275 | + { |
|
| 276 | + dol_print_error($db); |
|
| 277 | + } |
|
| 278 | 278 | } |
| 279 | 279 | |
| 280 | 280 | //Set hide closed customer into combox or select |
| 281 | 281 | if ($action == 'sethideinactivethirdparty') |
| 282 | 282 | { |
| 283 | - $status = GETPOST('status','alpha'); |
|
| 283 | + $status = GETPOST('status','alpha'); |
|
| 284 | 284 | |
| 285 | - if (dolibarr_set_const($db, "COMPANY_HIDE_INACTIVE_IN_COMBOBOX",$status,'chaine',0,'',$conf->entity) > 0) |
|
| 286 | - { |
|
| 287 | - header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 288 | - exit; |
|
| 289 | - } |
|
| 290 | - else |
|
| 291 | - { |
|
| 292 | - dol_print_error($db); |
|
| 293 | - } |
|
| 285 | + if (dolibarr_set_const($db, "COMPANY_HIDE_INACTIVE_IN_COMBOBOX",$status,'chaine',0,'',$conf->entity) > 0) |
|
| 286 | + { |
|
| 287 | + header("Location: ".$_SERVER["PHP_SELF"]); |
|
| 288 | + exit; |
|
| 289 | + } |
|
| 290 | + else |
|
| 291 | + { |
|
| 292 | + dol_print_error($db); |
|
| 293 | + } |
|
| 294 | 294 | } |
| 295 | 295 | if($action=='setonsearchandlistgooncustomerorsuppliercard'){ |
| 296 | - $setonsearchandlistgooncustomerorsuppliercard = GETPOST('value','int'); |
|
| 297 | - $res = dolibarr_set_const($db, "SOCIETE_ON_SEARCH_AND_LIST_GO_ON_CUSTOMER_OR_SUPPLIER_CARD", $setonsearchandlistgooncustomerorsuppliercard,'yesno',0,'',$conf->entity); |
|
| 298 | - if (! $res > 0) $error++; |
|
| 299 | - if (! $error) |
|
| 300 | - { |
|
| 301 | - setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 302 | - } |
|
| 303 | - else |
|
| 304 | - { |
|
| 305 | - setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 306 | - } |
|
| 296 | + $setonsearchandlistgooncustomerorsuppliercard = GETPOST('value','int'); |
|
| 297 | + $res = dolibarr_set_const($db, "SOCIETE_ON_SEARCH_AND_LIST_GO_ON_CUSTOMER_OR_SUPPLIER_CARD", $setonsearchandlistgooncustomerorsuppliercard,'yesno',0,'',$conf->entity); |
|
| 298 | + if (! $res > 0) $error++; |
|
| 299 | + if (! $error) |
|
| 300 | + { |
|
| 301 | + setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); |
|
| 302 | + } |
|
| 303 | + else |
|
| 304 | + { |
|
| 305 | + setEventMessages($langs->trans("Error"), null, 'errors'); |
|
| 306 | + } |
|
| 307 | 307 | } |
| 308 | 308 | |
| 309 | 309 | |
@@ -343,63 +343,63 @@ discard block |
||
| 343 | 343 | |
| 344 | 344 | foreach ($dirsociete as $dirroot) |
| 345 | 345 | { |
| 346 | - $dir = dol_buildpath($dirroot,0); |
|
| 346 | + $dir = dol_buildpath($dirroot,0); |
|
| 347 | 347 | |
| 348 | 348 | $handle = @opendir($dir); |
| 349 | 349 | if (is_resource($handle)) |
| 350 | 350 | { |
| 351 | - // Loop on each module find in opened directory |
|
| 352 | - while (($file = readdir($handle))!==false) |
|
| 353 | - { |
|
| 354 | - if (substr($file, 0, 15) == 'mod_codeclient_' && substr($file, -3) == 'php') |
|
| 355 | - { |
|
| 356 | - $file = substr($file, 0, dol_strlen($file)-4); |
|
| 357 | - |
|
| 358 | - try { |
|
| 359 | - dol_include_once($dirroot.$file.'.php'); |
|
| 360 | - } |
|
| 361 | - catch(Exception $e) |
|
| 362 | - { |
|
| 363 | - dol_syslog($e->getMessage(), LOG_ERR); |
|
| 364 | - } |
|
| 365 | - |
|
| 366 | - $modCodeTiers = new $file; |
|
| 367 | - |
|
| 368 | - // Show modules according to features level |
|
| 369 | - if ($modCodeTiers->version == 'development' && $conf->global->MAIN_FEATURES_LEVEL < 2) continue; |
|
| 370 | - if ($modCodeTiers->version == 'experimental' && $conf->global->MAIN_FEATURES_LEVEL < 1) continue; |
|
| 371 | - |
|
| 372 | - print '<tr class="oddeven">'."\n"; |
|
| 373 | - print '<td width="140">'.$modCodeTiers->name.'</td>'."\n"; |
|
| 374 | - print '<td>'.$modCodeTiers->info($langs).'</td>'."\n"; |
|
| 375 | - print '<td class="nowrap">'.$modCodeTiers->getExample($langs).'</td>'."\n"; |
|
| 376 | - |
|
| 377 | - if ($conf->global->SOCIETE_CODECLIENT_ADDON == "$file") |
|
| 378 | - { |
|
| 379 | - print '<td align="center">'."\n"; |
|
| 380 | - print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 381 | - print "</td>\n"; |
|
| 382 | - } |
|
| 383 | - else |
|
| 384 | - { |
|
| 385 | - $disabled = false; |
|
| 386 | - if (! empty($conf->multicompany->enabled) && (is_object($mc) && ! empty($mc->sharings['referent']) && $mc->sharings['referent'] == $conf->entity) ? false : true); |
|
| 387 | - print '<td align="center">'; |
|
| 388 | - if (! $disabled) print '<a href="'.$_SERVER['PHP_SELF'].'?action=setcodeclient&value='.$file.'">'; |
|
| 389 | - print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 390 | - if (! $disabled) print '</a>'; |
|
| 391 | - print '</td>'; |
|
| 392 | - } |
|
| 393 | - |
|
| 394 | - print '<td align="center">'; |
|
| 395 | - $s=$modCodeTiers->getToolTip($langs,null,-1); |
|
| 396 | - print $form->textwithpicto('',$s,1); |
|
| 397 | - print '</td>'; |
|
| 398 | - |
|
| 399 | - print '</tr>'; |
|
| 400 | - } |
|
| 401 | - } |
|
| 402 | - closedir($handle); |
|
| 351 | + // Loop on each module find in opened directory |
|
| 352 | + while (($file = readdir($handle))!==false) |
|
| 353 | + { |
|
| 354 | + if (substr($file, 0, 15) == 'mod_codeclient_' && substr($file, -3) == 'php') |
|
| 355 | + { |
|
| 356 | + $file = substr($file, 0, dol_strlen($file)-4); |
|
| 357 | + |
|
| 358 | + try { |
|
| 359 | + dol_include_once($dirroot.$file.'.php'); |
|
| 360 | + } |
|
| 361 | + catch(Exception $e) |
|
| 362 | + { |
|
| 363 | + dol_syslog($e->getMessage(), LOG_ERR); |
|
| 364 | + } |
|
| 365 | + |
|
| 366 | + $modCodeTiers = new $file; |
|
| 367 | + |
|
| 368 | + // Show modules according to features level |
|
| 369 | + if ($modCodeTiers->version == 'development' && $conf->global->MAIN_FEATURES_LEVEL < 2) continue; |
|
| 370 | + if ($modCodeTiers->version == 'experimental' && $conf->global->MAIN_FEATURES_LEVEL < 1) continue; |
|
| 371 | + |
|
| 372 | + print '<tr class="oddeven">'."\n"; |
|
| 373 | + print '<td width="140">'.$modCodeTiers->name.'</td>'."\n"; |
|
| 374 | + print '<td>'.$modCodeTiers->info($langs).'</td>'."\n"; |
|
| 375 | + print '<td class="nowrap">'.$modCodeTiers->getExample($langs).'</td>'."\n"; |
|
| 376 | + |
|
| 377 | + if ($conf->global->SOCIETE_CODECLIENT_ADDON == "$file") |
|
| 378 | + { |
|
| 379 | + print '<td align="center">'."\n"; |
|
| 380 | + print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 381 | + print "</td>\n"; |
|
| 382 | + } |
|
| 383 | + else |
|
| 384 | + { |
|
| 385 | + $disabled = false; |
|
| 386 | + if (! empty($conf->multicompany->enabled) && (is_object($mc) && ! empty($mc->sharings['referent']) && $mc->sharings['referent'] == $conf->entity) ? false : true); |
|
| 387 | + print '<td align="center">'; |
|
| 388 | + if (! $disabled) print '<a href="'.$_SERVER['PHP_SELF'].'?action=setcodeclient&value='.$file.'">'; |
|
| 389 | + print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 390 | + if (! $disabled) print '</a>'; |
|
| 391 | + print '</td>'; |
|
| 392 | + } |
|
| 393 | + |
|
| 394 | + print '<td align="center">'; |
|
| 395 | + $s=$modCodeTiers->getToolTip($langs,null,-1); |
|
| 396 | + print $form->textwithpicto('',$s,1); |
|
| 397 | + print '</td>'; |
|
| 398 | + |
|
| 399 | + print '</tr>'; |
|
| 400 | + } |
|
| 401 | + } |
|
| 402 | + closedir($handle); |
|
| 403 | 403 | } |
| 404 | 404 | } |
| 405 | 405 | print '</table>'; |
@@ -423,53 +423,53 @@ discard block |
||
| 423 | 423 | |
| 424 | 424 | foreach ($dirsociete as $dirroot) |
| 425 | 425 | { |
| 426 | - $dir = dol_buildpath($dirroot,0); |
|
| 426 | + $dir = dol_buildpath($dirroot,0); |
|
| 427 | 427 | |
| 428 | - $handle = @opendir($dir); |
|
| 428 | + $handle = @opendir($dir); |
|
| 429 | 429 | if (is_resource($handle)) |
| 430 | 430 | { |
| 431 | - while (($file = readdir($handle))!==false) |
|
| 432 | - { |
|
| 433 | - if (substr($file, 0, 15) == 'mod_codecompta_' && substr($file, -3) == 'php') |
|
| 434 | - { |
|
| 435 | - $file = substr($file, 0, dol_strlen($file)-4); |
|
| 436 | - |
|
| 437 | - try { |
|
| 438 | - dol_include_once($dirroot.$file.'.php'); |
|
| 439 | - } |
|
| 440 | - catch(Exception $e) |
|
| 441 | - { |
|
| 442 | - dol_syslog($e->getMessage(), LOG_ERR); |
|
| 443 | - } |
|
| 444 | - |
|
| 445 | - $modCodeCompta = new $file; |
|
| 446 | - |
|
| 447 | - print '<tr class="oddeven">'; |
|
| 448 | - print '<td>'.$modCodeCompta->name."</td><td>\n"; |
|
| 449 | - print $modCodeCompta->info($langs); |
|
| 450 | - print '</td>'; |
|
| 451 | - print '<td class="nowrap">'.$modCodeCompta->getExample($langs)."</td>\n"; |
|
| 452 | - |
|
| 453 | - if ($conf->global->SOCIETE_CODECOMPTA_ADDON == "$file") |
|
| 454 | - { |
|
| 455 | - print '<td align="center">'; |
|
| 456 | - print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 457 | - print '</td>'; |
|
| 458 | - } |
|
| 459 | - else |
|
| 460 | - { |
|
| 461 | - print '<td align="center"><a href="'.$_SERVER['PHP_SELF'].'?action=setcodecompta&value='.$file.'">'; |
|
| 462 | - print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 463 | - print '</a></td>'; |
|
| 464 | - } |
|
| 465 | - print '<td align="center">'; |
|
| 466 | - $s=$modCodeCompta->getToolTip($langs,null,-1); |
|
| 467 | - print $form->textwithpicto('',$s,1); |
|
| 468 | - print '</td>'; |
|
| 469 | - print "</tr>\n"; |
|
| 470 | - } |
|
| 471 | - } |
|
| 472 | - closedir($handle); |
|
| 431 | + while (($file = readdir($handle))!==false) |
|
| 432 | + { |
|
| 433 | + if (substr($file, 0, 15) == 'mod_codecompta_' && substr($file, -3) == 'php') |
|
| 434 | + { |
|
| 435 | + $file = substr($file, 0, dol_strlen($file)-4); |
|
| 436 | + |
|
| 437 | + try { |
|
| 438 | + dol_include_once($dirroot.$file.'.php'); |
|
| 439 | + } |
|
| 440 | + catch(Exception $e) |
|
| 441 | + { |
|
| 442 | + dol_syslog($e->getMessage(), LOG_ERR); |
|
| 443 | + } |
|
| 444 | + |
|
| 445 | + $modCodeCompta = new $file; |
|
| 446 | + |
|
| 447 | + print '<tr class="oddeven">'; |
|
| 448 | + print '<td>'.$modCodeCompta->name."</td><td>\n"; |
|
| 449 | + print $modCodeCompta->info($langs); |
|
| 450 | + print '</td>'; |
|
| 451 | + print '<td class="nowrap">'.$modCodeCompta->getExample($langs)."</td>\n"; |
|
| 452 | + |
|
| 453 | + if ($conf->global->SOCIETE_CODECOMPTA_ADDON == "$file") |
|
| 454 | + { |
|
| 455 | + print '<td align="center">'; |
|
| 456 | + print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 457 | + print '</td>'; |
|
| 458 | + } |
|
| 459 | + else |
|
| 460 | + { |
|
| 461 | + print '<td align="center"><a href="'.$_SERVER['PHP_SELF'].'?action=setcodecompta&value='.$file.'">'; |
|
| 462 | + print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 463 | + print '</a></td>'; |
|
| 464 | + } |
|
| 465 | + print '<td align="center">'; |
|
| 466 | + $s=$modCodeCompta->getToolTip($langs,null,-1); |
|
| 467 | + print $form->textwithpicto('',$s,1); |
|
| 468 | + print '</td>'; |
|
| 469 | + print "</tr>\n"; |
|
| 470 | + } |
|
| 471 | + } |
|
| 472 | + closedir($handle); |
|
| 473 | 473 | } |
| 474 | 474 | } |
| 475 | 475 | print "</table>\n"; |
@@ -490,18 +490,18 @@ discard block |
||
| 490 | 490 | $resql=$db->query($sql); |
| 491 | 491 | if ($resql) |
| 492 | 492 | { |
| 493 | - $i = 0; |
|
| 494 | - $num_rows=$db->num_rows($resql); |
|
| 495 | - while ($i < $num_rows) |
|
| 496 | - { |
|
| 497 | - $array = $db->fetch_array($resql); |
|
| 498 | - array_push($def, $array[0]); |
|
| 499 | - $i++; |
|
| 500 | - } |
|
| 493 | + $i = 0; |
|
| 494 | + $num_rows=$db->num_rows($resql); |
|
| 495 | + while ($i < $num_rows) |
|
| 496 | + { |
|
| 497 | + $array = $db->fetch_array($resql); |
|
| 498 | + array_push($def, $array[0]); |
|
| 499 | + $i++; |
|
| 500 | + } |
|
| 501 | 501 | } |
| 502 | 502 | else |
| 503 | 503 | { |
| 504 | - dol_print_error($db); |
|
| 504 | + dol_print_error($db); |
|
| 505 | 505 | } |
| 506 | 506 | |
| 507 | 507 | print '<table class="noborder" width="100%">'; |
@@ -515,108 +515,108 @@ discard block |
||
| 515 | 515 | |
| 516 | 516 | foreach ($dirsociete as $dirroot) |
| 517 | 517 | { |
| 518 | - $dir = dol_buildpath($dirroot.'doc/',0); |
|
| 519 | - |
|
| 520 | - $handle=@opendir($dir); |
|
| 521 | - if (is_resource($handle)) |
|
| 522 | - { |
|
| 523 | - while (($file = readdir($handle))!==false) |
|
| 524 | - { |
|
| 525 | - if (preg_match('/\.modules\.php$/i',$file)) |
|
| 526 | - { |
|
| 527 | - $name = substr($file, 4, dol_strlen($file) -16); |
|
| 528 | - $classname = substr($file, 0, dol_strlen($file) -12); |
|
| 529 | - |
|
| 530 | - try { |
|
| 531 | - dol_include_once($dirroot.'doc/'.$file); |
|
| 532 | - } |
|
| 533 | - catch(Exception $e) |
|
| 534 | - { |
|
| 535 | - dol_syslog($e->getMessage(), LOG_ERR); |
|
| 536 | - } |
|
| 537 | - |
|
| 538 | - $module = new $classname($db); |
|
| 539 | - |
|
| 540 | - $modulequalified=1; |
|
| 541 | - if (! empty($module->version)) { |
|
| 542 | - if ($module->version == 'development' && $conf->global->MAIN_FEATURES_LEVEL < 2) $modulequalified=0; |
|
| 543 | - else if ($module->version == 'experimental' && $conf->global->MAIN_FEATURES_LEVEL < 1) $modulequalified=0; |
|
| 544 | - } |
|
| 545 | - |
|
| 546 | - if ($modulequalified) |
|
| 547 | - { |
|
| 548 | - print '<tr class="oddeven"><td width="100">'; |
|
| 549 | - print $module->name; |
|
| 550 | - print "</td><td>\n"; |
|
| 551 | - if (method_exists($module,'info')) print $module->info($langs); |
|
| 552 | - else print $module->description; |
|
| 553 | - print '</td>'; |
|
| 554 | - |
|
| 555 | - // Activate / Disable |
|
| 556 | - if (in_array($name, $def)) |
|
| 557 | - { |
|
| 558 | - print "<td align=\"center\">\n"; |
|
| 559 | - //if ($conf->global->COMPANY_ADDON_PDF != "$name") |
|
| 560 | - //{ |
|
| 561 | - print '<a href="'.$_SERVER["PHP_SELF"].'?action=del&value='.$name.'&scan_dir='.$module->scandir.'&label='.urlencode($module->name).'">'; |
|
| 562 | - print img_picto($langs->trans("Enabled"),'switch_on'); |
|
| 563 | - print '</a>'; |
|
| 564 | - //} |
|
| 565 | - //else |
|
| 566 | - //{ |
|
| 567 | - // print img_picto($langs->trans("Enabled"),'on'); |
|
| 568 | - //} |
|
| 569 | - print "</td>"; |
|
| 570 | - } |
|
| 571 | - else |
|
| 572 | - { |
|
| 573 | - if (versioncompare($module->phpmin,versionphparray()) > 0) |
|
| 574 | - { |
|
| 575 | - print "<td align=\"center\">\n"; |
|
| 576 | - print img_picto(dol_escape_htmltag($langs->trans("ErrorModuleRequirePHPVersion",join('.',$module->phpmin))),'switch_off'); |
|
| 577 | - print "</td>"; |
|
| 578 | - } |
|
| 579 | - else |
|
| 580 | - { |
|
| 581 | - print "<td align=\"center\">\n"; |
|
| 582 | - print '<a href="'.$_SERVER["PHP_SELF"].'?action=set&value='.$name.'&scan_dir='.$module->scandir.'&label='.urlencode($module->name).'">'.img_picto($langs->trans("Disabled"),'switch_off').'</a>'; |
|
| 583 | - print "</td>"; |
|
| 584 | - } |
|
| 585 | - } |
|
| 586 | - |
|
| 587 | - // Info |
|
| 588 | - $htmltooltip = ''.$langs->trans("Name").': '.$module->name; |
|
| 589 | - $htmltooltip.='<br>'.$langs->trans("Type").': '.($module->type?$module->type:$langs->trans("Unknown")); |
|
| 590 | - if ($module->type == 'pdf') |
|
| 591 | - { |
|
| 592 | - $htmltooltip.='<br>'.$langs->trans("Height").'/'.$langs->trans("Width").': '.$module->page_hauteur.'/'.$module->page_largeur; |
|
| 593 | - } |
|
| 594 | - $htmltooltip.='<br><br><u>'.$langs->trans("FeaturesSupported").':</u>'; |
|
| 595 | - $htmltooltip.='<br>'.$langs->trans("WatermarkOnDraft").': '.yn((! empty($module->option_draft_watermark)?$module->option_draft_watermark:''), 1, 1); |
|
| 596 | - |
|
| 597 | - print '<td align="center" class="nowrap">'; |
|
| 598 | - print $form->textwithpicto('',$htmltooltip,1,0); |
|
| 599 | - print '</td>'; |
|
| 600 | - |
|
| 601 | - // Preview |
|
| 602 | - print '<td align="center" class="nowrap">'; |
|
| 603 | - if ($module->type == 'pdf') |
|
| 604 | - { |
|
| 605 | - $linkspec='<a href="'.$_SERVER["PHP_SELF"].'?action=specimen&module='.$name.'">'.img_object($langs->trans("Preview"),'bill').'</a>'; |
|
| 606 | - } |
|
| 607 | - else |
|
| 608 | - { |
|
| 609 | - $linkspec=img_object($langs->trans("PreviewNotAvailable"),'generic'); |
|
| 610 | - } |
|
| 611 | - print $linkspec; |
|
| 612 | - print '</td>'; |
|
| 613 | - |
|
| 614 | - print "</tr>\n"; |
|
| 615 | - } |
|
| 616 | - } |
|
| 617 | - } |
|
| 618 | - closedir($handle); |
|
| 619 | - } |
|
| 518 | + $dir = dol_buildpath($dirroot.'doc/',0); |
|
| 519 | + |
|
| 520 | + $handle=@opendir($dir); |
|
| 521 | + if (is_resource($handle)) |
|
| 522 | + { |
|
| 523 | + while (($file = readdir($handle))!==false) |
|
| 524 | + { |
|
| 525 | + if (preg_match('/\.modules\.php$/i',$file)) |
|
| 526 | + { |
|
| 527 | + $name = substr($file, 4, dol_strlen($file) -16); |
|
| 528 | + $classname = substr($file, 0, dol_strlen($file) -12); |
|
| 529 | + |
|
| 530 | + try { |
|
| 531 | + dol_include_once($dirroot.'doc/'.$file); |
|
| 532 | + } |
|
| 533 | + catch(Exception $e) |
|
| 534 | + { |
|
| 535 | + dol_syslog($e->getMessage(), LOG_ERR); |
|
| 536 | + } |
|
| 537 | + |
|
| 538 | + $module = new $classname($db); |
|
| 539 | + |
|
| 540 | + $modulequalified=1; |
|
| 541 | + if (! empty($module->version)) { |
|
| 542 | + if ($module->version == 'development' && $conf->global->MAIN_FEATURES_LEVEL < 2) $modulequalified=0; |
|
| 543 | + else if ($module->version == 'experimental' && $conf->global->MAIN_FEATURES_LEVEL < 1) $modulequalified=0; |
|
| 544 | + } |
|
| 545 | + |
|
| 546 | + if ($modulequalified) |
|
| 547 | + { |
|
| 548 | + print '<tr class="oddeven"><td width="100">'; |
|
| 549 | + print $module->name; |
|
| 550 | + print "</td><td>\n"; |
|
| 551 | + if (method_exists($module,'info')) print $module->info($langs); |
|
| 552 | + else print $module->description; |
|
| 553 | + print '</td>'; |
|
| 554 | + |
|
| 555 | + // Activate / Disable |
|
| 556 | + if (in_array($name, $def)) |
|
| 557 | + { |
|
| 558 | + print "<td align=\"center\">\n"; |
|
| 559 | + //if ($conf->global->COMPANY_ADDON_PDF != "$name") |
|
| 560 | + //{ |
|
| 561 | + print '<a href="'.$_SERVER["PHP_SELF"].'?action=del&value='.$name.'&scan_dir='.$module->scandir.'&label='.urlencode($module->name).'">'; |
|
| 562 | + print img_picto($langs->trans("Enabled"),'switch_on'); |
|
| 563 | + print '</a>'; |
|
| 564 | + //} |
|
| 565 | + //else |
|
| 566 | + //{ |
|
| 567 | + // print img_picto($langs->trans("Enabled"),'on'); |
|
| 568 | + //} |
|
| 569 | + print "</td>"; |
|
| 570 | + } |
|
| 571 | + else |
|
| 572 | + { |
|
| 573 | + if (versioncompare($module->phpmin,versionphparray()) > 0) |
|
| 574 | + { |
|
| 575 | + print "<td align=\"center\">\n"; |
|
| 576 | + print img_picto(dol_escape_htmltag($langs->trans("ErrorModuleRequirePHPVersion",join('.',$module->phpmin))),'switch_off'); |
|
| 577 | + print "</td>"; |
|
| 578 | + } |
|
| 579 | + else |
|
| 580 | + { |
|
| 581 | + print "<td align=\"center\">\n"; |
|
| 582 | + print '<a href="'.$_SERVER["PHP_SELF"].'?action=set&value='.$name.'&scan_dir='.$module->scandir.'&label='.urlencode($module->name).'">'.img_picto($langs->trans("Disabled"),'switch_off').'</a>'; |
|
| 583 | + print "</td>"; |
|
| 584 | + } |
|
| 585 | + } |
|
| 586 | + |
|
| 587 | + // Info |
|
| 588 | + $htmltooltip = ''.$langs->trans("Name").': '.$module->name; |
|
| 589 | + $htmltooltip.='<br>'.$langs->trans("Type").': '.($module->type?$module->type:$langs->trans("Unknown")); |
|
| 590 | + if ($module->type == 'pdf') |
|
| 591 | + { |
|
| 592 | + $htmltooltip.='<br>'.$langs->trans("Height").'/'.$langs->trans("Width").': '.$module->page_hauteur.'/'.$module->page_largeur; |
|
| 593 | + } |
|
| 594 | + $htmltooltip.='<br><br><u>'.$langs->trans("FeaturesSupported").':</u>'; |
|
| 595 | + $htmltooltip.='<br>'.$langs->trans("WatermarkOnDraft").': '.yn((! empty($module->option_draft_watermark)?$module->option_draft_watermark:''), 1, 1); |
|
| 596 | + |
|
| 597 | + print '<td align="center" class="nowrap">'; |
|
| 598 | + print $form->textwithpicto('',$htmltooltip,1,0); |
|
| 599 | + print '</td>'; |
|
| 600 | + |
|
| 601 | + // Preview |
|
| 602 | + print '<td align="center" class="nowrap">'; |
|
| 603 | + if ($module->type == 'pdf') |
|
| 604 | + { |
|
| 605 | + $linkspec='<a href="'.$_SERVER["PHP_SELF"].'?action=specimen&module='.$name.'">'.img_object($langs->trans("Preview"),'bill').'</a>'; |
|
| 606 | + } |
|
| 607 | + else |
|
| 608 | + { |
|
| 609 | + $linkspec=img_object($langs->trans("PreviewNotAvailable"),'generic'); |
|
| 610 | + } |
|
| 611 | + print $linkspec; |
|
| 612 | + print '</td>'; |
|
| 613 | + |
|
| 614 | + print "</tr>\n"; |
|
| 615 | + } |
|
| 616 | + } |
|
| 617 | + } |
|
| 618 | + closedir($handle); |
|
| 619 | + } |
|
| 620 | 620 | } |
| 621 | 621 | print '</table>'; |
| 622 | 622 | |
@@ -652,63 +652,63 @@ discard block |
||
| 652 | 652 | $nbofloop=count($profid); |
| 653 | 653 | foreach($profid as $key => $val) |
| 654 | 654 | { |
| 655 | - if ($profid[$key][1]!='-') |
|
| 656 | - { |
|
| 657 | - print '<tr class="oddeven">'; |
|
| 658 | - print '<td>'.$profid[$key][0]."</td><td>\n"; |
|
| 659 | - print $profid[$key][1]; |
|
| 660 | - print '</td>'; |
|
| 661 | - |
|
| 662 | - $idprof_unique ='SOCIETE_'.$key.'_UNIQUE'; |
|
| 663 | - $idprof_mandatory ='SOCIETE_'.$key.'_MANDATORY'; |
|
| 664 | - $idprof_invoice_mandatory ='SOCIETE_'.$key.'_INVOICE_MANDATORY'; |
|
| 665 | - |
|
| 666 | - $verif=(empty($conf->global->$idprof_unique)?false:true); |
|
| 667 | - $mandatory=(empty($conf->global->$idprof_mandatory)?false:true); |
|
| 668 | - $invoice_mandatory=(empty($conf->global->$idprof_invoice_mandatory)?false:true); |
|
| 669 | - |
|
| 670 | - if ($verif) |
|
| 671 | - { |
|
| 672 | - print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofid&value='.$key.'&status=0">'; |
|
| 673 | - print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 674 | - print '</a></td>'; |
|
| 675 | - } |
|
| 676 | - else |
|
| 677 | - { |
|
| 678 | - print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofid&value='.$key.'&status=1">'; |
|
| 679 | - print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 680 | - print '</a></td>'; |
|
| 681 | - } |
|
| 682 | - |
|
| 683 | - if ($mandatory) |
|
| 684 | - { |
|
| 685 | - print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofidmandatory&value='.$key.'&status=0">'; |
|
| 686 | - print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 687 | - print '</a></td>'; |
|
| 688 | - } |
|
| 689 | - else |
|
| 690 | - { |
|
| 691 | - print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofidmandatory&value='.$key.'&status=1">'; |
|
| 692 | - print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 693 | - print '</a></td>'; |
|
| 694 | - } |
|
| 695 | - |
|
| 696 | - if ($invoice_mandatory) |
|
| 697 | - { |
|
| 698 | - print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofidinvoicemandatory&value='.$key.'&status=0">'; |
|
| 699 | - print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 700 | - print '</a></td>'; |
|
| 701 | - } |
|
| 702 | - else |
|
| 703 | - { |
|
| 704 | - print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofidinvoicemandatory&value='.$key.'&status=1">'; |
|
| 705 | - print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 706 | - print '</a></td>'; |
|
| 707 | - } |
|
| 708 | - |
|
| 709 | - print "</tr>\n"; |
|
| 710 | - } |
|
| 711 | - $i++; |
|
| 655 | + if ($profid[$key][1]!='-') |
|
| 656 | + { |
|
| 657 | + print '<tr class="oddeven">'; |
|
| 658 | + print '<td>'.$profid[$key][0]."</td><td>\n"; |
|
| 659 | + print $profid[$key][1]; |
|
| 660 | + print '</td>'; |
|
| 661 | + |
|
| 662 | + $idprof_unique ='SOCIETE_'.$key.'_UNIQUE'; |
|
| 663 | + $idprof_mandatory ='SOCIETE_'.$key.'_MANDATORY'; |
|
| 664 | + $idprof_invoice_mandatory ='SOCIETE_'.$key.'_INVOICE_MANDATORY'; |
|
| 665 | + |
|
| 666 | + $verif=(empty($conf->global->$idprof_unique)?false:true); |
|
| 667 | + $mandatory=(empty($conf->global->$idprof_mandatory)?false:true); |
|
| 668 | + $invoice_mandatory=(empty($conf->global->$idprof_invoice_mandatory)?false:true); |
|
| 669 | + |
|
| 670 | + if ($verif) |
|
| 671 | + { |
|
| 672 | + print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofid&value='.$key.'&status=0">'; |
|
| 673 | + print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 674 | + print '</a></td>'; |
|
| 675 | + } |
|
| 676 | + else |
|
| 677 | + { |
|
| 678 | + print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofid&value='.$key.'&status=1">'; |
|
| 679 | + print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 680 | + print '</a></td>'; |
|
| 681 | + } |
|
| 682 | + |
|
| 683 | + if ($mandatory) |
|
| 684 | + { |
|
| 685 | + print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofidmandatory&value='.$key.'&status=0">'; |
|
| 686 | + print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 687 | + print '</a></td>'; |
|
| 688 | + } |
|
| 689 | + else |
|
| 690 | + { |
|
| 691 | + print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofidmandatory&value='.$key.'&status=1">'; |
|
| 692 | + print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 693 | + print '</a></td>'; |
|
| 694 | + } |
|
| 695 | + |
|
| 696 | + if ($invoice_mandatory) |
|
| 697 | + { |
|
| 698 | + print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofidinvoicemandatory&value='.$key.'&status=0">'; |
|
| 699 | + print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 700 | + print '</a></td>'; |
|
| 701 | + } |
|
| 702 | + else |
|
| 703 | + { |
|
| 704 | + print '<td align="center"><a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=setprofidinvoicemandatory&value='.$key.'&status=1">'; |
|
| 705 | + print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 706 | + print '</a></td>'; |
|
| 707 | + } |
|
| 708 | + |
|
| 709 | + print "</tr>\n"; |
|
| 710 | + } |
|
| 711 | + $i++; |
|
| 712 | 712 | } |
| 713 | 713 | |
| 714 | 714 | print "</table><br>\n"; |
@@ -735,22 +735,22 @@ discard block |
||
| 735 | 735 | print '<td width="80%">'.$form->textwithpicto($langs->trans("DelaiedFullListToSelectCompany"),$langs->trans('UseSearchToSelectCompanyTooltip'),1).' </td>'; |
| 736 | 736 | if (! $conf->use_javascript_ajax) |
| 737 | 737 | { |
| 738 | - print '<td class="nowrap" align="right" colspan="2">'; |
|
| 739 | - print $langs->trans("NotAvailableWhenAjaxDisabled"); |
|
| 740 | - print "</td>"; |
|
| 738 | + print '<td class="nowrap" align="right" colspan="2">'; |
|
| 739 | + print $langs->trans("NotAvailableWhenAjaxDisabled"); |
|
| 740 | + print "</td>"; |
|
| 741 | 741 | } |
| 742 | 742 | else |
| 743 | 743 | { |
| 744 | - print '<td width="60" align="right">'; |
|
| 745 | - $arrval=array('0'=>$langs->trans("No"), |
|
| 746 | - '1'=>$langs->trans("Yes").' ('.$langs->trans("NumberOfKeyToSearch",1).')', |
|
| 744 | + print '<td width="60" align="right">'; |
|
| 745 | + $arrval=array('0'=>$langs->trans("No"), |
|
| 746 | + '1'=>$langs->trans("Yes").' ('.$langs->trans("NumberOfKeyToSearch",1).')', |
|
| 747 | 747 | '2'=>$langs->trans("Yes").' ('.$langs->trans("NumberOfKeyToSearch",2).')', |
| 748 | 748 | '3'=>$langs->trans("Yes").' ('.$langs->trans("NumberOfKeyToSearch",3).')', |
| 749 | - ); |
|
| 750 | - print $form->selectarray("activate_COMPANY_USE_SEARCH_TO_SELECT", $arrval, $conf->global->COMPANY_USE_SEARCH_TO_SELECT); |
|
| 751 | - print '</td><td align="right">'; |
|
| 752 | - print '<input type="submit" class="button" name="COMPANY_USE_SEARCH_TO_SELECT" value="'.$langs->trans("Modify").'">'; |
|
| 753 | - print "</td>"; |
|
| 749 | + ); |
|
| 750 | + print $form->selectarray("activate_COMPANY_USE_SEARCH_TO_SELECT", $arrval, $conf->global->COMPANY_USE_SEARCH_TO_SELECT); |
|
| 751 | + print '</td><td align="right">'; |
|
| 752 | + print '<input type="submit" class="button" name="COMPANY_USE_SEARCH_TO_SELECT" value="'.$langs->trans("Modify").'">'; |
|
| 753 | + print "</td>"; |
|
| 754 | 754 | } |
| 755 | 755 | print '</tr>'; |
| 756 | 756 | |
@@ -759,22 +759,22 @@ discard block |
||
| 759 | 759 | print '<td width="80%">'.$form->textwithpicto($langs->trans("DelaiedFullListToSelectContact"),$langs->trans('UseSearchToSelectContactTooltip'),1).'</td>'; |
| 760 | 760 | if (! $conf->use_javascript_ajax) |
| 761 | 761 | { |
| 762 | - print '<td class="nowrap" align="right" colspan="2">'; |
|
| 763 | - print $langs->trans("NotAvailableWhenAjaxDisabled"); |
|
| 764 | - print "</td>"; |
|
| 762 | + print '<td class="nowrap" align="right" colspan="2">'; |
|
| 763 | + print $langs->trans("NotAvailableWhenAjaxDisabled"); |
|
| 764 | + print "</td>"; |
|
| 765 | 765 | } |
| 766 | 766 | else |
| 767 | 767 | { |
| 768 | - print '<td width="60" align="right">'; |
|
| 769 | - $arrval=array('0'=>$langs->trans("No"), |
|
| 770 | - '1'=>$langs->trans("Yes").' ('.$langs->trans("NumberOfKeyToSearch",1).')', |
|
| 771 | - '2'=>$langs->trans("Yes").' ('.$langs->trans("NumberOfKeyToSearch",2).')', |
|
| 772 | - '3'=>$langs->trans("Yes").' ('.$langs->trans("NumberOfKeyToSearch",3).')', |
|
| 773 | - ); |
|
| 774 | - print $form->selectarray("activate_CONTACT_USE_SEARCH_TO_SELECT", $arrval, $conf->global->CONTACT_USE_SEARCH_TO_SELECT); |
|
| 775 | - print '</td><td align="right">'; |
|
| 776 | - print '<input type="submit" class="button" name="CONTACT_USE_SEARCH_TO_SELECT" value="'.$langs->trans("Modify").'">'; |
|
| 777 | - print "</td>"; |
|
| 768 | + print '<td width="60" align="right">'; |
|
| 769 | + $arrval=array('0'=>$langs->trans("No"), |
|
| 770 | + '1'=>$langs->trans("Yes").' ('.$langs->trans("NumberOfKeyToSearch",1).')', |
|
| 771 | + '2'=>$langs->trans("Yes").' ('.$langs->trans("NumberOfKeyToSearch",2).')', |
|
| 772 | + '3'=>$langs->trans("Yes").' ('.$langs->trans("NumberOfKeyToSearch",3).')', |
|
| 773 | + ); |
|
| 774 | + print $form->selectarray("activate_CONTACT_USE_SEARCH_TO_SELECT", $arrval, $conf->global->CONTACT_USE_SEARCH_TO_SELECT); |
|
| 775 | + print '</td><td align="right">'; |
|
| 776 | + print '<input type="submit" class="button" name="CONTACT_USE_SEARCH_TO_SELECT" value="'.$langs->trans("Modify").'">'; |
|
| 777 | + print "</td>"; |
|
| 778 | 778 | } |
| 779 | 779 | print '</tr>'; |
| 780 | 780 | |
@@ -786,13 +786,13 @@ discard block |
||
| 786 | 786 | print '<td align="center">'; |
| 787 | 787 | if (!empty($conf->global->SOCIETE_ADD_REF_IN_LIST)) |
| 788 | 788 | { |
| 789 | - print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaddrefinlist&value=0">'; |
|
| 790 | - print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 789 | + print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaddrefinlist&value=0">'; |
|
| 790 | + print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 791 | 791 | } |
| 792 | 792 | else |
| 793 | 793 | { |
| 794 | - print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaddrefinlist&value=1">'; |
|
| 795 | - print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 794 | + print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaddrefinlist&value=1">'; |
|
| 795 | + print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 796 | 796 | } |
| 797 | 797 | print '</a></td>'; |
| 798 | 798 | print '</tr>'; |
@@ -803,13 +803,13 @@ discard block |
||
| 803 | 803 | print '<td align="center">'; |
| 804 | 804 | if (!empty($conf->global->COMPANY_SHOW_ADDRESS_SELECTLIST)) |
| 805 | 805 | { |
| 806 | - print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaddadressinlist&value=0">'; |
|
| 807 | - print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 806 | + print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaddadressinlist&value=0">'; |
|
| 807 | + print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 808 | 808 | } |
| 809 | 809 | else |
| 810 | 810 | { |
| 811 | - print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaddadressinlist&value=1">'; |
|
| 812 | - print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 811 | + print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaddadressinlist&value=1">'; |
|
| 812 | + print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 813 | 813 | } |
| 814 | 814 | print '</a></td>'; |
| 815 | 815 | print '</tr>'; |
@@ -822,13 +822,13 @@ discard block |
||
| 822 | 822 | print '<td align="center">'; |
| 823 | 823 | if (!empty($conf->global->SOCIETE_ASK_FOR_SHIPPING_METHOD)) |
| 824 | 824 | { |
| 825 | - print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaskforshippingmet&value=0">'; |
|
| 826 | - print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 825 | + print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaskforshippingmet&value=0">'; |
|
| 826 | + print img_picto($langs->trans("Activated"),'switch_on'); |
|
| 827 | 827 | } |
| 828 | 828 | else |
| 829 | 829 | { |
| 830 | - print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaskforshippingmet&value=1">'; |
|
| 831 | - print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 830 | + print '<a href="'.$_SERVER['PHP_SELF'].'?action=setaskforshippingmet&value=1">'; |
|
| 831 | + print img_picto($langs->trans("Disabled"),'switch_off'); |
|
| 832 | 832 | } |
| 833 | 833 | print '</a></td>'; |
| 834 | 834 | print '</tr>'; |
@@ -93,8 +93,8 @@ |
||
| 93 | 93 | |
| 94 | 94 | if ($action == 'create') |
| 95 | 95 | { |
| 96 | - print '<br><div id="newattrib"></div>'; |
|
| 97 | - print load_fiche_titre($langs->trans('NewAttribute')); |
|
| 96 | + print '<br><div id="newattrib"></div>'; |
|
| 97 | + print load_fiche_titre($langs->trans('NewAttribute')); |
|
| 98 | 98 | |
| 99 | 99 | require DOL_DOCUMENT_ROOT.'/core/tpl/admin_extrafields_add.tpl.php'; |
| 100 | 100 | } |
@@ -50,48 +50,48 @@ |
||
| 50 | 50 | |
| 51 | 51 | if (! empty($action) && $action == 'fetch' && ! empty($id)) |
| 52 | 52 | { |
| 53 | - require_once DOL_DOCUMENT_ROOT . '/societe/class/societe.class.php'; |
|
| 53 | + require_once DOL_DOCUMENT_ROOT . '/societe/class/societe.class.php'; |
|
| 54 | 54 | |
| 55 | - $outjson=array(); |
|
| 55 | + $outjson=array(); |
|
| 56 | 56 | |
| 57 | - $object = new Societe($db); |
|
| 58 | - $ret=$object->fetch($id); |
|
| 59 | - if ($ret > 0) |
|
| 60 | - { |
|
| 61 | - $outname=$object->name; |
|
| 62 | - $outlabel = ''; |
|
| 63 | - $outdesc = ''; |
|
| 64 | - $outtype = $object->type; |
|
| 57 | + $object = new Societe($db); |
|
| 58 | + $ret=$object->fetch($id); |
|
| 59 | + if ($ret > 0) |
|
| 60 | + { |
|
| 61 | + $outname=$object->name; |
|
| 62 | + $outlabel = ''; |
|
| 63 | + $outdesc = ''; |
|
| 64 | + $outtype = $object->type; |
|
| 65 | 65 | |
| 66 | - $outjson = array('ref' => $outref,'name' => $outname,'desc' => $outdesc,'type' => $outtype); |
|
| 67 | - } |
|
| 66 | + $outjson = array('ref' => $outref,'name' => $outname,'desc' => $outdesc,'type' => $outtype); |
|
| 67 | + } |
|
| 68 | 68 | |
| 69 | - echo json_encode($outjson); |
|
| 69 | + echo json_encode($outjson); |
|
| 70 | 70 | } |
| 71 | 71 | else |
| 72 | 72 | { |
| 73 | - require_once DOL_DOCUMENT_ROOT.'/core/class/html.form.class.php'; |
|
| 73 | + require_once DOL_DOCUMENT_ROOT.'/core/class/html.form.class.php'; |
|
| 74 | 74 | |
| 75 | - $langs->load("companies"); |
|
| 75 | + $langs->load("companies"); |
|
| 76 | 76 | |
| 77 | - top_httphead(); |
|
| 77 | + top_httphead(); |
|
| 78 | 78 | |
| 79 | - if (empty($htmlname)) return; |
|
| 79 | + if (empty($htmlname)) return; |
|
| 80 | 80 | |
| 81 | - $match = preg_grep('/('.$htmlname.'[0-9]+)/',array_keys($_GET)); |
|
| 82 | - sort($match); |
|
| 83 | - $id = (! empty($match[0]) ? $match[0] : ''); |
|
| 81 | + $match = preg_grep('/('.$htmlname.'[0-9]+)/',array_keys($_GET)); |
|
| 82 | + sort($match); |
|
| 83 | + $id = (! empty($match[0]) ? $match[0] : ''); |
|
| 84 | 84 | |
| 85 | - // When used from jQuery, the search term is added as GET param "term". |
|
| 86 | - $searchkey=(($id && GETPOST($id, 'alpha'))?GETPOST($id, 'alpha'):(($htmlname && GETPOST($htmlname, 'alpha'))?GETPOST($htmlname, 'alpha'):'')); |
|
| 85 | + // When used from jQuery, the search term is added as GET param "term". |
|
| 86 | + $searchkey=(($id && GETPOST($id, 'alpha'))?GETPOST($id, 'alpha'):(($htmlname && GETPOST($htmlname, 'alpha'))?GETPOST($htmlname, 'alpha'):'')); |
|
| 87 | 87 | |
| 88 | - if (! $searchkey) return; |
|
| 88 | + if (! $searchkey) return; |
|
| 89 | 89 | |
| 90 | - if (! is_object($form)) $form = new Form($db); |
|
| 91 | - $arrayresult=$form->select_thirdparty_list(0, $htmlname, $filter, 1, $showtype, 0, null, $searchkey, $outjson); |
|
| 90 | + if (! is_object($form)) $form = new Form($db); |
|
| 91 | + $arrayresult=$form->select_thirdparty_list(0, $htmlname, $filter, 1, $showtype, 0, null, $searchkey, $outjson); |
|
| 92 | 92 | |
| 93 | - $db->close(); |
|
| 93 | + $db->close(); |
|
| 94 | 94 | |
| 95 | - if ($outjson) print json_encode($arrayresult); |
|
| 95 | + if ($outjson) print json_encode($arrayresult); |
|
| 96 | 96 | } |
| 97 | 97 | |
@@ -49,117 +49,117 @@ discard block |
||
| 49 | 49 | |
| 50 | 50 | if (! $vatNumber) |
| 51 | 51 | { |
| 52 | - print '<br>'; |
|
| 53 | - print '<font class="error">'.$langs->transnoentities("ErrorFieldRequired",$langs->trans("VATIntraShort")).'</font><br>'; |
|
| 52 | + print '<br>'; |
|
| 53 | + print '<font class="error">'.$langs->transnoentities("ErrorFieldRequired",$langs->trans("VATIntraShort")).'</font><br>'; |
|
| 54 | 54 | } |
| 55 | 55 | else |
| 56 | 56 | { |
| 57 | - $vatNumber = preg_replace('/\^\w/', '', $vatNumber); |
|
| 58 | - $countryCode=substr($vatNumber,0,2); |
|
| 59 | - $vatNumber=substr($vatNumber,2); |
|
| 57 | + $vatNumber = preg_replace('/\^\w/', '', $vatNumber); |
|
| 58 | + $countryCode=substr($vatNumber,0,2); |
|
| 59 | + $vatNumber=substr($vatNumber,2); |
|
| 60 | 60 | |
| 61 | - print '<b>'.$langs->trans("Country").'</b>: '.$countryCode.'<br>'; |
|
| 62 | - print '<b>'.$langs->trans("VATIntraShort").'</b>: '.$vatNumber.'<br>'; |
|
| 63 | - print '<br>'; |
|
| 61 | + print '<b>'.$langs->trans("Country").'</b>: '.$countryCode.'<br>'; |
|
| 62 | + print '<b>'.$langs->trans("VATIntraShort").'</b>: '.$vatNumber.'<br>'; |
|
| 63 | + print '<br>'; |
|
| 64 | 64 | |
| 65 | - // Set the parameters to send to the WebService |
|
| 66 | - $parameters = array("countryCode" => $countryCode, |
|
| 67 | - "vatNumber" => $vatNumber); |
|
| 65 | + // Set the parameters to send to the WebService |
|
| 66 | + $parameters = array("countryCode" => $countryCode, |
|
| 67 | + "vatNumber" => $vatNumber); |
|
| 68 | 68 | |
| 69 | - // Set the WebService URL |
|
| 70 | - dol_syslog("Create nusoap_client for URL=".$WS_DOL_URL." WSDL=".$WS_DOL_URL_WSDL); |
|
| 69 | + // Set the WebService URL |
|
| 70 | + dol_syslog("Create nusoap_client for URL=".$WS_DOL_URL." WSDL=".$WS_DOL_URL_WSDL); |
|
| 71 | 71 | require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php'; |
| 72 | 72 | $params=getSoapParams(); |
| 73 | 73 | //ini_set('default_socket_timeout', $params['response_timeout']); |
| 74 | 74 | //$soapclient = new SoapClient($WS_DOL_URL_WSDL,$params); |
| 75 | - $soapclient = new nusoap_client($WS_DOL_URL_WSDL,true,$params['proxy_host'],$params['proxy_port'],$params['proxy_login'],$params['proxy_password'],$params['connection_timeout'],$params['response_timeout']); |
|
| 76 | - $soapclient->soap_defencoding = 'utf-8'; |
|
| 77 | - $soapclient->xml_encoding = 'utf-8'; |
|
| 78 | - $soapclient->decode_utf8 = false; |
|
| 79 | - |
|
| 80 | - // Check for an error |
|
| 81 | - $err = $soapclient->getError(); |
|
| 82 | - if ($err) |
|
| 83 | - { |
|
| 84 | - dol_syslog("Constructor error ".$WS_DOL_URL, LOG_ERR); |
|
| 85 | - } |
|
| 86 | - |
|
| 87 | - // Call the WebService and store its result in $result. |
|
| 88 | - dol_syslog("Call method ".$WS_METHOD); |
|
| 89 | - $result = $soapclient->call($WS_METHOD,$parameters); |
|
| 90 | - |
|
| 91 | - //var_dump($parameters); |
|
| 92 | - //var_dump($soapclient); |
|
| 93 | - //print "x".is_array($result)."i"; |
|
| 94 | - //var_dump($result); |
|
| 95 | - //print $soapclient->request.'<br>'; |
|
| 96 | - //print $soapclient->response.'<br>'; |
|
| 97 | - |
|
| 98 | - $messagetoshow=''; |
|
| 99 | - print '<b>'.$langs->trans("Response").'</b>:<br>'; |
|
| 100 | - |
|
| 101 | - // Service indisponible |
|
| 102 | - if (! is_array($result) || preg_match('/SERVICE_UNAVAILABLE/i',$result['faultstring'])) |
|
| 103 | - { |
|
| 104 | - print '<font class="error">'.$langs->trans("ErrorServiceUnavailableTryLater").'</font><br>'; |
|
| 105 | - $messagetoshow=$soapclient->response; |
|
| 106 | - } |
|
| 107 | - elseif (preg_match('/TIMEOUT/i',$result['faultstring'])) |
|
| 108 | - { |
|
| 109 | - print '<font class="error">'.$langs->trans("ErrorServiceUnavailableTryLater").'</font><br>'; |
|
| 110 | - $messagetoshow=$soapclient->response; |
|
| 111 | - } |
|
| 112 | - elseif (preg_match('/SERVER_BUSY/i',$result['faultstring'])) |
|
| 113 | - { |
|
| 114 | - print '<font class="error">'.$langs->trans("ErrorServiceUnavailableTryLater").'</font><br>'; |
|
| 115 | - $messagetoshow=$soapclient->response; |
|
| 116 | - } |
|
| 117 | - elseif ($result['faultstring']) |
|
| 118 | - { |
|
| 119 | - print '<font class="error">'.$langs->trans("Error").'</font><br>'; |
|
| 120 | - $messagetoshow=$result['faultstring']; |
|
| 121 | - } |
|
| 122 | - // Syntaxe ko |
|
| 123 | - elseif (preg_match('/INVALID_INPUT/i',$result['faultstring']) |
|
| 124 | - || ($result['requestDate'] && ! $result['valid'])) |
|
| 125 | - { |
|
| 126 | - if ($result['requestDate']) print $langs->trans("Date").': '.$result['requestDate'].'<br>'; |
|
| 127 | - print $langs->trans("VATIntraSyntaxIsValid").': <font class="error">'.$langs->trans("No").'</font> (Might be a non europeen VAT)<br>'; |
|
| 128 | - print $langs->trans("ValueIsValid").': <font class="error">'.$langs->trans("No").'</font> (Might be a non europeen VAT)<br>'; |
|
| 129 | - //$messagetoshow=$soapclient->response; |
|
| 130 | - } |
|
| 131 | - else |
|
| 132 | - { |
|
| 133 | - // Syntaxe ok |
|
| 134 | - if ($result['requestDate']) print $langs->trans("Date").': '.$result['requestDate'].'<br>'; |
|
| 135 | - print $langs->trans("VATIntraSyntaxIsValid").': <font class="ok">'.$langs->trans("Yes").'</font><br>'; |
|
| 136 | - print $langs->trans("ValueIsValid").': '; |
|
| 137 | - if (preg_match('/MS_UNAVAILABLE/i',$result['faultstring'])) |
|
| 138 | - { |
|
| 139 | - print '<font class="error">'.$langs->trans("ErrorVATCheckMS_UNAVAILABLE",$countryCode).'</font><br>'; |
|
| 140 | - } |
|
| 141 | - else |
|
| 142 | - { |
|
| 143 | - if (! empty($result['valid']) && ($result['valid']==1 || $result['valid']=='true')) |
|
| 144 | - { |
|
| 145 | - print '<font class="ok">'.$langs->trans("Yes").'</font>'; |
|
| 146 | - print '<br>'; |
|
| 147 | - print $langs->trans("Name").': '.$result['name'].'<br>'; |
|
| 148 | - print $langs->trans("Address").': '.$result['address'].'<br>'; |
|
| 149 | - } |
|
| 150 | - else |
|
| 151 | - { |
|
| 152 | - print '<font class="error">'.$langs->trans("No").'</font>'; |
|
| 153 | - print '<br>'."\n"; |
|
| 154 | - } |
|
| 155 | - } |
|
| 156 | - } |
|
| 157 | - |
|
| 158 | - // Show log data into page |
|
| 159 | - print "\n"; |
|
| 160 | - print '<!-- '; |
|
| 161 | - var_dump($result); |
|
| 162 | - print '-->'; |
|
| 75 | + $soapclient = new nusoap_client($WS_DOL_URL_WSDL,true,$params['proxy_host'],$params['proxy_port'],$params['proxy_login'],$params['proxy_password'],$params['connection_timeout'],$params['response_timeout']); |
|
| 76 | + $soapclient->soap_defencoding = 'utf-8'; |
|
| 77 | + $soapclient->xml_encoding = 'utf-8'; |
|
| 78 | + $soapclient->decode_utf8 = false; |
|
| 79 | + |
|
| 80 | + // Check for an error |
|
| 81 | + $err = $soapclient->getError(); |
|
| 82 | + if ($err) |
|
| 83 | + { |
|
| 84 | + dol_syslog("Constructor error ".$WS_DOL_URL, LOG_ERR); |
|
| 85 | + } |
|
| 86 | + |
|
| 87 | + // Call the WebService and store its result in $result. |
|
| 88 | + dol_syslog("Call method ".$WS_METHOD); |
|
| 89 | + $result = $soapclient->call($WS_METHOD,$parameters); |
|
| 90 | + |
|
| 91 | + //var_dump($parameters); |
|
| 92 | + //var_dump($soapclient); |
|
| 93 | + //print "x".is_array($result)."i"; |
|
| 94 | + //var_dump($result); |
|
| 95 | + //print $soapclient->request.'<br>'; |
|
| 96 | + //print $soapclient->response.'<br>'; |
|
| 97 | + |
|
| 98 | + $messagetoshow=''; |
|
| 99 | + print '<b>'.$langs->trans("Response").'</b>:<br>'; |
|
| 100 | + |
|
| 101 | + // Service indisponible |
|
| 102 | + if (! is_array($result) || preg_match('/SERVICE_UNAVAILABLE/i',$result['faultstring'])) |
|
| 103 | + { |
|
| 104 | + print '<font class="error">'.$langs->trans("ErrorServiceUnavailableTryLater").'</font><br>'; |
|
| 105 | + $messagetoshow=$soapclient->response; |
|
| 106 | + } |
|
| 107 | + elseif (preg_match('/TIMEOUT/i',$result['faultstring'])) |
|
| 108 | + { |
|
| 109 | + print '<font class="error">'.$langs->trans("ErrorServiceUnavailableTryLater").'</font><br>'; |
|
| 110 | + $messagetoshow=$soapclient->response; |
|
| 111 | + } |
|
| 112 | + elseif (preg_match('/SERVER_BUSY/i',$result['faultstring'])) |
|
| 113 | + { |
|
| 114 | + print '<font class="error">'.$langs->trans("ErrorServiceUnavailableTryLater").'</font><br>'; |
|
| 115 | + $messagetoshow=$soapclient->response; |
|
| 116 | + } |
|
| 117 | + elseif ($result['faultstring']) |
|
| 118 | + { |
|
| 119 | + print '<font class="error">'.$langs->trans("Error").'</font><br>'; |
|
| 120 | + $messagetoshow=$result['faultstring']; |
|
| 121 | + } |
|
| 122 | + // Syntaxe ko |
|
| 123 | + elseif (preg_match('/INVALID_INPUT/i',$result['faultstring']) |
|
| 124 | + || ($result['requestDate'] && ! $result['valid'])) |
|
| 125 | + { |
|
| 126 | + if ($result['requestDate']) print $langs->trans("Date").': '.$result['requestDate'].'<br>'; |
|
| 127 | + print $langs->trans("VATIntraSyntaxIsValid").': <font class="error">'.$langs->trans("No").'</font> (Might be a non europeen VAT)<br>'; |
|
| 128 | + print $langs->trans("ValueIsValid").': <font class="error">'.$langs->trans("No").'</font> (Might be a non europeen VAT)<br>'; |
|
| 129 | + //$messagetoshow=$soapclient->response; |
|
| 130 | + } |
|
| 131 | + else |
|
| 132 | + { |
|
| 133 | + // Syntaxe ok |
|
| 134 | + if ($result['requestDate']) print $langs->trans("Date").': '.$result['requestDate'].'<br>'; |
|
| 135 | + print $langs->trans("VATIntraSyntaxIsValid").': <font class="ok">'.$langs->trans("Yes").'</font><br>'; |
|
| 136 | + print $langs->trans("ValueIsValid").': '; |
|
| 137 | + if (preg_match('/MS_UNAVAILABLE/i',$result['faultstring'])) |
|
| 138 | + { |
|
| 139 | + print '<font class="error">'.$langs->trans("ErrorVATCheckMS_UNAVAILABLE",$countryCode).'</font><br>'; |
|
| 140 | + } |
|
| 141 | + else |
|
| 142 | + { |
|
| 143 | + if (! empty($result['valid']) && ($result['valid']==1 || $result['valid']=='true')) |
|
| 144 | + { |
|
| 145 | + print '<font class="ok">'.$langs->trans("Yes").'</font>'; |
|
| 146 | + print '<br>'; |
|
| 147 | + print $langs->trans("Name").': '.$result['name'].'<br>'; |
|
| 148 | + print $langs->trans("Address").': '.$result['address'].'<br>'; |
|
| 149 | + } |
|
| 150 | + else |
|
| 151 | + { |
|
| 152 | + print '<font class="error">'.$langs->trans("No").'</font>'; |
|
| 153 | + print '<br>'."\n"; |
|
| 154 | + } |
|
| 155 | + } |
|
| 156 | + } |
|
| 157 | + |
|
| 158 | + // Show log data into page |
|
| 159 | + print "\n"; |
|
| 160 | + print '<!-- '; |
|
| 161 | + var_dump($result); |
|
| 162 | + print '-->'; |
|
| 163 | 163 | } |
| 164 | 164 | |
| 165 | 165 | print '<br>'; |
@@ -169,9 +169,9 @@ discard block |
||
| 169 | 169 | |
| 170 | 170 | if ($messagetoshow) |
| 171 | 171 | { |
| 172 | - print '<br><br>'; |
|
| 173 | - print "\n".'Error returned:<br>'; |
|
| 174 | - print nl2br($messagetoshow); |
|
| 172 | + print '<br><br>'; |
|
| 173 | + print "\n".'Error returned:<br>'; |
|
| 174 | + print nl2br($messagetoshow); |
|
| 175 | 175 | } |
| 176 | 176 | |
| 177 | 177 | // End of page |
@@ -71,17 +71,17 @@ discard block |
||
| 71 | 71 | |
| 72 | 72 | if (! empty($conf->stripe->enabled)) |
| 73 | 73 | { |
| 74 | - $service = 'StripeTest'; |
|
| 75 | - $servicestatus = 0; |
|
| 76 | - if (! empty($conf->global->STRIPE_LIVE) && ! GETPOST('forcesandbox','alpha')) |
|
| 77 | - { |
|
| 78 | - $service = 'StripeLive'; |
|
| 79 | - $servicestatus = 1; |
|
| 80 | - } |
|
| 81 | - |
|
| 82 | - $stripe = new Stripe($db); |
|
| 83 | - $stripeacc = $stripe->getStripeAccount($service); // Get Stripe OAuth connect account (no network access here) |
|
| 84 | - $stripecu = $stripe->getStripeCustomerAccount($object->id, $servicestatus); // Get remote Stripe customer 'cus_...' (no network access here) |
|
| 74 | + $service = 'StripeTest'; |
|
| 75 | + $servicestatus = 0; |
|
| 76 | + if (! empty($conf->global->STRIPE_LIVE) && ! GETPOST('forcesandbox','alpha')) |
|
| 77 | + { |
|
| 78 | + $service = 'StripeLive'; |
|
| 79 | + $servicestatus = 1; |
|
| 80 | + } |
|
| 81 | + |
|
| 82 | + $stripe = new Stripe($db); |
|
| 83 | + $stripeacc = $stripe->getStripeAccount($service); // Get Stripe OAuth connect account (no network access here) |
|
| 84 | + $stripecu = $stripe->getStripeCustomerAccount($object->id, $servicestatus); // Get remote Stripe customer 'cus_...' (no network access here) |
|
| 85 | 85 | } |
| 86 | 86 | |
| 87 | 87 | |
@@ -92,7 +92,7 @@ discard block |
||
| 92 | 92 | |
| 93 | 93 | if ($cancel) |
| 94 | 94 | { |
| 95 | - $action=''; |
|
| 95 | + $action=''; |
|
| 96 | 96 | } |
| 97 | 97 | |
| 98 | 98 | $parameters=array('id'=>$socid, 'objcanvas'=>$objcanvas); |
@@ -101,546 +101,546 @@ discard block |
||
| 101 | 101 | |
| 102 | 102 | if (empty($reshook)) |
| 103 | 103 | { |
| 104 | - if ($cancel) |
|
| 105 | - { |
|
| 106 | - $action=''; |
|
| 107 | - if (! empty($backtopage)) |
|
| 108 | - { |
|
| 109 | - header("Location: ".$backtopage); |
|
| 110 | - exit; |
|
| 111 | - } |
|
| 112 | - } |
|
| 113 | - |
|
| 114 | - if ($action == 'update') |
|
| 115 | - { |
|
| 116 | - // Modification |
|
| 117 | - if (! GETPOST('label','alpha') || ! GETPOST('bank','alpha')) |
|
| 118 | - { |
|
| 119 | - if (! GETPOST('label','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label")), null, 'errors'); |
|
| 120 | - if (! GETPOST('bank','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BankName")), null, 'errors'); |
|
| 121 | - $action='edit'; |
|
| 122 | - $error++; |
|
| 123 | - } |
|
| 124 | - if ($companybankaccount->needIBAN() == 1) |
|
| 125 | - { |
|
| 126 | - if (! GETPOST('iban')) |
|
| 127 | - { |
|
| 128 | - setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("IBAN")), null, 'errors'); |
|
| 129 | - $action='edit'; |
|
| 130 | - $error++; |
|
| 131 | - } |
|
| 132 | - if (! GETPOST('bic')) |
|
| 133 | - { |
|
| 134 | - setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BIC")), null, 'errors'); |
|
| 135 | - $action='edit'; |
|
| 136 | - $error++; |
|
| 137 | - } |
|
| 138 | - } |
|
| 139 | - |
|
| 140 | - $companybankaccount->fetch($id); |
|
| 141 | - if (! $error) |
|
| 142 | - { |
|
| 143 | - $companybankaccount->socid = $object->id; |
|
| 144 | - |
|
| 145 | - $companybankaccount->bank = GETPOST('bank','alpha'); |
|
| 146 | - $companybankaccount->label = GETPOST('label','alpha'); |
|
| 147 | - $companybankaccount->courant = GETPOST('courant','alpha'); |
|
| 148 | - $companybankaccount->clos = GETPOST('clos','alpha'); |
|
| 149 | - $companybankaccount->code_banque = GETPOST('code_banque','alpha'); |
|
| 150 | - $companybankaccount->code_guichet = GETPOST('code_guichet','alpha'); |
|
| 151 | - $companybankaccount->number = GETPOST('number','alpha'); |
|
| 152 | - $companybankaccount->cle_rib = GETPOST('cle_rib','alpha'); |
|
| 153 | - $companybankaccount->bic = GETPOST('bic','alpha'); |
|
| 154 | - $companybankaccount->iban = GETPOST('iban','alpha'); |
|
| 155 | - $companybankaccount->domiciliation = GETPOST('domiciliation','alpha'); |
|
| 156 | - $companybankaccount->proprio = GETPOST('proprio','alpha'); |
|
| 157 | - $companybankaccount->owner_address = GETPOST('owner_address','alpha'); |
|
| 158 | - $companybankaccount->frstrecur = GETPOST('frstrecur','alpha'); |
|
| 159 | - $companybankaccount->rum = GETPOST('rum','alpha'); |
|
| 160 | - if (empty($companybankaccount->rum)) |
|
| 161 | - { |
|
| 162 | - $companybankaccount->rum = $prelevement->buildRumNumber($object->code_client, $companybankaccount->datec, $companybankaccount->id); |
|
| 163 | - $companybankaccount->date_rum = dol_now(); |
|
| 164 | - } |
|
| 165 | - |
|
| 166 | - $result = $companybankaccount->update($user); |
|
| 167 | - if (! $result) |
|
| 168 | - { |
|
| 169 | - setEventMessages($companybankaccount->error, $companybankaccount->errors, 'errors'); |
|
| 170 | - } |
|
| 171 | - else |
|
| 172 | - { |
|
| 173 | - // If this account is the default bank account, we disable others |
|
| 174 | - if ($companybankaccount->default_rib) |
|
| 175 | - { |
|
| 176 | - $companybankaccount->setAsDefault($id); // This will make sure there is only one default rib |
|
| 177 | - } |
|
| 178 | - |
|
| 179 | - $url=$_SERVER["PHP_SELF"].'?socid='.$object->id; |
|
| 180 | - header('Location: '.$url); |
|
| 181 | - exit; |
|
| 182 | - } |
|
| 183 | - } |
|
| 184 | - } |
|
| 185 | - |
|
| 186 | - if ($action == 'updatecard') |
|
| 187 | - { |
|
| 188 | - // Modification |
|
| 189 | - if (! GETPOST('label','alpha') || ! GETPOST('proprio','alpha') || ! GETPOST('cardnumber','alpha') || ! GETPOST('exp_date_month','alpha') || ! GETPOST('exp_date_year','alpha') || ! GETPOST('cvn','alpha')) |
|
| 190 | - { |
|
| 191 | - if (! GETPOST('label','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label")), null, 'errors'); |
|
| 192 | - if (! GETPOST('proprio','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("NameOnCard")), null, 'errors'); |
|
| 193 | - if (! GETPOST('cardnumber','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("CardNumber")), null, 'errors'); |
|
| 194 | - if (! (GETPOST('exp_date_month','alpha') > 0) || ! (GETPOST('exp_date_year','alpha') > 0)) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("ExpiryDate")), null, 'errors'); |
|
| 195 | - if (! GETPOST('cvn','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("CVN")), null, 'errors'); |
|
| 196 | - $action='createcard'; |
|
| 197 | - $error++; |
|
| 198 | - } |
|
| 199 | - |
|
| 200 | - $companypaymentmode->fetch($id); |
|
| 201 | - if (! $error) |
|
| 202 | - { |
|
| 203 | - $companypaymentmode->fk_soc = $object->id; |
|
| 204 | - |
|
| 205 | - $companypaymentmode->bank = GETPOST('bank','alpha'); |
|
| 206 | - $companypaymentmode->label = GETPOST('label','alpha'); |
|
| 207 | - $companypaymentmode->number = GETPOST('cardnumber','alpha'); |
|
| 208 | - $companypaymentmode->last_four = substr(GETPOST('cardnumber','alpha'), -4); |
|
| 209 | - $companypaymentmode->proprio = GETPOST('proprio','alpha'); |
|
| 210 | - $companypaymentmode->exp_date_month = GETPOST('exp_date_month','int'); |
|
| 211 | - $companypaymentmode->exp_date_year = GETPOST('exp_date_year','int'); |
|
| 212 | - $companypaymentmode->cvn = GETPOST('cvn','alpha'); |
|
| 213 | - $companypaymentmode->country_code = $object->country_code; |
|
| 214 | - |
|
| 215 | - $companypaymentmode->stripe_card_ref = GETPOST('stripe_card_ref','alpha'); |
|
| 216 | - |
|
| 217 | - $result = $companypaymentmode->update($user); |
|
| 218 | - if (! $result) |
|
| 219 | - { |
|
| 220 | - setEventMessages($companypaymentmode->error, $companypaymentmode->errors, 'errors'); |
|
| 221 | - } |
|
| 222 | - else |
|
| 223 | - { |
|
| 224 | - // If this account is the default bank account, we disable others |
|
| 225 | - if ($companypaymentmode->default_rib) |
|
| 226 | - { |
|
| 227 | - $companypaymentmode->setAsDefault($id); // This will make sure there is only one default rib |
|
| 228 | - } |
|
| 229 | - |
|
| 230 | - $url=$_SERVER["PHP_SELF"].'?socid='.$object->id; |
|
| 231 | - header('Location: '.$url); |
|
| 232 | - exit; |
|
| 233 | - } |
|
| 234 | - } |
|
| 235 | - } |
|
| 236 | - |
|
| 237 | - if ($action == 'add') |
|
| 238 | - { |
|
| 239 | - $error=0; |
|
| 240 | - |
|
| 241 | - if (! GETPOST('label','alpha') || ! GETPOST('bank','alpha')) |
|
| 242 | - { |
|
| 243 | - if (! GETPOST('label','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label")), null, 'errors'); |
|
| 244 | - if (! GETPOST('bank','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BankName")), null, 'errors'); |
|
| 245 | - $action='create'; |
|
| 246 | - $error++; |
|
| 247 | - } |
|
| 248 | - |
|
| 249 | - if (! $error) |
|
| 250 | - { |
|
| 251 | - // Ajout |
|
| 252 | - $companybankaccount = new CompanyBankAccount($db); |
|
| 253 | - |
|
| 254 | - $companybankaccount->socid = $object->id; |
|
| 255 | - |
|
| 256 | - $companybankaccount->bank = GETPOST('bank','alpha'); |
|
| 257 | - $companybankaccount->label = GETPOST('label','alpha'); |
|
| 258 | - $companybankaccount->courant = GETPOST('courant','alpha'); |
|
| 259 | - $companybankaccount->clos = GETPOST('clos','alpha'); |
|
| 260 | - $companybankaccount->code_banque = GETPOST('code_banque','alpha'); |
|
| 261 | - $companybankaccount->code_guichet = GETPOST('code_guichet','alpha'); |
|
| 262 | - $companybankaccount->number = GETPOST('number','alpha'); |
|
| 263 | - $companybankaccount->cle_rib = GETPOST('cle_rib','alpha'); |
|
| 264 | - $companybankaccount->bic = GETPOST('bic','alpha'); |
|
| 265 | - $companybankaccount->iban = GETPOST('iban','alpha'); |
|
| 266 | - $companybankaccount->domiciliation = GETPOST('domiciliation','alpha'); |
|
| 267 | - $companybankaccount->proprio = GETPOST('proprio','alpha'); |
|
| 268 | - $companybankaccount->owner_address = GETPOST('owner_address','alpha'); |
|
| 269 | - $companybankaccount->frstrecur = GETPOST('frstrecur'); |
|
| 270 | - $companybankaccount->rum = GETPOST('rum','alpha'); |
|
| 271 | - $companybankaccount->datec = dol_now(); |
|
| 272 | - $companybankaccount->status = 1; |
|
| 273 | - |
|
| 274 | - $db->begin(); |
|
| 275 | - |
|
| 276 | - // This test can be done only once properties were set |
|
| 277 | - if ($companybankaccount->needIBAN() == 1) |
|
| 278 | - { |
|
| 279 | - if (! GETPOST('iban')) |
|
| 280 | - { |
|
| 281 | - setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("IBAN")), null, 'errors'); |
|
| 282 | - $action='create'; |
|
| 283 | - $error++; |
|
| 284 | - } |
|
| 285 | - if (! GETPOST('bic')) |
|
| 286 | - { |
|
| 287 | - setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BIC")), null, 'errors'); |
|
| 288 | - $action='create'; |
|
| 289 | - $error++; |
|
| 290 | - } |
|
| 291 | - } |
|
| 292 | - |
|
| 293 | - if (! $error) |
|
| 294 | - { |
|
| 295 | - $result = $companybankaccount->create($user); |
|
| 296 | - if ($result < 0) |
|
| 297 | - { |
|
| 298 | - $error++; |
|
| 299 | - setEventMessages($companybankaccount->error, $companybankaccount->errors, 'errors'); |
|
| 300 | - $action='create'; // Force chargement page création |
|
| 301 | - } |
|
| 302 | - |
|
| 303 | - if (empty($companybankaccount->rum)) |
|
| 304 | - { |
|
| 305 | - $companybankaccount->rum = $prelevement->buildRumNumber($object->code_client, $companybankaccount->datec, $companybankaccount->id); |
|
| 306 | - $companybankaccount->date_rum = dol_now(); |
|
| 307 | - } |
|
| 308 | - } |
|
| 309 | - |
|
| 310 | - if (! $error) |
|
| 311 | - { |
|
| 312 | - $result = $companybankaccount->update($user); // This will set the UMR number. |
|
| 313 | - if ($result < 0) |
|
| 314 | - { |
|
| 315 | - $error++; |
|
| 316 | - setEventMessages($companybankaccount->error, $companybankaccount->errors, 'errors'); |
|
| 317 | - $action='create'; |
|
| 318 | - } |
|
| 319 | - } |
|
| 320 | - |
|
| 321 | - if (! $error) |
|
| 322 | - { |
|
| 323 | - $db->commit(); |
|
| 324 | - |
|
| 325 | - $url=$_SERVER["PHP_SELF"].'?socid='.$object->id; |
|
| 326 | - header('Location: '.$url); |
|
| 327 | - exit; |
|
| 328 | - } |
|
| 329 | - else |
|
| 330 | - { |
|
| 331 | - $db->rollback(); |
|
| 332 | - } |
|
| 333 | - } |
|
| 334 | - } |
|
| 335 | - |
|
| 336 | - if ($action == 'addcard') |
|
| 337 | - { |
|
| 338 | - $error=0; |
|
| 339 | - |
|
| 340 | - if (! GETPOST('label','alpha') || ! GETPOST('proprio','alpha') || ! GETPOST('cardnumber','alpha') || ! GETPOST('exp_date_month','alpha') || ! GETPOST('exp_date_year','alpha') || ! GETPOST('cvn','alpha')) |
|
| 341 | - { |
|
| 342 | - if (! GETPOST('label','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label")), null, 'errors'); |
|
| 343 | - if (! GETPOST('proprio','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("NameOnCard")), null, 'errors'); |
|
| 344 | - if (! GETPOST('cardnumber','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("CardNumber")), null, 'errors'); |
|
| 345 | - if (! (GETPOST('exp_date_month','alpha') > 0) || ! (GETPOST('exp_date_year','alpha') > 0)) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("ExpiryDate")), null, 'errors'); |
|
| 346 | - if (! GETPOST('cvn','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("CVN")), null, 'errors'); |
|
| 347 | - $action='createcard'; |
|
| 348 | - $error++; |
|
| 349 | - } |
|
| 350 | - |
|
| 351 | - if (! $error) |
|
| 352 | - { |
|
| 353 | - // Ajout |
|
| 354 | - $companypaymentmode = new CompanyPaymentMode($db); |
|
| 355 | - |
|
| 356 | - $companypaymentmode->fk_soc = $object->id; |
|
| 357 | - $companypaymentmode->bank = GETPOST('bank','alpha'); |
|
| 358 | - $companypaymentmode->label = GETPOST('label','alpha'); |
|
| 359 | - $companypaymentmode->number = GETPOST('cardnumber','alpha'); |
|
| 360 | - $companypaymentmode->last_four = substr(GETPOST('cardnumber','alpha'), -4); |
|
| 361 | - $companypaymentmode->proprio = GETPOST('proprio','alpha'); |
|
| 362 | - $companypaymentmode->exp_date_month = GETPOST('exp_date_month','int'); |
|
| 363 | - $companypaymentmode->exp_date_year = GETPOST('exp_date_year','int'); |
|
| 364 | - $companypaymentmode->cvn = GETPOST('cvn','alpha'); |
|
| 365 | - $companypaymentmode->datec = dol_now(); |
|
| 366 | - $companypaymentmode->default_rib = 0; |
|
| 367 | - $companypaymentmode->type = 'card'; |
|
| 368 | - $companypaymentmode->country_code = $object->country_code; |
|
| 369 | - $companypaymentmode->status = $servicestatus; |
|
| 370 | - |
|
| 371 | - $companypaymentmode->stripe_card_ref = GETPOST('stripe_card_ref','alpha'); |
|
| 372 | - |
|
| 373 | - $db->begin(); |
|
| 374 | - |
|
| 375 | - if (! $error) |
|
| 376 | - { |
|
| 377 | - $result = $companypaymentmode->create($user); |
|
| 378 | - if ($result < 0) |
|
| 379 | - { |
|
| 380 | - $error++; |
|
| 381 | - setEventMessages($companypaymentmode->error, $companypaymentmode->errors, 'errors'); |
|
| 382 | - $action='createcard'; // Force chargement page création |
|
| 383 | - } |
|
| 384 | - } |
|
| 385 | - |
|
| 386 | - if (! $error) |
|
| 387 | - { |
|
| 388 | - $db->commit(); |
|
| 389 | - |
|
| 390 | - $url=$_SERVER["PHP_SELF"].'?socid='.$object->id; |
|
| 391 | - header('Location: '.$url); |
|
| 392 | - exit; |
|
| 393 | - } |
|
| 394 | - else |
|
| 395 | - { |
|
| 396 | - $db->rollback(); |
|
| 397 | - } |
|
| 398 | - } |
|
| 399 | - } |
|
| 400 | - |
|
| 401 | - if ($action == 'setasbankdefault' && GETPOST('ribid','int') > 0) |
|
| 402 | - { |
|
| 403 | - $companybankaccount = new CompanyBankAccount($db); |
|
| 404 | - $res = $companybankaccount->setAsDefault(GETPOST('ribid','int')); |
|
| 405 | - if ($res) |
|
| 406 | - { |
|
| 407 | - $url=DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id; |
|
| 408 | - header('Location: '.$url); |
|
| 409 | - exit; |
|
| 410 | - } |
|
| 411 | - else |
|
| 412 | - { |
|
| 413 | - setEventMessages($db->lasterror, null, 'errors'); |
|
| 414 | - } |
|
| 415 | - } |
|
| 416 | - |
|
| 417 | - if ($action == 'confirm_deletecard' && GETPOST('confirm','alpha') == 'yes') |
|
| 418 | - { |
|
| 419 | - $companypaymentmode = new CompanyPaymentMode($db); |
|
| 420 | - if ($companypaymentmode->fetch($ribid?$ribid:$id)) |
|
| 421 | - { |
|
| 422 | - $result = $companypaymentmode->delete($user); |
|
| 423 | - if ($result > 0) |
|
| 424 | - { |
|
| 425 | - $url = $_SERVER['PHP_SELF']."?socid=".$object->id; |
|
| 426 | - header('Location: '.$url); |
|
| 427 | - exit; |
|
| 428 | - } |
|
| 429 | - else |
|
| 430 | - { |
|
| 431 | - setEventMessages($companypaymentmode->error, $companypaymentmode->errors, 'errors'); |
|
| 432 | - } |
|
| 433 | - } |
|
| 434 | - else |
|
| 435 | - { |
|
| 436 | - setEventMessages($companypaymentmode->error, $companypaymentmode->errors, 'errors'); |
|
| 437 | - } |
|
| 438 | - } |
|
| 439 | - if ($action == 'confirm_delete' && GETPOST('confirm','alpha') == 'yes') |
|
| 440 | - { |
|
| 441 | - $companybankaccount = new CompanyBankAccount($db); |
|
| 442 | - if ($companybankaccount->fetch($ribid?$ribid:$id)) |
|
| 443 | - { |
|
| 444 | - $result = $companybankaccount->delete($user); |
|
| 445 | - if ($result > 0) |
|
| 446 | - { |
|
| 447 | - $url = $_SERVER['PHP_SELF']."?socid=".$object->id; |
|
| 448 | - header('Location: '.$url); |
|
| 449 | - exit; |
|
| 450 | - } |
|
| 451 | - else |
|
| 452 | - { |
|
| 453 | - setEventMessages($companybankaccount->error, $companybankaccount->errors, 'errors'); |
|
| 454 | - } |
|
| 455 | - } |
|
| 456 | - else |
|
| 457 | - { |
|
| 458 | - setEventMessages($companybankaccount->error, $companybankaccount->errors, 'errors'); |
|
| 459 | - } |
|
| 460 | - } |
|
| 461 | - |
|
| 462 | - $savid=$id; |
|
| 463 | - |
|
| 464 | - // Actions to build doc |
|
| 465 | - if ($action == 'builddocrib') |
|
| 466 | - { |
|
| 467 | - $action = 'builddoc'; |
|
| 468 | - $moreparams = array( |
|
| 469 | - 'use_companybankid'=>GETPOST('companybankid'), |
|
| 470 | - 'force_dir_output'=>$conf->societe->multidir_output[$object->entity].'/'.dol_sanitizeFileName($object->id) |
|
| 471 | - ); |
|
| 472 | - $_POST['lang_id'] = GETPOST('lang_idrib'.GETPOST('companybankid','int'), 'alpha'); |
|
| 473 | - $_POST['model'] = GETPOST('modelrib'.GETPOST('companybankid','int'), 'alpha'); |
|
| 474 | - } |
|
| 475 | - |
|
| 476 | - $id = $socid; |
|
| 477 | - $upload_dir = $conf->societe->multidir_output[$object->entity]; |
|
| 478 | - $permissioncreate=$user->rights->societe->creer; |
|
| 479 | - include DOL_DOCUMENT_ROOT.'/core/actions_builddoc.inc.php'; |
|
| 480 | - |
|
| 481 | - $id = $savid; |
|
| 482 | - |
|
| 483 | - // Action for stripe |
|
| 484 | - if (! empty($conf->stripe->enabled) && class_exists('Stripe')) |
|
| 485 | - { |
|
| 486 | - if ($action == 'synccustomertostripe') |
|
| 487 | - { |
|
| 488 | - if ($object->client == 0) |
|
| 489 | - { |
|
| 490 | - $error++; |
|
| 491 | - setEventMessages('ThisThirdpartyIsNotACustomer', null, 'errors'); |
|
| 492 | - } |
|
| 493 | - else |
|
| 494 | - { |
|
| 495 | - // Creation of Stripe customer + update of societe_account |
|
| 496 | - $cu = $stripe->customerStripe($object, $stripeacc, $servicestatus, 1); |
|
| 497 | - if (! $cu) |
|
| 498 | - { |
|
| 499 | - $error++; |
|
| 500 | - setEventMessages($stripe->error, $stripe->errors, 'errors'); |
|
| 501 | - } |
|
| 502 | - else |
|
| 503 | - { |
|
| 504 | - $stripecu = $cu->id; |
|
| 505 | - } |
|
| 506 | - } |
|
| 507 | - } |
|
| 508 | - if ($action == 'synccardtostripe') |
|
| 509 | - { |
|
| 510 | - $companypaymentmode = new CompanyPaymentMode($db); |
|
| 511 | - $companypaymentmode->fetch($id); |
|
| 512 | - |
|
| 513 | - if ($companypaymentmode->type != 'card') |
|
| 514 | - { |
|
| 515 | - $error++; |
|
| 516 | - setEventMessages('ThisPaymentModeIsNotACard', null, 'errors'); |
|
| 517 | - } |
|
| 518 | - else |
|
| 519 | - { |
|
| 520 | - // Get the Stripe customer |
|
| 521 | - $cu = $stripe->customerStripe($object, $stripeacc, $servicestatus); |
|
| 522 | - if (! $cu) |
|
| 523 | - { |
|
| 524 | - $error++; |
|
| 525 | - setEventMessages($stripe->error, $stripe->errors, 'errors'); |
|
| 526 | - } |
|
| 527 | - |
|
| 528 | - if (! $error) |
|
| 529 | - { |
|
| 530 | - // Creation of Stripe card + update of societe_account |
|
| 531 | - $card = $stripe->cardStripe($cu, $companypaymentmode, $stripeacc, $servicestatus, 1); |
|
| 532 | - if (! $card) |
|
| 533 | - { |
|
| 534 | - $error++; |
|
| 535 | - setEventMessages($stripe->error, $stripe->errors, 'errors'); |
|
| 536 | - } |
|
| 537 | - else |
|
| 538 | - { |
|
| 539 | - $stripecard = $card->id; |
|
| 540 | - } |
|
| 541 | - } |
|
| 542 | - } |
|
| 543 | - } |
|
| 544 | - |
|
| 545 | - if ($action == 'setkey_account') |
|
| 546 | - { |
|
| 547 | - $error = 0; |
|
| 548 | - |
|
| 549 | - $newcu = GETPOST('key_account', 'alpha'); |
|
| 550 | - |
|
| 551 | - $db->begin(); |
|
| 104 | + if ($cancel) |
|
| 105 | + { |
|
| 106 | + $action=''; |
|
| 107 | + if (! empty($backtopage)) |
|
| 108 | + { |
|
| 109 | + header("Location: ".$backtopage); |
|
| 110 | + exit; |
|
| 111 | + } |
|
| 112 | + } |
|
| 113 | + |
|
| 114 | + if ($action == 'update') |
|
| 115 | + { |
|
| 116 | + // Modification |
|
| 117 | + if (! GETPOST('label','alpha') || ! GETPOST('bank','alpha')) |
|
| 118 | + { |
|
| 119 | + if (! GETPOST('label','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label")), null, 'errors'); |
|
| 120 | + if (! GETPOST('bank','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BankName")), null, 'errors'); |
|
| 121 | + $action='edit'; |
|
| 122 | + $error++; |
|
| 123 | + } |
|
| 124 | + if ($companybankaccount->needIBAN() == 1) |
|
| 125 | + { |
|
| 126 | + if (! GETPOST('iban')) |
|
| 127 | + { |
|
| 128 | + setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("IBAN")), null, 'errors'); |
|
| 129 | + $action='edit'; |
|
| 130 | + $error++; |
|
| 131 | + } |
|
| 132 | + if (! GETPOST('bic')) |
|
| 133 | + { |
|
| 134 | + setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BIC")), null, 'errors'); |
|
| 135 | + $action='edit'; |
|
| 136 | + $error++; |
|
| 137 | + } |
|
| 138 | + } |
|
| 139 | + |
|
| 140 | + $companybankaccount->fetch($id); |
|
| 141 | + if (! $error) |
|
| 142 | + { |
|
| 143 | + $companybankaccount->socid = $object->id; |
|
| 144 | + |
|
| 145 | + $companybankaccount->bank = GETPOST('bank','alpha'); |
|
| 146 | + $companybankaccount->label = GETPOST('label','alpha'); |
|
| 147 | + $companybankaccount->courant = GETPOST('courant','alpha'); |
|
| 148 | + $companybankaccount->clos = GETPOST('clos','alpha'); |
|
| 149 | + $companybankaccount->code_banque = GETPOST('code_banque','alpha'); |
|
| 150 | + $companybankaccount->code_guichet = GETPOST('code_guichet','alpha'); |
|
| 151 | + $companybankaccount->number = GETPOST('number','alpha'); |
|
| 152 | + $companybankaccount->cle_rib = GETPOST('cle_rib','alpha'); |
|
| 153 | + $companybankaccount->bic = GETPOST('bic','alpha'); |
|
| 154 | + $companybankaccount->iban = GETPOST('iban','alpha'); |
|
| 155 | + $companybankaccount->domiciliation = GETPOST('domiciliation','alpha'); |
|
| 156 | + $companybankaccount->proprio = GETPOST('proprio','alpha'); |
|
| 157 | + $companybankaccount->owner_address = GETPOST('owner_address','alpha'); |
|
| 158 | + $companybankaccount->frstrecur = GETPOST('frstrecur','alpha'); |
|
| 159 | + $companybankaccount->rum = GETPOST('rum','alpha'); |
|
| 160 | + if (empty($companybankaccount->rum)) |
|
| 161 | + { |
|
| 162 | + $companybankaccount->rum = $prelevement->buildRumNumber($object->code_client, $companybankaccount->datec, $companybankaccount->id); |
|
| 163 | + $companybankaccount->date_rum = dol_now(); |
|
| 164 | + } |
|
| 165 | + |
|
| 166 | + $result = $companybankaccount->update($user); |
|
| 167 | + if (! $result) |
|
| 168 | + { |
|
| 169 | + setEventMessages($companybankaccount->error, $companybankaccount->errors, 'errors'); |
|
| 170 | + } |
|
| 171 | + else |
|
| 172 | + { |
|
| 173 | + // If this account is the default bank account, we disable others |
|
| 174 | + if ($companybankaccount->default_rib) |
|
| 175 | + { |
|
| 176 | + $companybankaccount->setAsDefault($id); // This will make sure there is only one default rib |
|
| 177 | + } |
|
| 178 | + |
|
| 179 | + $url=$_SERVER["PHP_SELF"].'?socid='.$object->id; |
|
| 180 | + header('Location: '.$url); |
|
| 181 | + exit; |
|
| 182 | + } |
|
| 183 | + } |
|
| 184 | + } |
|
| 185 | + |
|
| 186 | + if ($action == 'updatecard') |
|
| 187 | + { |
|
| 188 | + // Modification |
|
| 189 | + if (! GETPOST('label','alpha') || ! GETPOST('proprio','alpha') || ! GETPOST('cardnumber','alpha') || ! GETPOST('exp_date_month','alpha') || ! GETPOST('exp_date_year','alpha') || ! GETPOST('cvn','alpha')) |
|
| 190 | + { |
|
| 191 | + if (! GETPOST('label','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label")), null, 'errors'); |
|
| 192 | + if (! GETPOST('proprio','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("NameOnCard")), null, 'errors'); |
|
| 193 | + if (! GETPOST('cardnumber','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("CardNumber")), null, 'errors'); |
|
| 194 | + if (! (GETPOST('exp_date_month','alpha') > 0) || ! (GETPOST('exp_date_year','alpha') > 0)) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("ExpiryDate")), null, 'errors'); |
|
| 195 | + if (! GETPOST('cvn','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("CVN")), null, 'errors'); |
|
| 196 | + $action='createcard'; |
|
| 197 | + $error++; |
|
| 198 | + } |
|
| 199 | + |
|
| 200 | + $companypaymentmode->fetch($id); |
|
| 201 | + if (! $error) |
|
| 202 | + { |
|
| 203 | + $companypaymentmode->fk_soc = $object->id; |
|
| 204 | + |
|
| 205 | + $companypaymentmode->bank = GETPOST('bank','alpha'); |
|
| 206 | + $companypaymentmode->label = GETPOST('label','alpha'); |
|
| 207 | + $companypaymentmode->number = GETPOST('cardnumber','alpha'); |
|
| 208 | + $companypaymentmode->last_four = substr(GETPOST('cardnumber','alpha'), -4); |
|
| 209 | + $companypaymentmode->proprio = GETPOST('proprio','alpha'); |
|
| 210 | + $companypaymentmode->exp_date_month = GETPOST('exp_date_month','int'); |
|
| 211 | + $companypaymentmode->exp_date_year = GETPOST('exp_date_year','int'); |
|
| 212 | + $companypaymentmode->cvn = GETPOST('cvn','alpha'); |
|
| 213 | + $companypaymentmode->country_code = $object->country_code; |
|
| 214 | + |
|
| 215 | + $companypaymentmode->stripe_card_ref = GETPOST('stripe_card_ref','alpha'); |
|
| 216 | + |
|
| 217 | + $result = $companypaymentmode->update($user); |
|
| 218 | + if (! $result) |
|
| 219 | + { |
|
| 220 | + setEventMessages($companypaymentmode->error, $companypaymentmode->errors, 'errors'); |
|
| 221 | + } |
|
| 222 | + else |
|
| 223 | + { |
|
| 224 | + // If this account is the default bank account, we disable others |
|
| 225 | + if ($companypaymentmode->default_rib) |
|
| 226 | + { |
|
| 227 | + $companypaymentmode->setAsDefault($id); // This will make sure there is only one default rib |
|
| 228 | + } |
|
| 229 | + |
|
| 230 | + $url=$_SERVER["PHP_SELF"].'?socid='.$object->id; |
|
| 231 | + header('Location: '.$url); |
|
| 232 | + exit; |
|
| 233 | + } |
|
| 234 | + } |
|
| 235 | + } |
|
| 236 | + |
|
| 237 | + if ($action == 'add') |
|
| 238 | + { |
|
| 239 | + $error=0; |
|
| 240 | + |
|
| 241 | + if (! GETPOST('label','alpha') || ! GETPOST('bank','alpha')) |
|
| 242 | + { |
|
| 243 | + if (! GETPOST('label','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label")), null, 'errors'); |
|
| 244 | + if (! GETPOST('bank','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BankName")), null, 'errors'); |
|
| 245 | + $action='create'; |
|
| 246 | + $error++; |
|
| 247 | + } |
|
| 248 | + |
|
| 249 | + if (! $error) |
|
| 250 | + { |
|
| 251 | + // Ajout |
|
| 252 | + $companybankaccount = new CompanyBankAccount($db); |
|
| 253 | + |
|
| 254 | + $companybankaccount->socid = $object->id; |
|
| 255 | + |
|
| 256 | + $companybankaccount->bank = GETPOST('bank','alpha'); |
|
| 257 | + $companybankaccount->label = GETPOST('label','alpha'); |
|
| 258 | + $companybankaccount->courant = GETPOST('courant','alpha'); |
|
| 259 | + $companybankaccount->clos = GETPOST('clos','alpha'); |
|
| 260 | + $companybankaccount->code_banque = GETPOST('code_banque','alpha'); |
|
| 261 | + $companybankaccount->code_guichet = GETPOST('code_guichet','alpha'); |
|
| 262 | + $companybankaccount->number = GETPOST('number','alpha'); |
|
| 263 | + $companybankaccount->cle_rib = GETPOST('cle_rib','alpha'); |
|
| 264 | + $companybankaccount->bic = GETPOST('bic','alpha'); |
|
| 265 | + $companybankaccount->iban = GETPOST('iban','alpha'); |
|
| 266 | + $companybankaccount->domiciliation = GETPOST('domiciliation','alpha'); |
|
| 267 | + $companybankaccount->proprio = GETPOST('proprio','alpha'); |
|
| 268 | + $companybankaccount->owner_address = GETPOST('owner_address','alpha'); |
|
| 269 | + $companybankaccount->frstrecur = GETPOST('frstrecur'); |
|
| 270 | + $companybankaccount->rum = GETPOST('rum','alpha'); |
|
| 271 | + $companybankaccount->datec = dol_now(); |
|
| 272 | + $companybankaccount->status = 1; |
|
| 273 | + |
|
| 274 | + $db->begin(); |
|
| 275 | + |
|
| 276 | + // This test can be done only once properties were set |
|
| 277 | + if ($companybankaccount->needIBAN() == 1) |
|
| 278 | + { |
|
| 279 | + if (! GETPOST('iban')) |
|
| 280 | + { |
|
| 281 | + setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("IBAN")), null, 'errors'); |
|
| 282 | + $action='create'; |
|
| 283 | + $error++; |
|
| 284 | + } |
|
| 285 | + if (! GETPOST('bic')) |
|
| 286 | + { |
|
| 287 | + setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BIC")), null, 'errors'); |
|
| 288 | + $action='create'; |
|
| 289 | + $error++; |
|
| 290 | + } |
|
| 291 | + } |
|
| 292 | + |
|
| 293 | + if (! $error) |
|
| 294 | + { |
|
| 295 | + $result = $companybankaccount->create($user); |
|
| 296 | + if ($result < 0) |
|
| 297 | + { |
|
| 298 | + $error++; |
|
| 299 | + setEventMessages($companybankaccount->error, $companybankaccount->errors, 'errors'); |
|
| 300 | + $action='create'; // Force chargement page création |
|
| 301 | + } |
|
| 302 | + |
|
| 303 | + if (empty($companybankaccount->rum)) |
|
| 304 | + { |
|
| 305 | + $companybankaccount->rum = $prelevement->buildRumNumber($object->code_client, $companybankaccount->datec, $companybankaccount->id); |
|
| 306 | + $companybankaccount->date_rum = dol_now(); |
|
| 307 | + } |
|
| 308 | + } |
|
| 309 | + |
|
| 310 | + if (! $error) |
|
| 311 | + { |
|
| 312 | + $result = $companybankaccount->update($user); // This will set the UMR number. |
|
| 313 | + if ($result < 0) |
|
| 314 | + { |
|
| 315 | + $error++; |
|
| 316 | + setEventMessages($companybankaccount->error, $companybankaccount->errors, 'errors'); |
|
| 317 | + $action='create'; |
|
| 318 | + } |
|
| 319 | + } |
|
| 320 | + |
|
| 321 | + if (! $error) |
|
| 322 | + { |
|
| 323 | + $db->commit(); |
|
| 324 | + |
|
| 325 | + $url=$_SERVER["PHP_SELF"].'?socid='.$object->id; |
|
| 326 | + header('Location: '.$url); |
|
| 327 | + exit; |
|
| 328 | + } |
|
| 329 | + else |
|
| 330 | + { |
|
| 331 | + $db->rollback(); |
|
| 332 | + } |
|
| 333 | + } |
|
| 334 | + } |
|
| 335 | + |
|
| 336 | + if ($action == 'addcard') |
|
| 337 | + { |
|
| 338 | + $error=0; |
|
| 339 | + |
|
| 340 | + if (! GETPOST('label','alpha') || ! GETPOST('proprio','alpha') || ! GETPOST('cardnumber','alpha') || ! GETPOST('exp_date_month','alpha') || ! GETPOST('exp_date_year','alpha') || ! GETPOST('cvn','alpha')) |
|
| 341 | + { |
|
| 342 | + if (! GETPOST('label','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label")), null, 'errors'); |
|
| 343 | + if (! GETPOST('proprio','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("NameOnCard")), null, 'errors'); |
|
| 344 | + if (! GETPOST('cardnumber','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("CardNumber")), null, 'errors'); |
|
| 345 | + if (! (GETPOST('exp_date_month','alpha') > 0) || ! (GETPOST('exp_date_year','alpha') > 0)) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("ExpiryDate")), null, 'errors'); |
|
| 346 | + if (! GETPOST('cvn','alpha')) setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("CVN")), null, 'errors'); |
|
| 347 | + $action='createcard'; |
|
| 348 | + $error++; |
|
| 349 | + } |
|
| 350 | + |
|
| 351 | + if (! $error) |
|
| 352 | + { |
|
| 353 | + // Ajout |
|
| 354 | + $companypaymentmode = new CompanyPaymentMode($db); |
|
| 355 | + |
|
| 356 | + $companypaymentmode->fk_soc = $object->id; |
|
| 357 | + $companypaymentmode->bank = GETPOST('bank','alpha'); |
|
| 358 | + $companypaymentmode->label = GETPOST('label','alpha'); |
|
| 359 | + $companypaymentmode->number = GETPOST('cardnumber','alpha'); |
|
| 360 | + $companypaymentmode->last_four = substr(GETPOST('cardnumber','alpha'), -4); |
|
| 361 | + $companypaymentmode->proprio = GETPOST('proprio','alpha'); |
|
| 362 | + $companypaymentmode->exp_date_month = GETPOST('exp_date_month','int'); |
|
| 363 | + $companypaymentmode->exp_date_year = GETPOST('exp_date_year','int'); |
|
| 364 | + $companypaymentmode->cvn = GETPOST('cvn','alpha'); |
|
| 365 | + $companypaymentmode->datec = dol_now(); |
|
| 366 | + $companypaymentmode->default_rib = 0; |
|
| 367 | + $companypaymentmode->type = 'card'; |
|
| 368 | + $companypaymentmode->country_code = $object->country_code; |
|
| 369 | + $companypaymentmode->status = $servicestatus; |
|
| 370 | + |
|
| 371 | + $companypaymentmode->stripe_card_ref = GETPOST('stripe_card_ref','alpha'); |
|
| 372 | + |
|
| 373 | + $db->begin(); |
|
| 374 | + |
|
| 375 | + if (! $error) |
|
| 376 | + { |
|
| 377 | + $result = $companypaymentmode->create($user); |
|
| 378 | + if ($result < 0) |
|
| 379 | + { |
|
| 380 | + $error++; |
|
| 381 | + setEventMessages($companypaymentmode->error, $companypaymentmode->errors, 'errors'); |
|
| 382 | + $action='createcard'; // Force chargement page création |
|
| 383 | + } |
|
| 384 | + } |
|
| 385 | + |
|
| 386 | + if (! $error) |
|
| 387 | + { |
|
| 388 | + $db->commit(); |
|
| 389 | + |
|
| 390 | + $url=$_SERVER["PHP_SELF"].'?socid='.$object->id; |
|
| 391 | + header('Location: '.$url); |
|
| 392 | + exit; |
|
| 393 | + } |
|
| 394 | + else |
|
| 395 | + { |
|
| 396 | + $db->rollback(); |
|
| 397 | + } |
|
| 398 | + } |
|
| 399 | + } |
|
| 400 | + |
|
| 401 | + if ($action == 'setasbankdefault' && GETPOST('ribid','int') > 0) |
|
| 402 | + { |
|
| 403 | + $companybankaccount = new CompanyBankAccount($db); |
|
| 404 | + $res = $companybankaccount->setAsDefault(GETPOST('ribid','int')); |
|
| 405 | + if ($res) |
|
| 406 | + { |
|
| 407 | + $url=DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id; |
|
| 408 | + header('Location: '.$url); |
|
| 409 | + exit; |
|
| 410 | + } |
|
| 411 | + else |
|
| 412 | + { |
|
| 413 | + setEventMessages($db->lasterror, null, 'errors'); |
|
| 414 | + } |
|
| 415 | + } |
|
| 416 | + |
|
| 417 | + if ($action == 'confirm_deletecard' && GETPOST('confirm','alpha') == 'yes') |
|
| 418 | + { |
|
| 419 | + $companypaymentmode = new CompanyPaymentMode($db); |
|
| 420 | + if ($companypaymentmode->fetch($ribid?$ribid:$id)) |
|
| 421 | + { |
|
| 422 | + $result = $companypaymentmode->delete($user); |
|
| 423 | + if ($result > 0) |
|
| 424 | + { |
|
| 425 | + $url = $_SERVER['PHP_SELF']."?socid=".$object->id; |
|
| 426 | + header('Location: '.$url); |
|
| 427 | + exit; |
|
| 428 | + } |
|
| 429 | + else |
|
| 430 | + { |
|
| 431 | + setEventMessages($companypaymentmode->error, $companypaymentmode->errors, 'errors'); |
|
| 432 | + } |
|
| 433 | + } |
|
| 434 | + else |
|
| 435 | + { |
|
| 436 | + setEventMessages($companypaymentmode->error, $companypaymentmode->errors, 'errors'); |
|
| 437 | + } |
|
| 438 | + } |
|
| 439 | + if ($action == 'confirm_delete' && GETPOST('confirm','alpha') == 'yes') |
|
| 440 | + { |
|
| 441 | + $companybankaccount = new CompanyBankAccount($db); |
|
| 442 | + if ($companybankaccount->fetch($ribid?$ribid:$id)) |
|
| 443 | + { |
|
| 444 | + $result = $companybankaccount->delete($user); |
|
| 445 | + if ($result > 0) |
|
| 446 | + { |
|
| 447 | + $url = $_SERVER['PHP_SELF']."?socid=".$object->id; |
|
| 448 | + header('Location: '.$url); |
|
| 449 | + exit; |
|
| 450 | + } |
|
| 451 | + else |
|
| 452 | + { |
|
| 453 | + setEventMessages($companybankaccount->error, $companybankaccount->errors, 'errors'); |
|
| 454 | + } |
|
| 455 | + } |
|
| 456 | + else |
|
| 457 | + { |
|
| 458 | + setEventMessages($companybankaccount->error, $companybankaccount->errors, 'errors'); |
|
| 459 | + } |
|
| 460 | + } |
|
| 461 | + |
|
| 462 | + $savid=$id; |
|
| 463 | + |
|
| 464 | + // Actions to build doc |
|
| 465 | + if ($action == 'builddocrib') |
|
| 466 | + { |
|
| 467 | + $action = 'builddoc'; |
|
| 468 | + $moreparams = array( |
|
| 469 | + 'use_companybankid'=>GETPOST('companybankid'), |
|
| 470 | + 'force_dir_output'=>$conf->societe->multidir_output[$object->entity].'/'.dol_sanitizeFileName($object->id) |
|
| 471 | + ); |
|
| 472 | + $_POST['lang_id'] = GETPOST('lang_idrib'.GETPOST('companybankid','int'), 'alpha'); |
|
| 473 | + $_POST['model'] = GETPOST('modelrib'.GETPOST('companybankid','int'), 'alpha'); |
|
| 474 | + } |
|
| 475 | + |
|
| 476 | + $id = $socid; |
|
| 477 | + $upload_dir = $conf->societe->multidir_output[$object->entity]; |
|
| 478 | + $permissioncreate=$user->rights->societe->creer; |
|
| 479 | + include DOL_DOCUMENT_ROOT.'/core/actions_builddoc.inc.php'; |
|
| 480 | + |
|
| 481 | + $id = $savid; |
|
| 482 | + |
|
| 483 | + // Action for stripe |
|
| 484 | + if (! empty($conf->stripe->enabled) && class_exists('Stripe')) |
|
| 485 | + { |
|
| 486 | + if ($action == 'synccustomertostripe') |
|
| 487 | + { |
|
| 488 | + if ($object->client == 0) |
|
| 489 | + { |
|
| 490 | + $error++; |
|
| 491 | + setEventMessages('ThisThirdpartyIsNotACustomer', null, 'errors'); |
|
| 492 | + } |
|
| 493 | + else |
|
| 494 | + { |
|
| 495 | + // Creation of Stripe customer + update of societe_account |
|
| 496 | + $cu = $stripe->customerStripe($object, $stripeacc, $servicestatus, 1); |
|
| 497 | + if (! $cu) |
|
| 498 | + { |
|
| 499 | + $error++; |
|
| 500 | + setEventMessages($stripe->error, $stripe->errors, 'errors'); |
|
| 501 | + } |
|
| 502 | + else |
|
| 503 | + { |
|
| 504 | + $stripecu = $cu->id; |
|
| 505 | + } |
|
| 506 | + } |
|
| 507 | + } |
|
| 508 | + if ($action == 'synccardtostripe') |
|
| 509 | + { |
|
| 510 | + $companypaymentmode = new CompanyPaymentMode($db); |
|
| 511 | + $companypaymentmode->fetch($id); |
|
| 512 | + |
|
| 513 | + if ($companypaymentmode->type != 'card') |
|
| 514 | + { |
|
| 515 | + $error++; |
|
| 516 | + setEventMessages('ThisPaymentModeIsNotACard', null, 'errors'); |
|
| 517 | + } |
|
| 518 | + else |
|
| 519 | + { |
|
| 520 | + // Get the Stripe customer |
|
| 521 | + $cu = $stripe->customerStripe($object, $stripeacc, $servicestatus); |
|
| 522 | + if (! $cu) |
|
| 523 | + { |
|
| 524 | + $error++; |
|
| 525 | + setEventMessages($stripe->error, $stripe->errors, 'errors'); |
|
| 526 | + } |
|
| 527 | + |
|
| 528 | + if (! $error) |
|
| 529 | + { |
|
| 530 | + // Creation of Stripe card + update of societe_account |
|
| 531 | + $card = $stripe->cardStripe($cu, $companypaymentmode, $stripeacc, $servicestatus, 1); |
|
| 532 | + if (! $card) |
|
| 533 | + { |
|
| 534 | + $error++; |
|
| 535 | + setEventMessages($stripe->error, $stripe->errors, 'errors'); |
|
| 536 | + } |
|
| 537 | + else |
|
| 538 | + { |
|
| 539 | + $stripecard = $card->id; |
|
| 540 | + } |
|
| 541 | + } |
|
| 542 | + } |
|
| 543 | + } |
|
| 544 | + |
|
| 545 | + if ($action == 'setkey_account') |
|
| 546 | + { |
|
| 547 | + $error = 0; |
|
| 548 | + |
|
| 549 | + $newcu = GETPOST('key_account', 'alpha'); |
|
| 550 | + |
|
| 551 | + $db->begin(); |
|
| 552 | 552 | |
| 553 | 553 | if (empty($newcu)) { |
| 554 | 554 | $sql = "DELETE FROM ".MAIN_DB_PREFIX."societe_account WHERE site = 'stripe' AND fk_soc = ".$object->id." AND status = ".$servicestatus." AND entity = ".$conf->entity; |
| 555 | 555 | } else { |
| 556 | - $sql = 'UPDATE '.MAIN_DB_PREFIX."societe_account"; |
|
| 557 | - $sql.= " SET key_account = '".$db->escape(GETPOST('key_account', 'alpha'))."'"; |
|
| 558 | - $sql.= " WHERE site = 'stripe' AND fk_soc = ".$object->id." AND status = ".$servicestatus." AND entity = ".$conf->entity; // Keep = here for entity. Only 1 record must be modified ! |
|
| 556 | + $sql = 'UPDATE '.MAIN_DB_PREFIX."societe_account"; |
|
| 557 | + $sql.= " SET key_account = '".$db->escape(GETPOST('key_account', 'alpha'))."'"; |
|
| 558 | + $sql.= " WHERE site = 'stripe' AND fk_soc = ".$object->id." AND status = ".$servicestatus." AND entity = ".$conf->entity; // Keep = here for entity. Only 1 record must be modified ! |
|
| 559 | 559 | } |
| 560 | 560 | |
| 561 | - $resql = $db->query($sql); |
|
| 562 | - $num = $db->num_rows($resql); |
|
| 563 | - if (empty($num) && !empty($newcu)) |
|
| 564 | - { |
|
| 565 | - $societeaccount = new SocieteAccount($db); |
|
| 566 | - $societeaccount->fk_soc = $object->id; |
|
| 567 | - $societeaccount->login = ''; |
|
| 568 | - $societeaccount->pass_encoding = ''; |
|
| 569 | - $societeaccount->site = 'stripe'; |
|
| 570 | - $societeaccount->status = $servicestatus; |
|
| 571 | - $societeaccount->key_account = $newcu; |
|
| 572 | - $result = $societeaccount->create($user); |
|
| 573 | - if ($result < 0) |
|
| 574 | - { |
|
| 575 | - $error++; |
|
| 576 | - } |
|
| 577 | - } |
|
| 578 | - |
|
| 579 | - if (! $error) |
|
| 580 | - { |
|
| 581 | - $stripecu = $newcu; |
|
| 582 | - $db->commit(); |
|
| 583 | - } |
|
| 584 | - else |
|
| 585 | - { |
|
| 586 | - $db->rollback(); |
|
| 587 | - } |
|
| 588 | - } |
|
| 589 | - if ($action == 'setlocalassourcedefault') |
|
| 590 | - { |
|
| 591 | - try { |
|
| 592 | - $companypaymentmode->setAsDefault($id); |
|
| 593 | - |
|
| 594 | - $url=DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id; |
|
| 595 | - header('Location: '.$url); |
|
| 596 | - exit; |
|
| 597 | - } |
|
| 598 | - catch(Exception $e) |
|
| 599 | - { |
|
| 600 | - $error++; |
|
| 601 | - setEventMessages($e->getMessage(), null, 'errors'); |
|
| 602 | - } |
|
| 603 | - } |
|
| 604 | - elseif ($action == 'setassourcedefault') |
|
| 605 | - { |
|
| 606 | - try { |
|
| 607 | - $cu=$stripe->customerStripe($object, $stripeacc, $servicestatus); |
|
| 608 | - $cu->default_source = (string) $source; |
|
| 609 | - $result = $cu->save(); |
|
| 610 | - |
|
| 611 | - $url=DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id; |
|
| 612 | - header('Location: '.$url); |
|
| 613 | - exit; |
|
| 614 | - } |
|
| 615 | - catch(Exception $e) |
|
| 616 | - { |
|
| 617 | - $error++; |
|
| 618 | - setEventMessages($e->getMessage(), null, 'errors'); |
|
| 619 | - } |
|
| 620 | - } |
|
| 621 | - elseif ($action == 'deletecard' && $source) |
|
| 622 | - { |
|
| 623 | - try { |
|
| 624 | - $cu=$stripe->customerStripe($object, $stripeacc, $servicestatus); |
|
| 625 | - $card=$cu->sources->retrieve("$source"); |
|
| 626 | - if ($card) |
|
| 627 | - { |
|
| 628 | - // $card->detach(); Does not work with card_, only with src_ |
|
| 629 | - if (method_exists($card, 'detach')) $card->detach(); |
|
| 630 | - else $card->delete(); |
|
| 631 | - } |
|
| 632 | - |
|
| 633 | - $url=DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id; |
|
| 634 | - header('Location: '.$url); |
|
| 635 | - exit; |
|
| 636 | - } |
|
| 637 | - catch(Exception $e) |
|
| 638 | - { |
|
| 639 | - $error++; |
|
| 640 | - setEventMessages($e->getMessage(), null, 'errors'); |
|
| 641 | - } |
|
| 642 | - } |
|
| 643 | - } |
|
| 561 | + $resql = $db->query($sql); |
|
| 562 | + $num = $db->num_rows($resql); |
|
| 563 | + if (empty($num) && !empty($newcu)) |
|
| 564 | + { |
|
| 565 | + $societeaccount = new SocieteAccount($db); |
|
| 566 | + $societeaccount->fk_soc = $object->id; |
|
| 567 | + $societeaccount->login = ''; |
|
| 568 | + $societeaccount->pass_encoding = ''; |
|
| 569 | + $societeaccount->site = 'stripe'; |
|
| 570 | + $societeaccount->status = $servicestatus; |
|
| 571 | + $societeaccount->key_account = $newcu; |
|
| 572 | + $result = $societeaccount->create($user); |
|
| 573 | + if ($result < 0) |
|
| 574 | + { |
|
| 575 | + $error++; |
|
| 576 | + } |
|
| 577 | + } |
|
| 578 | + |
|
| 579 | + if (! $error) |
|
| 580 | + { |
|
| 581 | + $stripecu = $newcu; |
|
| 582 | + $db->commit(); |
|
| 583 | + } |
|
| 584 | + else |
|
| 585 | + { |
|
| 586 | + $db->rollback(); |
|
| 587 | + } |
|
| 588 | + } |
|
| 589 | + if ($action == 'setlocalassourcedefault') |
|
| 590 | + { |
|
| 591 | + try { |
|
| 592 | + $companypaymentmode->setAsDefault($id); |
|
| 593 | + |
|
| 594 | + $url=DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id; |
|
| 595 | + header('Location: '.$url); |
|
| 596 | + exit; |
|
| 597 | + } |
|
| 598 | + catch(Exception $e) |
|
| 599 | + { |
|
| 600 | + $error++; |
|
| 601 | + setEventMessages($e->getMessage(), null, 'errors'); |
|
| 602 | + } |
|
| 603 | + } |
|
| 604 | + elseif ($action == 'setassourcedefault') |
|
| 605 | + { |
|
| 606 | + try { |
|
| 607 | + $cu=$stripe->customerStripe($object, $stripeacc, $servicestatus); |
|
| 608 | + $cu->default_source = (string) $source; |
|
| 609 | + $result = $cu->save(); |
|
| 610 | + |
|
| 611 | + $url=DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id; |
|
| 612 | + header('Location: '.$url); |
|
| 613 | + exit; |
|
| 614 | + } |
|
| 615 | + catch(Exception $e) |
|
| 616 | + { |
|
| 617 | + $error++; |
|
| 618 | + setEventMessages($e->getMessage(), null, 'errors'); |
|
| 619 | + } |
|
| 620 | + } |
|
| 621 | + elseif ($action == 'deletecard' && $source) |
|
| 622 | + { |
|
| 623 | + try { |
|
| 624 | + $cu=$stripe->customerStripe($object, $stripeacc, $servicestatus); |
|
| 625 | + $card=$cu->sources->retrieve("$source"); |
|
| 626 | + if ($card) |
|
| 627 | + { |
|
| 628 | + // $card->detach(); Does not work with card_, only with src_ |
|
| 629 | + if (method_exists($card, 'detach')) $card->detach(); |
|
| 630 | + else $card->delete(); |
|
| 631 | + } |
|
| 632 | + |
|
| 633 | + $url=DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id; |
|
| 634 | + header('Location: '.$url); |
|
| 635 | + exit; |
|
| 636 | + } |
|
| 637 | + catch(Exception $e) |
|
| 638 | + { |
|
| 639 | + $error++; |
|
| 640 | + setEventMessages($e->getMessage(), null, 'errors'); |
|
| 641 | + } |
|
| 642 | + } |
|
| 643 | + } |
|
| 644 | 644 | } |
| 645 | 645 | |
| 646 | 646 | |
@@ -664,217 +664,217 @@ discard block |
||
| 664 | 664 | }*/ |
| 665 | 665 | if (! empty($conf->stripe->enabled) && (empty($conf->global->STRIPE_LIVE) || GETPOST('forcesandbox','alpha'))) |
| 666 | 666 | { |
| 667 | - dol_htmloutput_mesg($langs->trans('YouAreCurrentlyInSandboxMode','Stripe'),'','warning'); |
|
| 667 | + dol_htmloutput_mesg($langs->trans('YouAreCurrentlyInSandboxMode','Stripe'),'','warning'); |
|
| 668 | 668 | } |
| 669 | 669 | |
| 670 | 670 | // Load Bank account |
| 671 | 671 | if (! $id) |
| 672 | 672 | { |
| 673 | - $companybankaccount->fetch(0, $object->id); |
|
| 674 | - $companypaymentmode->fetch(0, null, $object->id, 'card'); |
|
| 673 | + $companybankaccount->fetch(0, $object->id); |
|
| 674 | + $companypaymentmode->fetch(0, null, $object->id, 'card'); |
|
| 675 | 675 | } |
| 676 | 676 | else |
| 677 | 677 | { |
| 678 | - $companybankaccount->fetch($id); |
|
| 679 | - $companypaymentmode->fetch($id); |
|
| 678 | + $companybankaccount->fetch($id); |
|
| 679 | + $companypaymentmode->fetch($id); |
|
| 680 | 680 | } |
| 681 | 681 | if (empty($companybankaccount->socid)) $companybankaccount->socid=$object->id; |
| 682 | 682 | |
| 683 | 683 | if ($socid && ($action == 'edit' || $action == 'editcard') && $user->rights->societe->creer) |
| 684 | 684 | { |
| 685 | - print '<form action="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'" method="post">'; |
|
| 686 | - print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; |
|
| 687 | - $actionforadd='update'; |
|
| 688 | - if ($action == 'editcard') $actionforadd='updatecard'; |
|
| 689 | - print '<input type="hidden" name="action" value="'.$actionforadd.'">'; |
|
| 690 | - print '<input type="hidden" name="id" value="'.GETPOST("id","int").'">'; |
|
| 685 | + print '<form action="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'" method="post">'; |
|
| 686 | + print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; |
|
| 687 | + $actionforadd='update'; |
|
| 688 | + if ($action == 'editcard') $actionforadd='updatecard'; |
|
| 689 | + print '<input type="hidden" name="action" value="'.$actionforadd.'">'; |
|
| 690 | + print '<input type="hidden" name="id" value="'.GETPOST("id","int").'">'; |
|
| 691 | 691 | } |
| 692 | 692 | if ($socid && ($action == 'create' || $action == 'createcard') && $user->rights->societe->creer) |
| 693 | 693 | { |
| 694 | - print '<form action="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'" method="post">'; |
|
| 695 | - print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; |
|
| 696 | - $actionforadd='add'; |
|
| 697 | - if ($action == 'createcard') $actionforadd='addcard'; |
|
| 698 | - print '<input type="hidden" name="action" value="'.$actionforadd.'">'; |
|
| 694 | + print '<form action="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'" method="post">'; |
|
| 695 | + print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; |
|
| 696 | + $actionforadd='add'; |
|
| 697 | + if ($action == 'createcard') $actionforadd='addcard'; |
|
| 698 | + print '<input type="hidden" name="action" value="'.$actionforadd.'">'; |
|
| 699 | 699 | } |
| 700 | 700 | |
| 701 | 701 | |
| 702 | 702 | // View |
| 703 | 703 | if ($socid && $action != 'edit' && $action != 'create' && $action != 'editcard' && $action != 'createcard') |
| 704 | 704 | { |
| 705 | - dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"), -1, 'company'); |
|
| 706 | - |
|
| 707 | - // Confirm delete ban |
|
| 708 | - if ($action == 'delete') |
|
| 709 | - { |
|
| 710 | - print $form->formconfirm($_SERVER["PHP_SELF"]."?socid=".$object->id."&ribid=".($ribid?$ribid:$id), $langs->trans("DeleteARib"), $langs->trans("ConfirmDeleteRib", $companybankaccount->getRibLabel()), "confirm_delete", '', 0, 1); |
|
| 711 | - } |
|
| 712 | - // Confirm delete card |
|
| 713 | - if ($action == 'deletecard') |
|
| 714 | - { |
|
| 715 | - print $form->formconfirm($_SERVER["PHP_SELF"]."?socid=".$object->id."&ribid=".($ribid?$ribid:$id), $langs->trans("DeleteACard"), $langs->trans("ConfirmDeleteCard", $companybankaccount->getRibLabel()), "confirm_deletecard", '', 0, 1); |
|
| 716 | - } |
|
| 717 | - |
|
| 718 | - $linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>'; |
|
| 719 | - |
|
| 720 | - dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom'); |
|
| 721 | - |
|
| 722 | - |
|
| 723 | - if (! empty($conf->global->SOCIETE_USEPREFIX)) // Old not used prefix field |
|
| 724 | - { |
|
| 725 | - print '<tr><td class="titlefield">'.$langs->trans('Prefix').'</td><td colspan="3">'.$object->prefix_comm.'</td></tr>'; |
|
| 726 | - } |
|
| 727 | - |
|
| 728 | - //if ($conf->agenda->enabled && $user->rights->agenda->myactions->read) $elementTypeArray['action']=$langs->transnoentitiesnoconv('Events'); |
|
| 729 | - |
|
| 730 | - print '<div class="fichecenter">'; |
|
| 731 | - |
|
| 732 | - print '<div class="underbanner clearboth"></div>'; |
|
| 733 | - print '<table class="border tableforfield" width="100%">'; |
|
| 734 | - |
|
| 735 | - if ($object->client) |
|
| 736 | - { |
|
| 737 | - print '<tr><td class="titlefield">'; |
|
| 738 | - print $langs->trans('CustomerCode').'</td><td colspan="2">'; |
|
| 739 | - print $object->code_client; |
|
| 740 | - if ($object->check_codeclient() <> 0) print ' <font class="error">('.$langs->trans("WrongCustomerCode").')</font>'; |
|
| 741 | - print '</td></tr>'; |
|
| 742 | - $sql = "SELECT count(*) as nb from ".MAIN_DB_PREFIX."facture where fk_soc = ".$socid; |
|
| 743 | - $resql=$db->query($sql); |
|
| 744 | - if (!$resql) dol_print_error($db); |
|
| 745 | - |
|
| 746 | - $obj = $db->fetch_object($resql); |
|
| 747 | - $nbFactsClient = $obj->nb; |
|
| 748 | - $thirdTypeArray['customer']=$langs->trans("customer"); |
|
| 749 | - if ($conf->propal->enabled && $user->rights->propal->lire) $elementTypeArray['propal']=$langs->transnoentitiesnoconv('Proposals'); |
|
| 750 | - if ($conf->commande->enabled && $user->rights->commande->lire) $elementTypeArray['order']=$langs->transnoentitiesnoconv('Orders'); |
|
| 751 | - if ($conf->facture->enabled && $user->rights->facture->lire) $elementTypeArray['invoice']=$langs->transnoentitiesnoconv('Invoices'); |
|
| 752 | - if ($conf->contrat->enabled && $user->rights->contrat->lire) $elementTypeArray['contract']=$langs->transnoentitiesnoconv('Contracts'); |
|
| 753 | - } |
|
| 754 | - |
|
| 755 | - if (! empty($conf->stripe->enabled)) |
|
| 756 | - { |
|
| 757 | - $permissiontowrite = $user->rights->societe->creer; |
|
| 758 | - // Stripe customer key 'cu_....' stored into llx_societe_account |
|
| 759 | - print '<tr><td class="titlefield">'; |
|
| 760 | - //print $langs->trans('StripeCustomerId'); |
|
| 761 | - print $form->editfieldkey("StripeCustomerId", 'key_account', $stripecu, $object, $permissiontowrite, 'string', '', 0, 2, 'socid'); |
|
| 762 | - print '</td><td>'; |
|
| 763 | - //print $stripecu; |
|
| 764 | - print $form->editfieldval("StripeCustomerId", 'key_account', $stripecu, $object, $permissiontowrite, 'string', '', null, null, '', 2, '', 'socid'); |
|
| 765 | - if ($stripecu && $action != 'editkey_account') |
|
| 766 | - { |
|
| 767 | - if (! empty($conf->stripe->enabled) && !empty($stripeacc)) $connect=$stripeacc.'/'; |
|
| 768 | - $url='https://dashboard.stripe.com/'.$connect.'test/customers/'.$stripecu; |
|
| 769 | - if ($servicestatus) |
|
| 770 | - { |
|
| 771 | - $url='https://dashboard.stripe.com/'.$connect.'customers/'.$stripecu; |
|
| 772 | - } |
|
| 773 | - print ' <a href="'.$url.'" target="_stripe">'.img_picto($langs->trans('ShowInStripe'), 'object_globe').'</a>'; |
|
| 774 | - } |
|
| 775 | - print '</td><td align="right">'; |
|
| 776 | - if (empty($stripecu)) |
|
| 777 | - { |
|
| 778 | - print '<form action="'.$_SERVER["PHP_SELF"].'" method="post">'; |
|
| 779 | - print '<input type="hidden" name="action" value="synccustomertostripe">'; |
|
| 780 | - print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; |
|
| 781 | - print '<input type="hidden" name="socid" value="'.$object->id.'">'; |
|
| 782 | - print '<input type="hidden" name="companybankid" value="'.$rib->id.'">'; |
|
| 783 | - print '<input type="submit" class="button" name="syncstripecustomer" value="'.$langs->trans("CreateCustomerOnStripe").'">'; |
|
| 784 | - print '</form>'; |
|
| 785 | - } |
|
| 786 | - print '</td></tr>'; |
|
| 787 | - } |
|
| 788 | - |
|
| 789 | - print '</table>'; |
|
| 790 | - print '</div>'; |
|
| 791 | - |
|
| 792 | - dol_fiche_end(); |
|
| 793 | - |
|
| 794 | - print '<br>'; |
|
| 795 | - |
|
| 796 | - // List of Stripe payment modes |
|
| 797 | - if (! (empty($conf->stripe->enabled))) |
|
| 798 | - { |
|
| 799 | - $morehtmlright=''; |
|
| 800 | - if (! empty($conf->global->STRIPE_ALLOW_LOCAL_CARD)) |
|
| 801 | - { |
|
| 802 | - $morehtmlright='<a class="butActionNew" href="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'&action=createcard">'.$langs->trans("Add").' <span class="fa fa-plus-circle valignmiddle"></span></a>'; |
|
| 803 | - } |
|
| 804 | - print load_fiche_titre($langs->trans('StripePaymentModes').($stripeacc?' (Stripe connection with StripeConnect account '.$stripeacc.')':' (Stripe connection with keys from Stripe module setup)'), $morehtmlright, ''); |
|
| 805 | - |
|
| 806 | - $listofsources = array(); |
|
| 807 | - if (is_object($stripe)) |
|
| 808 | - { |
|
| 809 | - try { |
|
| 810 | - $customerstripe=$stripe->customerStripe($object, $stripeacc, $servicestatus); |
|
| 811 | - if ($customerstripe->id) { |
|
| 812 | - $listofsources=$customerstripe->sources->data; |
|
| 813 | - } |
|
| 814 | - } |
|
| 815 | - catch(Exception $e) |
|
| 816 | - { |
|
| 817 | - dol_syslog("Error when searching/loading Stripe customer for thirdparty id =".$object->id); |
|
| 818 | - } |
|
| 819 | - } |
|
| 820 | - |
|
| 821 | - print '<div class="div-table-responsive-no-min">'; // You can use div-table-responsive-no-min if you dont need reserved height for your table |
|
| 822 | - print '<table class="liste" width="100%">'."\n"; |
|
| 823 | - print '<tr class="liste_titre">'; |
|
| 824 | - if (! empty($conf->global->STRIPE_ALLOW_LOCAL_CARD)) |
|
| 825 | - { |
|
| 826 | - print '<td>'.$langs->trans('LocalID').'</td>'; |
|
| 827 | - } |
|
| 828 | - print '<td>'.$langs->trans('StripeID').'</td>'; |
|
| 829 | - print '<td>'.$langs->trans('Type').'</td>'; |
|
| 830 | - print '<td>'.$langs->trans('Informations').'</td>'; |
|
| 831 | - print '<td></td>'; |
|
| 832 | - print '<td align="center">'.$langs->trans('Default').'</td>'; |
|
| 833 | - print '<td>'.$langs->trans('Note').'</td>'; |
|
| 834 | - print '<td>'.$langs->trans('DateModification').'</td>'; |
|
| 835 | - print "<td></td>"; |
|
| 836 | - print "</tr>\n"; |
|
| 837 | - |
|
| 838 | - $nbremote = 0; |
|
| 839 | - $nblocal = 0; |
|
| 840 | - $arrayofstripecard = array(); |
|
| 841 | - |
|
| 842 | - // Show local sources |
|
| 843 | - if (! empty($conf->global->STRIPE_ALLOW_LOCAL_CARD)) |
|
| 844 | - { |
|
| 845 | - //$societeaccount = new SocieteAccount($db); |
|
| 846 | - $companypaymentmodetemp = new CompanyPaymentMode($db); |
|
| 847 | - |
|
| 848 | - $sql='SELECT rowid FROM '.MAIN_DB_PREFIX."societe_rib"; |
|
| 849 | - $sql.=" WHERE type in ('card', 'paypal')"; |
|
| 850 | - $sql.=" AND fk_soc = ".$object->id; |
|
| 851 | - $sql.=" AND status = ".$servicestatus; |
|
| 852 | - |
|
| 853 | - $resql = $db->query($sql); |
|
| 854 | - if ($resql) |
|
| 855 | - { |
|
| 856 | - $num_rows = $db->num_rows($resql); |
|
| 857 | - if ($num_rows) |
|
| 858 | - { |
|
| 859 | - $i=0; |
|
| 860 | - while ($i < $num_rows) |
|
| 861 | - { |
|
| 862 | - $nblocal++; |
|
| 863 | - |
|
| 864 | - $obj = $db->fetch_object($resql); |
|
| 865 | - if ($obj) |
|
| 866 | - { |
|
| 867 | - $companypaymentmodetemp->fetch($obj->rowid); |
|
| 868 | - |
|
| 869 | - $arrayofstripecard[$companypaymentmodetemp->stripe_card_ref]=$companypaymentmodetemp->stripe_card_ref; |
|
| 870 | - |
|
| 871 | - print '<tr>'; |
|
| 872 | - print '<td>'; |
|
| 873 | - print $companypaymentmodetemp->id; |
|
| 874 | - print '</td>'; |
|
| 875 | - print '<td>'; |
|
| 876 | - print $companypaymentmodetemp->stripe_card_ref; |
|
| 877 | - /*if ($companypaymentmodetemp->stripe_card_ref) |
|
| 705 | + dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"), -1, 'company'); |
|
| 706 | + |
|
| 707 | + // Confirm delete ban |
|
| 708 | + if ($action == 'delete') |
|
| 709 | + { |
|
| 710 | + print $form->formconfirm($_SERVER["PHP_SELF"]."?socid=".$object->id."&ribid=".($ribid?$ribid:$id), $langs->trans("DeleteARib"), $langs->trans("ConfirmDeleteRib", $companybankaccount->getRibLabel()), "confirm_delete", '', 0, 1); |
|
| 711 | + } |
|
| 712 | + // Confirm delete card |
|
| 713 | + if ($action == 'deletecard') |
|
| 714 | + { |
|
| 715 | + print $form->formconfirm($_SERVER["PHP_SELF"]."?socid=".$object->id."&ribid=".($ribid?$ribid:$id), $langs->trans("DeleteACard"), $langs->trans("ConfirmDeleteCard", $companybankaccount->getRibLabel()), "confirm_deletecard", '', 0, 1); |
|
| 716 | + } |
|
| 717 | + |
|
| 718 | + $linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>'; |
|
| 719 | + |
|
| 720 | + dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom'); |
|
| 721 | + |
|
| 722 | + |
|
| 723 | + if (! empty($conf->global->SOCIETE_USEPREFIX)) // Old not used prefix field |
|
| 724 | + { |
|
| 725 | + print '<tr><td class="titlefield">'.$langs->trans('Prefix').'</td><td colspan="3">'.$object->prefix_comm.'</td></tr>'; |
|
| 726 | + } |
|
| 727 | + |
|
| 728 | + //if ($conf->agenda->enabled && $user->rights->agenda->myactions->read) $elementTypeArray['action']=$langs->transnoentitiesnoconv('Events'); |
|
| 729 | + |
|
| 730 | + print '<div class="fichecenter">'; |
|
| 731 | + |
|
| 732 | + print '<div class="underbanner clearboth"></div>'; |
|
| 733 | + print '<table class="border tableforfield" width="100%">'; |
|
| 734 | + |
|
| 735 | + if ($object->client) |
|
| 736 | + { |
|
| 737 | + print '<tr><td class="titlefield">'; |
|
| 738 | + print $langs->trans('CustomerCode').'</td><td colspan="2">'; |
|
| 739 | + print $object->code_client; |
|
| 740 | + if ($object->check_codeclient() <> 0) print ' <font class="error">('.$langs->trans("WrongCustomerCode").')</font>'; |
|
| 741 | + print '</td></tr>'; |
|
| 742 | + $sql = "SELECT count(*) as nb from ".MAIN_DB_PREFIX."facture where fk_soc = ".$socid; |
|
| 743 | + $resql=$db->query($sql); |
|
| 744 | + if (!$resql) dol_print_error($db); |
|
| 745 | + |
|
| 746 | + $obj = $db->fetch_object($resql); |
|
| 747 | + $nbFactsClient = $obj->nb; |
|
| 748 | + $thirdTypeArray['customer']=$langs->trans("customer"); |
|
| 749 | + if ($conf->propal->enabled && $user->rights->propal->lire) $elementTypeArray['propal']=$langs->transnoentitiesnoconv('Proposals'); |
|
| 750 | + if ($conf->commande->enabled && $user->rights->commande->lire) $elementTypeArray['order']=$langs->transnoentitiesnoconv('Orders'); |
|
| 751 | + if ($conf->facture->enabled && $user->rights->facture->lire) $elementTypeArray['invoice']=$langs->transnoentitiesnoconv('Invoices'); |
|
| 752 | + if ($conf->contrat->enabled && $user->rights->contrat->lire) $elementTypeArray['contract']=$langs->transnoentitiesnoconv('Contracts'); |
|
| 753 | + } |
|
| 754 | + |
|
| 755 | + if (! empty($conf->stripe->enabled)) |
|
| 756 | + { |
|
| 757 | + $permissiontowrite = $user->rights->societe->creer; |
|
| 758 | + // Stripe customer key 'cu_....' stored into llx_societe_account |
|
| 759 | + print '<tr><td class="titlefield">'; |
|
| 760 | + //print $langs->trans('StripeCustomerId'); |
|
| 761 | + print $form->editfieldkey("StripeCustomerId", 'key_account', $stripecu, $object, $permissiontowrite, 'string', '', 0, 2, 'socid'); |
|
| 762 | + print '</td><td>'; |
|
| 763 | + //print $stripecu; |
|
| 764 | + print $form->editfieldval("StripeCustomerId", 'key_account', $stripecu, $object, $permissiontowrite, 'string', '', null, null, '', 2, '', 'socid'); |
|
| 765 | + if ($stripecu && $action != 'editkey_account') |
|
| 766 | + { |
|
| 767 | + if (! empty($conf->stripe->enabled) && !empty($stripeacc)) $connect=$stripeacc.'/'; |
|
| 768 | + $url='https://dashboard.stripe.com/'.$connect.'test/customers/'.$stripecu; |
|
| 769 | + if ($servicestatus) |
|
| 770 | + { |
|
| 771 | + $url='https://dashboard.stripe.com/'.$connect.'customers/'.$stripecu; |
|
| 772 | + } |
|
| 773 | + print ' <a href="'.$url.'" target="_stripe">'.img_picto($langs->trans('ShowInStripe'), 'object_globe').'</a>'; |
|
| 774 | + } |
|
| 775 | + print '</td><td align="right">'; |
|
| 776 | + if (empty($stripecu)) |
|
| 777 | + { |
|
| 778 | + print '<form action="'.$_SERVER["PHP_SELF"].'" method="post">'; |
|
| 779 | + print '<input type="hidden" name="action" value="synccustomertostripe">'; |
|
| 780 | + print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; |
|
| 781 | + print '<input type="hidden" name="socid" value="'.$object->id.'">'; |
|
| 782 | + print '<input type="hidden" name="companybankid" value="'.$rib->id.'">'; |
|
| 783 | + print '<input type="submit" class="button" name="syncstripecustomer" value="'.$langs->trans("CreateCustomerOnStripe").'">'; |
|
| 784 | + print '</form>'; |
|
| 785 | + } |
|
| 786 | + print '</td></tr>'; |
|
| 787 | + } |
|
| 788 | + |
|
| 789 | + print '</table>'; |
|
| 790 | + print '</div>'; |
|
| 791 | + |
|
| 792 | + dol_fiche_end(); |
|
| 793 | + |
|
| 794 | + print '<br>'; |
|
| 795 | + |
|
| 796 | + // List of Stripe payment modes |
|
| 797 | + if (! (empty($conf->stripe->enabled))) |
|
| 798 | + { |
|
| 799 | + $morehtmlright=''; |
|
| 800 | + if (! empty($conf->global->STRIPE_ALLOW_LOCAL_CARD)) |
|
| 801 | + { |
|
| 802 | + $morehtmlright='<a class="butActionNew" href="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'&action=createcard">'.$langs->trans("Add").' <span class="fa fa-plus-circle valignmiddle"></span></a>'; |
|
| 803 | + } |
|
| 804 | + print load_fiche_titre($langs->trans('StripePaymentModes').($stripeacc?' (Stripe connection with StripeConnect account '.$stripeacc.')':' (Stripe connection with keys from Stripe module setup)'), $morehtmlright, ''); |
|
| 805 | + |
|
| 806 | + $listofsources = array(); |
|
| 807 | + if (is_object($stripe)) |
|
| 808 | + { |
|
| 809 | + try { |
|
| 810 | + $customerstripe=$stripe->customerStripe($object, $stripeacc, $servicestatus); |
|
| 811 | + if ($customerstripe->id) { |
|
| 812 | + $listofsources=$customerstripe->sources->data; |
|
| 813 | + } |
|
| 814 | + } |
|
| 815 | + catch(Exception $e) |
|
| 816 | + { |
|
| 817 | + dol_syslog("Error when searching/loading Stripe customer for thirdparty id =".$object->id); |
|
| 818 | + } |
|
| 819 | + } |
|
| 820 | + |
|
| 821 | + print '<div class="div-table-responsive-no-min">'; // You can use div-table-responsive-no-min if you dont need reserved height for your table |
|
| 822 | + print '<table class="liste" width="100%">'."\n"; |
|
| 823 | + print '<tr class="liste_titre">'; |
|
| 824 | + if (! empty($conf->global->STRIPE_ALLOW_LOCAL_CARD)) |
|
| 825 | + { |
|
| 826 | + print '<td>'.$langs->trans('LocalID').'</td>'; |
|
| 827 | + } |
|
| 828 | + print '<td>'.$langs->trans('StripeID').'</td>'; |
|
| 829 | + print '<td>'.$langs->trans('Type').'</td>'; |
|
| 830 | + print '<td>'.$langs->trans('Informations').'</td>'; |
|
| 831 | + print '<td></td>'; |
|
| 832 | + print '<td align="center">'.$langs->trans('Default').'</td>'; |
|
| 833 | + print '<td>'.$langs->trans('Note').'</td>'; |
|
| 834 | + print '<td>'.$langs->trans('DateModification').'</td>'; |
|
| 835 | + print "<td></td>"; |
|
| 836 | + print "</tr>\n"; |
|
| 837 | + |
|
| 838 | + $nbremote = 0; |
|
| 839 | + $nblocal = 0; |
|
| 840 | + $arrayofstripecard = array(); |
|
| 841 | + |
|
| 842 | + // Show local sources |
|
| 843 | + if (! empty($conf->global->STRIPE_ALLOW_LOCAL_CARD)) |
|
| 844 | + { |
|
| 845 | + //$societeaccount = new SocieteAccount($db); |
|
| 846 | + $companypaymentmodetemp = new CompanyPaymentMode($db); |
|
| 847 | + |
|
| 848 | + $sql='SELECT rowid FROM '.MAIN_DB_PREFIX."societe_rib"; |
|
| 849 | + $sql.=" WHERE type in ('card', 'paypal')"; |
|
| 850 | + $sql.=" AND fk_soc = ".$object->id; |
|
| 851 | + $sql.=" AND status = ".$servicestatus; |
|
| 852 | + |
|
| 853 | + $resql = $db->query($sql); |
|
| 854 | + if ($resql) |
|
| 855 | + { |
|
| 856 | + $num_rows = $db->num_rows($resql); |
|
| 857 | + if ($num_rows) |
|
| 858 | + { |
|
| 859 | + $i=0; |
|
| 860 | + while ($i < $num_rows) |
|
| 861 | + { |
|
| 862 | + $nblocal++; |
|
| 863 | + |
|
| 864 | + $obj = $db->fetch_object($resql); |
|
| 865 | + if ($obj) |
|
| 866 | + { |
|
| 867 | + $companypaymentmodetemp->fetch($obj->rowid); |
|
| 868 | + |
|
| 869 | + $arrayofstripecard[$companypaymentmodetemp->stripe_card_ref]=$companypaymentmodetemp->stripe_card_ref; |
|
| 870 | + |
|
| 871 | + print '<tr>'; |
|
| 872 | + print '<td>'; |
|
| 873 | + print $companypaymentmodetemp->id; |
|
| 874 | + print '</td>'; |
|
| 875 | + print '<td>'; |
|
| 876 | + print $companypaymentmodetemp->stripe_card_ref; |
|
| 877 | + /*if ($companypaymentmodetemp->stripe_card_ref) |
|
| 878 | 878 | { |
| 879 | 879 | $url='https://dashboard.stripe.com/test/card/'.$companypaymentmodetemp->stripe_card_ref; |
| 880 | 880 | if ($servicestatus) |
@@ -883,427 +883,427 @@ discard block |
||
| 883 | 883 | } |
| 884 | 884 | print ' <a href="'.$url.'" target="_stripe">'.img_picto($langs->trans('ShowInStripe'), 'object_globe').'</a>'; |
| 885 | 885 | }*/ |
| 886 | - print '</td>'; |
|
| 887 | - print '<td>'; |
|
| 888 | - print img_credit_card($companypaymentmodetemp->type); |
|
| 889 | - print '</td>'; |
|
| 890 | - print '<td>'; |
|
| 891 | - if ($companypaymentmodetemp->last_four) print '....'.$companypaymentmodetemp->last_four; |
|
| 892 | - if ($companypaymentmodetemp->exp_date_month || $companypaymentmodetemp->exp_date_year) print ' - '.sprintf("%02d", $companypaymentmodetemp->exp_date_month).'/'.$companypaymentmodetemp->exp_date_year.''; |
|
| 893 | - print '</td><td>'; |
|
| 894 | - if ($companypaymentmodetemp->country_code) |
|
| 895 | - { |
|
| 896 | - $img=picto_from_langcode($companypaymentmodetemp->country_code); |
|
| 897 | - print $img?$img.' ':''; |
|
| 898 | - print getCountry($companypaymentmodetemp->country_code,1); |
|
| 899 | - } |
|
| 900 | - else print img_warning().' <font class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("CompanyCountry")).'</font>'; |
|
| 901 | - print '</td>'; |
|
| 902 | - // Default |
|
| 903 | - print '<td align="center">'; |
|
| 904 | - if (empty($companypaymentmodetemp->default_rib)) |
|
| 905 | - { |
|
| 906 | - print '<a href="' . DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id.'&id='.$companypaymentmodetemp->id.'&action=setlocalassourcedefault">'; |
|
| 907 | - print img_picto($langs->trans("Default"),'off'); |
|
| 908 | - print '</a>'; |
|
| 909 | - } else { |
|
| 910 | - print img_picto($langs->trans("Default"),'on'); |
|
| 911 | - } |
|
| 912 | - print '</td>'; |
|
| 913 | - print '<td>'; |
|
| 914 | - if (empty($companypaymentmodetemp->stripe_card_ref)) print $langs->trans("Local"); |
|
| 915 | - else print $langs->trans("LocalAndRemote"); |
|
| 916 | - print '</td>'; |
|
| 917 | - print '<td>'; |
|
| 918 | - print dol_print_date($companypaymentmodetemp->tms, 'dayhour'); |
|
| 919 | - print '</td>'; |
|
| 920 | - print '<td align="right" class="nowraponall">'; |
|
| 921 | - if ($user->rights->societe->creer) |
|
| 922 | - { |
|
| 923 | - if ($stripecu && empty($companypaymentmodetemp->stripe_card_ref)) |
|
| 924 | - { |
|
| 925 | - print '<a href="'.$_SERVER['PHP_SELF'].'?action=synccardtostripe&socid='.$object->id.'&id='.$companypaymentmodetemp->id.'" class="button">'.$langs->trans("CreateCardOnStripe").'</a>'; |
|
| 926 | - } |
|
| 886 | + print '</td>'; |
|
| 887 | + print '<td>'; |
|
| 888 | + print img_credit_card($companypaymentmodetemp->type); |
|
| 889 | + print '</td>'; |
|
| 890 | + print '<td>'; |
|
| 891 | + if ($companypaymentmodetemp->last_four) print '....'.$companypaymentmodetemp->last_four; |
|
| 892 | + if ($companypaymentmodetemp->exp_date_month || $companypaymentmodetemp->exp_date_year) print ' - '.sprintf("%02d", $companypaymentmodetemp->exp_date_month).'/'.$companypaymentmodetemp->exp_date_year.''; |
|
| 893 | + print '</td><td>'; |
|
| 894 | + if ($companypaymentmodetemp->country_code) |
|
| 895 | + { |
|
| 896 | + $img=picto_from_langcode($companypaymentmodetemp->country_code); |
|
| 897 | + print $img?$img.' ':''; |
|
| 898 | + print getCountry($companypaymentmodetemp->country_code,1); |
|
| 899 | + } |
|
| 900 | + else print img_warning().' <font class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("CompanyCountry")).'</font>'; |
|
| 901 | + print '</td>'; |
|
| 902 | + // Default |
|
| 903 | + print '<td align="center">'; |
|
| 904 | + if (empty($companypaymentmodetemp->default_rib)) |
|
| 905 | + { |
|
| 906 | + print '<a href="' . DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id.'&id='.$companypaymentmodetemp->id.'&action=setlocalassourcedefault">'; |
|
| 907 | + print img_picto($langs->trans("Default"),'off'); |
|
| 908 | + print '</a>'; |
|
| 909 | + } else { |
|
| 910 | + print img_picto($langs->trans("Default"),'on'); |
|
| 911 | + } |
|
| 912 | + print '</td>'; |
|
| 913 | + print '<td>'; |
|
| 914 | + if (empty($companypaymentmodetemp->stripe_card_ref)) print $langs->trans("Local"); |
|
| 915 | + else print $langs->trans("LocalAndRemote"); |
|
| 916 | + print '</td>'; |
|
| 917 | + print '<td>'; |
|
| 918 | + print dol_print_date($companypaymentmodetemp->tms, 'dayhour'); |
|
| 919 | + print '</td>'; |
|
| 920 | + print '<td align="right" class="nowraponall">'; |
|
| 921 | + if ($user->rights->societe->creer) |
|
| 922 | + { |
|
| 923 | + if ($stripecu && empty($companypaymentmodetemp->stripe_card_ref)) |
|
| 924 | + { |
|
| 925 | + print '<a href="'.$_SERVER['PHP_SELF'].'?action=synccardtostripe&socid='.$object->id.'&id='.$companypaymentmodetemp->id.'" class="button">'.$langs->trans("CreateCardOnStripe").'</a>'; |
|
| 926 | + } |
|
| 927 | + |
|
| 928 | + print '<a href="' . DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id.'&id='.$companypaymentmodetemp->id.'&action=editcard">'; |
|
| 929 | + print img_picto($langs->trans("Modify"),'edit'); |
|
| 930 | + print '</a>'; |
|
| 931 | + print ' '; |
|
| 932 | + print '<a href="' . DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id.'&id='.$companypaymentmodetemp->id.'&action=deletecard">'; // source='.$companypaymentmodetemp->stripe_card_ref.'& |
|
| 933 | + print img_picto($langs->trans("Delete"), 'delete'); |
|
| 934 | + print '</a>'; |
|
| 935 | + } |
|
| 936 | + print '</td>'; |
|
| 937 | + print '</tr>'; |
|
| 938 | + } |
|
| 939 | + $i++; |
|
| 940 | + } |
|
| 941 | + } |
|
| 942 | + } |
|
| 943 | + else dol_print_error($db); |
|
| 944 | + } |
|
| 945 | + |
|
| 946 | + // Show remote sources (not already shown as local source) |
|
| 947 | + if (is_array($listofsources) && count($listofsources)) |
|
| 948 | + { |
|
| 949 | + foreach ($listofsources as $src) |
|
| 950 | + { |
|
| 951 | + if (! empty($arrayofstripecard[$src->id])) continue; // Already in previous list |
|
| 952 | + |
|
| 953 | + $nbremote++; |
|
| 954 | + |
|
| 955 | + print '<tr class="oddeven">'; |
|
| 956 | + // Local ID |
|
| 957 | + if (! empty($conf->global->STRIPE_ALLOW_LOCAL_CARD)) |
|
| 958 | + { |
|
| 959 | + print '<td>'; |
|
| 960 | + print '</td>'; |
|
| 961 | + } |
|
| 962 | + // Src ID |
|
| 963 | + print '<td>'; |
|
| 964 | + if (!empty($stripeacc)) $connect=$stripeacc.'/'; |
|
| 965 | + $url='https://dashboard.stripe.com/'.$connect.'test/sources/'.$src->id; |
|
| 966 | + if ($servicestatus) |
|
| 967 | + { |
|
| 968 | + $url='https://dashboard.stripe.com/'.$connect.'sources/'.$src->id; |
|
| 969 | + } |
|
| 970 | + print $src->id." <a href='".$url."' target='_stripe'>".img_picto($langs->trans('ShowInStripe'), 'object_globe')."</a>"; |
|
| 971 | + print '</td>'; |
|
| 972 | + // Img of credit card |
|
| 973 | + print '<td>'; |
|
| 974 | + if ($src->object=='card') |
|
| 975 | + { |
|
| 976 | + print img_credit_card($src->brand); |
|
| 977 | + } |
|
| 978 | + elseif ($src->object=='source' && $src->type=='card') |
|
| 979 | + { |
|
| 980 | + print img_credit_card($src->card->brand); |
|
| 981 | + } |
|
| 982 | + elseif ($src->object=='source' && $src->type=='sepa_debit') |
|
| 983 | + { |
|
| 984 | + print '<span class="fa fa-university fa-2x fa-fw"></span>'; |
|
| 985 | + } |
|
| 986 | + print'</td>'; |
|
| 987 | + print '<td valign="middle">'; |
|
| 988 | + if ($src->object=='card') |
|
| 989 | + { |
|
| 990 | + print '....'.$src->last4.' - '.$src->exp_month.'/'.$src->exp_year.''; |
|
| 991 | + print '</td><td>'; |
|
| 992 | + if ($src->country) |
|
| 993 | + { |
|
| 994 | + $img=picto_from_langcode($src->country); |
|
| 995 | + print $img?$img.' ':''; |
|
| 996 | + print getCountry($src->country,1); |
|
| 997 | + } |
|
| 998 | + else print img_warning().' <font class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("CompanyCountry")).'</font>'; |
|
| 999 | + } |
|
| 1000 | + elseif ($src->object=='source' && $src->type=='card') |
|
| 1001 | + { |
|
| 1002 | + print $src->owner->name.'<br>....'.$src->card->last4.' - '.$src->card->exp_month.'/'.$src->card->exp_year.''; |
|
| 1003 | + print '</td><td>'; |
|
| 1004 | + |
|
| 1005 | + if ($src->card->country) |
|
| 1006 | + { |
|
| 1007 | + $img=picto_from_langcode($src->card->country); |
|
| 1008 | + print $img?$img.' ':''; |
|
| 1009 | + print getCountry($src->card->country,1); |
|
| 1010 | + } |
|
| 1011 | + else print img_warning().' <font class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("CompanyCountry")).'</font>'; |
|
| 1012 | + } |
|
| 1013 | + elseif ($src->object=='source' && $src->type=='sepa_debit') |
|
| 1014 | + { |
|
| 1015 | + print 'info sepa'; |
|
| 1016 | + print '</td><td>'; |
|
| 1017 | + if ($src->sepa_debit->country) |
|
| 1018 | + { |
|
| 1019 | + $img=picto_from_langcode($src->sepa_debit->country); |
|
| 1020 | + print $img?$img.' ':''; |
|
| 1021 | + print getCountry($src->sepa_debit->country,1); |
|
| 1022 | + } |
|
| 1023 | + else print img_warning().' <font class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("CompanyCountry")).'</font>'; |
|
| 1024 | + } |
|
| 1025 | + print '</td>'; |
|
| 1026 | + // Default |
|
| 1027 | + print '<td align="center" width="50">'; |
|
| 1028 | + if (($customerstripe->default_source != $src->id)) |
|
| 1029 | + { |
|
| 1030 | + print '<a href="' . DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id.'&source='.$src->id.'&action=setassourcedefault">'; |
|
| 1031 | + print img_picto($langs->trans("Default"),'off'); |
|
| 1032 | + print '</a>'; |
|
| 1033 | + } else { |
|
| 1034 | + print img_picto($langs->trans("Default"),'on'); |
|
| 1035 | + } |
|
| 1036 | + print '</td>'; |
|
| 1037 | + print '<td>'; |
|
| 1038 | + print $langs->trans("Remote"); |
|
| 1039 | + //if ($src->cvc_check == 'fail') print ' - CVC check fail'; |
|
| 1040 | + print '</td>'; |
|
| 1041 | + print '<td>'; |
|
| 1042 | + //var_dump($src); |
|
| 1043 | + print ''; |
|
| 1044 | + print '</td>'; |
|
| 1045 | + print '<td align="right" class="nowraponall">'; |
|
| 1046 | + if ($user->rights->societe->creer) |
|
| 1047 | + { |
|
| 1048 | + print '<a href="' . DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id.'&source='.$src->id.'&action=deletecard">'; |
|
| 1049 | + print img_picto($langs->trans("Delete"), 'delete'); |
|
| 1050 | + print '</a>'; |
|
| 1051 | + } |
|
| 1052 | + print '</td>'; |
|
| 1053 | + |
|
| 1054 | + print '</tr>'; |
|
| 1055 | + } |
|
| 1056 | + } |
|
| 1057 | + |
|
| 1058 | + if ($nbremote == 0 && $nblocal == 0) |
|
| 1059 | + { |
|
| 1060 | + print '<tr><td class="opacitymedium" colspan="7">'.$langs->trans("None").'</td></tr>'; |
|
| 1061 | + } |
|
| 1062 | + print "</table>"; |
|
| 1063 | + print "</div>"; |
|
| 1064 | + } |
|
| 1065 | + |
|
| 927 | 1066 | |
| 928 | - print '<a href="' . DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id.'&id='.$companypaymentmodetemp->id.'&action=editcard">'; |
|
| 929 | - print img_picto($langs->trans("Modify"),'edit'); |
|
| 930 | - print '</a>'; |
|
| 931 | - print ' '; |
|
| 932 | - print '<a href="' . DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id.'&id='.$companypaymentmodetemp->id.'&action=deletecard">'; // source='.$companypaymentmodetemp->stripe_card_ref.'& |
|
| 933 | - print img_picto($langs->trans("Delete"), 'delete'); |
|
| 934 | - print '</a>'; |
|
| 935 | - } |
|
| 936 | - print '</td>'; |
|
| 937 | - print '</tr>'; |
|
| 938 | - } |
|
| 939 | - $i++; |
|
| 940 | - } |
|
| 941 | - } |
|
| 942 | - } |
|
| 943 | - else dol_print_error($db); |
|
| 944 | - } |
|
| 945 | - |
|
| 946 | - // Show remote sources (not already shown as local source) |
|
| 947 | - if (is_array($listofsources) && count($listofsources)) |
|
| 948 | - { |
|
| 949 | - foreach ($listofsources as $src) |
|
| 950 | - { |
|
| 951 | - if (! empty($arrayofstripecard[$src->id])) continue; // Already in previous list |
|
| 952 | - |
|
| 953 | - $nbremote++; |
|
| 954 | - |
|
| 955 | - print '<tr class="oddeven">'; |
|
| 956 | - // Local ID |
|
| 957 | - if (! empty($conf->global->STRIPE_ALLOW_LOCAL_CARD)) |
|
| 958 | - { |
|
| 959 | - print '<td>'; |
|
| 960 | - print '</td>'; |
|
| 961 | - } |
|
| 962 | - // Src ID |
|
| 963 | - print '<td>'; |
|
| 964 | - if (!empty($stripeacc)) $connect=$stripeacc.'/'; |
|
| 965 | - $url='https://dashboard.stripe.com/'.$connect.'test/sources/'.$src->id; |
|
| 966 | - if ($servicestatus) |
|
| 967 | - { |
|
| 968 | - $url='https://dashboard.stripe.com/'.$connect.'sources/'.$src->id; |
|
| 969 | - } |
|
| 970 | - print $src->id." <a href='".$url."' target='_stripe'>".img_picto($langs->trans('ShowInStripe'), 'object_globe')."</a>"; |
|
| 971 | - print '</td>'; |
|
| 972 | - // Img of credit card |
|
| 973 | - print '<td>'; |
|
| 974 | - if ($src->object=='card') |
|
| 975 | - { |
|
| 976 | - print img_credit_card($src->brand); |
|
| 977 | - } |
|
| 978 | - elseif ($src->object=='source' && $src->type=='card') |
|
| 979 | - { |
|
| 980 | - print img_credit_card($src->card->brand); |
|
| 981 | - } |
|
| 982 | - elseif ($src->object=='source' && $src->type=='sepa_debit') |
|
| 983 | - { |
|
| 984 | - print '<span class="fa fa-university fa-2x fa-fw"></span>'; |
|
| 985 | - } |
|
| 986 | - print'</td>'; |
|
| 987 | - print '<td valign="middle">'; |
|
| 988 | - if ($src->object=='card') |
|
| 989 | - { |
|
| 990 | - print '....'.$src->last4.' - '.$src->exp_month.'/'.$src->exp_year.''; |
|
| 991 | - print '</td><td>'; |
|
| 992 | - if ($src->country) |
|
| 993 | - { |
|
| 994 | - $img=picto_from_langcode($src->country); |
|
| 995 | - print $img?$img.' ':''; |
|
| 996 | - print getCountry($src->country,1); |
|
| 997 | - } |
|
| 998 | - else print img_warning().' <font class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("CompanyCountry")).'</font>'; |
|
| 999 | - } |
|
| 1000 | - elseif ($src->object=='source' && $src->type=='card') |
|
| 1001 | - { |
|
| 1002 | - print $src->owner->name.'<br>....'.$src->card->last4.' - '.$src->card->exp_month.'/'.$src->card->exp_year.''; |
|
| 1003 | - print '</td><td>'; |
|
| 1004 | - |
|
| 1005 | - if ($src->card->country) |
|
| 1006 | - { |
|
| 1007 | - $img=picto_from_langcode($src->card->country); |
|
| 1008 | - print $img?$img.' ':''; |
|
| 1009 | - print getCountry($src->card->country,1); |
|
| 1010 | - } |
|
| 1011 | - else print img_warning().' <font class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("CompanyCountry")).'</font>'; |
|
| 1012 | - } |
|
| 1013 | - elseif ($src->object=='source' && $src->type=='sepa_debit') |
|
| 1014 | - { |
|
| 1015 | - print 'info sepa'; |
|
| 1016 | - print '</td><td>'; |
|
| 1017 | - if ($src->sepa_debit->country) |
|
| 1018 | - { |
|
| 1019 | - $img=picto_from_langcode($src->sepa_debit->country); |
|
| 1020 | - print $img?$img.' ':''; |
|
| 1021 | - print getCountry($src->sepa_debit->country,1); |
|
| 1022 | - } |
|
| 1023 | - else print img_warning().' <font class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentitiesnoconv("CompanyCountry")).'</font>'; |
|
| 1024 | - } |
|
| 1025 | - print '</td>'; |
|
| 1026 | - // Default |
|
| 1027 | - print '<td align="center" width="50">'; |
|
| 1028 | - if (($customerstripe->default_source != $src->id)) |
|
| 1029 | - { |
|
| 1030 | - print '<a href="' . DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id.'&source='.$src->id.'&action=setassourcedefault">'; |
|
| 1031 | - print img_picto($langs->trans("Default"),'off'); |
|
| 1032 | - print '</a>'; |
|
| 1033 | - } else { |
|
| 1034 | - print img_picto($langs->trans("Default"),'on'); |
|
| 1035 | - } |
|
| 1036 | - print '</td>'; |
|
| 1037 | - print '<td>'; |
|
| 1038 | - print $langs->trans("Remote"); |
|
| 1039 | - //if ($src->cvc_check == 'fail') print ' - CVC check fail'; |
|
| 1040 | - print '</td>'; |
|
| 1041 | - print '<td>'; |
|
| 1042 | - //var_dump($src); |
|
| 1043 | - print ''; |
|
| 1044 | - print '</td>'; |
|
| 1045 | - print '<td align="right" class="nowraponall">'; |
|
| 1046 | - if ($user->rights->societe->creer) |
|
| 1047 | - { |
|
| 1048 | - print '<a href="' . DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$object->id.'&source='.$src->id.'&action=deletecard">'; |
|
| 1049 | - print img_picto($langs->trans("Delete"), 'delete'); |
|
| 1050 | - print '</a>'; |
|
| 1051 | - } |
|
| 1052 | - print '</td>'; |
|
| 1053 | - |
|
| 1054 | - print '</tr>'; |
|
| 1055 | - } |
|
| 1056 | - } |
|
| 1057 | - |
|
| 1058 | - if ($nbremote == 0 && $nblocal == 0) |
|
| 1059 | - { |
|
| 1060 | - print '<tr><td class="opacitymedium" colspan="7">'.$langs->trans("None").'</td></tr>'; |
|
| 1061 | - } |
|
| 1062 | - print "</table>"; |
|
| 1063 | - print "</div>"; |
|
| 1064 | - } |
|
| 1065 | - |
|
| 1066 | - |
|
| 1067 | - // List of bank accounts |
|
| 1068 | - print '<br>'; |
|
| 1069 | - |
|
| 1070 | - $morehtmlright='<a class="butActionNew" href="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'&action=create">'.$langs->trans("Add").' <span class="fa fa-plus-circle valignmiddle"></span></a>'; |
|
| 1071 | - |
|
| 1072 | - print load_fiche_titre($langs->trans("BankAccounts"), $morehtmlright, ''); |
|
| 1073 | - |
|
| 1074 | - $rib_list = $object->get_all_rib(); |
|
| 1075 | - if (is_array($rib_list)) |
|
| 1076 | - { |
|
| 1077 | - print '<div class="div-table-responsive-no-min">'; // You can use div-table-responsive-no-min if you dont need reserved height for your table |
|
| 1078 | - print '<table class="liste" width="100%">'; |
|
| 1079 | - |
|
| 1080 | - print '<tr class="liste_titre">'; |
|
| 1081 | - print_liste_field_titre("LabelRIB"); |
|
| 1082 | - print_liste_field_titre("Bank"); |
|
| 1083 | - print_liste_field_titre("RIB"); |
|
| 1084 | - print_liste_field_titre("IBAN"); |
|
| 1085 | - print_liste_field_titre("BIC"); |
|
| 1086 | - if (! empty($conf->prelevement->enabled)) |
|
| 1087 | - { |
|
| 1088 | - print print_liste_field_titre("RUM"); |
|
| 1089 | - print print_liste_field_titre("WithdrawMode"); |
|
| 1090 | - } |
|
| 1091 | - print_liste_field_titre("DefaultRIB", '', '', '', '', 'align="center"'); |
|
| 1092 | - print_liste_field_titre('', '', '', '', '', 'align="center"'); |
|
| 1093 | - print_liste_field_titre('',$_SERVER["PHP_SELF"],"",'','','',$sortfield,$sortorder,'maxwidthsearch '); |
|
| 1094 | - print "</tr>\n"; |
|
| 1095 | - |
|
| 1096 | - foreach ($rib_list as $rib) |
|
| 1097 | - { |
|
| 1098 | - print '<tr class="oddeven">'; |
|
| 1099 | - // Label |
|
| 1100 | - print '<td>'.$rib->label.'</td>'; |
|
| 1101 | - // Bank name |
|
| 1102 | - print '<td>'.$rib->bank.'</td>'; |
|
| 1103 | - // Account number |
|
| 1104 | - print '<td>'; |
|
| 1105 | - $string=''; |
|
| 1106 | - foreach ($rib->getFieldsToShow() as $val) { |
|
| 1107 | - |
|
| 1108 | - if ($val == 'BankCode') { |
|
| 1109 | - $string .= $rib->code_banque.' '; |
|
| 1110 | - } elseif ($val == 'BankAccountNumber') { |
|
| 1111 | - $string .= $rib->number.' '; |
|
| 1112 | - } elseif ($val == 'DeskCode') { |
|
| 1113 | - $string .= $rib->code_guichet.' '; |
|
| 1114 | - } elseif ($val == 'BankAccountNumberKey') { |
|
| 1115 | - $string .= $rib->cle_rib.' '; |
|
| 1116 | - /* Already output after |
|
| 1067 | + // List of bank accounts |
|
| 1068 | + print '<br>'; |
|
| 1069 | + |
|
| 1070 | + $morehtmlright='<a class="butActionNew" href="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'&action=create">'.$langs->trans("Add").' <span class="fa fa-plus-circle valignmiddle"></span></a>'; |
|
| 1071 | + |
|
| 1072 | + print load_fiche_titre($langs->trans("BankAccounts"), $morehtmlright, ''); |
|
| 1073 | + |
|
| 1074 | + $rib_list = $object->get_all_rib(); |
|
| 1075 | + if (is_array($rib_list)) |
|
| 1076 | + { |
|
| 1077 | + print '<div class="div-table-responsive-no-min">'; // You can use div-table-responsive-no-min if you dont need reserved height for your table |
|
| 1078 | + print '<table class="liste" width="100%">'; |
|
| 1079 | + |
|
| 1080 | + print '<tr class="liste_titre">'; |
|
| 1081 | + print_liste_field_titre("LabelRIB"); |
|
| 1082 | + print_liste_field_titre("Bank"); |
|
| 1083 | + print_liste_field_titre("RIB"); |
|
| 1084 | + print_liste_field_titre("IBAN"); |
|
| 1085 | + print_liste_field_titre("BIC"); |
|
| 1086 | + if (! empty($conf->prelevement->enabled)) |
|
| 1087 | + { |
|
| 1088 | + print print_liste_field_titre("RUM"); |
|
| 1089 | + print print_liste_field_titre("WithdrawMode"); |
|
| 1090 | + } |
|
| 1091 | + print_liste_field_titre("DefaultRIB", '', '', '', '', 'align="center"'); |
|
| 1092 | + print_liste_field_titre('', '', '', '', '', 'align="center"'); |
|
| 1093 | + print_liste_field_titre('',$_SERVER["PHP_SELF"],"",'','','',$sortfield,$sortorder,'maxwidthsearch '); |
|
| 1094 | + print "</tr>\n"; |
|
| 1095 | + |
|
| 1096 | + foreach ($rib_list as $rib) |
|
| 1097 | + { |
|
| 1098 | + print '<tr class="oddeven">'; |
|
| 1099 | + // Label |
|
| 1100 | + print '<td>'.$rib->label.'</td>'; |
|
| 1101 | + // Bank name |
|
| 1102 | + print '<td>'.$rib->bank.'</td>'; |
|
| 1103 | + // Account number |
|
| 1104 | + print '<td>'; |
|
| 1105 | + $string=''; |
|
| 1106 | + foreach ($rib->getFieldsToShow() as $val) { |
|
| 1107 | + |
|
| 1108 | + if ($val == 'BankCode') { |
|
| 1109 | + $string .= $rib->code_banque.' '; |
|
| 1110 | + } elseif ($val == 'BankAccountNumber') { |
|
| 1111 | + $string .= $rib->number.' '; |
|
| 1112 | + } elseif ($val == 'DeskCode') { |
|
| 1113 | + $string .= $rib->code_guichet.' '; |
|
| 1114 | + } elseif ($val == 'BankAccountNumberKey') { |
|
| 1115 | + $string .= $rib->cle_rib.' '; |
|
| 1116 | + /* Already output after |
|
| 1117 | 1117 | }elseif ($val == 'BIC') { |
| 1118 | 1118 | $string .= $rib->bic.' '; |
| 1119 | 1119 | }elseif ($val == 'IBAN') { |
| 1120 | 1120 | $string .= $rib->iban.' ';*/ |
| 1121 | - } |
|
| 1122 | - } |
|
| 1123 | - if (! empty($rib->label) && $rib->number) { |
|
| 1124 | - if (! checkBanForAccount($rib)) { |
|
| 1125 | - $string.= ' '.img_picto($langs->trans("ValueIsNotValid"),'warning'); |
|
| 1126 | - } else { |
|
| 1127 | - $string.= ' '.img_picto($langs->trans("ValueIsValid"),'info'); |
|
| 1128 | - } |
|
| 1129 | - } |
|
| 1130 | - |
|
| 1131 | - print $string; |
|
| 1132 | - print '</td>'; |
|
| 1133 | - // IBAN |
|
| 1134 | - print '<td>'.$rib->iban; |
|
| 1135 | - if (! empty($rib->iban)) { |
|
| 1136 | - if (! checkIbanForAccount($rib)) { |
|
| 1137 | - print ' '.img_picto($langs->trans("IbanNotValid"),'warning'); |
|
| 1138 | - } else { |
|
| 1139 | - print ' '.img_picto($langs->trans("IbanValid"),'info'); |
|
| 1140 | - } |
|
| 1141 | - } |
|
| 1142 | - print '</td>'; |
|
| 1143 | - // BIC |
|
| 1144 | - print '<td>'.$rib->bic; |
|
| 1145 | - if (! empty($rib->bic)) { |
|
| 1146 | - if (! checkSwiftForAccount($rib)) { |
|
| 1147 | - print ' '.img_picto($langs->trans("SwiftNotValid"),'warning'); |
|
| 1148 | - } else { |
|
| 1149 | - print ' '.img_picto($langs->trans("SwiftValid"),'info'); |
|
| 1150 | - } |
|
| 1151 | - } |
|
| 1152 | - print '</td>'; |
|
| 1153 | - |
|
| 1154 | - if (! empty($conf->prelevement->enabled)) |
|
| 1155 | - { |
|
| 1156 | - // RUM |
|
| 1157 | - //print '<td>'.$prelevement->buildRumNumber($object->code_client, $rib->datec, $rib->id).'</td>'; |
|
| 1158 | - print '<td>'.$rib->rum.'</td>'; |
|
| 1159 | - |
|
| 1160 | - // FRSTRECUR |
|
| 1161 | - print '<td>'.$rib->frstrecur.'</td>'; |
|
| 1162 | - } |
|
| 1163 | - |
|
| 1164 | - // Default |
|
| 1165 | - print '<td align="center" width="70">'; |
|
| 1166 | - if (!$rib->default_rib) { |
|
| 1167 | - print '<a href="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'&ribid='.$rib->id.'&action=setasbankdefault">'; |
|
| 1168 | - print img_picto($langs->trans("Disabled"),'off'); |
|
| 1169 | - print '</a>'; |
|
| 1170 | - } else { |
|
| 1171 | - print img_picto($langs->trans("Enabled"),'on'); |
|
| 1172 | - } |
|
| 1173 | - print '</td>'; |
|
| 1174 | - |
|
| 1175 | - // Generate doc |
|
| 1176 | - print '<td align="center">'; |
|
| 1177 | - |
|
| 1178 | - $buttonlabel = $langs->trans("BuildDoc"); |
|
| 1179 | - $forname='builddocrib'.$rib->id; |
|
| 1180 | - |
|
| 1181 | - include_once DOL_DOCUMENT_ROOT.'/core/modules/bank/modules_bank.php'; |
|
| 1182 | - $modellist=ModeleBankAccountDoc::liste_modeles($db); |
|
| 1183 | - |
|
| 1184 | - $out = ''; |
|
| 1185 | - if (is_array($modellist) && count($modellist)) |
|
| 1186 | - { |
|
| 1187 | - $out.= '<form action="'.$urlsource.(empty($conf->global->MAIN_JUMP_TAG)?'':'#builddoc').'" name="'.$forname.'" id="'.$forname.'_form" method="post">'; |
|
| 1188 | - $out.= '<input type="hidden" name="action" value="builddocrib">'; |
|
| 1189 | - $out.= '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; |
|
| 1190 | - $out.= '<input type="hidden" name="socid" value="'.$object->id.'">'; |
|
| 1191 | - $out.= '<input type="hidden" name="companybankid" value="'.$rib->id.'">'; |
|
| 1192 | - |
|
| 1193 | - if (is_array($modellist) && count($modellist) == 1) // If there is only one element |
|
| 1194 | - { |
|
| 1195 | - $arraykeys=array_keys($modellist); |
|
| 1196 | - $modelselected=$arraykeys[0]; |
|
| 1197 | - } |
|
| 1198 | - if (! empty($conf->global->BANKADDON_PDF)) $modelselected = $conf->global->BANKADDON_PDF; |
|
| 1199 | - |
|
| 1200 | - $out.= $form->selectarray('modelrib'.$rib->id, $modellist, $modelselected, $showempty, 0, 0, '', 0, 0, 0, '', 'minwidth100'); |
|
| 1201 | - $out.= ajax_combobox('modelrib'.$rib->id); |
|
| 1202 | - |
|
| 1203 | - // Language code (if multilang) |
|
| 1204 | - if ($conf->global->MAIN_MULTILANGS) |
|
| 1205 | - { |
|
| 1206 | - include_once DOL_DOCUMENT_ROOT.'/core/class/html.formadmin.class.php'; |
|
| 1207 | - $formadmin=new FormAdmin($db); |
|
| 1208 | - $defaultlang=$codelang?$codelang:$langs->getDefaultLang(); |
|
| 1209 | - $morecss='maxwidth150'; |
|
| 1210 | - if ($conf->browser->layout == 'phone') $morecss='maxwidth100'; |
|
| 1211 | - $out.= $formadmin->select_language($defaultlang, 'lang_idrib'.$rib->id, 0, 0, 0, 0, 0, $morecss); |
|
| 1212 | - } |
|
| 1213 | - // Button |
|
| 1214 | - $genbutton = '<input class="button buttongen" id="'.$forname.'_generatebutton" name="'.$forname.'_generatebutton"'; |
|
| 1215 | - $genbutton.= ' type="submit" value="'.$buttonlabel.'"'; |
|
| 1216 | - if (! $allowgenifempty && ! is_array($modellist) && empty($modellist)) $genbutton.= ' disabled'; |
|
| 1217 | - $genbutton.= '>'; |
|
| 1218 | - if ($allowgenifempty && ! is_array($modellist) && empty($modellist) && empty($conf->dol_no_mouse_hover) && $modulepart != 'unpaid') |
|
| 1219 | - { |
|
| 1220 | - $langs->load("errors"); |
|
| 1221 | - $genbutton.= ' '.img_warning($langs->transnoentitiesnoconv("WarningNoDocumentModelActivated")); |
|
| 1222 | - } |
|
| 1223 | - if (! $allowgenifempty && ! is_array($modellist) && empty($modellist) && empty($conf->dol_no_mouse_hover) && $modulepart != 'unpaid') $genbutton=''; |
|
| 1224 | - if (empty($modellist) && ! $showempty && $modulepart != 'unpaid') $genbutton=''; |
|
| 1225 | - $out.= $genbutton; |
|
| 1226 | - $out.= '</form>'; |
|
| 1227 | - } |
|
| 1228 | - print $out; |
|
| 1229 | - print '</td>'; |
|
| 1230 | - |
|
| 1231 | - // Edit/Delete |
|
| 1232 | - print '<td align="right" class="nowraponall">'; |
|
| 1233 | - if ($user->rights->societe->creer) |
|
| 1234 | - { |
|
| 1235 | - print '<a href="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'&id='.$rib->id.'&action=edit">'; |
|
| 1236 | - print img_picto($langs->trans("Modify"),'edit'); |
|
| 1237 | - print '</a>'; |
|
| 1238 | - |
|
| 1239 | - print ' '; |
|
| 1240 | - |
|
| 1241 | - print '<a href="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'&id='.$rib->id.'&action=delete">'; |
|
| 1242 | - print img_picto($langs->trans("Delete"),'delete'); |
|
| 1243 | - print '</a>'; |
|
| 1244 | - } |
|
| 1245 | - print '</td>'; |
|
| 1246 | - |
|
| 1247 | - print '</tr>'; |
|
| 1248 | - } |
|
| 1249 | - |
|
| 1250 | - if (count($rib_list) == 0) |
|
| 1251 | - { |
|
| 1252 | - $colspan=8; |
|
| 1253 | - if (! empty($conf->prelevement->enabled)) $colspan+=2; |
|
| 1254 | - print '<tr><td colspan="'.$colspan.'" class="opacitymedium">'.$langs->trans("NoBANRecord").'</td></tr>'; |
|
| 1255 | - } |
|
| 1256 | - |
|
| 1257 | - print '</table>'; |
|
| 1258 | - print '</div>'; |
|
| 1259 | - } else { |
|
| 1260 | - dol_print_error($db); |
|
| 1261 | - } |
|
| 1262 | - |
|
| 1263 | - |
|
| 1264 | - if (empty($conf->global->SOCIETE_DISABLE_BUILDDOC)) |
|
| 1265 | - { |
|
| 1266 | - print '<br>'; |
|
| 1267 | - |
|
| 1268 | - print '<div class="fichecenter"><div class="fichehalfleft">'; |
|
| 1269 | - print '<a name="builddoc"></a>'; // ancre |
|
| 1270 | - |
|
| 1271 | - /* |
|
| 1121 | + } |
|
| 1122 | + } |
|
| 1123 | + if (! empty($rib->label) && $rib->number) { |
|
| 1124 | + if (! checkBanForAccount($rib)) { |
|
| 1125 | + $string.= ' '.img_picto($langs->trans("ValueIsNotValid"),'warning'); |
|
| 1126 | + } else { |
|
| 1127 | + $string.= ' '.img_picto($langs->trans("ValueIsValid"),'info'); |
|
| 1128 | + } |
|
| 1129 | + } |
|
| 1130 | + |
|
| 1131 | + print $string; |
|
| 1132 | + print '</td>'; |
|
| 1133 | + // IBAN |
|
| 1134 | + print '<td>'.$rib->iban; |
|
| 1135 | + if (! empty($rib->iban)) { |
|
| 1136 | + if (! checkIbanForAccount($rib)) { |
|
| 1137 | + print ' '.img_picto($langs->trans("IbanNotValid"),'warning'); |
|
| 1138 | + } else { |
|
| 1139 | + print ' '.img_picto($langs->trans("IbanValid"),'info'); |
|
| 1140 | + } |
|
| 1141 | + } |
|
| 1142 | + print '</td>'; |
|
| 1143 | + // BIC |
|
| 1144 | + print '<td>'.$rib->bic; |
|
| 1145 | + if (! empty($rib->bic)) { |
|
| 1146 | + if (! checkSwiftForAccount($rib)) { |
|
| 1147 | + print ' '.img_picto($langs->trans("SwiftNotValid"),'warning'); |
|
| 1148 | + } else { |
|
| 1149 | + print ' '.img_picto($langs->trans("SwiftValid"),'info'); |
|
| 1150 | + } |
|
| 1151 | + } |
|
| 1152 | + print '</td>'; |
|
| 1153 | + |
|
| 1154 | + if (! empty($conf->prelevement->enabled)) |
|
| 1155 | + { |
|
| 1156 | + // RUM |
|
| 1157 | + //print '<td>'.$prelevement->buildRumNumber($object->code_client, $rib->datec, $rib->id).'</td>'; |
|
| 1158 | + print '<td>'.$rib->rum.'</td>'; |
|
| 1159 | + |
|
| 1160 | + // FRSTRECUR |
|
| 1161 | + print '<td>'.$rib->frstrecur.'</td>'; |
|
| 1162 | + } |
|
| 1163 | + |
|
| 1164 | + // Default |
|
| 1165 | + print '<td align="center" width="70">'; |
|
| 1166 | + if (!$rib->default_rib) { |
|
| 1167 | + print '<a href="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'&ribid='.$rib->id.'&action=setasbankdefault">'; |
|
| 1168 | + print img_picto($langs->trans("Disabled"),'off'); |
|
| 1169 | + print '</a>'; |
|
| 1170 | + } else { |
|
| 1171 | + print img_picto($langs->trans("Enabled"),'on'); |
|
| 1172 | + } |
|
| 1173 | + print '</td>'; |
|
| 1174 | + |
|
| 1175 | + // Generate doc |
|
| 1176 | + print '<td align="center">'; |
|
| 1177 | + |
|
| 1178 | + $buttonlabel = $langs->trans("BuildDoc"); |
|
| 1179 | + $forname='builddocrib'.$rib->id; |
|
| 1180 | + |
|
| 1181 | + include_once DOL_DOCUMENT_ROOT.'/core/modules/bank/modules_bank.php'; |
|
| 1182 | + $modellist=ModeleBankAccountDoc::liste_modeles($db); |
|
| 1183 | + |
|
| 1184 | + $out = ''; |
|
| 1185 | + if (is_array($modellist) && count($modellist)) |
|
| 1186 | + { |
|
| 1187 | + $out.= '<form action="'.$urlsource.(empty($conf->global->MAIN_JUMP_TAG)?'':'#builddoc').'" name="'.$forname.'" id="'.$forname.'_form" method="post">'; |
|
| 1188 | + $out.= '<input type="hidden" name="action" value="builddocrib">'; |
|
| 1189 | + $out.= '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; |
|
| 1190 | + $out.= '<input type="hidden" name="socid" value="'.$object->id.'">'; |
|
| 1191 | + $out.= '<input type="hidden" name="companybankid" value="'.$rib->id.'">'; |
|
| 1192 | + |
|
| 1193 | + if (is_array($modellist) && count($modellist) == 1) // If there is only one element |
|
| 1194 | + { |
|
| 1195 | + $arraykeys=array_keys($modellist); |
|
| 1196 | + $modelselected=$arraykeys[0]; |
|
| 1197 | + } |
|
| 1198 | + if (! empty($conf->global->BANKADDON_PDF)) $modelselected = $conf->global->BANKADDON_PDF; |
|
| 1199 | + |
|
| 1200 | + $out.= $form->selectarray('modelrib'.$rib->id, $modellist, $modelselected, $showempty, 0, 0, '', 0, 0, 0, '', 'minwidth100'); |
|
| 1201 | + $out.= ajax_combobox('modelrib'.$rib->id); |
|
| 1202 | + |
|
| 1203 | + // Language code (if multilang) |
|
| 1204 | + if ($conf->global->MAIN_MULTILANGS) |
|
| 1205 | + { |
|
| 1206 | + include_once DOL_DOCUMENT_ROOT.'/core/class/html.formadmin.class.php'; |
|
| 1207 | + $formadmin=new FormAdmin($db); |
|
| 1208 | + $defaultlang=$codelang?$codelang:$langs->getDefaultLang(); |
|
| 1209 | + $morecss='maxwidth150'; |
|
| 1210 | + if ($conf->browser->layout == 'phone') $morecss='maxwidth100'; |
|
| 1211 | + $out.= $formadmin->select_language($defaultlang, 'lang_idrib'.$rib->id, 0, 0, 0, 0, 0, $morecss); |
|
| 1212 | + } |
|
| 1213 | + // Button |
|
| 1214 | + $genbutton = '<input class="button buttongen" id="'.$forname.'_generatebutton" name="'.$forname.'_generatebutton"'; |
|
| 1215 | + $genbutton.= ' type="submit" value="'.$buttonlabel.'"'; |
|
| 1216 | + if (! $allowgenifempty && ! is_array($modellist) && empty($modellist)) $genbutton.= ' disabled'; |
|
| 1217 | + $genbutton.= '>'; |
|
| 1218 | + if ($allowgenifempty && ! is_array($modellist) && empty($modellist) && empty($conf->dol_no_mouse_hover) && $modulepart != 'unpaid') |
|
| 1219 | + { |
|
| 1220 | + $langs->load("errors"); |
|
| 1221 | + $genbutton.= ' '.img_warning($langs->transnoentitiesnoconv("WarningNoDocumentModelActivated")); |
|
| 1222 | + } |
|
| 1223 | + if (! $allowgenifempty && ! is_array($modellist) && empty($modellist) && empty($conf->dol_no_mouse_hover) && $modulepart != 'unpaid') $genbutton=''; |
|
| 1224 | + if (empty($modellist) && ! $showempty && $modulepart != 'unpaid') $genbutton=''; |
|
| 1225 | + $out.= $genbutton; |
|
| 1226 | + $out.= '</form>'; |
|
| 1227 | + } |
|
| 1228 | + print $out; |
|
| 1229 | + print '</td>'; |
|
| 1230 | + |
|
| 1231 | + // Edit/Delete |
|
| 1232 | + print '<td align="right" class="nowraponall">'; |
|
| 1233 | + if ($user->rights->societe->creer) |
|
| 1234 | + { |
|
| 1235 | + print '<a href="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'&id='.$rib->id.'&action=edit">'; |
|
| 1236 | + print img_picto($langs->trans("Modify"),'edit'); |
|
| 1237 | + print '</a>'; |
|
| 1238 | + |
|
| 1239 | + print ' '; |
|
| 1240 | + |
|
| 1241 | + print '<a href="'.$_SERVER["PHP_SELF"].'?socid='.$object->id.'&id='.$rib->id.'&action=delete">'; |
|
| 1242 | + print img_picto($langs->trans("Delete"),'delete'); |
|
| 1243 | + print '</a>'; |
|
| 1244 | + } |
|
| 1245 | + print '</td>'; |
|
| 1246 | + |
|
| 1247 | + print '</tr>'; |
|
| 1248 | + } |
|
| 1249 | + |
|
| 1250 | + if (count($rib_list) == 0) |
|
| 1251 | + { |
|
| 1252 | + $colspan=8; |
|
| 1253 | + if (! empty($conf->prelevement->enabled)) $colspan+=2; |
|
| 1254 | + print '<tr><td colspan="'.$colspan.'" class="opacitymedium">'.$langs->trans("NoBANRecord").'</td></tr>'; |
|
| 1255 | + } |
|
| 1256 | + |
|
| 1257 | + print '</table>'; |
|
| 1258 | + print '</div>'; |
|
| 1259 | + } else { |
|
| 1260 | + dol_print_error($db); |
|
| 1261 | + } |
|
| 1262 | + |
|
| 1263 | + |
|
| 1264 | + if (empty($conf->global->SOCIETE_DISABLE_BUILDDOC)) |
|
| 1265 | + { |
|
| 1266 | + print '<br>'; |
|
| 1267 | + |
|
| 1268 | + print '<div class="fichecenter"><div class="fichehalfleft">'; |
|
| 1269 | + print '<a name="builddoc"></a>'; // ancre |
|
| 1270 | + |
|
| 1271 | + /* |
|
| 1272 | 1272 | * Documents generes |
| 1273 | 1273 | */ |
| 1274 | - $filedir=$conf->societe->multidir_output[$object->entity].'/'.$object->id; |
|
| 1275 | - $urlsource=$_SERVER["PHP_SELF"]."?socid=".$object->id; |
|
| 1276 | - $genallowed=$user->rights->societe->lire; |
|
| 1277 | - $delallowed=$user->rights->societe->creer; |
|
| 1278 | - |
|
| 1279 | - print $formfile->showdocuments('company', $object->id, $filedir, $urlsource, $genallowed, $delallowed, $object->modelpdf, 0, 0, 0, 28, 0, 'entity='.$object->entity, 0, '', $object->default_lang); |
|
| 1280 | - |
|
| 1281 | - // Show direct download link |
|
| 1282 | - if (! empty($conf->global->BANK_ACCOUNT_ALLOW_EXTERNAL_DOWNLOAD)) |
|
| 1283 | - { |
|
| 1284 | - $companybankaccounttemp = new CompanyBankAccount($db); |
|
| 1285 | - $companypaymentmodetemp = new CompanyPaymentMode($db); |
|
| 1286 | - $result = $companypaymentmodetemp->fetch(0, null, $object->id, 'ban'); |
|
| 1287 | - |
|
| 1288 | - include_once DOL_DOCUMENT_ROOT.'/ecm/class/ecmfiles.class.php'; |
|
| 1289 | - $ecmfile = new EcmFiles($db); |
|
| 1290 | - $result = $ecmfile->fetch(0, '', '', '', '', $companybankaccounttemp->table_element, $companypaymentmodetemp->id); |
|
| 1291 | - if ($result > 0) |
|
| 1292 | - { |
|
| 1293 | - $companybankaccounttemp->last_main_doc = $ecmfile->filepath.'/'.$ecmfile->filename; |
|
| 1294 | - print '<br><!-- Link to download main doc -->'."\n"; |
|
| 1295 | - print showDirectDownloadLink($companybankaccounttemp).'<br>'; |
|
| 1296 | - } |
|
| 1297 | - } |
|
| 1298 | - |
|
| 1299 | - print '</div><div class="fichehalfright"><div class="ficheaddleft">'; |
|
| 1300 | - |
|
| 1301 | - |
|
| 1302 | - print '</div></div></div>'; |
|
| 1303 | - |
|
| 1304 | - print '<br>'; |
|
| 1305 | - } |
|
| 1306 | - /* |
|
| 1274 | + $filedir=$conf->societe->multidir_output[$object->entity].'/'.$object->id; |
|
| 1275 | + $urlsource=$_SERVER["PHP_SELF"]."?socid=".$object->id; |
|
| 1276 | + $genallowed=$user->rights->societe->lire; |
|
| 1277 | + $delallowed=$user->rights->societe->creer; |
|
| 1278 | + |
|
| 1279 | + print $formfile->showdocuments('company', $object->id, $filedir, $urlsource, $genallowed, $delallowed, $object->modelpdf, 0, 0, 0, 28, 0, 'entity='.$object->entity, 0, '', $object->default_lang); |
|
| 1280 | + |
|
| 1281 | + // Show direct download link |
|
| 1282 | + if (! empty($conf->global->BANK_ACCOUNT_ALLOW_EXTERNAL_DOWNLOAD)) |
|
| 1283 | + { |
|
| 1284 | + $companybankaccounttemp = new CompanyBankAccount($db); |
|
| 1285 | + $companypaymentmodetemp = new CompanyPaymentMode($db); |
|
| 1286 | + $result = $companypaymentmodetemp->fetch(0, null, $object->id, 'ban'); |
|
| 1287 | + |
|
| 1288 | + include_once DOL_DOCUMENT_ROOT.'/ecm/class/ecmfiles.class.php'; |
|
| 1289 | + $ecmfile = new EcmFiles($db); |
|
| 1290 | + $result = $ecmfile->fetch(0, '', '', '', '', $companybankaccounttemp->table_element, $companypaymentmodetemp->id); |
|
| 1291 | + if ($result > 0) |
|
| 1292 | + { |
|
| 1293 | + $companybankaccounttemp->last_main_doc = $ecmfile->filepath.'/'.$ecmfile->filename; |
|
| 1294 | + print '<br><!-- Link to download main doc -->'."\n"; |
|
| 1295 | + print showDirectDownloadLink($companybankaccounttemp).'<br>'; |
|
| 1296 | + } |
|
| 1297 | + } |
|
| 1298 | + |
|
| 1299 | + print '</div><div class="fichehalfright"><div class="ficheaddleft">'; |
|
| 1300 | + |
|
| 1301 | + |
|
| 1302 | + print '</div></div></div>'; |
|
| 1303 | + |
|
| 1304 | + print '<br>'; |
|
| 1305 | + } |
|
| 1306 | + /* |
|
| 1307 | 1307 | include_once DOL_DOCUMENT_ROOT.'/core/modules/bank/modules_bank.php'; |
| 1308 | 1308 | $modellist=ModeleBankAccountDoc::liste_modeles($db); |
| 1309 | 1309 | //print '<td>'; |
@@ -1327,310 +1327,310 @@ discard block |
||
| 1327 | 1327 | // Edit BAN |
| 1328 | 1328 | if ($socid && $action == 'edit' && $user->rights->societe->creer) |
| 1329 | 1329 | { |
| 1330 | - dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company'); |
|
| 1331 | - |
|
| 1332 | - $linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>'; |
|
| 1333 | - |
|
| 1334 | - dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom'); |
|
| 1335 | - |
|
| 1336 | - print '<div class="fichecenter">'; |
|
| 1337 | - |
|
| 1338 | - print '<div class="underbanner clearboth"></div>'; |
|
| 1339 | - print '<table class="border centpercent">'; |
|
| 1340 | - |
|
| 1341 | - print '<tr><td class="titlefield fieldrequired">'.$langs->trans("LabelRIB").'</td>'; |
|
| 1342 | - print '<td><input class="minwidth300" type="text" name="label" value="'.$companybankaccount->label.'"></td></tr>'; |
|
| 1343 | - |
|
| 1344 | - print '<tr><td class="fieldrequired">'.$langs->trans("BankName").'</td>'; |
|
| 1345 | - print '<td><input class="minwidth200" type="text" name="bank" value="'.$companybankaccount->bank.'"></td></tr>'; |
|
| 1346 | - |
|
| 1347 | - // Show fields of bank account |
|
| 1348 | - foreach ($companybankaccount->getFieldsToShow(1) as $val) { |
|
| 1349 | - |
|
| 1350 | - $require=false; |
|
| 1351 | - if ($val == 'BankCode') { |
|
| 1352 | - $name = 'code_banque'; |
|
| 1353 | - $size = 8; |
|
| 1354 | - $content = $companybankaccount->code_banque; |
|
| 1355 | - } elseif ($val == 'DeskCode') { |
|
| 1356 | - $name = 'code_guichet'; |
|
| 1357 | - $size = 8; |
|
| 1358 | - $content = $companybankaccount->code_guichet; |
|
| 1359 | - } elseif ($val == 'BankAccountNumber') { |
|
| 1360 | - $name = 'number'; |
|
| 1361 | - $size = 18; |
|
| 1362 | - $content = $companybankaccount->number; |
|
| 1363 | - } elseif ($val == 'BankAccountNumberKey') { |
|
| 1364 | - $name = 'cle_rib'; |
|
| 1365 | - $size = 3; |
|
| 1366 | - $content = $companybankaccount->cle_rib; |
|
| 1367 | - } elseif ($val == 'IBAN') { |
|
| 1368 | - $name = 'iban'; |
|
| 1369 | - $size = 30; |
|
| 1370 | - $content = $companybankaccount->iban; |
|
| 1371 | - if ($companybankaccount->needIBAN()) $require=true; |
|
| 1372 | - } elseif ($val == 'BIC') { |
|
| 1373 | - $name = 'bic'; |
|
| 1374 | - $size = 12; |
|
| 1375 | - $content = $companybankaccount->bic; |
|
| 1376 | - if ($companybankaccount->needIBAN()) $require=true; |
|
| 1377 | - } |
|
| 1378 | - |
|
| 1379 | - print '<tr><td'.($require?' class="fieldrequired" ':'').'>'.$langs->trans($val).'</td>'; |
|
| 1380 | - print '<td><input size="'.$size.'" type="text" class="flat" name="'.$name.'" value="'.$content.'"></td>'; |
|
| 1381 | - print '</tr>'; |
|
| 1382 | - } |
|
| 1383 | - |
|
| 1384 | - print '<tr><td>'.$langs->trans("BankAccountDomiciliation").'</td><td>'; |
|
| 1385 | - print '<textarea name="domiciliation" rows="4" cols="40" maxlength="255">'; |
|
| 1386 | - print $companybankaccount->domiciliation; |
|
| 1387 | - print "</textarea></td></tr>"; |
|
| 1388 | - |
|
| 1389 | - print '<tr><td>'.$langs->trans("BankAccountOwner").'</td>'; |
|
| 1390 | - print '<td><input class="minwidth300" type="text" name="proprio" value="'.$companybankaccount->proprio.'"></td></tr>'; |
|
| 1391 | - print "</td></tr>\n"; |
|
| 1392 | - |
|
| 1393 | - print '<tr><td>'.$langs->trans("BankAccountOwnerAddress").'</td><td>'; |
|
| 1394 | - print '<textarea name="owner_address" rows="'.ROWS_4.'" cols="40" maxlength="255">'; |
|
| 1395 | - print $companybankaccount->owner_address; |
|
| 1396 | - print "</textarea></td></tr>"; |
|
| 1397 | - |
|
| 1398 | - print '</table>'; |
|
| 1399 | - |
|
| 1400 | - if ($conf->prelevement->enabled) |
|
| 1401 | - { |
|
| 1402 | - print '<br>'; |
|
| 1403 | - |
|
| 1404 | - print '<table class="border" width="100%">'; |
|
| 1405 | - |
|
| 1406 | - if (empty($companybankaccount->rum)) $companybankaccount->rum = $prelevement->buildRumNumber($object->code_client, $companybankaccount->datec, $companybankaccount->id); |
|
| 1407 | - |
|
| 1408 | - // RUM |
|
| 1409 | - print '<tr><td class="titlefield">'.$langs->trans("RUM").'</td>'; |
|
| 1410 | - print '<td><input class="minwidth300" type="text" name="rum" value="'.dol_escape_htmltag($companybankaccount->rum).'"></td></tr>'; |
|
| 1411 | - |
|
| 1412 | - print '<tr><td>'.$langs->trans("WithdrawMode").'</td><td>'; |
|
| 1413 | - $tblArraychoice = array("FRST" => $langs->trans("FRST"), "RECUR" => $langs->trans("RECUR")); |
|
| 1414 | - print $form->selectarray("frstrecur", $tblArraychoice, dol_escape_htmltag(GETPOST('frstrecur','alpha')?GETPOST('frstrecur','alpha'):$companybankaccount->frstrecur), 0); |
|
| 1415 | - print '</td></tr>'; |
|
| 1416 | - |
|
| 1417 | - print '</table>'; |
|
| 1418 | - } |
|
| 1419 | - |
|
| 1420 | - print '</div>'; |
|
| 1421 | - |
|
| 1422 | - dol_fiche_end(); |
|
| 1423 | - |
|
| 1424 | - print '<div align="center">'; |
|
| 1425 | - print '<input class="button" value="'.$langs->trans("Modify").'" type="submit">'; |
|
| 1426 | - print ' '; |
|
| 1427 | - print '<input class="button" name="cancel" value="'.$langs->trans("Cancel").'" type="submit">'; |
|
| 1428 | - print '</div>'; |
|
| 1330 | + dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company'); |
|
| 1331 | + |
|
| 1332 | + $linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>'; |
|
| 1333 | + |
|
| 1334 | + dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom'); |
|
| 1335 | + |
|
| 1336 | + print '<div class="fichecenter">'; |
|
| 1337 | + |
|
| 1338 | + print '<div class="underbanner clearboth"></div>'; |
|
| 1339 | + print '<table class="border centpercent">'; |
|
| 1340 | + |
|
| 1341 | + print '<tr><td class="titlefield fieldrequired">'.$langs->trans("LabelRIB").'</td>'; |
|
| 1342 | + print '<td><input class="minwidth300" type="text" name="label" value="'.$companybankaccount->label.'"></td></tr>'; |
|
| 1343 | + |
|
| 1344 | + print '<tr><td class="fieldrequired">'.$langs->trans("BankName").'</td>'; |
|
| 1345 | + print '<td><input class="minwidth200" type="text" name="bank" value="'.$companybankaccount->bank.'"></td></tr>'; |
|
| 1346 | + |
|
| 1347 | + // Show fields of bank account |
|
| 1348 | + foreach ($companybankaccount->getFieldsToShow(1) as $val) { |
|
| 1349 | + |
|
| 1350 | + $require=false; |
|
| 1351 | + if ($val == 'BankCode') { |
|
| 1352 | + $name = 'code_banque'; |
|
| 1353 | + $size = 8; |
|
| 1354 | + $content = $companybankaccount->code_banque; |
|
| 1355 | + } elseif ($val == 'DeskCode') { |
|
| 1356 | + $name = 'code_guichet'; |
|
| 1357 | + $size = 8; |
|
| 1358 | + $content = $companybankaccount->code_guichet; |
|
| 1359 | + } elseif ($val == 'BankAccountNumber') { |
|
| 1360 | + $name = 'number'; |
|
| 1361 | + $size = 18; |
|
| 1362 | + $content = $companybankaccount->number; |
|
| 1363 | + } elseif ($val == 'BankAccountNumberKey') { |
|
| 1364 | + $name = 'cle_rib'; |
|
| 1365 | + $size = 3; |
|
| 1366 | + $content = $companybankaccount->cle_rib; |
|
| 1367 | + } elseif ($val == 'IBAN') { |
|
| 1368 | + $name = 'iban'; |
|
| 1369 | + $size = 30; |
|
| 1370 | + $content = $companybankaccount->iban; |
|
| 1371 | + if ($companybankaccount->needIBAN()) $require=true; |
|
| 1372 | + } elseif ($val == 'BIC') { |
|
| 1373 | + $name = 'bic'; |
|
| 1374 | + $size = 12; |
|
| 1375 | + $content = $companybankaccount->bic; |
|
| 1376 | + if ($companybankaccount->needIBAN()) $require=true; |
|
| 1377 | + } |
|
| 1378 | + |
|
| 1379 | + print '<tr><td'.($require?' class="fieldrequired" ':'').'>'.$langs->trans($val).'</td>'; |
|
| 1380 | + print '<td><input size="'.$size.'" type="text" class="flat" name="'.$name.'" value="'.$content.'"></td>'; |
|
| 1381 | + print '</tr>'; |
|
| 1382 | + } |
|
| 1383 | + |
|
| 1384 | + print '<tr><td>'.$langs->trans("BankAccountDomiciliation").'</td><td>'; |
|
| 1385 | + print '<textarea name="domiciliation" rows="4" cols="40" maxlength="255">'; |
|
| 1386 | + print $companybankaccount->domiciliation; |
|
| 1387 | + print "</textarea></td></tr>"; |
|
| 1388 | + |
|
| 1389 | + print '<tr><td>'.$langs->trans("BankAccountOwner").'</td>'; |
|
| 1390 | + print '<td><input class="minwidth300" type="text" name="proprio" value="'.$companybankaccount->proprio.'"></td></tr>'; |
|
| 1391 | + print "</td></tr>\n"; |
|
| 1392 | + |
|
| 1393 | + print '<tr><td>'.$langs->trans("BankAccountOwnerAddress").'</td><td>'; |
|
| 1394 | + print '<textarea name="owner_address" rows="'.ROWS_4.'" cols="40" maxlength="255">'; |
|
| 1395 | + print $companybankaccount->owner_address; |
|
| 1396 | + print "</textarea></td></tr>"; |
|
| 1397 | + |
|
| 1398 | + print '</table>'; |
|
| 1399 | + |
|
| 1400 | + if ($conf->prelevement->enabled) |
|
| 1401 | + { |
|
| 1402 | + print '<br>'; |
|
| 1403 | + |
|
| 1404 | + print '<table class="border" width="100%">'; |
|
| 1405 | + |
|
| 1406 | + if (empty($companybankaccount->rum)) $companybankaccount->rum = $prelevement->buildRumNumber($object->code_client, $companybankaccount->datec, $companybankaccount->id); |
|
| 1407 | + |
|
| 1408 | + // RUM |
|
| 1409 | + print '<tr><td class="titlefield">'.$langs->trans("RUM").'</td>'; |
|
| 1410 | + print '<td><input class="minwidth300" type="text" name="rum" value="'.dol_escape_htmltag($companybankaccount->rum).'"></td></tr>'; |
|
| 1411 | + |
|
| 1412 | + print '<tr><td>'.$langs->trans("WithdrawMode").'</td><td>'; |
|
| 1413 | + $tblArraychoice = array("FRST" => $langs->trans("FRST"), "RECUR" => $langs->trans("RECUR")); |
|
| 1414 | + print $form->selectarray("frstrecur", $tblArraychoice, dol_escape_htmltag(GETPOST('frstrecur','alpha')?GETPOST('frstrecur','alpha'):$companybankaccount->frstrecur), 0); |
|
| 1415 | + print '</td></tr>'; |
|
| 1416 | + |
|
| 1417 | + print '</table>'; |
|
| 1418 | + } |
|
| 1419 | + |
|
| 1420 | + print '</div>'; |
|
| 1421 | + |
|
| 1422 | + dol_fiche_end(); |
|
| 1423 | + |
|
| 1424 | + print '<div align="center">'; |
|
| 1425 | + print '<input class="button" value="'.$langs->trans("Modify").'" type="submit">'; |
|
| 1426 | + print ' '; |
|
| 1427 | + print '<input class="button" name="cancel" value="'.$langs->trans("Cancel").'" type="submit">'; |
|
| 1428 | + print '</div>'; |
|
| 1429 | 1429 | } |
| 1430 | 1430 | |
| 1431 | 1431 | // Edit Card |
| 1432 | 1432 | if ($socid && $action == 'editcard' && $user->rights->societe->creer) |
| 1433 | 1433 | { |
| 1434 | - dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company'); |
|
| 1434 | + dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company'); |
|
| 1435 | 1435 | |
| 1436 | - $linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>'; |
|
| 1436 | + $linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>'; |
|
| 1437 | 1437 | |
| 1438 | - dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom'); |
|
| 1438 | + dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom'); |
|
| 1439 | 1439 | |
| 1440 | - print '<div class="fichecenter">'; |
|
| 1440 | + print '<div class="fichecenter">'; |
|
| 1441 | 1441 | |
| 1442 | - print '<div class="underbanner clearboth"></div>'; |
|
| 1443 | - print '<table class="border centpercent">'; |
|
| 1442 | + print '<div class="underbanner clearboth"></div>'; |
|
| 1443 | + print '<table class="border centpercent">'; |
|
| 1444 | 1444 | |
| 1445 | - print '<tr><td class="titlefieldcreate fieldrequired">'.$langs->trans("Label").'</td>'; |
|
| 1446 | - print '<td><input class="minwidth300" type="text" id="label" name="label" value="'.$companypaymentmode->label.'"></td></tr>'; |
|
| 1445 | + print '<tr><td class="titlefieldcreate fieldrequired">'.$langs->trans("Label").'</td>'; |
|
| 1446 | + print '<td><input class="minwidth300" type="text" id="label" name="label" value="'.$companypaymentmode->label.'"></td></tr>'; |
|
| 1447 | 1447 | |
| 1448 | - print '<tr><td class="fieldrequired">'.$langs->trans("NameOnCard").'</td>'; |
|
| 1449 | - print '<td><input class="minwidth200" type="text" name="proprio" value="'.$companypaymentmode->proprio.'"></td></tr>'; |
|
| 1448 | + print '<tr><td class="fieldrequired">'.$langs->trans("NameOnCard").'</td>'; |
|
| 1449 | + print '<td><input class="minwidth200" type="text" name="proprio" value="'.$companypaymentmode->proprio.'"></td></tr>'; |
|
| 1450 | 1450 | |
| 1451 | - print '<tr><td class="fieldrequired">'.$langs->trans("CardNumber").'</td>'; |
|
| 1452 | - print '<td><input class="minwidth200" type="text" name="cardnumber" value="'.$companypaymentmode->number.'"></td></tr>'; |
|
| 1451 | + print '<tr><td class="fieldrequired">'.$langs->trans("CardNumber").'</td>'; |
|
| 1452 | + print '<td><input class="minwidth200" type="text" name="cardnumber" value="'.$companypaymentmode->number.'"></td></tr>'; |
|
| 1453 | 1453 | |
| 1454 | - print '<tr><td class="fieldrequired">'.$langs->trans("ExpiryDate").'</td>'; |
|
| 1455 | - print '<td>'; |
|
| 1456 | - print $formother->select_month($companypaymentmode->exp_date_month, 'exp_date_month', 1); |
|
| 1457 | - print $formother->select_year($companypaymentmode->exp_date_year, 'exp_date_year', 1, 5, 10, 0, 0, '', 'marginleftonly'); |
|
| 1458 | - print '</td></tr>'; |
|
| 1454 | + print '<tr><td class="fieldrequired">'.$langs->trans("ExpiryDate").'</td>'; |
|
| 1455 | + print '<td>'; |
|
| 1456 | + print $formother->select_month($companypaymentmode->exp_date_month, 'exp_date_month', 1); |
|
| 1457 | + print $formother->select_year($companypaymentmode->exp_date_year, 'exp_date_year', 1, 5, 10, 0, 0, '', 'marginleftonly'); |
|
| 1458 | + print '</td></tr>'; |
|
| 1459 | 1459 | |
| 1460 | - print '<tr><td class="fieldrequired">'.$langs->trans("CVN").'</td>'; |
|
| 1461 | - print '<td><input size="8" type="text" name="cvn" value="'.$companypaymentmode->cvn.'"></td></tr>'; |
|
| 1460 | + print '<tr><td class="fieldrequired">'.$langs->trans("CVN").'</td>'; |
|
| 1461 | + print '<td><input size="8" type="text" name="cvn" value="'.$companypaymentmode->cvn.'"></td></tr>'; |
|
| 1462 | 1462 | |
| 1463 | - print '<tr><td>'.$langs->trans("StripeID")." ('card_....')</td>"; |
|
| 1464 | - print '<td><input class="minwidth300" type="text" name="stripe_card_ref" value="'.$companypaymentmode->stripe_card_ref.'"></td></tr>'; |
|
| 1463 | + print '<tr><td>'.$langs->trans("StripeID")." ('card_....')</td>"; |
|
| 1464 | + print '<td><input class="minwidth300" type="text" name="stripe_card_ref" value="'.$companypaymentmode->stripe_card_ref.'"></td></tr>'; |
|
| 1465 | 1465 | |
| 1466 | - print '</table>'; |
|
| 1467 | - print '</div>'; |
|
| 1466 | + print '</table>'; |
|
| 1467 | + print '</div>'; |
|
| 1468 | 1468 | |
| 1469 | - dol_fiche_end(); |
|
| 1469 | + dol_fiche_end(); |
|
| 1470 | 1470 | |
| 1471 | - print '<div align="center">'; |
|
| 1472 | - print '<input class="button" value="'.$langs->trans("Modify").'" type="submit">'; |
|
| 1473 | - print ' '; |
|
| 1474 | - print '<input class="button" name="cancel" value="'.$langs->trans("Cancel").'" type="submit">'; |
|
| 1475 | - print '</div>'; |
|
| 1471 | + print '<div align="center">'; |
|
| 1472 | + print '<input class="button" value="'.$langs->trans("Modify").'" type="submit">'; |
|
| 1473 | + print ' '; |
|
| 1474 | + print '<input class="button" name="cancel" value="'.$langs->trans("Cancel").'" type="submit">'; |
|
| 1475 | + print '</div>'; |
|
| 1476 | 1476 | } |
| 1477 | 1477 | |
| 1478 | 1478 | |
| 1479 | 1479 | // Create BAN |
| 1480 | 1480 | if ($socid && $action == 'create' && $user->rights->societe->creer) |
| 1481 | 1481 | { |
| 1482 | - dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company'); |
|
| 1483 | - |
|
| 1484 | - $linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>'; |
|
| 1485 | - |
|
| 1486 | - dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom'); |
|
| 1487 | - |
|
| 1488 | - print '<div class="nofichecenter">'; |
|
| 1489 | - |
|
| 1490 | - print '<div class="underbanner clearboth"></div>'; |
|
| 1491 | - print '<table class="border centpercent">'; |
|
| 1492 | - |
|
| 1493 | - print '<tr><td class="titlefieldcreate fieldrequired">'.$langs->trans("LabelRIB").'</td>'; |
|
| 1494 | - print '<td><input class="minwidth200" type="text" id="label" name="label" value="'.GETPOST('label').'"></td></tr>'; |
|
| 1495 | - |
|
| 1496 | - print '<tr><td class="fieldrequired">'.$langs->trans("Bank").'</td>'; |
|
| 1497 | - print '<td><input class="minwidth200" type="text" name="bank" value="'.GETPOST('bank').'"></td></tr>'; |
|
| 1498 | - |
|
| 1499 | - // Show fields of bank account |
|
| 1500 | - foreach ($companybankaccount->getFieldsToShow(1) as $val) { |
|
| 1501 | - |
|
| 1502 | - $require=false; |
|
| 1503 | - if ($val == 'BankCode') { |
|
| 1504 | - $name = 'code_banque'; |
|
| 1505 | - $size = 8; |
|
| 1506 | - } elseif ($val == 'DeskCode') { |
|
| 1507 | - $name = 'code_guichet'; |
|
| 1508 | - $size = 8; |
|
| 1509 | - } elseif ($val == 'BankAccountNumber') { |
|
| 1510 | - $name = 'number'; |
|
| 1511 | - $size = 18; |
|
| 1512 | - } elseif ($val == 'BankAccountNumberKey') { |
|
| 1513 | - $name = 'cle_rib'; |
|
| 1514 | - $size = 3; |
|
| 1515 | - } elseif ($val == 'IBAN') { |
|
| 1516 | - $name = 'iban'; |
|
| 1517 | - $size = 30; |
|
| 1518 | - if ($companybankaccount->needIBAN()) $require=true; |
|
| 1519 | - } elseif ($val == 'BIC') { |
|
| 1520 | - $name = 'bic'; |
|
| 1521 | - $size = 12; |
|
| 1522 | - if ($companybankaccount->needIBAN()) $require=true; |
|
| 1523 | - } |
|
| 1524 | - |
|
| 1525 | - print '<tr><td'.($require?' class="fieldrequired" ':'').'>'.$langs->trans($val).'</td>'; |
|
| 1526 | - print '<td><input size="'.$size.'" type="text" class="flat" name="'.$name.'" value="'.GETPOST($name).'"></td>'; |
|
| 1527 | - print '</tr>'; |
|
| 1528 | - } |
|
| 1529 | - |
|
| 1530 | - print '<tr><td>'.$langs->trans("BankAccountDomiciliation").'</td><td>'; |
|
| 1531 | - print '<textarea name="domiciliation" rows="'.ROWS_4.'" class="quatrevingtpercent" maxlength="255">'; |
|
| 1532 | - print GETPOST('domiciliation'); |
|
| 1533 | - print "</textarea></td></tr>"; |
|
| 1534 | - |
|
| 1535 | - print '<tr><td>'.$langs->trans("BankAccountOwner").'</td>'; |
|
| 1536 | - print '<td><input class="minwidth200" type="text" name="proprio" value="'.GETPOST('proprio').'"></td></tr>'; |
|
| 1537 | - print "</td></tr>\n"; |
|
| 1538 | - |
|
| 1539 | - print '<tr><td>'.$langs->trans("BankAccountOwnerAddress").'</td><td>'; |
|
| 1540 | - print '<textarea name="owner_address" rows="'.ROWS_4.'" class="quatrevingtpercent" maxlength="255">'; |
|
| 1541 | - print GETPOST('owner_address'); |
|
| 1542 | - print "</textarea></td></tr>"; |
|
| 1543 | - |
|
| 1544 | - print '</table>'; |
|
| 1545 | - |
|
| 1546 | - if ($conf->prelevement->enabled) |
|
| 1547 | - { |
|
| 1548 | - print '<br>'; |
|
| 1549 | - |
|
| 1550 | - print '<table class="border" width="100%">'; |
|
| 1551 | - |
|
| 1552 | - // RUM |
|
| 1553 | - print '<tr><td class="titlefieldcreate">'.$langs->trans("RUM").'</td>'; |
|
| 1554 | - print '<td colspan="4"><input type="text" class="minwidth300" name="rum" value="'.GETPOST('rum','alpha').'"> <div class="opacitymedium">'.$langs->trans("RUMWillBeGenerated").'</div></td></tr>'; |
|
| 1555 | - |
|
| 1556 | - print '<tr><td>'.$langs->trans("WithdrawMode").'</td><td>'; |
|
| 1557 | - $tblArraychoice = array("FRST" => $langs->trans("FRST"), "RECUR" => $langs->trans("RECUR")); |
|
| 1558 | - print $form->selectarray("frstrecur", $tblArraychoice, (isset($_POST['frstrecur'])?GETPOST('frstrecur'):'FRST'), 0); |
|
| 1559 | - print '</td></tr>'; |
|
| 1560 | - |
|
| 1561 | - print '</table>'; |
|
| 1562 | - } |
|
| 1563 | - |
|
| 1564 | - print '</div>'; |
|
| 1565 | - |
|
| 1566 | - dol_fiche_end(); |
|
| 1567 | - |
|
| 1568 | - dol_set_focus('#label'); |
|
| 1569 | - |
|
| 1570 | - print '<div class="center">'; |
|
| 1571 | - print '<input class="button" value="'.$langs->trans("Add").'" type="submit">'; |
|
| 1572 | - print ' '; |
|
| 1573 | - print '<input name="cancel" class="button" value="'.$langs->trans("Cancel").'" type="submit">'; |
|
| 1574 | - print '</div>'; |
|
| 1482 | + dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company'); |
|
| 1483 | + |
|
| 1484 | + $linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>'; |
|
| 1485 | + |
|
| 1486 | + dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom'); |
|
| 1487 | + |
|
| 1488 | + print '<div class="nofichecenter">'; |
|
| 1489 | + |
|
| 1490 | + print '<div class="underbanner clearboth"></div>'; |
|
| 1491 | + print '<table class="border centpercent">'; |
|
| 1492 | + |
|
| 1493 | + print '<tr><td class="titlefieldcreate fieldrequired">'.$langs->trans("LabelRIB").'</td>'; |
|
| 1494 | + print '<td><input class="minwidth200" type="text" id="label" name="label" value="'.GETPOST('label').'"></td></tr>'; |
|
| 1495 | + |
|
| 1496 | + print '<tr><td class="fieldrequired">'.$langs->trans("Bank").'</td>'; |
|
| 1497 | + print '<td><input class="minwidth200" type="text" name="bank" value="'.GETPOST('bank').'"></td></tr>'; |
|
| 1498 | + |
|
| 1499 | + // Show fields of bank account |
|
| 1500 | + foreach ($companybankaccount->getFieldsToShow(1) as $val) { |
|
| 1501 | + |
|
| 1502 | + $require=false; |
|
| 1503 | + if ($val == 'BankCode') { |
|
| 1504 | + $name = 'code_banque'; |
|
| 1505 | + $size = 8; |
|
| 1506 | + } elseif ($val == 'DeskCode') { |
|
| 1507 | + $name = 'code_guichet'; |
|
| 1508 | + $size = 8; |
|
| 1509 | + } elseif ($val == 'BankAccountNumber') { |
|
| 1510 | + $name = 'number'; |
|
| 1511 | + $size = 18; |
|
| 1512 | + } elseif ($val == 'BankAccountNumberKey') { |
|
| 1513 | + $name = 'cle_rib'; |
|
| 1514 | + $size = 3; |
|
| 1515 | + } elseif ($val == 'IBAN') { |
|
| 1516 | + $name = 'iban'; |
|
| 1517 | + $size = 30; |
|
| 1518 | + if ($companybankaccount->needIBAN()) $require=true; |
|
| 1519 | + } elseif ($val == 'BIC') { |
|
| 1520 | + $name = 'bic'; |
|
| 1521 | + $size = 12; |
|
| 1522 | + if ($companybankaccount->needIBAN()) $require=true; |
|
| 1523 | + } |
|
| 1524 | + |
|
| 1525 | + print '<tr><td'.($require?' class="fieldrequired" ':'').'>'.$langs->trans($val).'</td>'; |
|
| 1526 | + print '<td><input size="'.$size.'" type="text" class="flat" name="'.$name.'" value="'.GETPOST($name).'"></td>'; |
|
| 1527 | + print '</tr>'; |
|
| 1528 | + } |
|
| 1529 | + |
|
| 1530 | + print '<tr><td>'.$langs->trans("BankAccountDomiciliation").'</td><td>'; |
|
| 1531 | + print '<textarea name="domiciliation" rows="'.ROWS_4.'" class="quatrevingtpercent" maxlength="255">'; |
|
| 1532 | + print GETPOST('domiciliation'); |
|
| 1533 | + print "</textarea></td></tr>"; |
|
| 1534 | + |
|
| 1535 | + print '<tr><td>'.$langs->trans("BankAccountOwner").'</td>'; |
|
| 1536 | + print '<td><input class="minwidth200" type="text" name="proprio" value="'.GETPOST('proprio').'"></td></tr>'; |
|
| 1537 | + print "</td></tr>\n"; |
|
| 1538 | + |
|
| 1539 | + print '<tr><td>'.$langs->trans("BankAccountOwnerAddress").'</td><td>'; |
|
| 1540 | + print '<textarea name="owner_address" rows="'.ROWS_4.'" class="quatrevingtpercent" maxlength="255">'; |
|
| 1541 | + print GETPOST('owner_address'); |
|
| 1542 | + print "</textarea></td></tr>"; |
|
| 1543 | + |
|
| 1544 | + print '</table>'; |
|
| 1545 | + |
|
| 1546 | + if ($conf->prelevement->enabled) |
|
| 1547 | + { |
|
| 1548 | + print '<br>'; |
|
| 1549 | + |
|
| 1550 | + print '<table class="border" width="100%">'; |
|
| 1551 | + |
|
| 1552 | + // RUM |
|
| 1553 | + print '<tr><td class="titlefieldcreate">'.$langs->trans("RUM").'</td>'; |
|
| 1554 | + print '<td colspan="4"><input type="text" class="minwidth300" name="rum" value="'.GETPOST('rum','alpha').'"> <div class="opacitymedium">'.$langs->trans("RUMWillBeGenerated").'</div></td></tr>'; |
|
| 1555 | + |
|
| 1556 | + print '<tr><td>'.$langs->trans("WithdrawMode").'</td><td>'; |
|
| 1557 | + $tblArraychoice = array("FRST" => $langs->trans("FRST"), "RECUR" => $langs->trans("RECUR")); |
|
| 1558 | + print $form->selectarray("frstrecur", $tblArraychoice, (isset($_POST['frstrecur'])?GETPOST('frstrecur'):'FRST'), 0); |
|
| 1559 | + print '</td></tr>'; |
|
| 1560 | + |
|
| 1561 | + print '</table>'; |
|
| 1562 | + } |
|
| 1563 | + |
|
| 1564 | + print '</div>'; |
|
| 1565 | + |
|
| 1566 | + dol_fiche_end(); |
|
| 1567 | + |
|
| 1568 | + dol_set_focus('#label'); |
|
| 1569 | + |
|
| 1570 | + print '<div class="center">'; |
|
| 1571 | + print '<input class="button" value="'.$langs->trans("Add").'" type="submit">'; |
|
| 1572 | + print ' '; |
|
| 1573 | + print '<input name="cancel" class="button" value="'.$langs->trans("Cancel").'" type="submit">'; |
|
| 1574 | + print '</div>'; |
|
| 1575 | 1575 | } |
| 1576 | 1576 | |
| 1577 | 1577 | // Create Card |
| 1578 | 1578 | if ($socid && $action == 'createcard' && $user->rights->societe->creer) |
| 1579 | 1579 | { |
| 1580 | - dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company'); |
|
| 1580 | + dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company'); |
|
| 1581 | 1581 | |
| 1582 | - $linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>'; |
|
| 1582 | + $linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>'; |
|
| 1583 | 1583 | |
| 1584 | - dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom'); |
|
| 1584 | + dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom'); |
|
| 1585 | 1585 | |
| 1586 | - print '<div class="nofichecenter">'; |
|
| 1586 | + print '<div class="nofichecenter">'; |
|
| 1587 | 1587 | |
| 1588 | - print '<div class="underbanner clearboth"></div>'; |
|
| 1589 | - print '<table class="border centpercent">'; |
|
| 1588 | + print '<div class="underbanner clearboth"></div>'; |
|
| 1589 | + print '<table class="border centpercent">'; |
|
| 1590 | 1590 | |
| 1591 | - print '<tr><td class="titlefieldcreate fieldrequired">'.$langs->trans("Label").'</td>'; |
|
| 1592 | - print '<td><input class="minwidth200" type="text" id="label" name="label" value="'.GETPOST('label','alpha').'"></td></tr>'; |
|
| 1591 | + print '<tr><td class="titlefieldcreate fieldrequired">'.$langs->trans("Label").'</td>'; |
|
| 1592 | + print '<td><input class="minwidth200" type="text" id="label" name="label" value="'.GETPOST('label','alpha').'"></td></tr>'; |
|
| 1593 | 1593 | |
| 1594 | - print '<tr><td class="fieldrequired">'.$langs->trans("NameOnCard").'</td>'; |
|
| 1595 | - print '<td><input class="minwidth200" type="text" name="proprio" value="'.GETPOST('proprio','alpha').'"></td></tr>'; |
|
| 1594 | + print '<tr><td class="fieldrequired">'.$langs->trans("NameOnCard").'</td>'; |
|
| 1595 | + print '<td><input class="minwidth200" type="text" name="proprio" value="'.GETPOST('proprio','alpha').'"></td></tr>'; |
|
| 1596 | 1596 | |
| 1597 | - print '<tr><td class="fieldrequired">'.$langs->trans("CardNumber").'</td>'; |
|
| 1598 | - print '<td><input class="minwidth200" type="text" name="cardnumber" value="'.GETPOST('cardnumber','alpha').'"></td></tr>'; |
|
| 1597 | + print '<tr><td class="fieldrequired">'.$langs->trans("CardNumber").'</td>'; |
|
| 1598 | + print '<td><input class="minwidth200" type="text" name="cardnumber" value="'.GETPOST('cardnumber','alpha').'"></td></tr>'; |
|
| 1599 | 1599 | |
| 1600 | - print '<tr><td class="fieldrequired">'.$langs->trans("ExpiryDate").'</td>'; |
|
| 1601 | - print '<td>'; |
|
| 1602 | - print $formother->select_month(GETPOST('exp_date_month','int'), 'exp_date_month', 1); |
|
| 1603 | - print $formother->select_year(GETPOST('exp_date_year','int'), 'exp_date_year', 1, 5, 10, 0, 0, '', 'marginleftonly'); |
|
| 1604 | - print '</td></tr>'; |
|
| 1600 | + print '<tr><td class="fieldrequired">'.$langs->trans("ExpiryDate").'</td>'; |
|
| 1601 | + print '<td>'; |
|
| 1602 | + print $formother->select_month(GETPOST('exp_date_month','int'), 'exp_date_month', 1); |
|
| 1603 | + print $formother->select_year(GETPOST('exp_date_year','int'), 'exp_date_year', 1, 5, 10, 0, 0, '', 'marginleftonly'); |
|
| 1604 | + print '</td></tr>'; |
|
| 1605 | 1605 | |
| 1606 | - print '<tr><td class="fieldrequired">'.$langs->trans("CVN").'</td>'; |
|
| 1607 | - print '<td><input size="8" type="text" name="cvn" value="'.GETPOST('cvn','alpha').'"></td></tr>'; |
|
| 1606 | + print '<tr><td class="fieldrequired">'.$langs->trans("CVN").'</td>'; |
|
| 1607 | + print '<td><input size="8" type="text" name="cvn" value="'.GETPOST('cvn','alpha').'"></td></tr>'; |
|
| 1608 | 1608 | |
| 1609 | - print '<tr><td>'.$langs->trans("StripeID")." ('card_....')</td>"; |
|
| 1610 | - print '<td><input class="minwidth300" type="text" name="stripe_card_ref" value="'.GETPOST('stripe_card_ref','alpha').'"></td></tr>'; |
|
| 1609 | + print '<tr><td>'.$langs->trans("StripeID")." ('card_....')</td>"; |
|
| 1610 | + print '<td><input class="minwidth300" type="text" name="stripe_card_ref" value="'.GETPOST('stripe_card_ref','alpha').'"></td></tr>'; |
|
| 1611 | 1611 | |
| 1612 | - print '</table>'; |
|
| 1612 | + print '</table>'; |
|
| 1613 | 1613 | |
| 1614 | - print '</div>'; |
|
| 1614 | + print '</div>'; |
|
| 1615 | 1615 | |
| 1616 | - dol_fiche_end(); |
|
| 1616 | + dol_fiche_end(); |
|
| 1617 | 1617 | |
| 1618 | - dol_set_focus('#label'); |
|
| 1618 | + dol_set_focus('#label'); |
|
| 1619 | 1619 | |
| 1620 | - print '<div class="center">'; |
|
| 1621 | - print '<input class="button" value="'.$langs->trans("Add").'" type="submit">'; |
|
| 1622 | - print ' '; |
|
| 1623 | - print '<input name="cancel" class="button" value="'.$langs->trans("Cancel").'" type="submit">'; |
|
| 1624 | - print '</div>'; |
|
| 1620 | + print '<div class="center">'; |
|
| 1621 | + print '<input class="button" value="'.$langs->trans("Add").'" type="submit">'; |
|
| 1622 | + print ' '; |
|
| 1623 | + print '<input name="cancel" class="button" value="'.$langs->trans("Cancel").'" type="submit">'; |
|
| 1624 | + print '</div>'; |
|
| 1625 | 1625 | } |
| 1626 | 1626 | |
| 1627 | 1627 | if ($socid && ($action == 'edit' || $action == 'editcard') && $user->rights->societe->creer) |
| 1628 | 1628 | { |
| 1629 | - print '</form>'; |
|
| 1629 | + print '</form>'; |
|
| 1630 | 1630 | } |
| 1631 | 1631 | if ($socid && ($action == 'create' || $action == 'createcard') && $user->rights->societe->creer) |
| 1632 | 1632 | { |
| 1633 | - print '</form>'; |
|
| 1633 | + print '</form>'; |
|
| 1634 | 1634 | } |
| 1635 | 1635 | |
| 1636 | 1636 | // End of page |
@@ -125,8 +125,8 @@ |
||
| 125 | 125 | } |
| 126 | 126 | else |
| 127 | 127 | { |
| 128 | - $langs->load("errors"); |
|
| 129 | - print $langs->trans("ErrorRecordNotFound"); |
|
| 128 | + $langs->load("errors"); |
|
| 129 | + print $langs->trans("ErrorRecordNotFound"); |
|
| 130 | 130 | } |
| 131 | 131 | |
| 132 | 132 | // End of page |
@@ -33,9 +33,9 @@ discard block |
||
| 33 | 33 | require_once DOL_DOCUMENT_ROOT . '/societe/class/societe.class.php'; |
| 34 | 34 | |
| 35 | 35 | if (! empty($conf->global->PRODUIT_CUSTOMER_PRICES)) { |
| 36 | - require_once DOL_DOCUMENT_ROOT . '/product/class/productcustomerprice.class.php'; |
|
| 36 | + require_once DOL_DOCUMENT_ROOT . '/product/class/productcustomerprice.class.php'; |
|
| 37 | 37 | |
| 38 | - $prodcustprice = new Productcustomerprice($db); |
|
| 38 | + $prodcustprice = new Productcustomerprice($db); |
|
| 39 | 39 | } |
| 40 | 40 | |
| 41 | 41 | $langs->loadLangs(array("products", "companies", "bills")); |
@@ -47,7 +47,7 @@ discard block |
||
| 47 | 47 | // Security check |
| 48 | 48 | $socid = GETPOST('socid', 'int')?GETPOST('socid', 'int'):GETPOST('id', 'int'); |
| 49 | 49 | if ($user->societe_id) |
| 50 | - $socid = $user->societe_id; |
|
| 50 | + $socid = $user->societe_id; |
|
| 51 | 51 | $result = restrictedArea($user, 'societe', $socid, '&societe'); |
| 52 | 52 | |
| 53 | 53 | $object = new Societe($db); |
@@ -74,98 +74,98 @@ discard block |
||
| 74 | 74 | |
| 75 | 75 | if ($action == 'add_customer_price_confirm' && ! $cancel && ($user->rights->produit->creer || $user->rights->service->creer)) { |
| 76 | 76 | |
| 77 | - $update_child_soc = GETPOST('updatechildprice'); |
|
| 78 | - |
|
| 79 | - // add price by customer |
|
| 80 | - $prodcustprice->fk_soc = $socid; |
|
| 81 | - $prodcustprice->fk_product = GETPOST('prodid', 'int'); |
|
| 82 | - $prodcustprice->price = price2num(GETPOST("price"), 'MU'); |
|
| 83 | - $prodcustprice->price_min = price2num(GETPOST("price_min"), 'MU'); |
|
| 84 | - $prodcustprice->price_base_type = GETPOST("price_base_type", 'alpha'); |
|
| 85 | - |
|
| 86 | - $tva_tx_txt = GETPOST('tva_tx', 'alpha'); // tva_tx can be '8.5' or '8.5*' or '8.5 (XXX)' or '8.5* (XXX)' |
|
| 87 | - |
|
| 88 | - // We must define tva_tx, npr and local taxes |
|
| 89 | - $vatratecode = ''; |
|
| 90 | - $tva_tx = preg_replace('/[^0-9\.].*$/', '', $tva_tx_txt); // keep remove all after the numbers and dot |
|
| 91 | - $npr = preg_match('/\*/', $tva_tx_txt) ? 1 : 0; |
|
| 92 | - $localtax1 = 0; $localtax2 = 0; $localtax1_type = '0'; $localtax2_type = '0'; |
|
| 93 | - // If value contains the unique code of vat line (new recommanded method), we use it to find npr and local taxes |
|
| 94 | - if (preg_match('/\((.*)\)/', $tva_tx_txt, $reg)) |
|
| 95 | - { |
|
| 96 | - // We look into database using code (we can't use get_localtax() because it depends on buyer that is not known). Same in update price. |
|
| 97 | - $vatratecode=$reg[1]; |
|
| 98 | - // Get record from code |
|
| 99 | - $sql = "SELECT t.rowid, t.code, t.recuperableonly, t.localtax1, t.localtax2, t.localtax1_type, t.localtax2_type"; |
|
| 100 | - $sql.= " FROM ".MAIN_DB_PREFIX."c_tva as t, ".MAIN_DB_PREFIX."c_country as c"; |
|
| 101 | - $sql.= " WHERE t.fk_pays = c.rowid AND c.code = '".$mysoc->country_code."'"; |
|
| 102 | - $sql.= " AND t.taux = ".((float) $tva_tx)." AND t.active = 1"; |
|
| 103 | - $sql.= " AND t.code ='".$vatratecode."'"; |
|
| 104 | - $resql=$db->query($sql); |
|
| 105 | - if ($resql) |
|
| 106 | - { |
|
| 107 | - $obj = $db->fetch_object($resql); |
|
| 108 | - $npr = $obj->recuperableonly; |
|
| 109 | - $localtax1 = $obj->localtax1; |
|
| 110 | - $localtax2 = $obj->localtax2; |
|
| 111 | - $localtax1_type = $obj->localtax1_type; |
|
| 112 | - $localtax2_type = $obj->localtax2_type; |
|
| 113 | - } |
|
| 114 | - } |
|
| 115 | - |
|
| 116 | - $prodcustprice->default_vat_code = $vatratecode; |
|
| 117 | - $prodcustprice->tva_tx = $tva_tx; |
|
| 118 | - $prodcustprice->recuperableonly = $npr; |
|
| 119 | - $prodcustprice->localtax1_tx = $localtax1; |
|
| 120 | - $prodcustprice->localtax2_tx = $localtax2; |
|
| 121 | - $prodcustprice->localtax1_type = $localtax1_type; |
|
| 122 | - $prodcustprice->localtax2_type = $localtax2_type; |
|
| 123 | - |
|
| 124 | - $result = $prodcustprice->create($user, 0, $update_child_soc); |
|
| 125 | - |
|
| 126 | - if ($result < 0) { |
|
| 127 | - setEventMessages($prodcustprice->error, $prodcustprice->errors, 'errors'); |
|
| 128 | - } else { |
|
| 129 | - setEventMessages($langs->trans('Save'), null, 'mesgs'); |
|
| 130 | - } |
|
| 131 | - |
|
| 132 | - $action = ''; |
|
| 77 | + $update_child_soc = GETPOST('updatechildprice'); |
|
| 78 | + |
|
| 79 | + // add price by customer |
|
| 80 | + $prodcustprice->fk_soc = $socid; |
|
| 81 | + $prodcustprice->fk_product = GETPOST('prodid', 'int'); |
|
| 82 | + $prodcustprice->price = price2num(GETPOST("price"), 'MU'); |
|
| 83 | + $prodcustprice->price_min = price2num(GETPOST("price_min"), 'MU'); |
|
| 84 | + $prodcustprice->price_base_type = GETPOST("price_base_type", 'alpha'); |
|
| 85 | + |
|
| 86 | + $tva_tx_txt = GETPOST('tva_tx', 'alpha'); // tva_tx can be '8.5' or '8.5*' or '8.5 (XXX)' or '8.5* (XXX)' |
|
| 87 | + |
|
| 88 | + // We must define tva_tx, npr and local taxes |
|
| 89 | + $vatratecode = ''; |
|
| 90 | + $tva_tx = preg_replace('/[^0-9\.].*$/', '', $tva_tx_txt); // keep remove all after the numbers and dot |
|
| 91 | + $npr = preg_match('/\*/', $tva_tx_txt) ? 1 : 0; |
|
| 92 | + $localtax1 = 0; $localtax2 = 0; $localtax1_type = '0'; $localtax2_type = '0'; |
|
| 93 | + // If value contains the unique code of vat line (new recommanded method), we use it to find npr and local taxes |
|
| 94 | + if (preg_match('/\((.*)\)/', $tva_tx_txt, $reg)) |
|
| 95 | + { |
|
| 96 | + // We look into database using code (we can't use get_localtax() because it depends on buyer that is not known). Same in update price. |
|
| 97 | + $vatratecode=$reg[1]; |
|
| 98 | + // Get record from code |
|
| 99 | + $sql = "SELECT t.rowid, t.code, t.recuperableonly, t.localtax1, t.localtax2, t.localtax1_type, t.localtax2_type"; |
|
| 100 | + $sql.= " FROM ".MAIN_DB_PREFIX."c_tva as t, ".MAIN_DB_PREFIX."c_country as c"; |
|
| 101 | + $sql.= " WHERE t.fk_pays = c.rowid AND c.code = '".$mysoc->country_code."'"; |
|
| 102 | + $sql.= " AND t.taux = ".((float) $tva_tx)." AND t.active = 1"; |
|
| 103 | + $sql.= " AND t.code ='".$vatratecode."'"; |
|
| 104 | + $resql=$db->query($sql); |
|
| 105 | + if ($resql) |
|
| 106 | + { |
|
| 107 | + $obj = $db->fetch_object($resql); |
|
| 108 | + $npr = $obj->recuperableonly; |
|
| 109 | + $localtax1 = $obj->localtax1; |
|
| 110 | + $localtax2 = $obj->localtax2; |
|
| 111 | + $localtax1_type = $obj->localtax1_type; |
|
| 112 | + $localtax2_type = $obj->localtax2_type; |
|
| 113 | + } |
|
| 114 | + } |
|
| 115 | + |
|
| 116 | + $prodcustprice->default_vat_code = $vatratecode; |
|
| 117 | + $prodcustprice->tva_tx = $tva_tx; |
|
| 118 | + $prodcustprice->recuperableonly = $npr; |
|
| 119 | + $prodcustprice->localtax1_tx = $localtax1; |
|
| 120 | + $prodcustprice->localtax2_tx = $localtax2; |
|
| 121 | + $prodcustprice->localtax1_type = $localtax1_type; |
|
| 122 | + $prodcustprice->localtax2_type = $localtax2_type; |
|
| 123 | + |
|
| 124 | + $result = $prodcustprice->create($user, 0, $update_child_soc); |
|
| 125 | + |
|
| 126 | + if ($result < 0) { |
|
| 127 | + setEventMessages($prodcustprice->error, $prodcustprice->errors, 'errors'); |
|
| 128 | + } else { |
|
| 129 | + setEventMessages($langs->trans('Save'), null, 'mesgs'); |
|
| 130 | + } |
|
| 131 | + |
|
| 132 | + $action = ''; |
|
| 133 | 133 | } |
| 134 | 134 | |
| 135 | 135 | if ($action == 'delete_customer_price' && ($user->rights->produit->creer || $user->rights->service->creer)) { |
| 136 | - // Delete price by customer |
|
| 137 | - $prodcustprice->id = GETPOST('lineid'); |
|
| 138 | - $result = $prodcustprice->delete($user); |
|
| 139 | - |
|
| 140 | - if ($result < 0) { |
|
| 141 | - setEventMessages($prodcustprice->error, $prodcustprice->errors, 'mesgs'); |
|
| 142 | - } else { |
|
| 143 | - setEventMessages($langs->trans('Delete'), null, 'errors'); |
|
| 144 | - } |
|
| 145 | - $action = ''; |
|
| 136 | + // Delete price by customer |
|
| 137 | + $prodcustprice->id = GETPOST('lineid'); |
|
| 138 | + $result = $prodcustprice->delete($user); |
|
| 139 | + |
|
| 140 | + if ($result < 0) { |
|
| 141 | + setEventMessages($prodcustprice->error, $prodcustprice->errors, 'mesgs'); |
|
| 142 | + } else { |
|
| 143 | + setEventMessages($langs->trans('Delete'), null, 'errors'); |
|
| 144 | + } |
|
| 145 | + $action = ''; |
|
| 146 | 146 | } |
| 147 | 147 | |
| 148 | 148 | if ($action == 'update_customer_price_confirm' && ! $_POST ["cancel"] && ($user->rights->produit->creer || $user->rights->service->creer)) { |
| 149 | 149 | |
| 150 | - $prodcustprice->fetch(GETPOST('lineid', 'int')); |
|
| 150 | + $prodcustprice->fetch(GETPOST('lineid', 'int')); |
|
| 151 | 151 | |
| 152 | - $update_child_soc = GETPOST('updatechildprice'); |
|
| 152 | + $update_child_soc = GETPOST('updatechildprice'); |
|
| 153 | 153 | |
| 154 | - // update price by customer |
|
| 155 | - $prodcustprice->price = price2num(GETPOST("price"), 'MU'); |
|
| 156 | - $prodcustprice->price_min = price2num(GETPOST("price_min"), 'MU'); |
|
| 157 | - $prodcustprice->price_base_type = GETPOST("price_base_type", 'alpha'); |
|
| 158 | - $prodcustprice->tva_tx = str_replace('*', '', GETPOST("tva_tx")); |
|
| 159 | - $prodcustprice->recuperableonly = (preg_match('/\*/', GETPOST("tva_tx")) ? 1 : 0); |
|
| 154 | + // update price by customer |
|
| 155 | + $prodcustprice->price = price2num(GETPOST("price"), 'MU'); |
|
| 156 | + $prodcustprice->price_min = price2num(GETPOST("price_min"), 'MU'); |
|
| 157 | + $prodcustprice->price_base_type = GETPOST("price_base_type", 'alpha'); |
|
| 158 | + $prodcustprice->tva_tx = str_replace('*', '', GETPOST("tva_tx")); |
|
| 159 | + $prodcustprice->recuperableonly = (preg_match('/\*/', GETPOST("tva_tx")) ? 1 : 0); |
|
| 160 | 160 | |
| 161 | - $result = $prodcustprice->update($user, 0, $update_child_soc); |
|
| 162 | - if ($result < 0) { |
|
| 163 | - setEventMessages($prodcustprice->error, $prodcustprice->errors, 'errors'); |
|
| 164 | - } else { |
|
| 165 | - setEventMessages($langs->trans('Save'), null, 'mesgs'); |
|
| 166 | - } |
|
| 161 | + $result = $prodcustprice->update($user, 0, $update_child_soc); |
|
| 162 | + if ($result < 0) { |
|
| 163 | + setEventMessages($prodcustprice->error, $prodcustprice->errors, 'errors'); |
|
| 164 | + } else { |
|
| 165 | + setEventMessages($langs->trans('Save'), null, 'mesgs'); |
|
| 166 | + } |
|
| 167 | 167 | |
| 168 | - $action = ''; |
|
| 168 | + $action = ''; |
|
| 169 | 169 | } |
| 170 | 170 | } |
| 171 | 171 | |
@@ -182,7 +182,7 @@ discard block |
||
| 182 | 182 | llxHeader("", $langs->trans("ThirdParty") . '-' . $langs->trans('PriceByCustomer')); |
| 183 | 183 | |
| 184 | 184 | if (! empty($conf->notification->enabled)) |
| 185 | - $langs->load("mails"); |
|
| 185 | + $langs->load("mails"); |
|
| 186 | 186 | $head = societe_prepare_head($object); |
| 187 | 187 | |
| 188 | 188 | dol_fiche_head($head, 'price', $langs->trans("ThirdParty"), -1, 'company'); |
@@ -198,25 +198,25 @@ discard block |
||
| 198 | 198 | |
| 199 | 199 | if (! empty($conf->global->SOCIETE_USEPREFIX)) // Old not used prefix field |
| 200 | 200 | { |
| 201 | - print '<tr><td class="titlefield">' . $langs->trans('Prefix') . '</td><td colspan="3">' . $object->prefix_comm . '</td></tr>'; |
|
| 201 | + print '<tr><td class="titlefield">' . $langs->trans('Prefix') . '</td><td colspan="3">' . $object->prefix_comm . '</td></tr>'; |
|
| 202 | 202 | } |
| 203 | 203 | |
| 204 | 204 | if ($object->client) { |
| 205 | - print '<tr><td class="titlefield">'; |
|
| 206 | - print $langs->trans('CustomerCode') . '</td><td colspan="3">'; |
|
| 207 | - print $object->code_client; |
|
| 208 | - if ($object->check_codeclient() != 0) |
|
| 209 | - print ' <font class="error">(' . $langs->trans("WrongCustomerCode") . ')</font>'; |
|
| 210 | - print '</td></tr>'; |
|
| 205 | + print '<tr><td class="titlefield">'; |
|
| 206 | + print $langs->trans('CustomerCode') . '</td><td colspan="3">'; |
|
| 207 | + print $object->code_client; |
|
| 208 | + if ($object->check_codeclient() != 0) |
|
| 209 | + print ' <font class="error">(' . $langs->trans("WrongCustomerCode") . ')</font>'; |
|
| 210 | + print '</td></tr>'; |
|
| 211 | 211 | } |
| 212 | 212 | |
| 213 | 213 | if ($object->fournisseur) { |
| 214 | - print '<tr><td class="titlefield">'; |
|
| 215 | - print $langs->trans('SupplierCode') . '</td><td colspan="3">'; |
|
| 216 | - print $object->code_fournisseur; |
|
| 217 | - if ($object->check_codefournisseur() != 0) |
|
| 218 | - print ' <font class="error">(' . $langs->trans("WrongSupplierCode") . ')</font>'; |
|
| 219 | - print '</td></tr>'; |
|
| 214 | + print '<tr><td class="titlefield">'; |
|
| 215 | + print $langs->trans('SupplierCode') . '</td><td colspan="3">'; |
|
| 216 | + print $object->code_fournisseur; |
|
| 217 | + if ($object->check_codefournisseur() != 0) |
|
| 218 | + print ' <font class="error">(' . $langs->trans("WrongSupplierCode") . ')</font>'; |
|
| 219 | + print '</td></tr>'; |
|
| 220 | 220 | } |
| 221 | 221 | |
| 222 | 222 | print '</table>'; |
@@ -229,277 +229,277 @@ discard block |
||
| 229 | 229 | |
| 230 | 230 | if (! empty($conf->global->PRODUIT_CUSTOMER_PRICES)) { |
| 231 | 231 | |
| 232 | - $prodcustprice = new Productcustomerprice($db); |
|
| 232 | + $prodcustprice = new Productcustomerprice($db); |
|
| 233 | 233 | |
| 234 | - $sortfield = GETPOST("sortfield", 'alpha'); |
|
| 235 | - $sortorder = GETPOST("sortorder", 'alpha'); |
|
| 234 | + $sortfield = GETPOST("sortfield", 'alpha'); |
|
| 235 | + $sortorder = GETPOST("sortorder", 'alpha'); |
|
| 236 | 236 | $limit = GETPOST('limit','int')?GETPOST('limit','int'):$conf->liste_limit; |
| 237 | - $page = GETPOST("page", 'int'); |
|
| 238 | - if (empty($page) || $page == -1) { $page = 0; } // If $page is not defined, or '' or -1 |
|
| 239 | - $offset = $limit * $page; |
|
| 240 | - $pageprev = $page - 1; |
|
| 241 | - $pagenext = $page + 1; |
|
| 242 | - if (! $sortorder) |
|
| 243 | - $sortorder = "ASC"; |
|
| 244 | - if (! $sortfield) |
|
| 245 | - $sortfield = "soc.nom"; |
|
| 246 | - |
|
| 247 | - // Build filter to diplay only concerned lines |
|
| 248 | - $filter = array ( |
|
| 249 | - 't.fk_soc' => $object->id |
|
| 250 | - ); |
|
| 251 | - |
|
| 252 | - if (! empty($search_prod)) { |
|
| 253 | - $filter ['prod.ref'] = $search_prod; |
|
| 254 | - } |
|
| 255 | - |
|
| 256 | - if ($action == 'add_customer_price') { |
|
| 257 | - |
|
| 258 | - // Create mode |
|
| 259 | - |
|
| 260 | - print load_fiche_titre($langs->trans('PriceByCustomer')); |
|
| 261 | - |
|
| 262 | - print '<form action="' . $_SERVER["PHP_SELF"] . '?socid=' . $object->id . '" method="POST">'; |
|
| 263 | - print '<input type="hidden" name="token" value="' . $_SESSION ['newtoken'] . '">'; |
|
| 264 | - print '<input type="hidden" name="action" value="add_customer_price_confirm">'; |
|
| 265 | - print '<input type="hidden" name="socid" value="' . $object->id . '">'; |
|
| 266 | - print '<table class="border" width="100%">'; |
|
| 267 | - print '<tr>'; |
|
| 268 | - print '<td>' . $langs->trans('Product') . '</td>'; |
|
| 269 | - print '<td>'; |
|
| 270 | - print $form->select_produits('', 'prodid', '', 0); |
|
| 271 | - print '</td>'; |
|
| 272 | - print '</tr>'; |
|
| 273 | - |
|
| 274 | - // VAT |
|
| 275 | - print '<tr><td>' . $langs->trans("VATRate") . '</td><td>'; |
|
| 276 | - print $form->load_tva("tva_tx", $object->tva_tx, $mysoc, '', $object->id, $object->tva_npr, '', false, 1); |
|
| 277 | - print '</td></tr>'; |
|
| 278 | - |
|
| 279 | - // Price base |
|
| 280 | - print '<tr><td width="15%">'; |
|
| 281 | - print $langs->trans('PriceBase'); |
|
| 282 | - print '</td>'; |
|
| 283 | - print '<td>'; |
|
| 284 | - print $form->selectPriceBaseType($object->price_base_type, "price_base_type"); |
|
| 285 | - print '</td>'; |
|
| 286 | - print '</tr>'; |
|
| 287 | - |
|
| 288 | - // Price |
|
| 289 | - print '<tr><td width="20%">'; |
|
| 290 | - $text = $langs->trans('SellingPrice'); |
|
| 291 | - print $form->textwithpicto($text, $langs->trans("PrecisionUnitIsLimitedToXDecimals", $conf->global->MAIN_MAX_DECIMALS_UNIT), 1, 1); |
|
| 292 | - print '</td><td>'; |
|
| 293 | - if ($object->price_base_type == 'TTC') { |
|
| 294 | - print '<input name="price" size="10" value="' . price($object->price_ttc) . '">'; |
|
| 295 | - } else { |
|
| 296 | - print '<input name="price" size="10" value="' . price($object->price) . '">'; |
|
| 297 | - } |
|
| 298 | - print '</td></tr>'; |
|
| 299 | - |
|
| 300 | - // Price minimum |
|
| 301 | - print '<tr><td>'; |
|
| 302 | - $text = $langs->trans('MinPrice'); |
|
| 303 | - print $form->textwithpicto($text, $langs->trans("PrecisionUnitIsLimitedToXDecimals", $conf->global->MAIN_MAX_DECIMALS_UNIT), 1, 1); |
|
| 304 | - if ($object->price_base_type == 'TTC') { |
|
| 305 | - print '<td><input name="price_min" size="10" value="' . price($object->price_min_ttc) . '">'; |
|
| 306 | - } else { |
|
| 307 | - print '<td><input name="price_min" size="10" value="' . price($object->price_min) . '">'; |
|
| 308 | - } |
|
| 309 | - print '</td></tr>'; |
|
| 310 | - |
|
| 311 | - // Update all child soc |
|
| 312 | - print '<tr><td width="15%">'; |
|
| 313 | - print $langs->trans('ForceUpdateChildPriceSoc'); |
|
| 314 | - print '</td>'; |
|
| 315 | - print '<td>'; |
|
| 316 | - print '<input type="checkbox" name="updatechildprice" value="1"/>'; |
|
| 317 | - print '</td>'; |
|
| 318 | - print '</tr>'; |
|
| 319 | - |
|
| 320 | - print '</table>'; |
|
| 321 | - |
|
| 322 | - print '<br><div align="center">'; |
|
| 323 | - print '<input type="submit" class="button" value="' . $langs->trans("Save") . '">'; |
|
| 324 | - print ' '; |
|
| 325 | - print '<input type="submit" class="button" name="cancel" value="' . $langs->trans("Cancel") . '">'; |
|
| 326 | - print '</div>'; |
|
| 327 | - |
|
| 328 | - print '<br></form>'; |
|
| 329 | - } elseif ($action == 'edit_customer_price') { |
|
| 330 | - |
|
| 331 | - // Edit mode |
|
| 332 | - |
|
| 333 | - print load_fiche_titre($langs->trans('PriceByCustomer')); |
|
| 334 | - |
|
| 335 | - $result = $prodcustprice->fetch(GETPOST('lineid', 'int')); |
|
| 336 | - if ($result < 0) |
|
| 337 | - { |
|
| 338 | - setEventMessages($prodcustprice->error, $prodcustprice->errors, 'errors'); |
|
| 339 | - } |
|
| 340 | - |
|
| 341 | - print '<form action="' . $_SERVER["PHP_SELF"] . '?socid=' . $object->id . '" method="POST">'; |
|
| 342 | - print '<input type="hidden" name="token" value="' . $_SESSION ['newtoken'] . '">'; |
|
| 343 | - print '<input type="hidden" name="action" value="update_customer_price_confirm">'; |
|
| 344 | - print '<input type="hidden" name="lineid" value="' . $prodcustprice->id . '">'; |
|
| 345 | - print '<table class="border" width="100%">'; |
|
| 346 | - print '<tr>'; |
|
| 347 | - print '<td>' . $langs->trans('Product') . '</td>'; |
|
| 348 | - $staticprod = new Product($db); |
|
| 349 | - $staticprod->fetch($prodcustprice->fk_product); |
|
| 350 | - print "<td>" . $staticprod->getNomUrl(1) . "</td>"; |
|
| 351 | - print '</tr>'; |
|
| 352 | - |
|
| 353 | - // VAT |
|
| 354 | - print '<tr><td>' . $langs->trans("VATRate") . '</td><td>'; |
|
| 355 | - print $form->load_tva("tva_tx", $prodcustprice->tva_tx, $mysoc, '', $staticprod->id, $prodcustprice->recuperableonly); |
|
| 356 | - print '</td></tr>'; |
|
| 357 | - |
|
| 358 | - // Price base |
|
| 359 | - print '<tr><td width="15%">'; |
|
| 360 | - print $langs->trans('PriceBase'); |
|
| 361 | - print '</td>'; |
|
| 362 | - print '<td>'; |
|
| 363 | - print $form->selectPriceBaseType($prodcustprice->price_base_type, "price_base_type"); |
|
| 364 | - print '</td>'; |
|
| 365 | - print '</tr>'; |
|
| 366 | - |
|
| 367 | - // Price |
|
| 368 | - print '<tr><td width="20%">'; |
|
| 369 | - $text = $langs->trans('SellingPrice'); |
|
| 370 | - print $form->textwithpicto($text, $langs->trans("PrecisionUnitIsLimitedToXDecimals", $conf->global->MAIN_MAX_DECIMALS_UNIT), 1, 1); |
|
| 371 | - print '</td><td>'; |
|
| 372 | - if ($prodcustprice->price_base_type == 'TTC') { |
|
| 373 | - print '<input name="price" size="10" value="' . price($prodcustprice->price_ttc) . '">'; |
|
| 374 | - } else { |
|
| 375 | - print '<input name="price" size="10" value="' . price($prodcustprice->price) . '">'; |
|
| 376 | - } |
|
| 377 | - print '</td></tr>'; |
|
| 378 | - |
|
| 379 | - // Price minimum |
|
| 380 | - print '<tr><td>'; |
|
| 381 | - $text = $langs->trans('MinPrice'); |
|
| 382 | - print $form->textwithpicto($text, $langs->trans("PrecisionUnitIsLimitedToXDecimals", $conf->global->MAIN_MAX_DECIMALS_UNIT), 1, 1); |
|
| 383 | - print '</td><td>'; |
|
| 384 | - if ($prodcustprice->price_base_type == 'TTC') { |
|
| 385 | - print '<input name="price_min" size="10" value="' . price($prodcustprice->price_min_ttc) . '">'; |
|
| 386 | - } else { |
|
| 387 | - print '<input name="price_min" size="10" value="' . price($prodcustprice->price_min) . '">'; |
|
| 388 | - } |
|
| 389 | - print '</td></tr>'; |
|
| 390 | - |
|
| 391 | - // Update all child soc |
|
| 392 | - print '<tr><td width="15%">'; |
|
| 393 | - print $langs->trans('ForceUpdateChildPriceSoc'); |
|
| 394 | - print '</td>'; |
|
| 395 | - print '<td>'; |
|
| 396 | - print '<input type="checkbox" name="updatechildprice" value="1">'; |
|
| 397 | - print '</td>'; |
|
| 398 | - print '</tr>'; |
|
| 399 | - |
|
| 400 | - print '</table>'; |
|
| 401 | - |
|
| 402 | - print '<br><div class="center">'; |
|
| 403 | - print '<input type="submit" class="button" value="' . $langs->trans("Save") . '">'; |
|
| 404 | - print ' '; |
|
| 405 | - print '<input type="submit" class="button" name="cancel" value="' . $langs->trans("Cancel") . '">'; |
|
| 406 | - print '</div>'; |
|
| 407 | - |
|
| 408 | - print '<br></form>'; |
|
| 409 | - } elseif ($action == 'showlog_customer_price') { |
|
| 410 | - |
|
| 411 | - print '<!-- showlog_customer_price -->'."\n"; |
|
| 412 | - |
|
| 413 | - $filter = array ( |
|
| 414 | - 't.fk_product' => GETPOST('prodid', 'int'),'t.fk_soc' => $socid |
|
| 415 | - ); |
|
| 416 | - |
|
| 417 | - // Count total nb of records |
|
| 418 | - $nbtotalofrecords = ''; |
|
| 419 | - if (empty($conf->global->MAIN_DISABLE_FULL_SCANLIST)) { |
|
| 420 | - $nbtotalofrecords = $prodcustprice->fetch_all_log($sortorder, $sortfield, $conf->liste_limit, $offset, $filter); |
|
| 421 | - } |
|
| 422 | - |
|
| 423 | - $result = $prodcustprice->fetch_all_log($sortorder, $sortfield, $conf->liste_limit, $offset, $filter); |
|
| 424 | - if ($result < 0) |
|
| 425 | - { |
|
| 426 | - setEventMessages($prodcustprice->error, $prodcustprice->errors, 'errors'); |
|
| 427 | - } |
|
| 428 | - |
|
| 429 | - $option = '&socid=' . GETPOST('socid', 'int') . '&prodid=' . GETPOST('prodid', 'int'); |
|
| 430 | - |
|
| 431 | - print_barre_liste($langs->trans('PriceByCustomerLog'), $page, $_SERVEUR ['PHP_SELF'], $option, $sortfield, $sortorder, '', count($prodcustprice->lines), $nbtotalofrecords); |
|
| 432 | - |
|
| 433 | - if (count($prodcustprice->lines) > 0) { |
|
| 434 | - |
|
| 435 | - print '<form action="' . $_SERVER["PHP_SELF"] . '?id=' . $object->id . '" method="POST">'; |
|
| 436 | - print '<input type="hidden" name="id" value="' . $object->id . '">'; |
|
| 437 | - |
|
| 438 | - print '<table class="noborder" width="100%">'; |
|
| 439 | - |
|
| 440 | - print '<tr class="liste_titre">'; |
|
| 441 | - print '<td>' . $langs->trans("Product") . '</td>'; |
|
| 442 | - print '<td>' . $langs->trans("AppliedPricesFrom") . '</td>'; |
|
| 443 | - print '<td align="center">' . $langs->trans("PriceBase") . '</td>'; |
|
| 444 | - print '<td align="right">' . $langs->trans("VAT") . '</td>'; |
|
| 445 | - print '<td align="right">' . $langs->trans("HT") . '</td>'; |
|
| 446 | - print '<td align="right">' . $langs->trans("TTC") . '</td>'; |
|
| 447 | - print '<td align="right">' . $langs->trans("MinPrice") . ' ' . $langs->trans("HT") . '</td>'; |
|
| 448 | - print '<td align="right">' . $langs->trans("MinPrice") . ' ' . $langs->trans("TTC") . '</td>'; |
|
| 449 | - print '<td align="right">' . $langs->trans("ChangedBy") . '</td>'; |
|
| 450 | - print '<td> </td>'; |
|
| 451 | - print '</tr>'; |
|
| 452 | - |
|
| 453 | - foreach ( $prodcustprice->lines as $line ) { |
|
| 454 | - |
|
| 455 | - print '<tr class="oddeven">'; |
|
| 456 | - $staticprod = new Product($db); |
|
| 457 | - $staticprod->fetch($line->fk_product); |
|
| 458 | - |
|
| 459 | - print "<td>" . $staticprod->getNomUrl(1) . "</td>"; |
|
| 460 | - print "<td>" . dol_print_date($line->datec, "dayhour") . "</td>"; |
|
| 461 | - |
|
| 462 | - print '<td align="center">' . $langs->trans($line->price_base_type) . "</td>"; |
|
| 463 | - print '<td align="right">' . vatrate($line->tva_tx, true, $line->recuperableonly) . "</td>"; |
|
| 464 | - print '<td align="right">' . price($line->price) . "</td>"; |
|
| 465 | - print '<td align="right">' . price($line->price_ttc) . "</td>"; |
|
| 466 | - print '<td align="right">' . price($line->price_min) . '</td>'; |
|
| 467 | - print '<td align="right">' . price($line->price_min_ttc) . '</td>'; |
|
| 468 | - |
|
| 469 | - // User |
|
| 470 | - $userstatic = new User($db); |
|
| 471 | - $userstatic->fetch($line->fk_user); |
|
| 472 | - print '<td align="right">'; |
|
| 473 | - print $userstatic->getLoginUrl(1); |
|
| 474 | - print '</td>'; |
|
| 475 | - } |
|
| 476 | - print "</table>"; |
|
| 477 | - } |
|
| 478 | - else |
|
| 479 | - { |
|
| 480 | - print $langs->trans('None'); |
|
| 481 | - } |
|
| 482 | - |
|
| 483 | - print "\n" . '<div class="tabsAction">' . "\n"; |
|
| 484 | - print '<div class="inline-block divButAction"><a class="butAction" href="' . $_SERVER["PHP_SELF"] . '?socid=' . $object->id . '">' . $langs->trans("Ok") . '</a></div>'; |
|
| 485 | - print "\n</div><br>\n"; |
|
| 486 | - } |
|
| 487 | - else |
|
| 488 | - { |
|
| 237 | + $page = GETPOST("page", 'int'); |
|
| 238 | + if (empty($page) || $page == -1) { $page = 0; } // If $page is not defined, or '' or -1 |
|
| 239 | + $offset = $limit * $page; |
|
| 240 | + $pageprev = $page - 1; |
|
| 241 | + $pagenext = $page + 1; |
|
| 242 | + if (! $sortorder) |
|
| 243 | + $sortorder = "ASC"; |
|
| 244 | + if (! $sortfield) |
|
| 245 | + $sortfield = "soc.nom"; |
|
| 246 | + |
|
| 247 | + // Build filter to diplay only concerned lines |
|
| 248 | + $filter = array ( |
|
| 249 | + 't.fk_soc' => $object->id |
|
| 250 | + ); |
|
| 251 | + |
|
| 252 | + if (! empty($search_prod)) { |
|
| 253 | + $filter ['prod.ref'] = $search_prod; |
|
| 254 | + } |
|
| 255 | + |
|
| 256 | + if ($action == 'add_customer_price') { |
|
| 257 | + |
|
| 258 | + // Create mode |
|
| 259 | + |
|
| 260 | + print load_fiche_titre($langs->trans('PriceByCustomer')); |
|
| 261 | + |
|
| 262 | + print '<form action="' . $_SERVER["PHP_SELF"] . '?socid=' . $object->id . '" method="POST">'; |
|
| 263 | + print '<input type="hidden" name="token" value="' . $_SESSION ['newtoken'] . '">'; |
|
| 264 | + print '<input type="hidden" name="action" value="add_customer_price_confirm">'; |
|
| 265 | + print '<input type="hidden" name="socid" value="' . $object->id . '">'; |
|
| 266 | + print '<table class="border" width="100%">'; |
|
| 267 | + print '<tr>'; |
|
| 268 | + print '<td>' . $langs->trans('Product') . '</td>'; |
|
| 269 | + print '<td>'; |
|
| 270 | + print $form->select_produits('', 'prodid', '', 0); |
|
| 271 | + print '</td>'; |
|
| 272 | + print '</tr>'; |
|
| 273 | + |
|
| 274 | + // VAT |
|
| 275 | + print '<tr><td>' . $langs->trans("VATRate") . '</td><td>'; |
|
| 276 | + print $form->load_tva("tva_tx", $object->tva_tx, $mysoc, '', $object->id, $object->tva_npr, '', false, 1); |
|
| 277 | + print '</td></tr>'; |
|
| 278 | + |
|
| 279 | + // Price base |
|
| 280 | + print '<tr><td width="15%">'; |
|
| 281 | + print $langs->trans('PriceBase'); |
|
| 282 | + print '</td>'; |
|
| 283 | + print '<td>'; |
|
| 284 | + print $form->selectPriceBaseType($object->price_base_type, "price_base_type"); |
|
| 285 | + print '</td>'; |
|
| 286 | + print '</tr>'; |
|
| 287 | + |
|
| 288 | + // Price |
|
| 289 | + print '<tr><td width="20%">'; |
|
| 290 | + $text = $langs->trans('SellingPrice'); |
|
| 291 | + print $form->textwithpicto($text, $langs->trans("PrecisionUnitIsLimitedToXDecimals", $conf->global->MAIN_MAX_DECIMALS_UNIT), 1, 1); |
|
| 292 | + print '</td><td>'; |
|
| 293 | + if ($object->price_base_type == 'TTC') { |
|
| 294 | + print '<input name="price" size="10" value="' . price($object->price_ttc) . '">'; |
|
| 295 | + } else { |
|
| 296 | + print '<input name="price" size="10" value="' . price($object->price) . '">'; |
|
| 297 | + } |
|
| 298 | + print '</td></tr>'; |
|
| 299 | + |
|
| 300 | + // Price minimum |
|
| 301 | + print '<tr><td>'; |
|
| 302 | + $text = $langs->trans('MinPrice'); |
|
| 303 | + print $form->textwithpicto($text, $langs->trans("PrecisionUnitIsLimitedToXDecimals", $conf->global->MAIN_MAX_DECIMALS_UNIT), 1, 1); |
|
| 304 | + if ($object->price_base_type == 'TTC') { |
|
| 305 | + print '<td><input name="price_min" size="10" value="' . price($object->price_min_ttc) . '">'; |
|
| 306 | + } else { |
|
| 307 | + print '<td><input name="price_min" size="10" value="' . price($object->price_min) . '">'; |
|
| 308 | + } |
|
| 309 | + print '</td></tr>'; |
|
| 310 | + |
|
| 311 | + // Update all child soc |
|
| 312 | + print '<tr><td width="15%">'; |
|
| 313 | + print $langs->trans('ForceUpdateChildPriceSoc'); |
|
| 314 | + print '</td>'; |
|
| 315 | + print '<td>'; |
|
| 316 | + print '<input type="checkbox" name="updatechildprice" value="1"/>'; |
|
| 317 | + print '</td>'; |
|
| 318 | + print '</tr>'; |
|
| 319 | + |
|
| 320 | + print '</table>'; |
|
| 321 | + |
|
| 322 | + print '<br><div align="center">'; |
|
| 323 | + print '<input type="submit" class="button" value="' . $langs->trans("Save") . '">'; |
|
| 324 | + print ' '; |
|
| 325 | + print '<input type="submit" class="button" name="cancel" value="' . $langs->trans("Cancel") . '">'; |
|
| 326 | + print '</div>'; |
|
| 327 | + |
|
| 328 | + print '<br></form>'; |
|
| 329 | + } elseif ($action == 'edit_customer_price') { |
|
| 330 | + |
|
| 331 | + // Edit mode |
|
| 332 | + |
|
| 333 | + print load_fiche_titre($langs->trans('PriceByCustomer')); |
|
| 334 | + |
|
| 335 | + $result = $prodcustprice->fetch(GETPOST('lineid', 'int')); |
|
| 336 | + if ($result < 0) |
|
| 337 | + { |
|
| 338 | + setEventMessages($prodcustprice->error, $prodcustprice->errors, 'errors'); |
|
| 339 | + } |
|
| 340 | + |
|
| 341 | + print '<form action="' . $_SERVER["PHP_SELF"] . '?socid=' . $object->id . '" method="POST">'; |
|
| 342 | + print '<input type="hidden" name="token" value="' . $_SESSION ['newtoken'] . '">'; |
|
| 343 | + print '<input type="hidden" name="action" value="update_customer_price_confirm">'; |
|
| 344 | + print '<input type="hidden" name="lineid" value="' . $prodcustprice->id . '">'; |
|
| 345 | + print '<table class="border" width="100%">'; |
|
| 346 | + print '<tr>'; |
|
| 347 | + print '<td>' . $langs->trans('Product') . '</td>'; |
|
| 348 | + $staticprod = new Product($db); |
|
| 349 | + $staticprod->fetch($prodcustprice->fk_product); |
|
| 350 | + print "<td>" . $staticprod->getNomUrl(1) . "</td>"; |
|
| 351 | + print '</tr>'; |
|
| 352 | + |
|
| 353 | + // VAT |
|
| 354 | + print '<tr><td>' . $langs->trans("VATRate") . '</td><td>'; |
|
| 355 | + print $form->load_tva("tva_tx", $prodcustprice->tva_tx, $mysoc, '', $staticprod->id, $prodcustprice->recuperableonly); |
|
| 356 | + print '</td></tr>'; |
|
| 357 | + |
|
| 358 | + // Price base |
|
| 359 | + print '<tr><td width="15%">'; |
|
| 360 | + print $langs->trans('PriceBase'); |
|
| 361 | + print '</td>'; |
|
| 362 | + print '<td>'; |
|
| 363 | + print $form->selectPriceBaseType($prodcustprice->price_base_type, "price_base_type"); |
|
| 364 | + print '</td>'; |
|
| 365 | + print '</tr>'; |
|
| 366 | + |
|
| 367 | + // Price |
|
| 368 | + print '<tr><td width="20%">'; |
|
| 369 | + $text = $langs->trans('SellingPrice'); |
|
| 370 | + print $form->textwithpicto($text, $langs->trans("PrecisionUnitIsLimitedToXDecimals", $conf->global->MAIN_MAX_DECIMALS_UNIT), 1, 1); |
|
| 371 | + print '</td><td>'; |
|
| 372 | + if ($prodcustprice->price_base_type == 'TTC') { |
|
| 373 | + print '<input name="price" size="10" value="' . price($prodcustprice->price_ttc) . '">'; |
|
| 374 | + } else { |
|
| 375 | + print '<input name="price" size="10" value="' . price($prodcustprice->price) . '">'; |
|
| 376 | + } |
|
| 377 | + print '</td></tr>'; |
|
| 378 | + |
|
| 379 | + // Price minimum |
|
| 380 | + print '<tr><td>'; |
|
| 381 | + $text = $langs->trans('MinPrice'); |
|
| 382 | + print $form->textwithpicto($text, $langs->trans("PrecisionUnitIsLimitedToXDecimals", $conf->global->MAIN_MAX_DECIMALS_UNIT), 1, 1); |
|
| 383 | + print '</td><td>'; |
|
| 384 | + if ($prodcustprice->price_base_type == 'TTC') { |
|
| 385 | + print '<input name="price_min" size="10" value="' . price($prodcustprice->price_min_ttc) . '">'; |
|
| 386 | + } else { |
|
| 387 | + print '<input name="price_min" size="10" value="' . price($prodcustprice->price_min) . '">'; |
|
| 388 | + } |
|
| 389 | + print '</td></tr>'; |
|
| 390 | + |
|
| 391 | + // Update all child soc |
|
| 392 | + print '<tr><td width="15%">'; |
|
| 393 | + print $langs->trans('ForceUpdateChildPriceSoc'); |
|
| 394 | + print '</td>'; |
|
| 395 | + print '<td>'; |
|
| 396 | + print '<input type="checkbox" name="updatechildprice" value="1">'; |
|
| 397 | + print '</td>'; |
|
| 398 | + print '</tr>'; |
|
| 399 | + |
|
| 400 | + print '</table>'; |
|
| 401 | + |
|
| 402 | + print '<br><div class="center">'; |
|
| 403 | + print '<input type="submit" class="button" value="' . $langs->trans("Save") . '">'; |
|
| 404 | + print ' '; |
|
| 405 | + print '<input type="submit" class="button" name="cancel" value="' . $langs->trans("Cancel") . '">'; |
|
| 406 | + print '</div>'; |
|
| 407 | + |
|
| 408 | + print '<br></form>'; |
|
| 409 | + } elseif ($action == 'showlog_customer_price') { |
|
| 410 | + |
|
| 411 | + print '<!-- showlog_customer_price -->'."\n"; |
|
| 412 | + |
|
| 413 | + $filter = array ( |
|
| 414 | + 't.fk_product' => GETPOST('prodid', 'int'),'t.fk_soc' => $socid |
|
| 415 | + ); |
|
| 416 | + |
|
| 417 | + // Count total nb of records |
|
| 418 | + $nbtotalofrecords = ''; |
|
| 419 | + if (empty($conf->global->MAIN_DISABLE_FULL_SCANLIST)) { |
|
| 420 | + $nbtotalofrecords = $prodcustprice->fetch_all_log($sortorder, $sortfield, $conf->liste_limit, $offset, $filter); |
|
| 421 | + } |
|
| 422 | + |
|
| 423 | + $result = $prodcustprice->fetch_all_log($sortorder, $sortfield, $conf->liste_limit, $offset, $filter); |
|
| 424 | + if ($result < 0) |
|
| 425 | + { |
|
| 426 | + setEventMessages($prodcustprice->error, $prodcustprice->errors, 'errors'); |
|
| 427 | + } |
|
| 428 | + |
|
| 429 | + $option = '&socid=' . GETPOST('socid', 'int') . '&prodid=' . GETPOST('prodid', 'int'); |
|
| 430 | + |
|
| 431 | + print_barre_liste($langs->trans('PriceByCustomerLog'), $page, $_SERVEUR ['PHP_SELF'], $option, $sortfield, $sortorder, '', count($prodcustprice->lines), $nbtotalofrecords); |
|
| 432 | + |
|
| 433 | + if (count($prodcustprice->lines) > 0) { |
|
| 434 | + |
|
| 435 | + print '<form action="' . $_SERVER["PHP_SELF"] . '?id=' . $object->id . '" method="POST">'; |
|
| 436 | + print '<input type="hidden" name="id" value="' . $object->id . '">'; |
|
| 437 | + |
|
| 438 | + print '<table class="noborder" width="100%">'; |
|
| 439 | + |
|
| 440 | + print '<tr class="liste_titre">'; |
|
| 441 | + print '<td>' . $langs->trans("Product") . '</td>'; |
|
| 442 | + print '<td>' . $langs->trans("AppliedPricesFrom") . '</td>'; |
|
| 443 | + print '<td align="center">' . $langs->trans("PriceBase") . '</td>'; |
|
| 444 | + print '<td align="right">' . $langs->trans("VAT") . '</td>'; |
|
| 445 | + print '<td align="right">' . $langs->trans("HT") . '</td>'; |
|
| 446 | + print '<td align="right">' . $langs->trans("TTC") . '</td>'; |
|
| 447 | + print '<td align="right">' . $langs->trans("MinPrice") . ' ' . $langs->trans("HT") . '</td>'; |
|
| 448 | + print '<td align="right">' . $langs->trans("MinPrice") . ' ' . $langs->trans("TTC") . '</td>'; |
|
| 449 | + print '<td align="right">' . $langs->trans("ChangedBy") . '</td>'; |
|
| 450 | + print '<td> </td>'; |
|
| 451 | + print '</tr>'; |
|
| 452 | + |
|
| 453 | + foreach ( $prodcustprice->lines as $line ) { |
|
| 454 | + |
|
| 455 | + print '<tr class="oddeven">'; |
|
| 456 | + $staticprod = new Product($db); |
|
| 457 | + $staticprod->fetch($line->fk_product); |
|
| 458 | + |
|
| 459 | + print "<td>" . $staticprod->getNomUrl(1) . "</td>"; |
|
| 460 | + print "<td>" . dol_print_date($line->datec, "dayhour") . "</td>"; |
|
| 461 | + |
|
| 462 | + print '<td align="center">' . $langs->trans($line->price_base_type) . "</td>"; |
|
| 463 | + print '<td align="right">' . vatrate($line->tva_tx, true, $line->recuperableonly) . "</td>"; |
|
| 464 | + print '<td align="right">' . price($line->price) . "</td>"; |
|
| 465 | + print '<td align="right">' . price($line->price_ttc) . "</td>"; |
|
| 466 | + print '<td align="right">' . price($line->price_min) . '</td>'; |
|
| 467 | + print '<td align="right">' . price($line->price_min_ttc) . '</td>'; |
|
| 468 | + |
|
| 469 | + // User |
|
| 470 | + $userstatic = new User($db); |
|
| 471 | + $userstatic->fetch($line->fk_user); |
|
| 472 | + print '<td align="right">'; |
|
| 473 | + print $userstatic->getLoginUrl(1); |
|
| 474 | + print '</td>'; |
|
| 475 | + } |
|
| 476 | + print "</table>"; |
|
| 477 | + } |
|
| 478 | + else |
|
| 479 | + { |
|
| 480 | + print $langs->trans('None'); |
|
| 481 | + } |
|
| 482 | + |
|
| 483 | + print "\n" . '<div class="tabsAction">' . "\n"; |
|
| 484 | + print '<div class="inline-block divButAction"><a class="butAction" href="' . $_SERVER["PHP_SELF"] . '?socid=' . $object->id . '">' . $langs->trans("Ok") . '</a></div>'; |
|
| 485 | + print "\n</div><br>\n"; |
|
| 486 | + } |
|
| 487 | + else |
|
| 488 | + { |
|
| 489 | 489 | // View mode |
| 490 | 490 | |
| 491 | - /* ************************************************************************** */ |
|
| 492 | - /* */ |
|
| 493 | - /* Barre d'action */ |
|
| 494 | - /* */ |
|
| 495 | - /* ************************************************************************** */ |
|
| 491 | + /* ************************************************************************** */ |
|
| 492 | + /* */ |
|
| 493 | + /* Barre d'action */ |
|
| 494 | + /* */ |
|
| 495 | + /* ************************************************************************** */ |
|
| 496 | 496 | |
| 497 | - print "\n" . '<div class="tabsAction">' . "\n"; |
|
| 497 | + print "\n" . '<div class="tabsAction">' . "\n"; |
|
| 498 | 498 | |
| 499 | - if ($user->rights->produit->creer || $user->rights->service->creer) { |
|
| 500 | - print '<div class="inline-block divButAction"><a class="butAction" href="' . $_SERVER["PHP_SELF"] . '?action=add_customer_price&socid=' . $object->id . '">' . $langs->trans("AddCustomerPrice") . '</a></div>'; |
|
| 501 | - } |
|
| 502 | - print "\n</div>\n"; |
|
| 499 | + if ($user->rights->produit->creer || $user->rights->service->creer) { |
|
| 500 | + print '<div class="inline-block divButAction"><a class="butAction" href="' . $_SERVER["PHP_SELF"] . '?action=add_customer_price&socid=' . $object->id . '">' . $langs->trans("AddCustomerPrice") . '</a></div>'; |
|
| 501 | + } |
|
| 502 | + print "\n</div>\n"; |
|
| 503 | 503 | |
| 504 | 504 | |
| 505 | 505 | // Count total nb of records |
@@ -517,9 +517,9 @@ discard block |
||
| 517 | 517 | |
| 518 | 518 | $option = '&search_prod=' . $search_prod . '&id=' . $object->id; |
| 519 | 519 | |
| 520 | - print '<!-- view specific price for each product -->'."\n"; |
|
| 520 | + print '<!-- view specific price for each product -->'."\n"; |
|
| 521 | 521 | |
| 522 | - print_barre_liste($langs->trans('PriceForEachProduct'), $page, $_SERVEUR['PHP_SELF'], $option, $sortfield, $sortorder, '', count($prodcustprice->lines), $nbtotalofrecords, ''); |
|
| 522 | + print_barre_liste($langs->trans('PriceForEachProduct'), $page, $_SERVEUR['PHP_SELF'], $option, $sortfield, $sortorder, '', count($prodcustprice->lines), $nbtotalofrecords, ''); |
|
| 523 | 523 | |
| 524 | 524 | print '<form action="' . $_SERVER["PHP_SELF"] . '?id=' . $object->id . '" method="POST">'; |
| 525 | 525 | print '<input type="hidden" name="id" value="' . $object->id . '">'; |
@@ -542,7 +542,7 @@ discard block |
||
| 542 | 542 | if (count($prodcustprice->lines) > 0 || $search_prod) |
| 543 | 543 | { |
| 544 | 544 | print '<tr class="liste_titre">'; |
| 545 | - print '<td class="liste_titre"><input type="text" class="flat" name="search_prod" value="' . $search_prod . '" size="20"></td>'; |
|
| 545 | + print '<td class="liste_titre"><input type="text" class="flat" name="search_prod" value="' . $search_prod . '" size="20"></td>'; |
|
| 546 | 546 | print '<td class="liste_titre" colspan="8"> </td>'; |
| 547 | 547 | // Print the search button |
| 548 | 548 | print '<td class="liste_titre" align="right">'; |
@@ -609,7 +609,7 @@ discard block |
||
| 609 | 609 | print "</table>"; |
| 610 | 610 | |
| 611 | 611 | print "</form>"; |
| 612 | - } |
|
| 612 | + } |
|
| 613 | 613 | } |
| 614 | 614 | |
| 615 | 615 | // End of page |
@@ -70,9 +70,9 @@ discard block |
||
| 70 | 70 | |
| 71 | 71 | if ($action == 'view' && $object->fetch($socid)<=0) |
| 72 | 72 | { |
| 73 | - $langs->load("errors"); |
|
| 74 | - print($langs->trans('ErrorRecordNotFound')); |
|
| 75 | - exit; |
|
| 73 | + $langs->load("errors"); |
|
| 74 | + print($langs->trans('ErrorRecordNotFound')); |
|
| 75 | + exit; |
|
| 76 | 76 | } |
| 77 | 77 | |
| 78 | 78 | // Get object canvas (By default, this is not defined, so standard usage of dolibarr) |
@@ -102,7 +102,7 @@ discard block |
||
| 102 | 102 | |
| 103 | 103 | if (empty($reshook)) |
| 104 | 104 | { |
| 105 | - if ($cancel) |
|
| 105 | + if ($cancel) |
|
| 106 | 106 | { |
| 107 | 107 | $action=''; |
| 108 | 108 | if (! empty($backtopage)) |
@@ -129,7 +129,7 @@ discard block |
||
| 129 | 129 | if ($socid > 0 && empty($object->id)) |
| 130 | 130 | { |
| 131 | 131 | $result=$object->fetch($socid); |
| 132 | - if ($result <= 0) dol_print_error('',$object->error); |
|
| 132 | + if ($result <= 0) dol_print_error('',$object->error); |
|
| 133 | 133 | } |
| 134 | 134 | |
| 135 | 135 | $title=$langs->trans("ThirdParty"); |
@@ -158,17 +158,17 @@ discard block |
||
| 158 | 158 | |
| 159 | 159 | if ($action != 'presend') |
| 160 | 160 | { |
| 161 | - // Contacts list |
|
| 162 | - if (empty($conf->global->SOCIETE_DISABLE_CONTACTS)) |
|
| 163 | - { |
|
| 164 | - $result=show_contacts($conf,$langs,$db,$object,$_SERVER["PHP_SELF"].'?socid='.$object->id); |
|
| 165 | - } |
|
| 166 | - |
|
| 167 | - // Addresses list |
|
| 168 | - if (! empty($conf->global->SOCIETE_ADDRESSES_MANAGEMENT)) |
|
| 169 | - { |
|
| 170 | - $result=show_addresses($conf,$langs,$db,$object,$_SERVER["PHP_SELF"].'?socid='.$object->id); |
|
| 171 | - } |
|
| 161 | + // Contacts list |
|
| 162 | + if (empty($conf->global->SOCIETE_DISABLE_CONTACTS)) |
|
| 163 | + { |
|
| 164 | + $result=show_contacts($conf,$langs,$db,$object,$_SERVER["PHP_SELF"].'?socid='.$object->id); |
|
| 165 | + } |
|
| 166 | + |
|
| 167 | + // Addresses list |
|
| 168 | + if (! empty($conf->global->SOCIETE_ADDRESSES_MANAGEMENT)) |
|
| 169 | + { |
|
| 170 | + $result=show_addresses($conf,$langs,$db,$object,$_SERVER["PHP_SELF"].'?socid='.$object->id); |
|
| 171 | + } |
|
| 172 | 172 | } |
| 173 | 173 | |
| 174 | 174 | // End of page |
@@ -31,110 +31,110 @@ |
||
| 31 | 31 | */ |
| 32 | 32 | function __construct() |
| 33 | 33 | { |
| 34 | - global $db; |
|
| 35 | - $this->db = $db; |
|
| 36 | - } |
|
| 37 | - |
|
| 38 | - /** |
|
| 39 | - * Login |
|
| 40 | - * |
|
| 41 | - * Request the API token for a couple username / password. |
|
| 42 | - * Using method POST is recommanded for security reasons (method GET is often logged by default by web servers with parameters so with login and pass into server log file). |
|
| 43 | - * Both methods are provided for developer conveniance. Best is to not use at all the login API method and enter directly the "DOLAPIKEY" into field at the top right of page. Note: The API key (DOLAPIKEY) can be found/set on the user page. |
|
| 44 | - * |
|
| 45 | - * @param string $login User login |
|
| 46 | - * @param string $password User password |
|
| 47 | - * @param string $entity Entity (when multicompany module is used). '' means 1=first company. |
|
| 48 | - * @param int $reset Reset token (0=get current token, 1=ask a new token and canceled old token. This means access using current existing API token of user will fails: new token will be required for new access) |
|
| 34 | + global $db; |
|
| 35 | + $this->db = $db; |
|
| 36 | + } |
|
| 37 | + |
|
| 38 | + /** |
|
| 39 | + * Login |
|
| 40 | + * |
|
| 41 | + * Request the API token for a couple username / password. |
|
| 42 | + * Using method POST is recommanded for security reasons (method GET is often logged by default by web servers with parameters so with login and pass into server log file). |
|
| 43 | + * Both methods are provided for developer conveniance. Best is to not use at all the login API method and enter directly the "DOLAPIKEY" into field at the top right of page. Note: The API key (DOLAPIKEY) can be found/set on the user page. |
|
| 44 | + * |
|
| 45 | + * @param string $login User login |
|
| 46 | + * @param string $password User password |
|
| 47 | + * @param string $entity Entity (when multicompany module is used). '' means 1=first company. |
|
| 48 | + * @param int $reset Reset token (0=get current token, 1=ask a new token and canceled old token. This means access using current existing API token of user will fails: new token will be required for new access) |
|
| 49 | 49 | * @return array Response status and user token |
| 50 | 50 | * |
| 51 | - * @throws 200 |
|
| 52 | - * @throws 403 |
|
| 53 | - * @throws 500 |
|
| 54 | - * |
|
| 55 | - * @url GET / |
|
| 56 | - * @url POST / |
|
| 57 | - */ |
|
| 51 | + * @throws 200 |
|
| 52 | + * @throws 403 |
|
| 53 | + * @throws 500 |
|
| 54 | + * |
|
| 55 | + * @url GET / |
|
| 56 | + * @url POST / |
|
| 57 | + */ |
|
| 58 | 58 | public function index($login, $password, $entity='', $reset=0) |
| 59 | 59 | { |
| 60 | 60 | |
| 61 | - global $conf, $dolibarr_main_authentication, $dolibarr_auto_user; |
|
| 62 | - |
|
| 63 | - // Authentication mode |
|
| 64 | - if (empty($dolibarr_main_authentication)) |
|
| 65 | - $dolibarr_main_authentication = 'http,dolibarr'; |
|
| 66 | - // Authentication mode: forceuser |
|
| 67 | - if ($dolibarr_main_authentication == 'forceuser') |
|
| 68 | - { |
|
| 69 | - if (empty($dolibarr_auto_user)) $dolibarr_auto_user='auto'; |
|
| 70 | - if ($dolibarr_auto_user != $login) |
|
| 71 | - { |
|
| 72 | - dol_syslog("Warning: your instance is set to use the automatic forced login '".$dolibarr_auto_user."' that is not the requested login. API usage is forbidden in this mode."); |
|
| 73 | - throw new RestException(403, "Your instance is set to use the automatic login '".$dolibarr_auto_user."' that is not the requested login. API usage is forbidden in this mode."); |
|
| 74 | - } |
|
| 75 | - } |
|
| 76 | - // Set authmode |
|
| 77 | - $authmode = explode(',', $dolibarr_main_authentication); |
|
| 78 | - |
|
| 79 | - if ($entity != '' && ! is_numeric($entity)) |
|
| 80 | - { |
|
| 81 | - throw new RestException(403, "Bad value for entity, must be the numeric ID of company."); |
|
| 82 | - } |
|
| 83 | - if ($entity == '') $entity=1; |
|
| 84 | - |
|
| 85 | - include_once DOL_DOCUMENT_ROOT . '/core/lib/security2.lib.php'; |
|
| 86 | - $login = checkLoginPassEntity($login, $password, $entity, $authmode); |
|
| 87 | - if (empty($login)) |
|
| 88 | - { |
|
| 89 | - throw new RestException(403, 'Access denied'); |
|
| 90 | - } |
|
| 91 | - |
|
| 92 | - $token = 'failedtogenerateorgettoken'; |
|
| 93 | - |
|
| 94 | - $tmpuser=new User($this->db); |
|
| 95 | - $tmpuser->fetch(0, $login, 0, 0, $entity); |
|
| 96 | - if (empty($tmpuser->id)) |
|
| 97 | - { |
|
| 98 | - throw new RestException(500, 'Failed to load user'); |
|
| 99 | - } |
|
| 100 | - |
|
| 101 | - // Renew the hash |
|
| 102 | - if (empty($tmpuser->api_key) || $reset) |
|
| 103 | - { |
|
| 104 | - $tmpuser->getrights(); |
|
| 105 | - if (empty($tmpuser->rights->user->self->creer)) |
|
| 106 | - { |
|
| 107 | - throw new RestException(403, 'User need write permission on itself to reset its API token'); |
|
| 108 | - } |
|
| 109 | - |
|
| 110 | - // Generate token for user |
|
| 111 | - $token = dol_hash($login.uniqid().$conf->global->MAIN_API_KEY,1); |
|
| 112 | - |
|
| 113 | - // We store API token into database |
|
| 114 | - $sql = "UPDATE ".MAIN_DB_PREFIX."user"; |
|
| 115 | - $sql.= " SET api_key = '".$this->db->escape($token)."'"; |
|
| 116 | - $sql.= " WHERE login = '".$this->db->escape($login)."'"; |
|
| 117 | - |
|
| 118 | - dol_syslog(get_class($this)."::login", LOG_DEBUG); // No log |
|
| 119 | - $result = $this->db->query($sql); |
|
| 120 | - if (!$result) |
|
| 121 | - { |
|
| 122 | - throw new RestException(500, 'Error when updating api_key for user :'.$this->db->lasterror()); |
|
| 123 | - } |
|
| 124 | - } |
|
| 125 | - else |
|
| 126 | - { |
|
| 61 | + global $conf, $dolibarr_main_authentication, $dolibarr_auto_user; |
|
| 62 | + |
|
| 63 | + // Authentication mode |
|
| 64 | + if (empty($dolibarr_main_authentication)) |
|
| 65 | + $dolibarr_main_authentication = 'http,dolibarr'; |
|
| 66 | + // Authentication mode: forceuser |
|
| 67 | + if ($dolibarr_main_authentication == 'forceuser') |
|
| 68 | + { |
|
| 69 | + if (empty($dolibarr_auto_user)) $dolibarr_auto_user='auto'; |
|
| 70 | + if ($dolibarr_auto_user != $login) |
|
| 71 | + { |
|
| 72 | + dol_syslog("Warning: your instance is set to use the automatic forced login '".$dolibarr_auto_user."' that is not the requested login. API usage is forbidden in this mode."); |
|
| 73 | + throw new RestException(403, "Your instance is set to use the automatic login '".$dolibarr_auto_user."' that is not the requested login. API usage is forbidden in this mode."); |
|
| 74 | + } |
|
| 75 | + } |
|
| 76 | + // Set authmode |
|
| 77 | + $authmode = explode(',', $dolibarr_main_authentication); |
|
| 78 | + |
|
| 79 | + if ($entity != '' && ! is_numeric($entity)) |
|
| 80 | + { |
|
| 81 | + throw new RestException(403, "Bad value for entity, must be the numeric ID of company."); |
|
| 82 | + } |
|
| 83 | + if ($entity == '') $entity=1; |
|
| 84 | + |
|
| 85 | + include_once DOL_DOCUMENT_ROOT . '/core/lib/security2.lib.php'; |
|
| 86 | + $login = checkLoginPassEntity($login, $password, $entity, $authmode); |
|
| 87 | + if (empty($login)) |
|
| 88 | + { |
|
| 89 | + throw new RestException(403, 'Access denied'); |
|
| 90 | + } |
|
| 91 | + |
|
| 92 | + $token = 'failedtogenerateorgettoken'; |
|
| 93 | + |
|
| 94 | + $tmpuser=new User($this->db); |
|
| 95 | + $tmpuser->fetch(0, $login, 0, 0, $entity); |
|
| 96 | + if (empty($tmpuser->id)) |
|
| 97 | + { |
|
| 98 | + throw new RestException(500, 'Failed to load user'); |
|
| 99 | + } |
|
| 100 | + |
|
| 101 | + // Renew the hash |
|
| 102 | + if (empty($tmpuser->api_key) || $reset) |
|
| 103 | + { |
|
| 104 | + $tmpuser->getrights(); |
|
| 105 | + if (empty($tmpuser->rights->user->self->creer)) |
|
| 106 | + { |
|
| 107 | + throw new RestException(403, 'User need write permission on itself to reset its API token'); |
|
| 108 | + } |
|
| 109 | + |
|
| 110 | + // Generate token for user |
|
| 111 | + $token = dol_hash($login.uniqid().$conf->global->MAIN_API_KEY,1); |
|
| 112 | + |
|
| 113 | + // We store API token into database |
|
| 114 | + $sql = "UPDATE ".MAIN_DB_PREFIX."user"; |
|
| 115 | + $sql.= " SET api_key = '".$this->db->escape($token)."'"; |
|
| 116 | + $sql.= " WHERE login = '".$this->db->escape($login)."'"; |
|
| 117 | + |
|
| 118 | + dol_syslog(get_class($this)."::login", LOG_DEBUG); // No log |
|
| 119 | + $result = $this->db->query($sql); |
|
| 120 | + if (!$result) |
|
| 121 | + { |
|
| 122 | + throw new RestException(500, 'Error when updating api_key for user :'.$this->db->lasterror()); |
|
| 123 | + } |
|
| 124 | + } |
|
| 125 | + else |
|
| 126 | + { |
|
| 127 | 127 | $token = $tmpuser->api_key; |
| 128 | - } |
|
| 129 | - |
|
| 130 | - //return token |
|
| 131 | - return array( |
|
| 132 | - 'success' => array( |
|
| 133 | - 'code' => 200, |
|
| 134 | - 'token' => $token, |
|
| 135 | - 'entity' => $tmpuser->entity, |
|
| 136 | - 'message' => 'Welcome ' . $login.($reset?' - Token is new':' - This is your token (generated by a previous call). You can use it to make any REST API call, or enter it into the DOLAPIKEY field to use the Dolibarr API explorer.') |
|
| 137 | - ) |
|
| 138 | - ); |
|
| 139 | - } |
|
| 128 | + } |
|
| 129 | + |
|
| 130 | + //return token |
|
| 131 | + return array( |
|
| 132 | + 'success' => array( |
|
| 133 | + 'code' => 200, |
|
| 134 | + 'token' => $token, |
|
| 135 | + 'entity' => $tmpuser->entity, |
|
| 136 | + 'message' => 'Welcome ' . $login.($reset?' - Token is new':' - This is your token (generated by a previous call). You can use it to make any REST API call, or enter it into the DOLAPIKEY field to use the Dolibarr API explorer.') |
|
| 137 | + ) |
|
| 138 | + ); |
|
| 139 | + } |
|
| 140 | 140 | } |