source_file.lua:29: attempt to call a nil value (global 'RegisterServerEvent'), Lua

Language: Layout:

-- ideas, revoked licenses cant be repurchased for 96 hours

local licenses = {
  {id = 1, name = "Hunting License", price = 250},
  {id = 2, name = "Drivers License", price = 300},
  {id = 3, name = "Marriage License", price = 500},
  {id = 4, name = "Automatic Weapons License (Class 1)", price = 20000},
  {id = 5, name = "Automatic Weapons License (Class 2)", price = 25000}
}
local denyweaponskeywords = {
  "murder", "felony", "trafficking"
}
local revoketime = 432000 -- seconds, 5 days

function getLicenseFromId(id)
  for _,v in pairs(licenses) do
    if (v.id == id) then
      return v
    end
  end
end

function getLicenses(cb)
  if (cb) then
    cb(licenses)
  end
end

RegisterServerEvent("bms:services:getlicenses")
AddEventHandler("bms:services:getlicenses", function()
  local src = source 
  TriggerClientEvent("bms:services:getlicenses", src, licenses)
end)

RegisterServerEvent("bms:services:buylicense")
AddEventHandler("bms:services:buylicense", function(id)
  if (id) then
    local src = source
    local license = getLicenseFromId(id)
    local felonies = false

if (license) then
      TriggerEvent("es:getPlayerFromId", src, function(user)
              
        if (user) then
          -- check for felonies
          MySQL.Async.fetchAll("SELECT * FROM mdcrecords WHERE charname = @charname", {["@charname"] = user.get("activeChar")}, function(records)
            if (records and #records > 0) then
              for _,v in pairs(records) do
                local charges = json.decode(v.charges)

if (charges) then
                  for _,c in pairs(charges) do
                    for _,k in pairs(denyweaponskeywords) do
                      if (string.match(c, k)) then
                        felonies = true
                      end
                    end
                  end
                end
              end
            else
              felonies = false
            end

local money = user.get("charMoney")
            local proceed = true

if (money >= license.price) then
              if (id == 4 or id == 5) then
                if (felonies) then
                  TriggerClientEvent("bms:services:buylicensecomplete", src, {success = false, text = "You can not purchase this license with a prior Felony charge."})
                  proceed = false
                end
              end

if (proceed) then
                MySQL.Async.fetchAll("SELECT licenses FROM characters WHERE charName = @charname", {["@charname"] = user.get("activeChar")}, function(results)
                  local exists = false
                  local revoked = false
                  local revokeexp = ""
                  local addnew = true
                  
                  if (results) then
                    local licenses = json.decode(results[1].licenses)
                    
                    if (licenses and #licenses > 0) then
                      for _,v in pairs(licenses) do
                        if (v.id == id) then
                          if (v.revoked) then
                            -- check that enough time has passed to repurchase it
                            local rtime = v.revtime + revoketime
                            local time = os.time()

--print("time: " .. time)
                            --print("revoked: " .. rtime)

if (time < rtime) then
 revoked = true
 local date = os.date("*t", rtime)
 revokeexp = string.format("%s-%s-%s %s:%s", date.month, date.day, date.year, date.hour, date.min)
 exists = true
 else
 TriggerClientEvent("pNotify:SendNotification", src, {text = "Your license has been reinstated."})
 v.revoked = false
 v.revtime = 0
 addnew = false
 exists = false
 end 
 else
 exists = true
 end

break
 end
 end
 end
 
 if (exists) then
 if (revoked) then
 TriggerClientEvent("bms:services:buylicensecomplete", src, {success = false, text = string.format("Your license has been revoked by a Law Enforcement Officer. You may have it reinstated on %s", revokeexp)})
 else
 TriggerClientEvent("bms:services:buylicensecomplete", src, {success = false, text = "You already own this license."})
 end
 else
 -- purchase the license
 exports.characters:takeMoneyFromChar(user, license.price)
 
 if (addnew) then
 local lic = {id = id, revoked = false, revtime = 0}
 table.insert(licenses, lic)
 end

local licenc = json.encode(licenses)

MySQL.Async.execute("UPDATE characters SET licenses = @licenc WHERE charName = @charname", {["@licenc"] = licenc, ["@charname"] = user.get("activeChar")}, function()
                        TriggerClientEvent("bms:services:buylicensecomplete", src, {success = true, license = license})
                        user.set("licenses", licenses)
                      end)
                    end
                  end
                end)
              end
            else
              TriggerClientEvent("bms:services:buylicensecomplete", src, {success = false, text = "You do not have enough money to purchase this license."})
            end
          end)
        end
      end)
    end
  end
end)

TriggerEvent("es:addGroupCommand", "showlic", "LawEnf", function(source, args, user)
  local src = source
  local id = tonumber(args[2])

if (id) then
    local user

TriggerEvent("es:getPlayerFromId", id, function(usr)
      user = usr
    end)

if (user) then
      --MySQL.Async.execute("SELECT licenses FROM characters WHERE charName = @charname", {["@charname"] = charname}, function(results)
        local licenses = user.get("licenses")
      
        if (licenses) then
          --local licenses = json.decode(results.licenses)
          local licstr = ""

for _,v in pairs(licenses) do
            local lic = getLicenseFromId(v.id)
            local active = ""

if (v.revoked) then
              active = "^1Revoked^0"
            end

licstr = licstr .. string.format("(%s) %s %s ^2|^0 ", v.id, lic.name, active)
          end

if (licstr ~= "") then
            TriggerClientEvent("chatMessage", src, "NCIC", {0, 255, 0}, string.format("Licenses for %s: %s", user.get("activeChar"), licstr))
          else
            TriggerClientEvent("chatMessage", src, "NCIC", {0, 255, 0}, string.format("Licenses for %s: No Licenses Found.", user.get("activeChar")))
          end
        else
          TriggerClientEvent("chatMessage", src, "NCIC", {0, 255, 0}, string.format("Licenses for %s: No Licenses Found.", user.get("activeChar")))
        end
      --end)
    end
  else
    TriggerClientEvent("pNotify:SendNotification", src, {text = "Invalid Player ID."})
  end
end, function(source, args, user)
  TriggerClientEvent("chatMessage", source, "SERVER", {255, 0, 0}, "Only Law Enforcement Officers may use this command.")
end)

TriggerEvent("es:addGroupCommand", "revokelic", "LawEnf", function(source, args, user)
  local src = source
  local id = tonumber(args[2])
  local licid = tonumber(args[3])

if (id and licid) then
    TriggerEvent("es:getPlayerFromId", id, function(usr)
      if (user) then
        local lic = user.get("licenses")
      
        if (lic) then
          local revname = ""

for _,v in pairs(lic) do
            if (v.id == licid) then
              local l = getLicenseFromId(v.id)
              
              revname = l.name
              v.revoked = true
              v.revtime = os.time()
              break
            end
          end

if (revname ~= "") then
 MySQL.Async.execute("UPDATE characters SET licenses = @licenses WHERE charName = @charname", {["@licenses"] = json.encode(lic), ["@charname"] = user.get("activeChar")}, function()
 TriggerClientEvent("pNotify:SendNotification", id, {text = string.format("Your %s has been REVOKED. You may reapply for this license in 5 days.", revname)})
 TriggerClientEvent("pNotify:SendNotification", src, {text = "The license has been revoked."})
 user.set("licenses", lic)
 end)
 else
 TriggerClientEvent("pNotify:SendNotification", src, {text = "The license ID was either incorrect or an error occured."})
 end
 end
 else
 print(string.format("user was nil. Send a screenshot to Anarchy. Data: %s, %s", id, licid))
 end
 end)
 else
 TriggerClientEvent("chatMessage", source, "SERVER", {255, 0, 0}, "Usage: '/revokelicense [id] [licenseid]'")
 end
end, function(source, args, user)
 TriggerClientEvent("chatMessage", source, "SERVER", {255, 0, 0}, "Only Law Enforcement Officers may use this command.")
end)

TriggerEvent("es:addGroupCommand", "reinstatelic", "LawEnf", function(source, args, user)
  local src = source
  local id = tonumber(args[2])
  local licid = tonumber(args[3])
  local user

if (id and licid) then
    TriggerEvent("es:getPlayerFromId", id, function(usr)
      if (user) then
        local lic = user.get("licenses")
        local changed = false
        local revname = ""
      
        if (lic) then
          for _,v in pairs(lic) do
            if (v.id == licid) then
              local l = getLicenseFromId(v.id)

changed = true
              v.revoked = false
              v.revtime = 0
              revname = l.name

break
            end
          end

if (changed) then
 MySQL.Async.execute("UPDATE characters SET licenses = @licenses WHERE charName = @charname", {["@licenses"] = json.encode(lic), ["@charname"] = user.get("activeChar")}, function()
 TriggerClientEvent("pNotify:SendNotification", id, {text = string.format("Your %s has been Reinstated.", revname)})
 TriggerClientEvent("pNotify:SendNotification", src, {text = "The license has been reinstated."})
 user.set("licenses", lic)
 end)
 end
 end
 else
 print(string.format("user was nil. Send a screenshot to Anarchy. Data: %s, %s", id, licid))
 end
 end)
 else
 TriggerClientEvent("chatMessage", source, "SERVER", {255, 0, 0}, "Usage: '/revokelicense [id] [licenseid]'")
 end
end, function(source, args, user)
 TriggerClientEvent("chatMessage", source, "SERVER", {255, 0, 0}, "Only Law Enforcement Officers may use this command.")
end)

[ + ] Show input
Absolute running time: 0.08 sec, cpu time: 0.02 sec, memory peak: 3 Mb, absolute service time: 0,08 sec

source_file.lua:29: attempt to call a nil value (global 'RegisterServe...