id division. program-id. bprog. linkage section. 01 a-item pic 9(4). 01 b-item pic 9(4). 01 c-item pic 9(4). procedure division using a-item b-item c-item. b-section section. b-para. call "C$SLEEP" using a-item. b-exit. goback .