CRITICAL
Rule Definition
O-specs being deprecated and allow less re-usability
Remediation
Try to replace this statements by a another one like Printer Files
Violation Code Sample
OFilename++DF..N01N02N03Excnam++++B++A++Sb+Sa+
O..............N01N02N03Field+++++++++YB.End++PConstant/editword/DTformat
01 OQSYSPRT E HDR 1
02 O PgmDs.Pgm 10
03 O PgmDs.User + 1
04 O 67 'REPORT TITLE'
05 O RptTime 120T*hms
06 O RptDate + 1D*usa
07 O E HDR 1
08 O 12 'Account No.'
09 O + 1 'Account Name'
10 O 49 'State'
11 O 127 'Page:'
12 O PAGE Z + 1
13 O E HDR 1
14 O 12 '-----------'
15 O + 1 '------------------------'
16 O + 0 '------'
17 O + 1 '-----'
18 O E DTL 1
19 O ACCNBR Z 12
20 O ACCNME + 1
21 O ACCSTE + 3
22 O 01 + 1 '<- Invalid state'
23 O E EOR 2
24 O 21 '*** END OR REPORT ***'
Fixed Code Sample
AAN01N02N03T.Name++++++RLen++TDpBLinPosFunctions++++++++++++++++++++++++
01 A INDARA
02 A REF(TESTFILE)
*-----------------------------------------------------------------------
03 A R PRHEADER
04 A PROGRAM 10A 1SKIPB(001)
05 A USER 10A +1
06 A 56'REPORT TITLE'
07 A 113TIME
08 A +1DATE(*YY)
09 A EDTCDE(Y)
*---
10 A 1'Account No.'
11 A HIGHLIGHT
12 A UNDERLINE
13 A SPACEB(001)
14 A +1'Account Name '
15 A HIGHLIGHT
16 A UNDERLINE
17 A +1'State'
18 A HIGHLIGHT
19 A UNDERLINE
20 A 123'Page'
21 A +1PAGNBR
22 A EDTCDE(Z)
Related Technologies
Technical Criterion
Programming Practices - Structuredness
About CAST Appmarq
CAST Appmarq is by far the biggest repository of data about real IT systems. It's built on thousands of analyzed applications, made of 35 different technologies, by over 300 business organizations across major verticals. It provides IT Leaders with factual key analytics to let them know if their applications are on track.