@things-factory/compliance 0.0.0-stage → 10.1.254

package/dist-server/service/compliance-case/compliance-case-query.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"compliance-case-query.js","sourceRoot":"","sources":["../../../server/service/compliance-case/compliance-case-query.ts"],"names":[],"mappings":";;;;AAAA,+CAA6G;AAE7G,qEAA4D;AAC5D,yDAAgD;AAChD,+DAAuD;AACvD,iDAA+E;AAE/E,qDAA0E;AAC1E,uDAAuE;AACvE,uEAAgN;AAChN,iEAAuG;AAEvG;;;;GAIG;AAGI,IAAM,mBAAmB,GAAzB,MAAM,mBAAmB;IAGxB,AAAN,KAAK,CAAC,eAAe,CAA0B,MAAiB,EAAS,OAAwB;QAC/F,OAAO,MAAM,IAAA,4CAAkB,EAAC,MAAM,EAAE,OAAO,CAAC,CAAA;IAClD,CAAC;IAGK,AAAN,KAAK,CAAC,cAAc,CAAY,EAAU,EAAS,OAAwB;QACzE,OAAO,MAAM,IAAA,2CAAiB,EAAC,EAAE,EAAE,OAAO,CAAC,CAAA;IAC7C,CAAC;IAGK,AAAN,KAAK,CAAC,0BAA0B,CAAQ,OAAwB;QAC9D,OAAO,MAAM,IAAA,0CAAgB,EAAC,OAAO,CAAC,CAAA;IACxC,CAAC;IAGK,AAAN,KAAK,CAAC,mBAAmB,CAAQ,OAAwB;QACvD,OAAO,MAAM,IAAA,6CAAmB,EAAC,OAAO,CAAC,CAAA;IAC3C,CAAC;IAGK,AAAN,KAAK,CAAC,yBAAyB,CAAsC,UAAoB,EAAS,OAAwB;QACxH,OAAO,MAAM,IAAA,2CAAiB,EAAC,UAAU,EAAE,OAAO,CAAC,CAAA;IACrD,CAAC;IAGK,AAAN,KAAK,CAAC,oBAAoB,CAAc,IAAY,EAAS,OAAwB;QACnF,OAAO,MAAM,IAAA,oCAAU,EAAC,IAAI,EAAE,OAAO,CAAC,CAAA;IACxC,CAAC;IAIK,AAAN,KAAK,CAAC,iCAAiC,CAAc,IAAY,EAAS,OAAwB;QAChG,OAAO,MAAM,IAAA,6CAAmB,EAAC,IAAI,EAAE,OAAO,CAAC,CAAA;IACjD,CAAC;IAGK,AAAN,KAAK,CAAC,QAAQ,CAAS,GAAmB;QACxC,OAAO,GAAG,CAAC,UAAU,CAAC,CAAC,CAAC,MAAM,IAAA,qBAAa,EAAC,uBAAQ,CAAC,CAAC,OAAO,CAAC,EAAE,KAAK,EAAE,EAAE,EAAE,EAAE,GAAG,CAAC,UAAU,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAA;IACzG,CAAC;IAGK,AAAN,KAAK,CAAC,MAAM,CAAS,GAAmB;QACtC,OAAO,GAAG,CAAC,QAAQ,CAAC,CAAC,CAAC,MAAM,IAAA,qBAAa,EAAC,uBAAQ,CAAC,CAAC,OAAO,CAAC,EAAE,KAAK,EAAE,EAAE,EAAE,EAAE,GAAG,CAAC,QAAQ,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAA;IACrG,CAAC;IAGK,AAAN,KAAK,CAAC,OAAO,CAAS,GAAmB;QACvC,OAAO,GAAG,CAAC,OAAO,IAAI,CAAC,MAAM,IAAA,qBAAa,EAAC,gCAAc,CAAC,CAAC,OAAO,CAAC,EAAE,KAAK,EAAE,EAAE,EAAE,EAAE,GAAG,CAAC,EAAE,EAAE,EAAE,SAAS,EAAE,CAAC,SAAS,CAAC,EAAE,CAAC,CAAC,EAAE,OAAO,IAAI,EAAE,CAAA;IACvI,CAAC;IAGK,AAAN,KAAK,CAAC,aAAa,CAAS,GAAmB;QAC7C,OAAO,GAAG,CAAC,aAAa,IAAI,CAAC,MAAM,IAAA,qBAAa,EAAC,gCAAc,CAAC,CAAC,OAAO,CAAC,EAAE,KAAK,EAAE,EAAE,EAAE,EAAE,GAAG,CAAC,EAAE,EAAE,EAAE,SAAS,EAAE,CAAC,eAAe,CAAC,EAAE,CAAC,CAAC,EAAE,aAAa,IAAI,EAAE,CAAA;IACzJ,CAAC;IAGK,AAAN,KAAK,CAAC,OAAO,CAAS,GAAmB;QACvC,OAAO,MAAM,IAAA,qBAAa,EAAC,qCAAmB,CAAC,CAAC,IAAI,CAAC,EAAE,KAAK,EAAE,EAAE,cAAc,EAAE,EAAE,EAAE,EAAE,GAAG,CAAC,EAAE,EAAE,EAAS,EAAE,KAAK,EAAE,EAAE,SAAS,EAAE,KAAK,EAAE,SAAS,EAAE,KAAK,EAAS,EAAE,CAAC,CAAA;IAClK,CAAC;IAGK,AAAN,KAAK,CAAC,WAAW,CAAS,GAAmB,EAAS,OAAwB;QAC5E,OAAO,MAAM,IAAA,qBAAa,EAAC,4BAAU,CAAC,CAAC,IAAI,CAAC,EAAE,KAAK,EAAE,EAAE,MAAM,EAAE,EAAE,EAAE,EAAE,OAAO,CAAC,KAAK,CAAC,MAAM,CAAC,EAAE,EAAE,EAAE,OAAO,EAAE,uCAAa,EAAE,KAAK,EAAE,GAAG,CAAC,EAAE,EAAS,EAAE,KAAK,EAAE,EAAE,SAAS,EAAE,KAAK,EAAS,EAAE,CAAC,CAAA;IACvL,CAAC;IAGK,AAAN,KAAK,CAAC,WAAW,CAAS,GAAmB,EAAS,OAAwB;QAC5E,OAAO,MAAM,IAAA,0BAAa,EAAC,IAAA,qBAAa,EAAC,gCAAc,CAAC,CAAC,OAAO,EAAE,OAAO,CAAC,KAAK,CAAC,MAAM,EAAE,EAAE,IAAI,EAAE,uCAAa,EAAE,EAAE,EAAE,GAAG,CAAC,EAAE,EAAE,CAAC,CAAA;IAC9H,CAAC;IAGK,AAAN,KAAK,CAAC,OAAO,CAAS,GAAmB;QACvC,OAAO,GAAG,CAAC,SAAS,CAAC,CAAC,CAAC,MAAM,IAAA,qBAAa,EAAC,gBAAI,CAAC,CAAC,OAAO,CAAC,EAAE,KAAK,EAAE,EAAE,EAAE,EAAE,GAAG,CAAC,SAAS,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAA;IACnG,CAAC;CACF,CAAA;AA7EY,kDAAmB;AAGxB;IAFL,IAAA,wBAAS,EAAC,uFAAuF,CAAC;IAClG,IAAA,oBAAK,EAAC,OAAO,CAAC,EAAE,CAAC,yCAAkB,EAAE,EAAE,WAAW,EAAE,iGAAiG,EAAE,CAAC;IAClI,mBAAA,IAAA,mBAAI,EAAC,IAAI,CAAC,EAAE,CAAC,iBAAS,CAAC,CAAA;IAAqB,mBAAA,IAAA,kBAAG,GAAE,CAAA;;6CAAjB,iBAAS;;0DAE/D;AAGK;IADL,IAAA,oBAAK,EAAC,OAAO,CAAC,EAAE,CAAC,gCAAc,EAAE,EAAE,WAAW,EAAE,sFAAsF,EAAE,CAAC;IACpH,mBAAA,IAAA,kBAAG,EAAC,IAAI,CAAC,CAAA;IAAc,mBAAA,IAAA,kBAAG,GAAE,CAAA;;;;yDAEjD;AAGK;IADL,IAAA,oBAAK,EAAC,OAAO,CAAC,EAAE,CAAC,CAAC,gCAAc,CAAC,EAAE,EAAE,WAAW,EAAE,6FAA6F,EAAE,CAAC;IACjH,mBAAA,IAAA,kBAAG,GAAE,CAAA;;;;qEAEtC;AAGK;IADL,IAAA,oBAAK,EAAC,OAAO,CAAC,EAAE,CAAC,CAAC,2CAAoB,CAAC,EAAE,EAAE,WAAW,EAAE,iGAAiG,EAAE,CAAC;IAClI,mBAAA,IAAA,kBAAG,GAAE,CAAA;;;;8DAE/B;AAGK;IADL,IAAA,oBAAK,EAAC,OAAO,CAAC,EAAE,CAAC,OAAO,EAAE,EAAE,WAAW,EAAE,2HAA2H,EAAE,CAAC;IACvI,mBAAA,IAAA,kBAAG,EAAC,YAAY,EAAE,IAAI,CAAC,EAAE,CAAC,CAAC,MAAM,CAAC,CAAC,CAAA;IAAwB,mBAAA,IAAA,kBAAG,GAAE,CAAA;;;;oEAEhG;AAGK;IADL,IAAA,oBAAK,EAAC,OAAO,CAAC,EAAE,CAAC,CAAC,2CAAoB,CAAC,EAAE,EAAE,WAAW,EAAE,iGAAiG,EAAE,CAAC;IACjI,mBAAA,IAAA,kBAAG,EAAC,MAAM,CAAC,CAAA;IAAgB,mBAAA,IAAA,kBAAG,GAAE,CAAA;;;;+DAE3D;AAIK;IAFL,IAAA,wBAAS,EAAC,0FAA0F,CAAC;IACrG,IAAA,oBAAK,EAAC,OAAO,CAAC,EAAE,CAAC,CAAC,2CAAoB,CAAC,EAAE,EAAE,WAAW,EAAE,qFAAqF,EAAE,CAAC;IACxG,mBAAA,IAAA,kBAAG,EAAC,MAAM,CAAC,CAAA;IAAgB,mBAAA,IAAA,kBAAG,GAAE,CAAA;;;;4EAExE;AAGK;IADL,IAAA,4BAAa,EAAC,IAAI,CAAC,EAAE,CAAC,uBAAQ,EAAE,EAAE,QAAQ,EAAE,IAAI,EAAE,CAAC;IACpC,mBAAA,IAAA,mBAAI,GAAE,CAAA;;6CAAM,gCAAc;;mDAEzC;AAGK;IADL,IAAA,4BAAa,EAAC,IAAI,CAAC,EAAE,CAAC,uBAAQ,EAAE,EAAE,QAAQ,EAAE,IAAI,EAAE,CAAC;IACtC,mBAAA,IAAA,mBAAI,GAAE,CAAA;;6CAAM,gCAAc;;iDAEvC;AAGK;IADL,IAAA,4BAAa,EAAC,IAAI,CAAC,EAAE,CAAC,CAAC,uBAAQ,CAAC,CAAC;IACnB,mBAAA,IAAA,mBAAI,GAAE,CAAA;;6CAAM,gCAAc;;kDAExC;AAGK;IADL,IAAA,4BAAa,EAAC,IAAI,CAAC,EAAE,CAAC,CAAC,gBAAI,CAAC,CAAC;IACT,mBAAA,IAAA,mBAAI,GAAE,CAAA;;6CAAM,gCAAc;;wDAE9C;AAGK;IADL,IAAA,4BAAa,EAAC,IAAI,CAAC,EAAE,CAAC,CAAC,qCAAmB,CAAC,EAAE,EAAE,WAAW,EAAE,wCAAwC,EAAE,CAAC;IACzF,mBAAA,IAAA,mBAAI,GAAE,CAAA;;6CAAM,gCAAc;;kDAExC;AAGK;IADL,IAAA,4BAAa,EAAC,IAAI,CAAC,EAAE,CAAC,CAAC,4BAAU,CAAC,EAAE,EAAE,WAAW,EAAE,yBAAyB,EAAE,CAAC;IAC7D,mBAAA,IAAA,mBAAI,GAAE,CAAA;IAAuB,mBAAA,IAAA,kBAAG,GAAE,CAAA;;6CAAtB,gCAAc;;sDAE5C;AAGK;IADL,IAAA,4BAAa,EAAC,IAAI,CAAC,EAAE,CAAC,CAAC,iCAAoB,CAAC,EAAE,EAAE,WAAW,EAAE,4CAA4C,EAAE,CAAC;IAC1F,mBAAA,IAAA,mBAAI,GAAE,CAAA;IAAuB,mBAAA,IAAA,kBAAG,GAAE,CAAA;;6CAAtB,gCAAc;;sDAE5C;AAGK;IADL,IAAA,4BAAa,EAAC,IAAI,CAAC,EAAE,CAAC,gBAAI,EAAE,EAAE,QAAQ,EAAE,IAAI,EAAE,CAAC;IACjC,mBAAA,IAAA,mBAAI,GAAE,CAAA;;6CAAM,gCAAc;;kDAExC;8BA5EU,mBAAmB;IAF/B,IAAA,uBAAQ,EAAC,gCAAc,CAAC;IACxB,IAAA,4BAAa,EAAC,qBAAa,CAAC;GAChB,mBAAmB,CA6E/B;AAGM,IAAM,wBAAwB,GAA9B,MAAM,wBAAwB;IAE7B,AAAN,KAAK,CAAC,WAAW,CAAS,GAAwB,EAAS,OAAwB;QACjF,OAAO,MAAM,IAAA,qBAAa,EAAC,4BAAU,CAAC,CAAC,IAAI,CAAC,EAAE,KAAK,EAAE,EAAE,MAAM,EAAE,EAAE,EAAE,EAAE,OAAO,CAAC,KAAK,CAAC,MAAM,CAAC,EAAE,EAAE,EAAE,OAAO,EAAE,6CAAmB,EAAE,KAAK,EAAE,GAAG,CAAC,EAAE,EAAS,EAAE,KAAK,EAAE,EAAE,SAAS,EAAE,KAAK,EAAS,EAAE,CAAC,CAAA;IAC7L,CAAC;IAGK,AAAN,KAAK,CAAC,OAAO,CAAS,GAAwB;QAC5C,OAAO,GAAG,CAAC,SAAS,CAAC,CAAC,CAAC,MAAM,IAAA,qBAAa,EAAC,gBAAI,CAAC,CAAC,OAAO,CAAC,EAAE,KAAK,EAAE,EAAE,EAAE,EAAE,GAAG,CAAC,SAAS,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAA;IACnG,CAAC;CACF,CAAA;AAVY,4DAAwB;AAE7B;IADL,IAAA,4BAAa,EAAC,IAAI,CAAC,EAAE,CAAC,CAAC,4BAAU,CAAC,EAAE,EAAE,WAAW,EAAE,wBAAwB,EAAE,CAAC;IAC5D,mBAAA,IAAA,mBAAI,GAAE,CAAA;IAA4B,mBAAA,IAAA,kBAAG,GAAE,CAAA;;6CAA3B,qCAAmB;;2DAEjD;AAGK;IADL,IAAA,4BAAa,EAAC,IAAI,CAAC,EAAE,CAAC,gBAAI,EAAE,EAAE,QAAQ,EAAE,IAAI,EAAE,CAAC;IACjC,mBAAA,IAAA,mBAAI,GAAE,CAAA;;6CAAM,qCAAmB;;uDAE7C;mCATU,wBAAwB;IADpC,IAAA,uBAAQ,EAAC,qCAAmB,CAAC;GACjB,wBAAwB,CAUpC","sourcesContent":["import { Arg, Args, Ctx, Directive, FieldResolver, Query, Resolver, Root, UseMiddleware } from 'type-graphql'\n\nimport { Attachment } from '@things-factory/attachment-base'\nimport { User } from '@things-factory/auth-base'\nimport { Employee } from '@things-factory/organization'\nimport { getRepository, ListParam, SpeakRefusals } from '@things-factory/shell'\n\nimport { ComplianceCorrection, correctionsOf } from '../common/correction'\nimport { ComplianceCase, ComplianceCaseEntry } from './compliance-case'\nimport { CASE_ENTRY_REF_TYPE, CASE_REF_TYPE, casePeople, complianceCaseFor, complianceCasesFor, insideHandlerLeft, investigatorChoices, myComplianceReports, myInvestigations } from './compliance-case-service'\nimport { ComplianceCaseList, ComplianceCasePerson, ComplianceReportView } from './compliance-case-type'\n\n/*\n * The doors that hand out cases (ADR-0187 decision 21). The `ComplianceCase` type, investigation and all, is answered\n * only by the doors that ask for the whole sight - the handlers' list, one case, an investigator's list; the reporter\n * and the victim read `ComplianceReportView`, which has no field of the investigation.\n */\n@Resolver(ComplianceCase)\n@UseMiddleware(SpeakRefusals)\nexport class ComplianceCaseQuery {\n  @Directive('@privilege(category: \"compliance-case\", privilege: \"query\", domainOwnerGranted: true)')\n  @Query(returns => ComplianceCaseList, { description: '신고 사건 - the cases the handler reads; never one they are reported against (ADR-0187 decision 21)' })\n  async complianceCases(@Args(type => ListParam) params: ListParam, @Ctx() context: ResolverContext): Promise<ComplianceCaseList> {\n    return await complianceCasesFor(params, context)\n  }\n\n  @Query(returns => ComplianceCase, { description: 'One case, whole - for its handlers and its investigators, never one reported against' })\n  async complianceCase(@Arg('id') id: string, @Ctx() context: ResolverContext): Promise<ComplianceCase> {\n    return await complianceCaseFor(id, context)\n  }\n\n  @Query(returns => [ComplianceCase], { description: 'The cases the request investigates - an investigator who is no case handler reads them here' })\n  async myComplianceInvestigations(@Ctx() context: ResolverContext): Promise<ComplianceCase[]> {\n    return await myInvestigations(context)\n  }\n\n  @Query(returns => [ComplianceReportView], { description: 'The cases the request reported or that happened to them - their progress, protection and result' })\n  async myComplianceReports(@Ctx() context: ResolverContext): Promise<ComplianceReportView[]> {\n    return await myComplianceReports(context)\n  }\n\n  @Query(returns => Boolean, { description: 'Whether a case handler is left to take a report against these employees - false sends the reporter to the labour ministry' })\n  async complianceCaseHandlerLeft(@Arg('accusedIds', type => [String]) accusedIds: string[], @Ctx() context: ResolverContext): Promise<boolean> {\n    return await insideHandlerLeft(accusedIds, context)\n  }\n\n  @Query(returns => [ComplianceCasePerson], { description: 'Employees still working here a report may name, found by name - for an employee making a report' })\n  async complianceCasePeople(@Arg('text') text: string, @Ctx() context: ResolverContext): Promise<ComplianceCasePerson[]> {\n    return await casePeople(text, context)\n  }\n\n  @Directive('@privilege(category: \"compliance-case\", privilege: \"mutation\", domainOwnerGranted: true)')\n  @Query(returns => [ComplianceCasePerson], { description: 'Users of the domain a case handler may name as investigators, found by name or mail' })\n  async complianceCaseInvestigatorChoices(@Arg('text') text: string, @Ctx() context: ResolverContext): Promise<ComplianceCasePerson[]> {\n    return await investigatorChoices(text, context)\n  }\n\n  @FieldResolver(type => Employee, { nullable: true })\n  async reporter(@Root() row: ComplianceCase): Promise<Employee | null> {\n    return row.reporterId ? await getRepository(Employee).findOne({ where: { id: row.reporterId } }) : null\n  }\n\n  @FieldResolver(type => Employee, { nullable: true })\n  async victim(@Root() row: ComplianceCase): Promise<Employee | null> {\n    return row.victimId ? await getRepository(Employee).findOne({ where: { id: row.victimId } }) : null\n  }\n\n  @FieldResolver(type => [Employee])\n  async accused(@Root() row: ComplianceCase): Promise<Employee[]> {\n    return row.accused ?? (await getRepository(ComplianceCase).findOne({ where: { id: row.id }, relations: ['accused'] }))?.accused ?? []\n  }\n\n  @FieldResolver(type => [User])\n  async investigators(@Root() row: ComplianceCase): Promise<User[]> {\n    return row.investigators ?? (await getRepository(ComplianceCase).findOne({ where: { id: row.id }, relations: ['investigators'] }))?.investigators ?? []\n  }\n\n  @FieldResolver(type => [ComplianceCaseEntry], { description: 'The investigation record, oldest first' })\n  async entries(@Root() row: ComplianceCase): Promise<ComplianceCaseEntry[]> {\n    return await getRepository(ComplianceCaseEntry).find({ where: { complianceCase: { id: row.id } } as any, order: { writtenOn: 'ASC', createdAt: 'ASC' } as any })\n  }\n\n  @FieldResolver(type => [Attachment], { description: 'The files of the report' })\n  async attachments(@Root() row: ComplianceCase, @Ctx() context: ResolverContext): Promise<Attachment[]> {\n    return await getRepository(Attachment).find({ where: { domain: { id: context.state.domain.id }, refType: CASE_REF_TYPE, refBy: row.id } as any, order: { createdAt: 'ASC' } as any })\n  }\n\n  @FieldResolver(type => [ComplianceCorrection], { description: 'The values changed after they were written' })\n  async corrections(@Root() row: ComplianceCase, @Ctx() context: ResolverContext): Promise<ComplianceCorrection[]> {\n    return await correctionsOf(getRepository(ComplianceCase).manager, context.state.domain, { kind: CASE_REF_TYPE, id: row.id })\n  }\n\n  @FieldResolver(type => User, { nullable: true })\n  async creator(@Root() row: ComplianceCase): Promise<User | null> {\n    return row.creatorId ? await getRepository(User).findOne({ where: { id: row.creatorId } }) : null\n  }\n}\n\n@Resolver(ComplianceCaseEntry)\nexport class ComplianceCaseEntryQuery {\n  @FieldResolver(type => [Attachment], { description: 'The files of the entry' })\n  async attachments(@Root() row: ComplianceCaseEntry, @Ctx() context: ResolverContext): Promise<Attachment[]> {\n    return await getRepository(Attachment).find({ where: { domain: { id: context.state.domain.id }, refType: CASE_ENTRY_REF_TYPE, refBy: row.id } as any, order: { createdAt: 'ASC' } as any })\n  }\n\n  @FieldResolver(type => User, { nullable: true })\n  async creator(@Root() row: ComplianceCaseEntry): Promise<User | null> {\n    return row.creatorId ? await getRepository(User).findOne({ where: { id: row.creatorId } }) : null\n  }\n}\n"]}

package/dist-server/service/compliance-case/compliance-case-rules.d.ts

@@ -0,0 +1,71 @@
+import { Refusal } from '@things-factory/shell';
+export declare const CASE_KINDS: string[];
+export declare const CASE_STATUSES: string[];
+/** Days from receipt the investigation is to start in, when the domain has set none (decision 21 ⚖). */
+export declare const DEFAULT_INVESTIGATION_DAYS = 7;
+/** The domain setting (setting-base `Setting.name`) that changes it. */
+export declare const INVESTIGATION_DAYS_SETTING = "compliance-case-investigation-days";
+/** `investigationStartedOn` as a refusal code names it - `investigation-started-on`. */
+export declare const kebabOf: (field: string) => string;
+/**
+ * How much of a case one person reads:
+ * - `FULL` - the case handlers and that case's investigators: everything, the investigation with it;
+ * - `PARTY` - the reporter and the victim: where it stands, the protection measures and the result told;
+ * - null - nothing, and one answer for "none" and "not yours".
+ */
+export type CaseSight = 'FULL' | 'PARTY' | null;
+export interface CaseFacts {
+    reporterUserId?: string | null;
+    victimUserId?: string | null;
+    accusedUserIds: readonly string[];
+    accusedEmployeeIds: readonly string[];
+    investigatorIds: readonly string[];
+    /** Every handler was among those reported against when it came in - nobody inside the company investigates it. */
+    noInsideHandler?: boolean | null;
+}
+export interface CaseViewer {
+    userId: string;
+    /** Holds `compliance-case` - a case handler (`compliance.case-handling`). */
+    handler: boolean;
+    /** The viewer's own employee records in the domain. */
+    employeeIds: readonly string[];
+}
+/** Whether the viewer is one of those reported against - by their account or by any of their employee records. */
+export declare function isAccused(facts: CaseFacts, viewer: CaseViewer): boolean;
+/** What the viewer reads of the case. One reported against reads nothing of it, handler or investigator though they be. */
+export declare function caseSightOf(facts: CaseFacts, viewer: CaseViewer): CaseSight;
+/** The handlers left to take a case - those not reported against. None left means nobody inside may investigate it. */
+export declare function handlersLeft(handlerUserIds: readonly string[], accusedUserIds: readonly string[]): string[];
+/** Where a case stands, read from what has been written on it. */
+export declare function caseStatusOf(row: {
+    investigationStartedOn?: string | null;
+    finding?: string | null;
+    resultToldOn?: string | null;
+    closedOn?: string | null;
+}): string;
+/** `day` moved by `days` calendar days. */
+export declare function dayPlus(day: string, days: number): string;
+/** The investigation-start days a setting value gives - a whole number of 1 or more, else the default. */
+export declare function investigationDaysOf(value: unknown): number;
+/** A case whose investigation has not started by its due day, while it is still open. */
+export declare function investigationLate(row: {
+    investigationStartedOn?: string | null;
+    closedOn?: string | null;
+    investigationDueOn?: string | null;
+    noInsideHandler?: boolean | null;
+}, today: string): boolean;
+export interface CaseReportInput {
+    kind?: string | null;
+    occurredOn?: string | null;
+    description?: string | null;
+    accusedIds?: readonly string[] | null;
+}
+/** What a report asks for before it is written, or nothing. */
+export declare function caseReportRefusal(input: CaseReportInput): Refusal | null;
+/** What a handler writes on a case as it goes - the fields and the days among them. */
+export declare const HANDLING_FIELDS: readonly ["investigationStartedOn", "protectionMeasures", "victimOpinion", "finding", "actionOnAccused", "resultNotice", "resultToldOn", "closedOn"];
+/** What a handling patch asks for before it is written on `row`, or nothing. */
+export declare function caseHandlingRefusal(patch: Record<string, any>, row: {
+    receivedOn: string;
+    closedOn?: string | null;
+} & Record<string, any>): Refusal | null;

package/dist-server/service/compliance-case/compliance-case-rules.js

@@ -0,0 +1,111 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.HANDLING_FIELDS = exports.kebabOf = exports.INVESTIGATION_DAYS_SETTING = exports.DEFAULT_INVESTIGATION_DAYS = exports.CASE_STATUSES = exports.CASE_KINDS = void 0;
+exports.isAccused = isAccused;
+exports.caseSightOf = caseSightOf;
+exports.handlersLeft = handlersLeft;
+exports.caseStatusOf = caseStatusOf;
+exports.dayPlus = dayPlus;
+exports.investigationDaysOf = investigationDaysOf;
+exports.investigationLate = investigationLate;
+exports.caseReportRefusal = caseReportRefusal;
+exports.caseHandlingRefusal = caseHandlingRefusal;
+const shell_1 = require("@things-factory/shell");
+/*
+ * What a report of workplace harassment or sexual harassment holds to (ADR-0187 decision 21): who reads it and how much,
+ * where it stands, and its deadline. Pure - the service reads the case and the people, these say yes or no.
+ */
+exports.CASE_KINDS = ['HARASSMENT', 'SEXUAL_HARASSMENT'];
+exports.CASE_STATUSES = ['RECEIVED', 'INVESTIGATING', 'DECIDED', 'TOLD', 'CLOSED'];
+/** Days from receipt the investigation is to start in, when the domain has set none (decision 21 ⚖). */
+exports.DEFAULT_INVESTIGATION_DAYS = 7;
+/** The domain setting (setting-base `Setting.name`) that changes it. */
+exports.INVESTIGATION_DAYS_SETTING = 'compliance-case-investigation-days';
+const DAY = /^\d{4}-\d{2}-\d{2}$/;
+/** `investigationStartedOn` as a refusal code names it - `investigation-started-on`. */
+const kebabOf = (field) => field.replace(/([a-z0-9])([A-Z])/g, '$1-$2').toLowerCase();
+exports.kebabOf = kebabOf;
+/** Whether the viewer is one of those reported against - by their account or by any of their employee records. */
+function isAccused(facts, viewer) {
+    return facts.accusedUserIds.includes(viewer.userId) || viewer.employeeIds.some(id => facts.accusedEmployeeIds.includes(id));
+}
+/** What the viewer reads of the case. One reported against reads nothing of it, handler or investigator though they be. */
+function caseSightOf(facts, viewer) {
+    if (isAccused(facts, viewer))
+        return null;
+    const reporter = !!facts.reporterUserId && facts.reporterUserId === viewer.userId;
+    /* With nobody inside to investigate, the record is the reporter's alone - the way out is the labour ministry. */
+    if (facts.noInsideHandler)
+        return reporter ? 'PARTY' : null;
+    if (viewer.handler || facts.investigatorIds.includes(viewer.userId))
+        return 'FULL';
+    if (reporter || (!!facts.victimUserId && facts.victimUserId === viewer.userId))
+        return 'PARTY';
+    return null;
+}
+/** The handlers left to take a case - those not reported against. None left means nobody inside may investigate it. */
+function handlersLeft(handlerUserIds, accusedUserIds) {
+    return handlerUserIds.filter(id => !accusedUserIds.includes(id));
+}
+/** Where a case stands, read from what has been written on it. */
+function caseStatusOf(row) {
+    if (row.closedOn)
+        return 'CLOSED';
+    if (row.resultToldOn)
+        return 'TOLD';
+    if (row.finding?.trim())
+        return 'DECIDED';
+    if (row.investigationStartedOn)
+        return 'INVESTIGATING';
+    return 'RECEIVED';
+}
+/** `day` moved by `days` calendar days. */
+function dayPlus(day, days) {
+    const [year, month, date] = day.split('-').map(Number);
+    return new Date(Date.UTC(year, month - 1, date + days)).toISOString().slice(0, 10);
+}
+/** The investigation-start days a setting value gives - a whole number of 1 or more, else the default. */
+function investigationDaysOf(value) {
+    const days = Number(value);
+    return Number.isInteger(days) && days >= 1 ? days : exports.DEFAULT_INVESTIGATION_DAYS;
+}
+/** A case whose investigation has not started by its due day, while it is still open. */
+function investigationLate(row, today) {
+    return !row.investigationStartedOn && !row.closedOn && !row.noInsideHandler && !!row.investigationDueOn && row.investigationDueOn < today;
+}
+/** What a report asks for before it is written, or nothing. */
+function caseReportRefusal(input) {
+    if (!exports.CASE_KINDS.includes(input.kind ?? ''))
+        return new shell_1.Refusal('compliance-case-kind-required', {}, 'pick what it is - workplace harassment or sexual harassment');
+    if (input.occurredOn && !DAY.test(input.occurredOn))
+        return new shell_1.Refusal('compliance-case-occurred-on-invalid', {}, 'give the day it happened as YYYY-MM-DD');
+    if (!input.description?.trim())
+        return new shell_1.Refusal('compliance-case-description-required', {}, 'say what happened');
+    if (!input.accusedIds?.length)
+        return new shell_1.Refusal('compliance-case-accused-required', {}, 'name at least one person reported against');
+    return null;
+}
+/** What a handler writes on a case as it goes - the fields and the days among them. */
+exports.HANDLING_FIELDS = ['investigationStartedOn', 'protectionMeasures', 'victimOpinion', 'finding', 'actionOnAccused', 'resultNotice', 'resultToldOn', 'closedOn'];
+const HANDLING_DAYS = ['investigationStartedOn', 'resultToldOn', 'closedOn'];
+/** What a handling patch asks for before it is written on `row`, or nothing. */
+function caseHandlingRefusal(patch, row) {
+    if (row.closedOn)
+        return new shell_1.Refusal('compliance-case-closed', {}, 'a closed case is not written on');
+    for (const field of HANDLING_DAYS) {
+        const day = patch[field];
+        if (day === undefined || day === null || day === '')
+            continue;
+        if (!DAY.test(day))
+            return new shell_1.Refusal(`compliance-case-${(0, exports.kebabOf)(field)}-invalid`, {}, `give ${field} as YYYY-MM-DD`);
+        if (day < row.receivedOn)
+            return new shell_1.Refusal(`compliance-case-${(0, exports.kebabOf)(field)}-before-receipt`, { receivedOn: row.receivedOn }, `${field} cannot be before the day it was received (${row.receivedOn})`);
+    }
+    const next = { ...row, ...patch };
+    if (next.resultToldOn && !next.resultNotice?.trim())
+        return new shell_1.Refusal('compliance-case-notice-required', {}, 'write the result told before its day');
+    if (next.closedOn && !next.resultToldOn)
+        return new shell_1.Refusal('compliance-case-close-before-told', {}, 'tell the reporter and the victim the result before closing it');
+    return null;
+}
+//# sourceMappingURL=compliance-case-rules.js.map

package/dist-server/service/compliance-case/compliance-case-rules.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"compliance-case-rules.js","sourceRoot":"","sources":["../../../server/service/compliance-case/compliance-case-rules.ts"],"names":[],"mappings":";;;AA8CA,8BAEC;AAGD,kCAQC;AAGD,oCAEC;AAGD,oCAMC;AAGD,0BAGC;AAGD,kDAGC;AAGD,8CAEC;AAUD,8CAMC;AAOD,kDAYC;AA7HD,iDAA+C;AAE/C;;;GAGG;AAEU,QAAA,UAAU,GAAG,CAAC,YAAY,EAAE,mBAAmB,CAAC,CAAA;AAChD,QAAA,aAAa,GAAG,CAAC,UAAU,EAAE,eAAe,EAAE,SAAS,EAAE,MAAM,EAAE,QAAQ,CAAC,CAAA;AAEvF,wGAAwG;AAC3F,QAAA,0BAA0B,GAAG,CAAC,CAAA;AAC3C,wEAAwE;AAC3D,QAAA,0BAA0B,GAAG,oCAAoC,CAAA;AAE9E,MAAM,GAAG,GAAG,qBAAqB,CAAA;AACjC,wFAAwF;AACjF,MAAM,OAAO,GAAG,CAAC,KAAa,EAAE,EAAE,CAAC,KAAK,CAAC,OAAO,CAAC,oBAAoB,EAAE,OAAO,CAAC,CAAC,WAAW,EAAE,CAAA;AAAvF,QAAA,OAAO,WAAgF;AA4BpG,kHAAkH;AAClH,SAAgB,SAAS,CAAC,KAAgB,EAAE,MAAkB;IAC5D,OAAO,KAAK,CAAC,cAAc,CAAC,QAAQ,CAAC,MAAM,CAAC,MAAM,CAAC,IAAI,MAAM,CAAC,WAAW,CAAC,IAAI,CAAC,EAAE,CAAC,EAAE,CAAC,KAAK,CAAC,kBAAkB,CAAC,QAAQ,CAAC,EAAE,CAAC,CAAC,CAAA;AAC7H,CAAC;AAED,2HAA2H;AAC3H,SAAgB,WAAW,CAAC,KAAgB,EAAE,MAAkB;IAC9D,IAAI,SAAS,CAAC,KAAK,EAAE,MAAM,CAAC;QAAE,OAAO,IAAI,CAAA;IACzC,MAAM,QAAQ,GAAG,CAAC,CAAC,KAAK,CAAC,cAAc,IAAI,KAAK,CAAC,cAAc,KAAK,MAAM,CAAC,MAAM,CAAA;IACjF,iHAAiH;IACjH,IAAI,KAAK,CAAC,eAAe;QAAE,OAAO,QAAQ,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,IAAI,CAAA;IAC3D,IAAI,MAAM,CAAC,OAAO,IAAI,KAAK,CAAC,eAAe,CAAC,QAAQ,CAAC,MAAM,CAAC,MAAM,CAAC;QAAE,OAAO,MAAM,CAAA;IAClF,IAAI,QAAQ,IAAI,CAAC,CAAC,CAAC,KAAK,CAAC,YAAY,IAAI,KAAK,CAAC,YAAY,KAAK,MAAM,CAAC,MAAM,CAAC;QAAE,OAAO,OAAO,CAAA;IAC9F,OAAO,IAAI,CAAA;AACb,CAAC;AAED,uHAAuH;AACvH,SAAgB,YAAY,CAAC,cAAiC,EAAE,cAAiC;IAC/F,OAAO,cAAc,CAAC,MAAM,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,cAAc,CAAC,QAAQ,CAAC,EAAE,CAAC,CAAC,CAAA;AAClE,CAAC;AAED,kEAAkE;AAClE,SAAgB,YAAY,CAAC,GAAgI;IAC3J,IAAI,GAAG,CAAC,QAAQ;QAAE,OAAO,QAAQ,CAAA;IACjC,IAAI,GAAG,CAAC,YAAY;QAAE,OAAO,MAAM,CAAA;IACnC,IAAI,GAAG,CAAC,OAAO,EAAE,IAAI,EAAE;QAAE,OAAO,SAAS,CAAA;IACzC,IAAI,GAAG,CAAC,sBAAsB;QAAE,OAAO,eAAe,CAAA;IACtD,OAAO,UAAU,CAAA;AACnB,CAAC;AAED,2CAA2C;AAC3C,SAAgB,OAAO,CAAC,GAAW,EAAE,IAAY;IAC/C,MAAM,CAAC,IAAI,EAAE,KAAK,EAAE,IAAI,CAAC,GAAG,GAAG,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC,GAAG,CAAC,MAAM,CAAC,CAAA;IACtD,OAAO,IAAI,IAAI,CAAC,IAAI,CAAC,GAAG,CAAC,IAAI,EAAE,KAAK,GAAG,CAAC,EAAE,IAAI,GAAG,IAAI,CAAC,CAAC,CAAC,WAAW,EAAE,CAAC,KAAK,CAAC,CAAC,EAAE,EAAE,CAAC,CAAA;AACpF,CAAC;AAED,0GAA0G;AAC1G,SAAgB,mBAAmB,CAAC,KAAc;IAChD,MAAM,IAAI,GAAG,MAAM,CAAC,KAAK,CAAC,CAAA;IAC1B,OAAO,MAAM,CAAC,SAAS,CAAC,IAAI,CAAC,IAAI,IAAI,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,kCAA0B,CAAA;AAChF,CAAC;AAED,yFAAyF;AACzF,SAAgB,iBAAiB,CAAC,GAA+I,EAAE,KAAa;IAC9L,OAAO,CAAC,GAAG,CAAC,sBAAsB,IAAI,CAAC,GAAG,CAAC,QAAQ,IAAI,CAAC,GAAG,CAAC,eAAe,IAAI,CAAC,CAAC,GAAG,CAAC,kBAAkB,IAAI,GAAG,CAAC,kBAAkB,GAAG,KAAK,CAAA;AAC3I,CAAC;AASD,+DAA+D;AAC/D,SAAgB,iBAAiB,CAAC,KAAsB;IACtD,IAAI,CAAC,kBAAU,CAAC,QAAQ,CAAC,KAAK,CAAC,IAAI,IAAI,EAAE,CAAC;QAAE,OAAO,IAAI,eAAO,CAAC,+BAA+B,EAAE,EAAE,EAAE,6DAA6D,CAAC,CAAA;IAClK,IAAI,KAAK,CAAC,UAAU,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,KAAK,CAAC,UAAU,CAAC;QAAE,OAAO,IAAI,eAAO,CAAC,qCAAqC,EAAE,EAAE,EAAE,wCAAwC,CAAC,CAAA;IAC5J,IAAI,CAAC,KAAK,CAAC,WAAW,EAAE,IAAI,EAAE;QAAE,OAAO,IAAI,eAAO,CAAC,sCAAsC,EAAE,EAAE,EAAE,mBAAmB,CAAC,CAAA;IACnH,IAAI,CAAC,KAAK,CAAC,UAAU,EAAE,MAAM;QAAE,OAAO,IAAI,eAAO,CAAC,kCAAkC,EAAE,EAAE,EAAE,2CAA2C,CAAC,CAAA;IACtI,OAAO,IAAI,CAAA;AACb,CAAC;AAED,uFAAuF;AAC1E,QAAA,eAAe,GAAG,CAAC,wBAAwB,EAAE,oBAAoB,EAAE,eAAe,EAAE,SAAS,EAAE,iBAAiB,EAAE,cAAc,EAAE,cAAc,EAAE,UAAU,CAAU,CAAA;AACnL,MAAM,aAAa,GAAG,CAAC,wBAAwB,EAAE,cAAc,EAAE,UAAU,CAAC,CAAA;AAE5E,gFAAgF;AAChF,SAAgB,mBAAmB,CAAC,KAA0B,EAAE,GAA2E;IACzI,IAAI,GAAG,CAAC,QAAQ;QAAE,OAAO,IAAI,eAAO,CAAC,wBAAwB,EAAE,EAAE,EAAE,iCAAiC,CAAC,CAAA;IACrG,KAAK,MAAM,KAAK,IAAI,aAAa,EAAE,CAAC;QAClC,MAAM,GAAG,GAAG,KAAK,CAAC,KAAK,CAAC,CAAA;QACxB,IAAI,GAAG,KAAK,SAAS,IAAI,GAAG,KAAK,IAAI,IAAI,GAAG,KAAK,EAAE;YAAE,SAAQ;QAC7D,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC;YAAE,OAAO,IAAI,eAAO,CAAC,mBAAmB,IAAA,eAAO,EAAC,KAAK,CAAC,UAAU,EAAE,EAAE,EAAE,QAAQ,KAAK,gBAAgB,CAAC,CAAA;QACtH,IAAI,GAAG,GAAG,GAAG,CAAC,UAAU;YAAE,OAAO,IAAI,eAAO,CAAC,mBAAmB,IAAA,eAAO,EAAC,KAAK,CAAC,iBAAiB,EAAE,EAAE,UAAU,EAAE,GAAG,CAAC,UAAU,EAAE,EAAE,GAAG,KAAK,8CAA8C,GAAG,CAAC,UAAU,GAAG,CAAC,CAAA;IAC3M,CAAC;IACD,MAAM,IAAI,GAAG,EAAE,GAAG,GAAG,EAAE,GAAG,KAAK,EAAE,CAAA;IACjC,IAAI,IAAI,CAAC,YAAY,IAAI,CAAC,IAAI,CAAC,YAAY,EAAE,IAAI,EAAE;QAAE,OAAO,IAAI,eAAO,CAAC,iCAAiC,EAAE,EAAE,EAAE,sCAAsC,CAAC,CAAA;IACtJ,IAAI,IAAI,CAAC,QAAQ,IAAI,CAAC,IAAI,CAAC,YAAY;QAAE,OAAO,IAAI,eAAO,CAAC,mCAAmC,EAAE,EAAE,EAAE,+DAA+D,CAAC,CAAA;IACrK,OAAO,IAAI,CAAA;AACb,CAAC","sourcesContent":["import { Refusal } from '@things-factory/shell'\n\n/*\n * What a report of workplace harassment or sexual harassment holds to (ADR-0187 decision 21): who reads it and how much,\n * where it stands, and its deadline. Pure - the service reads the case and the people, these say yes or no.\n */\n\nexport const CASE_KINDS = ['HARASSMENT', 'SEXUAL_HARASSMENT']\nexport const CASE_STATUSES = ['RECEIVED', 'INVESTIGATING', 'DECIDED', 'TOLD', 'CLOSED']\n\n/** Days from receipt the investigation is to start in, when the domain has set none (decision 21 ⚖). */\nexport const DEFAULT_INVESTIGATION_DAYS = 7\n/** The domain setting (setting-base `Setting.name`) that changes it. */\nexport const INVESTIGATION_DAYS_SETTING = 'compliance-case-investigation-days'\n\nconst DAY = /^\\d{4}-\\d{2}-\\d{2}$/\n/** `investigationStartedOn` as a refusal code names it - `investigation-started-on`. */\nexport const kebabOf = (field: string) => field.replace(/([a-z0-9])([A-Z])/g, '$1-$2').toLowerCase()\n\n/**\n * How much of a case one person reads:\n * - `FULL` - the case handlers and that case's investigators: everything, the investigation with it;\n * - `PARTY` - the reporter and the victim: where it stands, the protection measures and the result told;\n * - null - nothing, and one answer for \"none\" and \"not yours\".\n */\nexport type CaseSight = 'FULL' | 'PARTY' | null\n\nexport interface CaseFacts {\n  reporterUserId?: string | null\n  victimUserId?: string | null\n  accusedUserIds: readonly string[]\n  accusedEmployeeIds: readonly string[]\n  investigatorIds: readonly string[]\n  /** Every handler was among those reported against when it came in - nobody inside the company investigates it. */\n  noInsideHandler?: boolean | null\n}\n\nexport interface CaseViewer {\n  userId: string\n  /** Holds `compliance-case` - a case handler (`compliance.case-handling`). */\n  handler: boolean\n  /** The viewer's own employee records in the domain. */\n  employeeIds: readonly string[]\n}\n\n/** Whether the viewer is one of those reported against - by their account or by any of their employee records. */\nexport function isAccused(facts: CaseFacts, viewer: CaseViewer): boolean {\n  return facts.accusedUserIds.includes(viewer.userId) || viewer.employeeIds.some(id => facts.accusedEmployeeIds.includes(id))\n}\n\n/** What the viewer reads of the case. One reported against reads nothing of it, handler or investigator though they be. */\nexport function caseSightOf(facts: CaseFacts, viewer: CaseViewer): CaseSight {\n  if (isAccused(facts, viewer)) return null\n  const reporter = !!facts.reporterUserId && facts.reporterUserId === viewer.userId\n  /* With nobody inside to investigate, the record is the reporter's alone - the way out is the labour ministry. */\n  if (facts.noInsideHandler) return reporter ? 'PARTY' : null\n  if (viewer.handler || facts.investigatorIds.includes(viewer.userId)) return 'FULL'\n  if (reporter || (!!facts.victimUserId && facts.victimUserId === viewer.userId)) return 'PARTY'\n  return null\n}\n\n/** The handlers left to take a case - those not reported against. None left means nobody inside may investigate it. */\nexport function handlersLeft(handlerUserIds: readonly string[], accusedUserIds: readonly string[]): string[] {\n  return handlerUserIds.filter(id => !accusedUserIds.includes(id))\n}\n\n/** Where a case stands, read from what has been written on it. */\nexport function caseStatusOf(row: { investigationStartedOn?: string | null; finding?: string | null; resultToldOn?: string | null; closedOn?: string | null }): string {\n  if (row.closedOn) return 'CLOSED'\n  if (row.resultToldOn) return 'TOLD'\n  if (row.finding?.trim()) return 'DECIDED'\n  if (row.investigationStartedOn) return 'INVESTIGATING'\n  return 'RECEIVED'\n}\n\n/** `day` moved by `days` calendar days. */\nexport function dayPlus(day: string, days: number): string {\n  const [year, month, date] = day.split('-').map(Number)\n  return new Date(Date.UTC(year, month - 1, date + days)).toISOString().slice(0, 10)\n}\n\n/** The investigation-start days a setting value gives - a whole number of 1 or more, else the default. */\nexport function investigationDaysOf(value: unknown): number {\n  const days = Number(value)\n  return Number.isInteger(days) && days >= 1 ? days : DEFAULT_INVESTIGATION_DAYS\n}\n\n/** A case whose investigation has not started by its due day, while it is still open. */\nexport function investigationLate(row: { investigationStartedOn?: string | null; closedOn?: string | null; investigationDueOn?: string | null; noInsideHandler?: boolean | null }, today: string): boolean {\n  return !row.investigationStartedOn && !row.closedOn && !row.noInsideHandler && !!row.investigationDueOn && row.investigationDueOn < today\n}\n\nexport interface CaseReportInput {\n  kind?: string | null\n  occurredOn?: string | null\n  description?: string | null\n  accusedIds?: readonly string[] | null\n}\n\n/** What a report asks for before it is written, or nothing. */\nexport function caseReportRefusal(input: CaseReportInput): Refusal | null {\n  if (!CASE_KINDS.includes(input.kind ?? '')) return new Refusal('compliance-case-kind-required', {}, 'pick what it is - workplace harassment or sexual harassment')\n  if (input.occurredOn && !DAY.test(input.occurredOn)) return new Refusal('compliance-case-occurred-on-invalid', {}, 'give the day it happened as YYYY-MM-DD')\n  if (!input.description?.trim()) return new Refusal('compliance-case-description-required', {}, 'say what happened')\n  if (!input.accusedIds?.length) return new Refusal('compliance-case-accused-required', {}, 'name at least one person reported against')\n  return null\n}\n\n/** What a handler writes on a case as it goes - the fields and the days among them. */\nexport const HANDLING_FIELDS = ['investigationStartedOn', 'protectionMeasures', 'victimOpinion', 'finding', 'actionOnAccused', 'resultNotice', 'resultToldOn', 'closedOn'] as const\nconst HANDLING_DAYS = ['investigationStartedOn', 'resultToldOn', 'closedOn']\n\n/** What a handling patch asks for before it is written on `row`, or nothing. */\nexport function caseHandlingRefusal(patch: Record<string, any>, row: { receivedOn: string; closedOn?: string | null } & Record<string, any>): Refusal | null {\n  if (row.closedOn) return new Refusal('compliance-case-closed', {}, 'a closed case is not written on')\n  for (const field of HANDLING_DAYS) {\n    const day = patch[field]\n    if (day === undefined || day === null || day === '') continue\n    if (!DAY.test(day)) return new Refusal(`compliance-case-${kebabOf(field)}-invalid`, {}, `give ${field} as YYYY-MM-DD`)\n    if (day < row.receivedOn) return new Refusal(`compliance-case-${kebabOf(field)}-before-receipt`, { receivedOn: row.receivedOn }, `${field} cannot be before the day it was received (${row.receivedOn})`)\n  }\n  const next = { ...row, ...patch }\n  if (next.resultToldOn && !next.resultNotice?.trim()) return new Refusal('compliance-case-notice-required', {}, 'write the result told before its day')\n  if (next.closedOn && !next.resultToldOn) return new Refusal('compliance-case-close-before-told', {}, 'tell the reporter and the victim the result before closing it')\n  return null\n}\n"]}

package/dist-server/service/compliance-case/compliance-case-service.d.ts

@@ -0,0 +1,76 @@
+import { EntityManager } from 'typeorm';
+import { Attachment } from '@things-factory/attachment-base';
+import { Domain, ListParam } from '@things-factory/shell';
+import { ComplianceCase, ComplianceCaseEntry } from './compliance-case';
+import { CaseFacts, CaseSight, CaseViewer } from './compliance-case-rules';
+import { ComplianceCaseHandling, ComplianceCasePerson, ComplianceReportView, NewComplianceCase, NewComplianceCaseReport } from './compliance-case-type';
+/** The files of a report hang on the case under this `refType`, those of the investigation on its entries (attachment-base). */
+export declare const CASE_REF_TYPE = "ComplianceCase";
+export declare const CASE_ENTRY_REF_TYPE = "ComplianceCaseEntry";
+/** The privilege category of the case handlers (`compliance.case-handling`). */
+export declare const CASE_CATEGORY = "compliance-case";
+/** The request's person as a case sees them - asked once per request. */
+export declare function caseViewerOf(context: any): Promise<CaseViewer>;
+/** What the reading rule needs of a case loaded with its accused and investigators. */
+export declare function factsOf(row: ComplianceCase, tx?: EntityManager): Promise<CaseFacts>;
+/** The case and what the request reads of it - one answer, `null`, for "none" and "not yours". */
+export declare function caseInSight(id: string, context: any, tx?: EntityManager): Promise<{
+    row: ComplianceCase;
+    sight: CaseSight;
+} | null>;
+/** Writes that the request read these cases - on its own, so a failed write never holds the answer back (ADR-0141 §4-4). */
+export declare function recordCaseRead(context: any, ids: readonly string[], sight: 'FULL' | 'PARTY'): Promise<void>;
+/** The users who hold `compliance-case` in the domain - those in a role that gives it, and the domain's owners. */
+export declare function caseHandlerUserIds(domain: Domain, tx?: EntityManager): Promise<string[]>;
+/** Whether, with these employees reported against, a case handler is left to take it. */
+export declare function insideHandlerLeft(accusedIds: readonly string[], context: any): Promise<boolean>;
+/** The investigation-start days of the domain - its setting, or seven. */
+export declare function investigationDays(domain: Domain, tx?: EntityManager): Promise<number>;
+/**
+ * The words of the notice of a new case - the same for every case: 「새 신고가 있습니다」 and nothing of it, not its
+ * kind, not a name. The handler opens the list to read it, and that read is recorded.
+ */
+export declare function caseNoticeWords(lng: string): {
+    subject: string;
+    body: string;
+    action: string;
+    note: string;
+};
+/** An employee reports a case of their own seeing - a partner, or an account with no employee record, is refused. */
+export declare function reportComplianceCase(input: NewComplianceCaseReport, files: any[] | undefined, context: any): Promise<ComplianceReportView>;
+/** A handler writes down a report received another way - by mouth, by mail. One reported against is not its handler. */
+export declare function recordComplianceCase(input: NewComplianceCase, files: any[] | undefined, context: any): Promise<ComplianceCase>;
+/** What the handler writes on a case as it goes. A value already written changes with a correction kept. */
+export declare function handleComplianceCase(patch: ComplianceCaseHandling, context: any): Promise<ComplianceCase>;
+/** One entry of the investigation record - written once, never changed. */
+export declare function addComplianceCaseEntry(caseId: string, writtenOn: string, body: string, files: any[] | undefined, context: any): Promise<ComplianceCaseEntry>;
+/** The cases the handler reads, a page of them - never one they are reported against, never one left to the reporter. */
+export declare function complianceCasesFor(params: ListParam, context: any): Promise<{
+    items: ComplianceCase[];
+    total: number;
+}>;
+/** The cases the request investigates - for an investigator who is no handler, an outside labour attorney. */
+export declare function myInvestigations(context: any): Promise<ComplianceCase[]>;
+/** One case, whole - for its handlers and investigators. */
+export declare function complianceCaseFor(id: string, context: any): Promise<ComplianceCase>;
+/** The cases the request reported, or that happened to them - each as a party reads it. */
+export declare function myComplianceReports(context: any): Promise<ComplianceReportView[]>;
+/** The employees still working here a reporter may name, found by name - for a working employee only. */
+export declare function casePeople(words: string, context: any): Promise<ComplianceCasePerson[]>;
+/** The users of the domain a handler may name as investigators, found by name or mail. */
+export declare function investigatorChoices(words: string, context: any): Promise<ComplianceCasePerson[]>;
+/**
+ * Who opens a file of a case. The report's files: those who read all of it, and the reporter their own. The
+ * investigation's files: those who read all of it. Every opening is a read of the case, recorded.
+ */
+export declare function mayReadCaseFile(attachment: Attachment, context: any): Promise<boolean>;
+/**
+ * Cases past their investigation-start day with no investigation started (decision 21). Only the day and the count -
+ * a check is read by more than the case handlers, so nothing of a case is in it. A case left to the reporter alone,
+ * with nobody inside to investigate it, is not on it.
+ */
+export declare function complianceCasesNotInvestigated(tx: EntityManager, domain: Domain, today: string): Promise<{
+    id: string;
+    receivedOn: string;
+    investigationDueOn: string;
+}[]>;