10.07.2015 Views

1130 Commercial Subroutine Package - All about the IBM 1130 ...

1130 Commercial Subroutine Package - All about the IBM 1130 ...

1130 Commercial Subroutine Package - All about the IBM 1130 ...

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Control Character Function. (decimal point), (comma)CR (credit)This character remains in <strong>the</strong> mask field where placed. However,if zero suppression is requested, it will be removed ifit is to <strong>the</strong> left of <strong>the</strong> last character to be zero-suppressed.This character remains in <strong>the</strong> mask field where placed.However, if zero suppression is requested, it will beremoved if it is to <strong>the</strong> left of <strong>the</strong> last character to bezero-suppressed.These two characters can be placed in <strong>the</strong> two rightmostpositions of <strong>the</strong> mask field. They are undisturbed if <strong>the</strong>source field is negative. (If <strong>the</strong> source field is positive,<strong>the</strong> characters C and R are blanked out. ) In editingoperations, a negative source field is indicated by an11-zone over <strong>the</strong> rightmost character. Whe<strong>the</strong>r CR isblanked out or not, no data will be edited into <strong>the</strong>sepositions when CR is present, but ra<strong>the</strong>r into <strong>the</strong> editcharacters to <strong>the</strong> left.The letters C and R may be used in <strong>the</strong> remainder of<strong>the</strong> edit mask, where <strong>the</strong>y will be treated as normalalphabetic characters, without being subject to signcontrol.Only <strong>the</strong> R character is checked, so <strong>the</strong> C character maybe any legal character, and it will be treated asdescribed.- (minus) This character is handled similarly to CR in <strong>the</strong>rightmost position of <strong>the</strong> mask field.* (asterisk)$ (floating dollarsign)This character operates <strong>the</strong> same as <strong>the</strong> 0 (zero) forzero suppression, except that asterisks ra<strong>the</strong>r thanblanks are inserted in <strong>the</strong> high-order nonsignificantpositions of <strong>the</strong> field, providing asterisk checkprotection.This character has <strong>the</strong> same effect as <strong>the</strong> 0 (zero) forzero suppression, except that a $ is inserted to <strong>the</strong> leftof <strong>the</strong> first significant character found, or to <strong>the</strong> leftof <strong>the</strong> position that stopped <strong>the</strong> zero suppression.The operation of <strong>the</strong> edit routine may be described in five steps:1. Characters are placed in <strong>the</strong> mask field from <strong>the</strong> source field, moving from rightto left. The characters 0 (zero), b (blank), * (asterisk) and $ (dollar sign) are replacedwith characters from <strong>the</strong> source field. No o<strong>the</strong>r characters in <strong>the</strong> maskfield are disturbed.

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!