Use SET TERM
SET TERM $ ;
CREATE PROCEDURE CUSTITEMMOVEMENT
(
CUSTNO INTEGER
)
RETURNS
(
RNO INTEGER,
TNAME VARCHAR(5),
TDATE DATE,
DOCNO VARCHAR(12),
QTY NUMERIC(18, 2),
NETPRICE NUMERIC(18, 4),
ITEMNO VARCHAR(20),
ITEMNAME VARCHAR(40)
)
AS
BEGIN
FOR SELECT IM.RNO,IM.TNAME,IM.TDATE,IM.DOCNO,IM.QTY,
IM.NETPRICE,IM.ITEMNO, IT.ITEMNAME
FROM ITEMMOVEMENTS IM
JOIN ITEMS IT ON IT.ITEMNO=IM.ITEMNO
WHERE (IM.CUSTNO= :CUSTNO)
ORDER BY IM.TDATE, IM.DOCNO
INTO :RNO,:TNAME,:TDATE,:DOCNO,:QTY,:NETPRICE,:ITEMNO,:ITEMNAME
DO SUSPEND;
END $
SET TERM ; $
By the way, don't use quotation marks except if you want columns names to be case-sensitive
and, for purpose of maintenance I suggest you not to name your columns xxxNO if type is not a number