4D View v12PV SET FORMAT | 
            ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 
                    
                        
    
    
                         | 
                
                    
                         
    4D View v12
 
PV SET FORMAT 
 
        
 | 
                |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| PV SET FORMAT ( area ; formato ; cadena ) | ||||||||
| Parámetro | Tipo | Descripción | ||||||
| area | Entero largo | 
             
         | 
        Área 4D View | |||||
| formato | Entero largo | 
             
         | 
        Número del formato | |||||
| cadena | Cadena | 
             
         | 
        Cadena del formato | |||||
Esta es una versión simplificada del ejemplo del comando PV Add format: el formato, en este caso, se remplaza abruptamente. El nuevo formato no se crea si el anterior no está presente.
 ARRAY LONGINT($ArrayFormatNum;0) `Array de números de formato(s)
 ARRAY STRING(255;$ArrayFormatStrings;0)   `Array de cadenas de formato(s)
 C_INTEGER($Position) `Posición del formato a modificar en los arrays de números y de nombres
 
  `Lista de formatos disponibles
 PV GET FORMAT LIST(Area;$ArrayFormatNum;$ArrayFormatStrings)
 
 $Position:=Find in array($ArrayFormatStrings;"$###,##0.00")
 If($Position#-1) `¿Formato disponible pare el área?
  `Modificación del formato
    PV SET FORMAT(Area;$ArrayFormatNum{$Position};"### ##0,00 EUR")
 End if
	Producto: 4D View
	Tema: PV Estilo
	Número 
        15881
        
        
        
	
	Creado por: 4D View 6.8