This is my work in 4GL