Figure 332 shows how to specify DFT using character values.
Figure 332. Specifying the DFT Keyword (Character Values)
|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 00010A R SUPPLIES 00020A PENS 20 2 1 00030A INK 20 3 1 00040A PAPER 20 4 1 00050A 7 9DFT('ON') 00060A 8 9'ON' 00070A 00080A 01 12 1'Hotel name: 'Terrace Inn' 00100A 00110A 02 12 1'Hotel name: 'Riverview Inn' A
The specifications DFT('ON') and 'ON' are equivalent and show the difference between specifying DFT explicitly and implicitly.
If indicator 01 is on, this prints:
Hotel name: 'Terrace Inn'
If indicator 02 is on and indicator 01 is off, this prints:
Hotel name: 'Riverview Inn'
Figure 333 shows how to specify DFT for a constant field containing an alternate character.
Figure 333. Specifying the DFT Keyword (Hexadecimal Values)
|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 (1)(2) 00010A R RECORD DFNCHR(X'7C' X'007E813CC324817E00') 00020A (3)58 4DFT(X'7C') TRNSPY (4) 00030A +2DFT('1982') A
The constant field for which DFT is specified (1) appears on line 58, position 4. The character defined for hex 7C prints in this field. DFNCHR (2), specified at the record level for this example, defines hex 7C as a copyright mark.
The following are equivalent ways to specify the value as defined in this example (3):
DFT(X'7C') X'7C' DFT('(C)') '(C)'
The TRNSPY keyword (4) is required when hexadecimal values are specified for DFT.
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.