REPLACE PTR BY "A"
REPLACE PTR:PTR BY "*" FOR 75
REPLACE PTR BY ITEM
REPLACE PTR BY (4"03").[7:48] FOR 1
REPLACE PTR BY " " FOR N WORDS
REPLACE PTR:PTR BY PST FOR 18
REPLACE PTR BY PST:PST FOR NUM WORDS
REPLACE PTR BY PINFO WITH PIC
REPLACE PTR:PTR BY PST WHILE NEQ " "
REPLACE PTR BY PST WHILE IN ALPHA
REPLACE P BY X FOR * DIGITS
REPLACE P BY X FOR 50 NUMERIC
REPLACE P BY X FOR * NUMERIC
REPLACE PTR BY PST WHILE IN MYTRUTHTABLE
REPLACE PTR BY PST UNTIL = ","
REPLACE PTR:PTR BY PST:PST UNTIL IN ALPHA8
REPLACE PTR BY PST FOR THELENGTH WHILE > "0"
REPLACE PTR BY PST FOR LEFT:25 WHILE IN ACCEPTABLE
REPLACE PTR BY PST FOR 120 UNTIL NEQ " "
REPLACE PTR BY PST FOR M:N UNTIL IN ALPHA
REPLACE PTR:PTR BY SUMTOTAL FOR 6 DIGITS, "."
REPLACE PTR BY FYLE.TITLE
REPLACE PTR BY PST:PST FOR L WITH XLATTABLE
REPLACE PTR BY STR
REPLACE PTR BY SARRAY[4,J]
REPLACE P BY S1 !! S2
REPLACE P BY PTR:PTR FOR 10
REPLACE P BY TAKE(S,2) !! SA[4]
REPLACE P BY HEAD(S,ALPHA)