[R] Divers problemes dans les tableaux

[julie]

Avant toute chose j'aimerai te remercier de ce que tu fais, sincerement.
Ton shema est plutôt pas mal
En ce qui concerne les pseudo jours 0 a minuit serait plutôt pas mal

J'ai oublier de parler d'un truc important :

Exemple

Je loue 3 assiettes 3 fourchettes 3 couteaux le 15 au 17 juin 10h
Le stock rentre donc a 10h mais en réalité il n'est pas disponible car il faut le laver
Il faudrait donc que l'on puisse manuellement l'ajouter au stock une fois laver

Le retour de location ce fera principalement le matin et il est laver directement a sont retour
On pourrait donc dire qu'il sera dispo maximum 4h après le retour de la location

Voila merci beaucoup j'espère que ce dernier point ne sera pas un soucis supplémentaire :S

[jchd]

Note aux forumeurs/forumeuses : ce fil s'écarte provisoirement de l'aspect purement AutoIt puisque je ne tiens pas à ce que Julie s'embourbe dans du code avant de savoir exactement comment elle souhaite que son activité fonctionne. De plus, les échanges ressemblent plus à des romans qu'à des textos. Vous voudrez bien nous en excuser car je persiste à penser que certains trouveront bénéfice à parcourir ce roman de l'été (qui approche à petits pas...).

J'avais déjà évoqué explicitement le lavage antérieurement et implicitement en parlant de délai obligatoire entre retour d'une loc et départ pour une autre.

Dans ton exemple, la loc s'étale sur deux jours, le 15 et le 16, même si le retour se fait le 17 matin. Après inventaire, lavage et rangement le matos est prêt pour partir le 17 soir, facturable pour une autre loc à partir du 18. Tu perds ainsi un jour par location. C'est un point à intégrer dans ton "business plan".

Si la loc suit le modèle des chambres d'hôtel tu ne perds rien, mais l'organisation n'est pas la même : on met 20 minutes à faire une chambre et elle ne peut ni se casser ni s'évaporer, quite à jeter dehors un client qui s'incruste après midi alors que la chambre est réservée pour le soir et que l'hôtel est complet.

En location de matériel type BTP, on te livre typiquement ta mini-pelle la veille au soir pour que tu bosses toute la journée et on la récupèrere le lendemain matin : perte d'une journée.
Si le marché est très tendu (parc restreint et demande très forte), certaines boîtes de loc serrent les boulons et raccourcissent la journée avec départ tôt le matin et restitution le soir même. On ne peut pas faire ça dans tous les secteurs d'activité.

Même problématique pour les locations de voiture : ils préfèrent inclure statistiquement ces jours perdus dans leur tarif et faire les grands seigneurs en ne te faisant pas payer plus si tu rends un peu en retard. Ils doivent compter avec la possibilité du retour d'un véhicule cartonné ou puant la me*de, impossible à relouer dans la foulée.

Dans ton cas, départ le vendredi soir et retour lundi matin ne font que deux jours de loc (samedi et dimanche) avec +10 € seulement, si j'ai bien capté le fond de ta pensée.

Ces détails n'en sont pas ! Ces points sont importants et sont à clarifier rapidement pour en déduire des règles de fonctionnement strictes, sinon ce sera 60% à la pointe Bic sur des Post-It et le reste dans les têtes : un vrai merdier si l'affaire marche et des sources de friction garanties à court délai. De plus l'impact sur la rentabilité réelle en pratique peut s'avérer significatif.

En attendant tu vas me faire le plaisir d'aller chercher SQLite Expert Personnal (gratuit) sur ce site, de te l'installer (zéro risque, promis) et de te familiariser avec la base démo. Je n'ai plus trop de temps ce matin, donc trouve-toi un tutoriel SQL en français si nécessaire et passe un peu de temps dessus. C'est le meilleur investissement que tu puisses faire pour l'instant. Plus tard je te passerai ce qu'il faut pour commencer à mettre en place ta propre base, qu'on affinera.

[julie]

Oui ok je vais voir ça sur ment demain j'ai pas trop le temps la merci pour la piste
Moi qui pensait avoir une première version fonctionelle dans le courant de la semaine prochaine je pense que ça va être difficile je vais voir le sqlite via ton lien merci encore une fois

[mikell]

Note aux forumeurs/forumeuses

Aucun problème, nous serons très certainement nombreux à suivre avec le plus grand intérêt la gestation de ce script qui une fois fini deviendra une superbe référence d'utilisation de sqlite

[jchd]

Ce n'est pas mon seul terrain de jeu. Si quelqu'un souhaite contribuer, qu'il s'exprime (ou se taise à jamais selon la formule consacrée).

Ceci dit j'ai plusieurs fois constaté que des gens un peu novices (ne pas se vexer, hein !) se jettent direct sur l'IHM comme des morts de faim pour "avoir quelque chose" puis commencent à se heurter aux vraies questions quand il s'agit de remplir les blancs du code, sans jamais avoir posé ces questions de façon explicite.

Donc autant proposer une démarche où les intéressés verbalisent explicitement leurs besoins à un niveau de détail compatible avec le début de réalisation d'un squelette, quite à animer ce squelette comme une marionnette (à la main).

Quand tout est clair et fonctionne à la main en donnant les résultats et la souplesse escomptés, on peut penser à lancer Scite pour faire le lien entre tout ça et lui donner une peau (l'IHM).

[mikell]

Avec dans le cas présent des compétences fort limitées en ostéo-arthro-myologie je veux bien contribuer pour ce qui est cutané (donc rigoureusement extra-sqlite, petite main quoi) dans la mesure où le squelette est assemblé et pourvu des articulations et muscles adéquats

[matwachich]

Pour les cours SQL, je pense que le meilleur est celui là, mais il est plutôt long ...
Alors en cherchant un peu, je tombe sur celui-ci qui m'a l'air pas mal.

[julie]

me revoila (oui encore sincerement desolé de devoir me supporter )

bon j'ai un petit soucis j'arrive pas a faire une fonction qui va me permettre de commencer reelement mon projet

je m'explqiue dans le code ci dessous j'aimerai que les item qui sont dans le tableau 2 ,quand on clique sur le bouton retirez du stock ca genere un
fichier .ini ici appeler devis.ini qui sera composer de la maniere suivante:

[assiette 18x18]
valeur=45
[vers a vin]
valeur=37

le soucis est que le nombre d'item et quantite peut varier en fonction de ce que l'on desire retiré du stock et je n'arrive pas a automatiser cela.
j'espere avoir ete comprise :S

et si en meme temps quelqu'un pourriez me regler le probleme d'actualisation de la date dans le tableau 1
(la date doit etre actualiser a chaque fois que l'on clique sur une date dans le calendrier )

ps : PROMIS APRES J'arrete de vous demander autant d'aide je me debrouillerai par moi meme , meme si votre etre est tres precieuse pour moi

► Afficher le texte

Code : Tout sélectionner

#include <GuiConstantsEx.au3>
#include <ListviewConstants.au3>
#include <Array.au3>

Dim $array[3][4]
$array[0][1] = "20"
$array[1][1] = "40"
$array[2][1] = "50"
$array[0][2] = "7.50"
$array[1][2] = "12"
$array[2][2] = "17"


$Form1 = GUICreate("Form1", 840, 250, 199, 127)
Global $Date1 = GUICtrlCreateDate("", 10, 10, 201, 25)
$date2 = GUICtrlRead ($Date1)
$listview = GUICtrlCreateListView("désignation| en stock|prix|"&$date2&"|", 10, 50, 400, 130)
GUICtrlSendMsg($listview, $LVM_SETCOLUMNWIDTH, 0, 100)
;GUICtrlSendMsg($listview, $LVM_SETCOLUMNWIDTH, 20, 200)
$listview1 = GUICtrlCreateListView("désignation|prix ht|TVA %|nombres|Prix total ", 430, 50, 400, 130)
GUICtrlSendMsg($listview1, $LVM_SETCOLUMNWIDTH, 0, 100)

$total = GUICtrlCreateInput("", 658, 192, 172, 21)
GUISetState(@SW_SHOW)

Dim $lignetab1[3]
$lignetab1[0] = GUICtrlCreateListViewItem("assiette 18x18|" &$array[0][1] & "|" & $array[0][2], $listview)
$lignetab1[1] = GUICtrlCreateListViewItem("vers a vin|" &$array[1][1] & "|" & $array[1][2], $listview)
$lignetab1[2] = GUICtrlCreateListViewItem("couteaux|" &$array[2][1] & "|" & $array[2][2], $listview)


$btn = GUICtrlCreateButton("ajouter au second tableau", 428, 190, 150, 25)
$btn1 = GUICtrlCreateButton("retirez du stock", 580, 190, 60, 25)
GUISetState()

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg

        Case $GUI_EVENT_CLOSE
            Exit

        Case $btn
    $prix_total = GuiCtrlRead($total)
    $index = ControlListView ($Form1, "", $listview, "GetSelected")
    $produit = ControlListView ($Form1, "", $listview, "GetText", $index, 0)
    $prix = ControlListView ($Form1, "", $listview, "GetText", $index, 2)
    $nb = InputBox("Question", "combien d'article voulez vous ajouter ?")
    $prix = $nb*$prix
    $newitem = $produit & "| | | " & $nb & "|" & StringFormat("%.2f", $prix)
    GUICtrlCreateListViewItem($newitem, $listview1)
    GuiCtrlSetData($total, StringFormat("%.2f", $prix_total + $prix))
    $array[$index][1] = $array[$index][1] - $nb
    GuiCtrlSetData($lignetab1[$index], "|" & $array[$index][1])

        Case $btn1
            _devis_ini()

EndSwitch
GUICtrlRead($listview)
WEnd



Func _devis_ini ()
IniWrite(@ScriptDir&"\"&"devis.ini", "", "valeur", $valeur)
EndFunc

merci beaucoup

[mikell]

Bon quelque chose comme ça alors
Tu as 2 possibilités de fichier ini, choisis ce que tu préfères

► Afficher le texte

Code : Tout sélectionner

#include <GuiConstantsEx.au3>
#include <ListviewConstants.au3>
#include <Array.au3>

Dim $array[3][4]
$array[0][1] = "20"
$array[1][1] = "40"
$array[2][1] = "50"
$array[0][2] = "7.50"
$array[1][2] = "12"
$array[2][2] = "17"


$Form1 = GUICreate("Form1", 840, 250, 199, 127)
Global $Date1 = GUICtrlCreateDate("", 10, 10, 201, 25)
$date2 = GUICtrlRead ($Date1)
$listview = GUICtrlCreateListView("désignation| en stock|prix|"&$date2&"|", 10, 50, 400, 130)
GUICtrlSendMsg($listview, $LVM_SETCOLUMNWIDTH, 0, 100)
;GUICtrlSendMsg($listview, $LVM_SETCOLUMNWIDTH, 20, 200)
$listview1 = GUICtrlCreateListView("désignation|prix ht|TVA %|nombres|Prix total ", 430, 50, 400, 130)
GUICtrlSendMsg($listview1, $LVM_SETCOLUMNWIDTH, 0, 100)

$total = GUICtrlCreateInput("", 658, 192, 172, 21)
GUISetState(@SW_SHOW)

Dim $lignetab1[3]
$lignetab1[0] = GUICtrlCreateListViewItem("assiette 18x18|" &$array[0][1] & "|" & $array[0][2], $listview)
$lignetab1[1] = GUICtrlCreateListViewItem("vers a vin|" &$array[1][1] & "|" & $array[1][2], $listview)
$lignetab1[2] = GUICtrlCreateListViewItem("couteaux|" &$array[2][1] & "|" & $array[2][2], $listview)


$btn = GUICtrlCreateButton("ajouter au second tableau", 428, 190, 150, 25)
$btn1 = GUICtrlCreateButton("retirez du stock", 580, 190, 60, 25)
GUISetState()

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg

        Case $GUI_EVENT_CLOSE
            Exit

        Case $btn
    $prix_total = GuiCtrlRead($total)
    $index = ControlListView ($Form1, "", $listview, "GetSelected")
    $produit = ControlListView ($Form1, "", $listview, "GetText", $index, 0)
    $prix = ControlListView ($Form1, "", $listview, "GetText", $index, 2)
    $nb = InputBox("Question", "combien d'article voulez vous ajouter ?")
    $prix = $nb*$prix
    $newitem = $produit & "| | | " & $nb & "|" & StringFormat("%.2f", $prix)
    GUICtrlCreateListViewItem($newitem, $listview1)
    GuiCtrlSetData($total, StringFormat("%.2f", $prix_total + $prix))
    $array[$index][1] = $array[$index][1] - $nb
    GuiCtrlSetData($lignetab1[$index], "|" & $array[$index][1])

        Case $btn1
            _devis_ini()

        Case $Date1
             GuiCtrlSetData($listview, "|||" & GUICtrlRead($Date1))
EndSwitch

WEnd


#cs
Func _devis_ini()
 $inifile = @ScriptDir&"\"&"devis.ini"
 $count = ControlListView($Form1, "", $listview1, "GetItemCount")
 For $i = 0 To $count-1
     $ini_produit = ControlListView($Form1, "", $listview1, "GetText", $i, 0)
     $ini_qte = ControlListView($Form1, "", $listview1, "GetText", $i, 3)
     $ini_prix = ControlListView($Form1, "", $listview1, "GetText", $i, 4)
    IniWrite($inifile, $ini_produit, $ini_qte, $ini_prix )
 Next
 IniWrite($inifile, "total", "montant", GUICtrlRead($total))
EndFunc
#ce

Func _devis_ini()
 $inifile = @ScriptDir&"\"&"devis.ini"
 $client = "client1"
 $count = ControlListView($Form1, "", $listview1, "GetItemCount")
 IniWrite($inifile, $client, "date", GUICtrlRead($Date1))
 For $i = 0 To $count-1
     $ini_produit = ControlListView($Form1, "", $listview1, "GetText", $i, 0)
     $ini_qte = ControlListView($Form1, "", $listview1, "GetText", $i, 3)
     $ini_prix = ControlListView($Form1, "", $listview1, "GetText", $i, 4)
    IniWrite($inifile, $client, $ini_qte & " " & $ini_produit, $ini_prix )
 Next
 IniWrite($inifile, $client, "total", GUICtrlRead($total))
EndFunc
 

Et tu ne nous embêtes pas, voyons

[julie]

super mikell le second me va parfaitement merci

et au passage existe t'il des cours appronfondis d'autoit a pars sur le site du zero ?

et je passe en resolu pour clore le sujet des taleau j'ai tous ce qu'il me faut par rapport au titre du sujet merci mikell