Automatisation d'un comptage de surface

[slayer07]

Bonjour,
je vous expose mon soucis.
je dispose sur une carte de différentes parcelles sur laquelle, je défini un sens de prospection.
A l'aide de ce sens de prospection, je doit compter les surface afin de parvenir à une surface comprise entre 7,5 Ha et 8,5 ha et une fois cela fait renseigner dans un champ jour 1.
Je répète ensuite toute ces étapes en suivant le sens de prospection et en incrémentant le jour pour à la fin réaliser une analyse thématique sur les jours.
Je voudrais savoir s'il serait possible d'automatiser cela afin de gagner du temps

[SkåL]

Peux-tu décrire ces étapes avec des exemples de 2 ou 3 données et le résultat attendu ?

En gros, tu as des polygones, un sens de prospection, et tu voudrais renseigner de manière automatique le jour, pour qu'au final, tu connaisses la planification terrain à faire, quelles zones / quels jours ?

(problème que je vois d'ors et déjà, si l'accumulation des surfaces des polygones ne tombe pas entre 7,5 et 8,5 ha ? (ce n'est en effet pas un problème si tous tes polygones ont une surface propre inférieure à 1 ha))

[slayer07]

Tout à fait ça. les polygones n'ont pas tous une surface inférieure à 1 ha.
voici le résultat que je doit obtenir

[SkåL]

Donc automatisation ok, mais si tes polygones ont une surface des fois supérieure à 1 ha, il se peut que la somme ne tombe pas entre 7,5 et 8,5 ha.

Et dans ce cas là, que désires-tu que le programme fasse ?

2 cas possibles pour moi : si valeur supérieure à 8,5 ha, passer le polygone dont la surface à fait dépasser dans le jour suivant,

soit le mettre quand même dans le jour actuel (ça sera un jour un peu plus chargé niveau travail) et on recommence à compter à partir du polygone suivant.


J'ai aussi une question concernant la fourchette 7,5 et 8,5 ha.
Admettons que ma somme arrive à 7,6 ha et que le polygone suivant fasse 0,7 ha, la somme passe donc à 8,3 ha, que faire dans ce cas là ?

2 possibilités encore une fois : stopper directement à la première valeur dans la fourchette, stopper à la dernière valeur qui tombe dans la fourchette.

[slayer07]

Si la somme dépasse 8,5 Ha, on met le polygone suivant dans le jour suivant par contre, si la somme tombe dans la fourchette, on stoppe à la dernière valeur qui tombe dans la fourchette.

[SkåL]

Alors du coup, pour répondre à ta question du début, l'automatisation est possible (j'y plancherai personnellement ce soir), et la fourchette de surface ne sert à rien, seule la valeur de 8,5 ha est nécessaire.

[slayer07]

du coup non car tant que la somme ne dépasse pas 8,5 Ha, on continue de compter

[SkåL]

C'est ce que je dis , seule la valeur de 8,5 ha compte, la valeur de 7,5 ne servira au final à rien dans l'automatisation (si j'ai bien tout compris ).

[slayer07]

J'utilisé cette fourchette car en le faisant à la main, cela était plus facile.

[SkåL]

J'ai mis en rouge le nom des champs à modifier pour adapter à la structure de ta table.

Tu dois avoir un champ où est stocké le sens de prospection, qui permette lorsque l'on fasse un tri sur ce champ, d'avoir le premier enregistrement correspondant à la première parcelle ;

Un champ surface où la surface est stockée en flottant en hectares ;

Un champ jour (en entier de préférence) vide où sera renseigné l'information du jour de prospection.


Tout ça a compiler en mbx sous le programme Mapbasic :

DECLARE Sub main

Sub main

Dim surf As Float
Dim i, jour As Integer
Dim fichier, cmd As String

surf = 0
jour = 1
fichier = FileOpenDlg("","","TAB","Table parcelles")

Open Table fichier As parcelles Interactive

cmd = "Select * From parcelles Order By champ_sens_prospection into parcelles_triees noselect"

Fetch first From parcelles_triees

Do While Not Eot(parcelles_triees)
    surf = surf + parcelles_triees.champ_surface_ha
    i = parcelles_triees.RowID
    Print Chr$(12)
    Print "Jour " + jour

    If surf > 8,5 Then
        jour = jour + 1
        surf = parcelles_triees.champ_surface_ha
    End If

    Update parcelles_triees Set champ_jour = jour Where RowID = i

    Fetch Next From parcelles_triees
Loop

Commit Table parcelles Interactive
Close Table parcelles_triees Interactive
Note "Mise à jour terminée"
End Sub

[slayer07]

je te remercie. Mon sens de prospection est stocké dans une table à part du coup, je fais comment? C'est quoi que tu appelles la table fichier. Moi mes deux tables se nomment Passage DEL global jour et Sens_prospection_DEL.

[SkåL]

Je suppose que 'Passage DEL global jour' contient les polygones à prospecter, c'est dedans cette table qu'il doit y avoir un champ de surface et un champ 'jour' vide qui sera rempli.

Pour 'Sens_prospection_DEL', est-ce une table géographique ? Ou juste une table attributaire avec un code de parcelle (par exemple) et un numéro pour indiquer le sens de prospection ?

[slayer07]

En fait pour la créer, j'enregistre en réalité la table dessin. je te met un exemple. Tu à la table sens de prospection et la table avec les jours.
Après s'il le faut je peux changer de méthode pour créer la table sens de prospection

[SkåL]

[...]

Alors en l'état, on ne peut rien automatiser.
Ton sens de prospection est juste un linéaire.
Je pensais que chaque polygone de ta table 'Passage DEL global jour' possédait un numéro qui correspondait à l'ordre dans lequel il serait prospecté.

Le plus rapide (de ce que je pense) est de faire une table de ponctuels en cliquant dans l'ordre les parcelles en suivant le chemin de prospection.
On pourra ensuite récupérer le RowID de la table de ponctuels et l'attribuer au polygone en dessous.

[slayer07]

Il faudrait faire quoi avec le sens de prospection pour pouvoir automatiser