This is my secode procedure.