-- Collection of code snippets by Arne Vajhøj 
-- (likely posted to comp.os.vms/INFO-VAX, INFO-TPU, MACRO32, eksperten.dk, newz.dk, LinkedIn or other place sometime between 1990 and now) 
CREATE TABLE dectbl (decfld DECIMAL(18,2))
GO

CREATE PROCEDURE decsp(@decval    DECIMAL(18,2))
AS
INSERT INTO dectbl(decfld) VALUES(@decval)
GO

SELECT * FROM dectbl
GO

EXEC decsp 123.45
GO

EXEC decsp 678.90
GO

SELECT * FROM dectbl
GO
