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.

Document ID : KB000008168
Last Modified Date : 14/02/2018
Show Technical Document Details
Issue:

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.

Environment:
CA-1CA-EARL
Cause:

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' 

Resolution:

The edit masks must be coded exactly as specified in the manual, that is, in upper case. 

Example:

'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.

Replaceable Characters

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.

Replaceable

Characters are Z, 9, * and $. Their specific meanings are as follows:

Z     

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.

9             

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 _

Additional Information:

Review the CA EARL User Guide Chapter 5