x

TRIM_(where, pattern, string) 

dove:

dove

Parola chiave

Definisce dove ritagliare la stringa di origine. I valori validi sono:

• LEADING che rimuove ricorrenze iniziali.
• TRAILING che rimuove le ricorrenze finali.
• BOTH che rimuove le ricorrenze iniziali e finali.

schema

Alfanumerico

Un carattere singolo, racchiuso tra virgolette singole ('), le quali ricorrenze devono essere rimosse da string. Per esempio, il carattere può essere uno spazio vuoto (‘ ‘).

stringa

Alfanumerico

Stringa da tagliare.

Il tipo di dati della stringa secondaria restituita è AnV.

Inizio pagina

Esempio: Taglio di un carattere da una stringa

Nella seguente richiesta, TRIM_ rimuove le ricorrenze iniziali del carattere 'B' dal campo DIRECTOR:

TABLE FILE MOVIES
PRINT DIRECTOR AND
COMPUTE
TRIMDIR/A17 = TRIM_(LEADING, 'B', DIRECTOR);
WHERE DIRECTOR CONTAINS 'BR'
ON TABLE SET PAGE NOPAGE
END

L'emissione è:

  DIRECTOR           TRIMDIR                              
  --------           -------                                      
  ABRAHAMS J.        ABRAHAMS J.      
  BROOKS R.          ROOKS R.         
  BROOKS J.L.        ROOKS J.L.       

Inizio pagina

Esempio: Ridimensionamento con spazi finali

La seguente richiesta ritaglia un punto finale (.) dal nome del direttore. Il campo DIRECTOR ha il formato A17, per avere spazi finali nella maggior parte delle istanze del campo. Per creare un campo (DIRECTORY) senza spazi finali, SQUEEZ converte gli spazi finali in DIRECTOR in un singolo spazio, quindi TRIMV rimuove gli spazi finali restanti e li memorizza con il formato A17V, per visualizzare la lunghezza dei caratteri effettivi. Quindi TRIM_ viene chiamato rispetto a DIRECTOR e DIRECTORV, creando i campi TRIMDIR (ridimensionato DIRECTOR) e TRIMDIRV (ridimensionato DIRECTORV) :

DEFINE FILE MOVIES
DIRECTORV/A17V = TRIMV('T', SQUEEZ(17, DIRECTOR, 'A17V'), 17, ' ', 1, DIRECTORV) ;
TRIMDIR/A17 = TRIM_(TRAILING, '.', DIRECTOR);
TRIMDIRV/A17V = TRIM_(TRAILING, '.', DIRECTORV);
END
TABLE FILE MOVIES
PRINT DIRECTOR TRIMDIR DIRECTORV TRIMDIRV
ON TABLE SET PAGE NOPAGE
END

L'emissione parziale mostra che il campo DIRECTOR ridimensionato ancora contiene punti finali, poiché il punto non è l'ultimo carattere nel campo. Nel campo DIRECTOR ritagliato, i punti finali sono stati rimossi:

  DIRECTOR           TRIMDIR            DIRECTORV          TRIMDIRV
  --------           -------            ---------          -------- 
  SPIELBERG S.       SPIELBERG S.       SPIELBERG S.       SPIELBERG S 
  KAZAN E.           KAZAN E.           KAZAN E.           KAZAN E     
  WELLES O.          WELLES O.          WELLES O.          WELLES O    
  LUMET S.           LUMET S.           LUMET S.           LUMET S