Textfelder können alphanumerischen Feldern zugewiesen werden und sie erhalten Zuweisung von alphanumerischen Feldern. Wenn einem alphanumerischen Feld der Wert eines Textfelds zugewiesen wird, der zu lang ist für das alphanumerische Feld, wird der Wert abgeschnitten, bevor er dem alphanumerischen Feld zugewiesen wird.
Hinweis: COMPUTE-Befehle in Maintain unterstützen Textfelder nicht.
In diesem Beispiel wird die Datenquelle COURSES verwendet, welche ein Textfeld enthält, um ein alphanumerisches Feld namens ADESC zu erstellen, welches das Textfeld nach 36 abschneited, und ein neues Textfeld namens NEWDESC, welches eine Textversion von ADESC ist:
DEFINE FILE COURSES ADESC/A36 = DESCRIPTION; NEWDESC/TX36 = ADESC; END TABLE FILE COURSES PRINT ADESC NEWDESC END
Die Ausgabe ist:
ADESC NEWDESC ----- ------- This course provides the DP professi This course provides the DP professi Anyone responsible for designing FOC Anyone responsible for designing FOC This is a course in FOCUS efficienci This is a course in FOCUS efficienci
WebFOCUS |