ACCEPT Statement - Format 9 - Data Area

1 ACCEPT identifier-1 FROM mnemonic-name FOR
2 identifier-2
2 literal-1
3? IN
3.1 LIBRARY
3.2 identifier-3
3.2 literal-2
4? AT
4.1 identifier-4
4.1 integer-1
5? WITH LOCK
6? ON
6.1 EXCEPTION imperative-statement-1
7? NOT
7.1? ON
7.2 EXCEPTION imperative-statement-2
8? END-ACCEPT