Press n or j to go to the next uncovered block, b, p or k for the previous block.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 | 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 11007x 11007x 11007x 11007x 11007x 32964x 32964x 32964x 32964x 32964x 32964x 32964x 32964x 32964x 32964x 32964x 11007x 11007x 170x 170x 11007x 11007x 10444x 10444x 11007x 11007x 260x 260x 11007x 11007x 273x 273x 273x 11007x 11007x 339x 339x 63x 63x 276x 276x 339x 276x 339x 12x 12x 264x 264x 339x 339x 190x 190x 190x 4x 4x 4x 190x 190x 161x 161x 161x 161x 29x 190x 1x 1x 1x 1x 190x 6x 6x 6x 6x 339x 6x 6x 6x 6x 1x 1x 1x 1x 5x 6x 1x 1x 1x 1x 6x 94x 94x 94x 11007x | import {Issue} from "../issue"; import {BasicRuleConfig} from "./_basic_rule_config"; import {IRegistry} from "../_iregistry"; import {IObject} from "../objects/_iobject"; import * as Objects from "../objects"; import {ABAPObject} from "../objects/_abap_object"; import {IRule, IRuleMetadata} from "./_irule"; import * as Statements from "../abap/2_statements/statements"; import * as Expressions from "../abap/2_statements/expressions"; import {Position} from "../position"; import {Comment} from "../abap/2_statements/statements/_statement"; import {Version} from "../version"; export class MainFileContentsConf extends BasicRuleConfig { } export class MainFileContents implements IRule { private conf = new MainFileContentsConf(); private reg: IRegistry; public getMetadata(): IRuleMetadata { return { key: "main_file_contents", title: "Main file contents", shortDescription: `Checks related to report declarations.`, extendedInformation: `Does not run if the target version is Cloud * PROGs must begin with "REPORT <name>." or "PROGRAM <name>. * TYPEs must begin with "TYPE-POOL <name>." `, }; } private getDescription(details: string): string { return "Main file must have specific contents: " + details; } public getConfig() { return this.conf; } public setConfig(conf: MainFileContentsConf) { this.conf = conf; } public initialize(reg: IRegistry) { this.reg = reg; return this; } public run(obj: IObject): Issue[] { if (!(obj instanceof ABAPObject) || this.reg.getConfig().getVersion() === Version.Cloud) { return []; } const main = obj.getMainABAPFile(); if (main === undefined) { return []; } const stru = main.getStructure(); if (stru === undefined) { return []; } if (obj instanceof Objects.Program && obj.isInclude() === false && obj.isModulePool() === false) { let count = 0; let first = main.getStatements()[count]; while (first !== undefined && first.get() instanceof Comment) { count = count + 1; first = main.getStatements()[count]; } if (first === undefined || !(first.get() instanceof Statements.Report || first.get() instanceof Statements.Program)) { const position = new Position(1, 1); const issue = Issue.atPosition(main, position, this.getDescription("Report must begin with REPORT or PROGRAM"), this.getMetadata().key, this.conf.severity); return [issue]; } const name = first.findFirstExpression(Expressions.ReportName); if (name === undefined) { const token = first.getFirstToken(); const issue = Issue.atToken( main, token, this.getDescription("Add report name to REPORT or PROGRAM statement"), this.getMetadata().key, this.conf.severity); return [issue]; } else if (name.getFirstToken().getStr().toUpperCase() !== obj.getName()) { const token = name.getFirstToken(); const issue = Issue.atToken(main, token, this.getDescription("REPORT or PROGRAM name must match filename"), this.getMetadata().key, this.conf.severity); return [issue]; } } else if (obj instanceof Objects.TypePool) { let count = 0; let first = main.getStatements()[count]; while (first !== undefined && first.get() instanceof Comment) { count = count + 1; first = main.getStatements()[count]; } if (first === undefined || !(first.get() instanceof Statements.TypePool)) { const position = new Position(1, 1); const issue = Issue.atPosition(main, position, this.getDescription("Type pool must begin with TYPE-POOL"), this.getMetadata().key, this.conf.severity); return [issue]; } const name = first.getChildren()[3]; if (name.getFirstToken().getStr().toUpperCase() !== obj.getName()) { const token = name.getFirstToken(); const issue = Issue.atToken(main, token, this.getDescription("TYPE-POOL name must match filename"), this.getMetadata().key, this.conf.severity); return [issue]; } } return []; } } |