4D Doc Center : PV SET CELL BOOLEAN VALUE

4D View v14

PV SET CELL BOOLEAN VALUE


PV SET CELL BOOLEAN VALUE ( area ; coluna ; linha ; valor )

Parâmetro	Tipo	Descrição
area	Inteiro longo	Área 4D View
coluna	Inteiro longo	Número de coluna da célula
linha	Inteiro longo	Número de linha da célula
valor	Inteiro	Valor da célula

Descrição

O comando PV SET CELL BOOLEAN VALUE atribui o valor inteiro a célula atribuída por coluna e linha. Este inteiro permite expressar um valor booleano (0=Falso, 1=Verdadeiro): logo é necessário traduzir os booleanos 4D como uma função Num(oBooleano).

Exemplo

Modificaremos o exemplo do comando PV SET CELL STRING VALUE ao tipo booleano, representado por um inteiro:

 C_INTEGER($CopyNumber)

 C_LONGINT($Column;$Row) `Coordenadas da célula a copiar

 C_INTEGER($Index) `Índice do laço

 C_BOOLEAN($Value) `Valor a copiar

 

 $CopyNumber:=Num(Request("¿Quantas cópias deseja?";"5")) `5 por padrão

 

 If($CopyNumber>0)

    PV GET CURRENT CELL(Area;$Column;$Row) `Célula a copiar

    $Value:=(PV Get cell boolean value(Area;$Column;$Row)=1) `Conversão inteiro a booleano

    For($Index;$Row+1;$Row+$CopyNumber) `$CopyNumber loop(s)

       PV SET CELL BOOLEAN VALUE(Area;$Column;$Index;Num($Value)) `Copiar valor

    End for

 End if