Print side | Luk vindue

Bestemmelse af et risikoniveau ud fra en matrice

Udskrevet fra: Dansk Access Forum
Kategori: Hjælp til Access
Forum navn: Generelt
Forum beskrivelse: Spørgsmål til den daglige brug af selve programmet Access
Web-adresse: https://www.accessforum.dk/forum_posts.asp?TID=94
Udskrevet den: 03-12-2024 kl. 18:18


Emne: Bestemmelse af et risikoniveau ud fra en matrice
Besked fra: NicolajElias
Emne: Bestemmelse af et risikoniveau ud fra en matrice
Posteringsdato: 03-10-2016 kl. 12:13
Jeg har behov for råd til at vælge en bestemt værdi i en matrice (grøn, gul, orange eller rød). I databasen vil man i hver post skulle vælge "Severity", "Exposure", "Possibility" og "Probability" hvorefter et felt i posten så skal angive en "Hazard score" som kan være "Green", "Yellow", "Orange" eller "Red". Se billedet med valgmatricen, Tabellen jeg har lavet ud fra matricen, og nederst observations tabellen. Jeg har forsøgt mig med at lave en query ud fra de forskellige valgmuligheder, men jeg er simpelthen ikke skarp nok til at få det til at fungere.

Er der en venlig sjæl der kan give mig et hint til hvilken vej jeg skal gå, for at få det til at virke? Er tabellen en brugbar vej til at vælge resultatet af de 4 valg, eller skal jeg over i VBA?




Her er "observations" tabellen, hvor feltet "Hazard score" skal bestemmes ud fra de fire valgmuligheder:


Mvh
Nicolaj






Svar:
Besked fra: hkh
Posteringsdato: 03-10-2016 kl. 13:07
Hvor vælger du de forskellige muligheder?
Direkte i tabellen eller i en forespørgsel eller en formular?


-------------
Hans


Besked fra: NicolajElias
Posteringsdato: 03-10-2016 kl. 13:09
I første omgang direkte i tabellen. Senere vil det være i en formular, når jeg har designet selve datastrukturen færdig.


Besked fra: hkh
Posteringsdato: 03-10-2016 kl. 13:55
Hvis det foregår i en formular, kan man benytte hændelsesprocedure-efter opdatering for valgfelterne.
De skal kalde Skaderisiko

Eks:
Private sub Severity_AfterUpdate()
    Skaderisiko
end Sub

Private Sub Skaderisiko()

    If [severity] = "No injury" Then [Risk] = "Green"
    
    If [severity] = "Slight injury" Then
        If [Possibility] = "Possible" And [Probaility] <> "High" Then [Risk] = "Green"
        If [Possibility] = "Possible" And [Probaility] = "High" Then [Risk] = "Yellow"
        If [Possibility] = "Hardly possible" And [Probaility] = "Small" Then [Risk] = "Green"
        If [Possibility] = "Hardly possible" And [Probaility] <> "Small" Then [Risk] = "Yellow"
    End If
    
    If [severity] = "Serious injury" Then '
        If [Exposure] = "Rarely" And [Possibility] = "Possible" And [Probaility] = "Small" Then [Risk] = "Green"
        If [Exposure] = "Rarely" And [Possibility] = "Possible" And [Probaility] <> "Small" Then [Risk] = "Yellow"
        If [Exposure] = "Rarely" And [Possibility] = "Hardly Possible" And [Probaility] <> "High" Then [Risk] = "Yellow"
        If [Exposure] = "Rarely" And [Possibility] = "Hardly Possible" And [Probaility] = "High" Then [Risk] = "Orange"
        If [Exposure] = "Often" And [Possibility] = "Possible" And [Probaility] = "Small" Then [Risk] = "Yellow"
        If [Exposure] = "Often" And [Possibility] = "Possible" And [Probaility] <> "Small" Then [Risk] = "Orange"
        If [Exposure] = "Often" And [Possibility] = "Hardly Possible" Then [Risk] = "Orange"
    End If
    
    If [severity] = "Death" Then '
        If [Exposure] = "Rarely" And [Possibility] = "Possible" Then [Risk] = "Orange"
        If [Exposure] = "Rarely" And [Possibility] = "Hardly Possible" And [Probaility] = "Small" Then [Risk] = "Orange"
        If [Exposure] = "Rarely" And [Possibility] = "Hardly Possible" And [Probaility] <> "Small" Then [Risk] = "Red"
        If [Exposure] = "Often" Then [Risk] = "Red"

    End If
End Sub

Jeg kender ikke feltnavnene i formularen, men er gået ud fra, at de er som overskrifterne.

-------------
Hans


Besked fra: NicolajElias
Posteringsdato: 03-10-2016 kl. 14:03
Tusind tak HansThumbs Up

Jeg vil dog også have behov for, at få en rapport over f.eks. alle "Red" observationer. Vil jeg kunne bruge dit forslag i det tilfælde, eftersom resultatet af "skaderisiko" ikke ligger i selve posten?

Mvh
Nicolaj


Besked fra: NicolajElias
Posteringsdato: 03-10-2016 kl. 14:11
Risk bliver selvfølgelig skrevet til feltet "Risk", så det kan jeg selvfølgelig :-)
Big smile


Besked fra: hkh
Posteringsdato: 04-10-2016 kl. 06:36
Rapporten kan hente de oplysninger fra tabellen.

-------------
Hans



Print side | Luk vindue