how to create a new stock record via 4GL?

SUGGESTED

How would I write 4Gl code that will create a new record in the stock table?

Thanks,

Chris