Metropoli BBS
VIEWER: sam255.txt MODE: TEXT (ASCII)
apl>" <-APL2-------------------- sam255.txt ---------------------------->


apl>" <- format by example (lFr) --------------------------------------->


apl>l#' 55@  $55.50 EA'


apl>L#r#3 2R3 4.99 7 7.45 12 .5

 3 4.99
 7 7.45
12 0.50


apl>L#z#lFr

  3@  $ 4.99 EA
  7@  $ 7.45 EA
 12@  $  .50 EA


apl>Rz

3 15

apl>Rl

15

apl>" ------------------------------------------------------------------


apl>expr#234.67 456.23 987.65 34.23


apl>'total order cost:  $5,555.50'F+/expr

total order cost:  $1,712.78

apl>" ------------------------------------------------------------------


apl>Lfc

.,*0_

apl>' 55.55'F345 .6789

' 55.55'F345 .6789
        ^ 29 - a width is too small in format.

apl>Lfc[4]#'?'


apl>Lfc

.,*?_

apl>' 55.55'F345 .6789

 ?????   .68

apl>" ------------------------------------------------------------------


apl>'555_555_5555' F 8324632190

832 463 2190

apl>" ------------------------------------------------------------------


apl>' 55.55' F 12.345 12.344

 12.35 12.34

apl>' 55.55' F .10 1.1 1.01 10.019 .11

   .1   1.1   1.01 10.02   .11

apl>' 55.55' F 2 2.2 0 2.22

  2     2.2         2.22

apl>' 55.55 -55.10 x (55.10) +552.50 -551.20CR x 0006/06/06 06:06 555-' F I11

  1      2.00 x   3.00    +4.00    5.00CR x 0006/07/08 09:10  11-

apl>' -551.20CR' F 5 -5

    5.00CR   -5.00  

apl>f 1 " Should fail with '59 - argument not found'

f 1 " Should fail with '59 - argument not found'
^ 59 - argument not found where expected during execute.

apl>" ------------------------------------------------------------------


apl>" '0' = Pad with 0's to the position of the 0.  If the value of the


apl>" corresponding item of r is 0, the position if filled with 0's.


apl>"


apl>' 055.50' F .3 33.2 0 300

 000.30 033.20 000.00 300.00

apl>" ------------------------------------------------------------------


apl>" '1' = Float the decorator against the number only if the value is


apl>" negative.


apl>"


apl>' _55.10' F r # -3.4 0 4.5 -2.12

  _3.40    .00   4.50  _2.12

apl>' (55.10)' F r

  (3.40)    .00    4.50   (2.12)

apl>" ------------------------------------------------------------------


apl>" '2' = Float the decorator against the number only if the value is


apl>" positive.


apl>"


apl>' +552.50' F r # -4 40 -400

    4.00  +40.00  400.00

apl>' -551.20cr' F r

   -4.00     40.00cr -400.00  

apl>" ------------------------------------------------------------------


apl>" '3' = Float the decorator against the number.


apl>"


apl>' $555.50' F r # 3.1 32.23 324

 $  3.10 $ 32.23 $324.00

apl>' $553.50' F r

   $3.10  $32.23 $324.00

apl>" ------------------------------------------------------------------


apl>" '4' = Counteract the effect of a 1, 2, or 3, to prevent it from


apl>" affecting the other side of the decimal.  Any decorator on the same


apl>" side of the decimal as the 4 displays as entered.


apl>' -551.20cr' F r # -1 10 -100

   -1.00     10.00cr -100.00  

apl>' -551.40cr' F r

   -1.00cr   10.00   -100.00cr

apl>" ------------------------------------------------------------------


apl>" '6' = The decorator to the right marks the end of this field; treat


apl>" it as though there were a blank between the fields, but display the


apl>" decorator.


apl>'0006/06/06 06:06' F 1995 8 29 21 58

1995/08/29 21:58

apl>)off

[ RETURN TO DIRECTORY ]