4D View v16PV CELLS TO ARRAY |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D View v16
PV CELLS TO ARRAY
|
PV CELLS TO ARRAY ( zone ; direction ; colonne ; ligne ; tableau ; nombre ) | ||||||||
Paramètre | Type | Description | ||||||
zone | Entier long |
![]() |
Zone 4D View | |||||
direction | Entier |
![]() |
0 = Ligne; 1 = Colonne | |||||
colonne | Entier long |
![]() |
Numéro de la colonne de départ | |||||
ligne | Entier long |
![]() |
Numéro de la ligne de départ | |||||
tableau | Tableau |
![]() |
Nom de la variable de type tableau | |||||
nombre | Entier long |
![]() |
Nombre de cellules à utiliser | |||||
La commande PV CELLULES VERS TABLEAU remplit le tableau avec le contenu des cellules désignées par sens, colonne, ligne et nombre.
sens spécifie si la commande PV CELLULES VERS TABLEAU doit effectuer une copie de cellules contiguës dans le sens horizontal (0) ou vertical (1), à partir de la cellule définie par colonne et ligne.
Note : L'usage du paramètre sens est différent de celui du paramètre direction des commandes PV ALLER A CELLULE SUIVANTE et PV LIRE CELL LIBRE SUIVANTE, pour lesquelles la direction peut être dans n'importe quel sens. En ce qui concerne la commande PV CELLULES VERS TABLEAU, le sens est soit vers la droite (0 = ligne), soit vers le bas (1 = colonne).
Prenons pour exemple une zone 4D View incluse dans un masque de saisie de la table des clients : ce tableau, contenant 10 lignes au plus, servira à saisir ou modifier les contacts chez ce client. La zone de saisie est donc constituée de dix cellules disposées en colonne à partir de la cellule courante.
ARRAY TEXT($TabContacts;0) `Tableau des noms de contacts
C_LONGINT($Colonne;$Ligne) `Coordonnées de la cellule de départ
PV GET CURRENT CELL(Zone;$Colonne;$Ligne)
`10 lignes maximum à partir de la cellule courante vers le bas
PV CELLS TO ARRAY(Zone;1;$Colonne;$Ligne;$TabContacts;10)
If(Size of array($TabContacts)#0) `Quelque chose a été récupéré ?
RELATE MANY([Clients]Code) `Récupération des enregistrements liés
DELETE SELECTION([Contacts]) `Purge de l'existant
`Mise à jour des contacts (nouveaux, modifiés ou supprimés)
ARRAY TO SELECTION($TabContacts;[Contacts]NomDuContact) `Création des contacts
APPLY TO SELECTION([Contacts];[Contacts]CodeClient:=[Clients]Code) `Pour conserver le lien
QUERY SELECTION([Contacts];[Contacts]NomDuContact="") `Purge des contacts vides
DELETE SELECTION([Contacts])
End if
Produit : 4D View
Thème : PV Valeur de cellule
Numéro :
15909
Créé : 4D View 6.8
4D View - Langage ( 4D View v16)