When trying to format 350 def tapesize (N 6.2) = none 'TAPE' 'SIZE' pic 'zzz,zz9.99' in CA EARL I am receiving CALC265E error messages for numeric field.
Statement beginning on line 350 error is because picture does not match field size.
Everything can be in lower case except for the edit mask, ie 'zzz.zz9.99' must be 'ZZZ.ZZ9.99'
The edit masks must be coded exactly as specified in the manual, that is, in upper case.
'zzz.zz9.99 must be 'ZZZ.ZZ9.99'
Following is from the CA EARL User Guide Chapter 5 and notice that the zero suppression edit mask must be coded in upper case.
An edit mask should always specify as many replaceable characters as there are digits in the field to be edited (the source field). These replaceable characters are replaced in the editing operation by either a digit from the source field or by a fill character.
Characters are Z, 9, * and $. Their specific meanings are as follows:
Specifies a numeric digit position that will be replaced by a digit from the source field if a significant (non-zero) source digit has been encountered; else it will be set to blank.
Specifies a numeric digit position that will always be replaced by the corresponding digit from the source field, with no zero suppression implied.
Specifies a numeric field position that will be replaced by a digit from the source field if a significant source digit has been encountered; else it will be set to *. This gives the ability to asterisk-fill leading, non-significant digits in a printed field.
(Hexadecimal '5B') specifies a numeric digit position that will be replaced by a digit from the source field if a significant source digit has been encountered. Leading, non-significant positions will be set to blank, and a $ sign will be printed immediately to the left of the first significant digit. This gives the ability to float a $ sign (currency symbol) along a printed field.
NO PICTURE (default) 1234 7 _ PIC '99999' _1234 ____7 _____
PIC 'ZZZZZ' 1234 7
PIC '$$$$$' $1234 $7 $
PIC '_____' _1234 ____7 _____
PIC 'ZZZZ9' 1234 7 _
Review the CA EARL User Guide Chapter 5