less_boring_jsonb_to_record.sql

do
$$
declare
  keys_u text;
begin
   drop view if exists v_flat_u cascade;

    select 
    string_agg(distinct format('data_json ->> %L as %I',rc, rc), ', ') data_json
    into keys_u
    from "dev",
    jsonb_array_elements(users) ra, jsonb_strip_nulls(ra) rb, jsonb_object_keys(rb) as r(rc);

   execute 'create view v_flat_u as select id, '||keys_u||'  from "dev", jsonb_array_elements(users) as data_json';
end;
$$
;