;C ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ³ ° ° ° ° ° ° ° ° ° ° ° ° ° ° EXAMPLE # 4 ° ° ° ° ° ° ° ° ° ° ° ° ° ° ° ³ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ³ ³ ³ ³ ³ THE INPUT FILE: List of invoices for a computer store ³ ³ ³ ³ ³ ³ WHAT WE WANT: (1) Copy only items for the IBM-PC and the Macintosh ³ ³ (2) Move the columns around and add some extra spaces ³ ³ (3) Change the way a negative amount is represented ³ ³ (i.e. change 345.00- to -345.00) ³ ³ ³ ³ ³ ³ HOW WE DO IT: (1) We use clustered ACCEPTs to make this selection ³ ³ (2) We use SET and PAD for this step ³ ³ (3) We use IF to detect the sign, then INSERT if necessary ³ ³ ³ ³ ³ ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ ;P