Android Question How to read this JSON

syerif

Active Member
Licensed User
Longtime User
Hi, Everyone

Please help me to read this json into b4x code, i have try using json tree tool but can not read all data

Best Regards
JSON:
{
    "data": [
        {
            "cutiid": "tgXottGslvHQv00yOOJ0",
            "pegawaiid": "148",
            "jeniscutiid": "OIHv7lYRUaaYXcv0b95H",
            "tanggalcuti": "2021-01-20",
            "durasi": 4,
            "alasancuti": "Sakit Covid-19",
            "alamatcuti": "Bumi Ayu",
            "notelp": "081365299491",
            "opadd": "148",
            "pcadd": null,
            "tgladd": "2021-01-20 08:16:02",
            "opedit": null,
            "pcedit": null,
            "tgledit": null,
            "dlt": false,
            "pegawai": {
                "pegawaiid": "148",
                "nip": "19841016 201012 1 002",
                "pinabsensi": 148,
                "namapegawai": "SIGIT EKO PRABOWO",
                "npwp": null,
                "urlfoto": "foto_pegawai/zDRhqPUjTpyoMFgwHYQ2.JPG",
                "jeniskelamin": 0,
                "tempatlahir": "Rumbai",
                "tgllahir": "1984-10-16",
                "provinsiktp": "14",
                "kotaktp": "1473",
                "kodeposktp": "28825",
                "alamatktp": "Jl. Baruna Baru No. 79   Kota Dumai Riau",
                "provinsisekarang": "14",
                "kotasekarang": "1473",
                "kodepossekarang": "28814",
                "alamatsekarang": "Jl. Baruna Baru No. 79   Kota Dumai Riau",
                "email": "eckoprabowo24@gmail.com",
                "nohp": "081365299491",
                "statuspegawai": 0,
                "opadd": null,
                "pcadd": null,
                "tgladd": null,
                "opedit": null,
                "pcedit": null,
                "tgledit": "2021-04-05 11:00:32",
                "dlt": false,
                "fotoktp": null,
                "fotomedicalcheckup": null,
                "latitude_rumah": null,
                "longitude_rumah": null,
                "latitude_office": "1.683686976511167",
                "longitude_office": "101.45663233908355"
            },
            "jenis_cuti": {
                "jeniscutiid": "OIHv7lYRUaaYXcv0b95H",
                "kode": "03",
                "uraian": "Cuti Sakit",
                "opadd": null,
                "pcadd": null,
                "tgladd": "2021-01-20 08:14:42",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false
            },
            "pertimbangan_atasan": {
                "cutipertimbanganatasanid": "teuPp0v4MpLDKTpvw1zg",
                "cutiid": "tgXottGslvHQv00yOOJ0",
                "kinerja": 1,
                "hambatpekerjaan": 0,
                "persetujuan": 1,
                "solusihambatan": "ok",
                "alasan": "ok",
                "penunjukanpelaksanaharian": 2,
                "pelaksanaharianid": "206",
                "opadd": "4",
                "pcadd": null,
                "tgladd": "2021-06-26 13:40:28",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "pelaksana_harian": {
                    "pegawaiid": "206",
                    "nip": "206",
                    "pinabsensi": 5,
                    "namapegawai": "MELISA HERAWATI, S.KOM",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/oPwacTL2MfvBBAhNSqhP.JPG",
                    "jeniskelamin": 1,
                    "tempatlahir": "Sungai Pakning",
                    "tgllahir": "1997-05-16",
                    "provinsiktp": "14",
                    "kotaktp": null,
                    "kodeposktp": "28814",
                    "alamatktp": "Jl. Teladan Gg Nurul Iman  Jaya Mukti  DUMAI TIMUR Kota Dumai Riau",
                    "provinsisekarang": "14",
                    "kotasekarang": null,
                    "kodepossekarang": "28814",
                    "alamatsekarang": "Jl. Teladan Gg Nurul Iman  Jaya Mukti  DUMAI TIMUR Kota Dumai Riau",
                    "email": "melisaherawati@gmail.com",
                    "nohp": "082285452167",
                    "statuspegawai": 1,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2020-11-30 14:18:31",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                },
                "opadd_pegawai": {
                    "pegawaiid": "4",
                    "nip": "19840620 200604 1 004",
                    "pinabsensi": 4,
                    "namapegawai": "EKO",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/ywB8jWqTa1MiCXnlXk8h.JPG",
                    "jeniskelamin": 0,
                    "tempatlahir": "Bekasi",
                    "tgllahir": "1984-06-20",
                    "provinsiktp": "36",
                    "kotaktp": "3674",
                    "kodeposktp": null,
                    "alamatktp": "GRAND RESIDENCE PONDOK CABE BLOK A3/15  PAMULANG Kota Tangerang Selatan Banten",
                    "provinsisekarang": "36",
                    "kotasekarang": "3674",
                    "kodepossekarang": "null",
                    "alamatsekarang": "GRAND RESIDENCE PONDOK CABE BLOK A3/15  PAMULANG Kota Tangerang Selatan Banten",
                    "email": "ibnu_romadhona@dephub.go.id",
                    "nohp": "082133033084",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2021-04-25 20:09:58",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                }
            },
            "pertimbangan_ktu": {
                "cutipertimbanganktuid": "ET9DKs6k4MqhJHfFP8a3",
                "cutiid": "tgXottGslvHQv00yOOJ0",
                "disiplinkepatuhan": 2,
                "masalahadm": 0,
                "solusimasalahadm": "ya",
                "persetujuan": 1,
                "alasan": null,
                "opadd": "79",
                "pcadd": null,
                "tgladd": "2021-06-26 13:41:20",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "opadd_pegawai": {
                    "pegawaiid": "79",
                    "nip": "19700704 199009 1 001",
                    "pinabsensi": 79,
                    "namapegawai": "ON HIDAYAT",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/CsxJXhya1X6rPxrpiQm2.JPG",
                    "jeniskelamin": 0,
                    "tempatlahir": "PAYAKUMBUH",
                    "tgllahir": "1970-07-04",
                    "provinsiktp": "14",
                    "kotaktp": "1473",
                    "kodeposktp": null,
                    "alamatktp": "KOMPERTA BLOK D/E 15-B BUKIT DATUK BUKIT KAPUR Kota Dumai Riau",
                    "provinsisekarang": "14",
                    "kotasekarang": "1473",
                    "kodepossekarang": "null",
                    "alamatsekarang": "KOMPERTA BLOK D/E 15-B BUKIT DATUK BUKIT KAPUR Kota Dumai Riau",
                    "email": "on_hidayat@dephub.go.id",
                    "nohp": "081275295366",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2020-12-21 15:37:16",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                }
            },
            "persetujuan_kadinav": {
                "cutipersetujuankadisnavid": "QBwh2E915fR4GlRqHeBw",
                "cutiid": "tgXottGslvHQv00yOOJ0",
                "persetujuan": 1,
                "arahan": "ok",
                "opadd": "aZHwHdTUngIjysK2nHwz",
                "pcadd": null,
                "tgladd": "2021-06-26 13:42:36",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "opadd_pegawai": null
            }
        },
        {
            "cutiid": "kLdTFw3quipA4X5BglHz",
            "pegawaiid": "148",
            "jeniscutiid": "gC1b0UunoRwUYY0I1HH8",
            "tanggalcuti": "2021-02-06",
            "durasi": 1,
            "alasancuti": "Hfg",
            "alamatcuti": "Dhj",
            "notelp": "852",
            "opadd": "148",
            "pcadd": null,
            "tgladd": "2021-02-06 17:52:54",
            "opedit": null,
            "pcedit": null,
            "tgledit": null,
            "dlt": false,
            "pegawai": {
                "pegawaiid": "148",
                "nip": "19841016 201012 1 002",
                "pinabsensi": 148,
                "namapegawai": "SIGIT EKO PRABOWO",
                "npwp": null,
                "urlfoto": "foto_pegawai/zDRhqPUjTpyoMFgwHYQ2.JPG",
                "jeniskelamin": 0,
                "tempatlahir": "Rumbai",
                "tgllahir": "1984-10-16",
                "provinsiktp": "14",
                "kotaktp": "1473",
                "kodeposktp": "28825",
                "alamatktp": "Jl. Baruna Baru No. 79   Kota Dumai Riau",
                "provinsisekarang": "14",
                "kotasekarang": "1473",
                "kodepossekarang": "28814",
                "alamatsekarang": "Jl. Baruna Baru No. 79   Kota Dumai Riau",
                "email": "eckoprabowo24@gmail.com",
                "nohp": "081365299491",
                "statuspegawai": 0,
                "opadd": null,
                "pcadd": null,
                "tgladd": null,
                "opedit": null,
                "pcedit": null,
                "tgledit": "2021-04-05 11:00:32",
                "dlt": false,
                "fotoktp": null,
                "fotomedicalcheckup": null,
                "latitude_rumah": null,
                "longitude_rumah": null,
                "latitude_office": "1.683686976511167",
                "longitude_office": "101.45663233908355"
            },
            "jenis_cuti": {
                "jeniscutiid": "gC1b0UunoRwUYY0I1HH8",
                "kode": "01",
                "uraian": "Cuti Tahunan",
                "opadd": null,
                "pcadd": null,
                "tgladd": "2021-01-20 08:13:15",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false
            },
            "pertimbangan_atasan": {
                "cutipertimbanganatasanid": "nwgHTRMzHBD4j1zRxvba",
                "cutiid": "kLdTFw3quipA4X5BglHz",
                "kinerja": 1,
                "hambatpekerjaan": 0,
                "persetujuan": 1,
                "solusihambatan": "okeoke",
                "alasan": "oke",
                "penunjukanpelaksanaharian": 2,
                "pelaksanaharianid": "1",
                "opadd": "4",
                "pcadd": null,
                "tgladd": "2021-06-26 13:29:48",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "pelaksana_harian": {
                    "pegawaiid": "1",
                    "nip": "19671213 199603 1 001",
                    "pinabsensi": 1,
                    "namapegawai": "RAYMOND IVAN H.A.S, ST",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/gCguZf2dtvziDVCzhJqGYzAZcHqes1AmHjZRwZCG.gif",
                    "jeniskelamin": 0,
                    "tempatlahir": "GUNUNG SITOLI",
                    "tgllahir": "1967-12-13",
                    "provinsiktp": null,
                    "kotaktp": null,
                    "kodeposktp": null,
                    "alamatktp": "KOMPLEK BILLY MOON JL. JANUR 3 BLOK CF I NO.14  Duren Sawit Kota Jakarta Timur DKI Jakarta",
                    "provinsisekarang": null,
                    "kotasekarang": null,
                    "kodepossekarang": "null",
                    "alamatsekarang": "KOMPLEK BILLY MOON JL. JANUR 3 BLOK CF I NO.14  Duren Sawit Kota Jakarta Timur DKI Jakarta",
                    "email": "raymond_ivan@dephub.go.id",
                    "nohp": "0811814118",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2020-11-27 11:32:04",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                },
                "opadd_pegawai": {
                    "pegawaiid": "4",
                    "nip": "19840620 200604 1 004",
                    "pinabsensi": 4,
                    "namapegawai": "EKO",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/ywB8jWqTa1MiCXnlXk8h.JPG",
                    "jeniskelamin": 0,
                    "tempatlahir": "Bekasi",
                    "tgllahir": "1984-06-20",
                    "provinsiktp": "36",
                    "kotaktp": "3674",
                    "kodeposktp": null,
                    "alamatktp": "GRAND RESIDENCE PONDOK CABE BLOK A3/15  PAMULANG Kota Tangerang Selatan Banten",
                    "provinsisekarang": "36",
                    "kotasekarang": "3674",
                    "kodepossekarang": "null",
                    "alamatsekarang": "GRAND RESIDENCE PONDOK CABE BLOK A3/15  PAMULANG Kota Tangerang Selatan Banten",
                    "email": "ibnu_romadhona@dephub.go.id",
                    "nohp": "082133033084",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2021-04-25 20:09:58",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                }
            },
            "pertimbangan_ktu": {
                "cutipertimbanganktuid": "EZYtWZwSswPFWtMrY0cU",
                "cutiid": "kLdTFw3quipA4X5BglHz",
                "disiplinkepatuhan": 2,
                "masalahadm": 0,
                "solusimasalahadm": "ok",
                "persetujuan": 1,
                "alasan": null,
                "opadd": "79",
                "pcadd": null,
                "tgladd": "2021-06-26 13:33:58",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "opadd_pegawai": {
                    "pegawaiid": "79",
                    "nip": "19700704 199009 1 001",
                    "pinabsensi": 79,
                    "namapegawai": "ON HIDAYAT",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/CsxJXhya1X6rPxrpiQm2.JPG",
                    "jeniskelamin": 0,
                    "tempatlahir": "PAYAKUMBUH",
                    "tgllahir": "1970-07-04",
                    "provinsiktp": "14",
                    "kotaktp": "1473",
                    "kodeposktp": null,
                    "alamatktp": "KOMPERTA BLOK D/E 15-B BUKIT DATUK BUKIT KAPUR Kota Dumai Riau",
                    "provinsisekarang": "14",
                    "kotasekarang": "1473",
                    "kodepossekarang": "null",
                    "alamatsekarang": "KOMPERTA BLOK D/E 15-B BUKIT DATUK BUKIT KAPUR Kota Dumai Riau",
                    "email": "on_hidayat@dephub.go.id",
                    "nohp": "081275295366",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2020-12-21 15:37:16",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                }
            },
            "persetujuan_kadinav": {
                "cutipersetujuankadisnavid": "cZk2r96y6b9ddeLejw5L",
                "cutiid": "kLdTFw3quipA4X5BglHz",
                "persetujuan": 0,
                "arahan": "gaboleh ah",
                "opadd": "aZHwHdTUngIjysK2nHwz",
                "pcadd": null,
                "tgladd": "2021-06-26 13:36:31",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "opadd_pegawai": null
            }
        },
        {
            "cutiid": "L2yyMIDe0hug7itTPpar",
            "pegawaiid": "148",
            "jeniscutiid": "gC1b0UunoRwUYY0I1HH8",
            "tanggalcuti": "2021-05-05",
            "durasi": 1,
            "alasancuti": "Cuti sakit",
            "alamatcuti": "Jalan",
            "notelp": "081*",
            "opadd": "148",
            "pcadd": null,
            "tgladd": "2021-05-05 21:19:44",
            "opedit": null,
            "pcedit": null,
            "tgledit": null,
            "dlt": false,
            "pegawai": {
                "pegawaiid": "148",
                "nip": "19841016 201012 1 002",
                "pinabsensi": 148,
                "namapegawai": "SIGIT EKO PRABOWO",
                "npwp": null,
                "urlfoto": "foto_pegawai/zDRhqPUjTpyoMFgwHYQ2.JPG",
                "jeniskelamin": 0,
                "tempatlahir": "Rumbai",
                "tgllahir": "1984-10-16",
                "provinsiktp": "14",
                "kotaktp": "1473",
                "kodeposktp": "28825",
                "alamatktp": "Jl. Baruna Baru No. 79   Kota Dumai Riau",
                "provinsisekarang": "14",
                "kotasekarang": "1473",
                "kodepossekarang": "28814",
                "alamatsekarang": "Jl. Baruna Baru No. 79   Kota Dumai Riau",
                "email": "eckoprabowo24@gmail.com",
                "nohp": "081365299491",
                "statuspegawai": 0,
                "opadd": null,
                "pcadd": null,
                "tgladd": null,
                "opedit": null,
                "pcedit": null,
                "tgledit": "2021-04-05 11:00:32",
                "dlt": false,
                "fotoktp": null,
                "fotomedicalcheckup": null,
                "latitude_rumah": null,
                "longitude_rumah": null,
                "latitude_office": "1.683686976511167",
                "longitude_office": "101.45663233908355"
            },
            "jenis_cuti": {
                "jeniscutiid": "gC1b0UunoRwUYY0I1HH8",
                "kode": "01",
                "uraian": "Cuti Tahunan",
                "opadd": null,
                "pcadd": null,
                "tgladd": "2021-01-20 08:13:15",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false
            },
            "pertimbangan_atasan": {
                "cutipertimbanganatasanid": "UkfJJErlBQ4MLXH9UfbF",
                "cutiid": "L2yyMIDe0hug7itTPpar",
                "kinerja": 1,
                "hambatpekerjaan": 0,
                "persetujuan": 1,
                "solusihambatan": "asdasd",
                "alasan": "lkdfjdlskf",
                "penunjukanpelaksanaharian": 1,
                "pelaksanaharianid": "1",
                "opadd": "4",
                "pcadd": null,
                "tgladd": "2021-06-26 13:27:23",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "pelaksana_harian": {
                    "pegawaiid": "1",
                    "nip": "19671213 199603 1 001",
                    "pinabsensi": 1,
                    "namapegawai": "RAYMOND IVAN H.A.S, ST",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/gCguZf2dtvziDVCzhJqGYzAZcHqes1AmHjZRwZCG.gif",
                    "jeniskelamin": 0,
                    "tempatlahir": "GUNUNG SITOLI",
                    "tgllahir": "1967-12-13",
                    "provinsiktp": null,
                    "kotaktp": null,
                    "kodeposktp": null,
                    "alamatktp": "KOMPLEK BILLY MOON JL. JANUR 3 BLOK CF I NO.14  Duren Sawit Kota Jakarta Timur DKI Jakarta",
                    "provinsisekarang": null,
                    "kotasekarang": null,
                    "kodepossekarang": "null",
                    "alamatsekarang": "KOMPLEK BILLY MOON JL. JANUR 3 BLOK CF I NO.14  Duren Sawit Kota Jakarta Timur DKI Jakarta",
                    "email": "raymond_ivan@dephub.go.id",
                    "nohp": "0811814118",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2020-11-27 11:32:04",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                },
                "opadd_pegawai": {
                    "pegawaiid": "4",
                    "nip": "19840620 200604 1 004",
                    "pinabsensi": 4,
                    "namapegawai": "EKO",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/ywB8jWqTa1MiCXnlXk8h.JPG",
                    "jeniskelamin": 0,
                    "tempatlahir": "Bekasi",
                    "tgllahir": "1984-06-20",
                    "provinsiktp": "36",
                    "kotaktp": "3674",
                    "kodeposktp": null,
                    "alamatktp": "GRAND RESIDENCE PONDOK CABE BLOK A3/15  PAMULANG Kota Tangerang Selatan Banten",
                    "provinsisekarang": "36",
                    "kotasekarang": "3674",
                    "kodepossekarang": "null",
                    "alamatsekarang": "GRAND RESIDENCE PONDOK CABE BLOK A3/15  PAMULANG Kota Tangerang Selatan Banten",
                    "email": "ibnu_romadhona@dephub.go.id",
                    "nohp": "082133033084",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2021-04-25 20:09:58",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                }
            },
            "pertimbangan_ktu": null,
            "persetujuan_kadinav": null
        },
        {
            "cutiid": "Qz9fmBfY7nH9uBJ6GX3W",
            "pegawaiid": "148",
            "jeniscutiid": "gC1b0UunoRwUYY0I1HH8",
            "tanggalcuti": "2021-06-26",
            "durasi": 1,
            "alasancuti": "Test",
            "alamatcuti": "Test",
            "notelp": "08122456789",
            "opadd": "148",
            "pcadd": null,
            "tgladd": "2021-06-26 12:29:48",
            "opedit": null,
            "pcedit": null,
            "tgledit": null,
            "dlt": false,
            "pegawai": {
                "pegawaiid": "148",
                "nip": "19841016 201012 1 002",
                "pinabsensi": 148,
                "namapegawai": "SIGIT EKO PRABOWO",
                "npwp": null,
                "urlfoto": "foto_pegawai/zDRhqPUjTpyoMFgwHYQ2.JPG",
                "jeniskelamin": 0,
                "tempatlahir": "Rumbai",
                "tgllahir": "1984-10-16",
                "provinsiktp": "14",
                "kotaktp": "1473",
                "kodeposktp": "28825",
                "alamatktp": "Jl. Baruna Baru No. 79   Kota Dumai Riau",
                "provinsisekarang": "14",
                "kotasekarang": "1473",
                "kodepossekarang": "28814",
                "alamatsekarang": "Jl. Baruna Baru No. 79   Kota Dumai Riau",
                "email": "eckoprabowo24@gmail.com",
                "nohp": "081365299491",
                "statuspegawai": 0,
                "opadd": null,
                "pcadd": null,
                "tgladd": null,
                "opedit": null,
                "pcedit": null,
                "tgledit": "2021-04-05 11:00:32",
                "dlt": false,
                "fotoktp": null,
                "fotomedicalcheckup": null,
                "latitude_rumah": null,
                "longitude_rumah": null,
                "latitude_office": "1.683686976511167",
                "longitude_office": "101.45663233908355"
            },
            "jenis_cuti": {
                "jeniscutiid": "gC1b0UunoRwUYY0I1HH8",
                "kode": "01",
                "uraian": "Cuti Tahunan",
                "opadd": null,
                "pcadd": null,
                "tgladd": "2021-01-20 08:13:15",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false
            },
            "pertimbangan_atasan": {
                "cutipertimbanganatasanid": "hrtEIpGdWWaRE8S5aBgv",
                "cutiid": "Qz9fmBfY7nH9uBJ6GX3W",
                "kinerja": 1,
                "hambatpekerjaan": 0,
                "persetujuan": 1,
                "solusihambatan": "bantuan teman",
                "alasan": "setuju",
                "penunjukanpelaksanaharian": 2,
                "pelaksanaharianid": "79",
                "opadd": "4",
                "pcadd": null,
                "tgladd": "2021-06-26 13:26:31",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "pelaksana_harian": {
                    "pegawaiid": "79",
                    "nip": "19700704 199009 1 001",
                    "pinabsensi": 79,
                    "namapegawai": "ON HIDAYAT",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/CsxJXhya1X6rPxrpiQm2.JPG",
                    "jeniskelamin": 0,
                    "tempatlahir": "PAYAKUMBUH",
                    "tgllahir": "1970-07-04",
                    "provinsiktp": "14",
                    "kotaktp": "1473",
                    "kodeposktp": null,
                    "alamatktp": "KOMPERTA BLOK D/E 15-B BUKIT DATUK BUKIT KAPUR Kota Dumai Riau",
                    "provinsisekarang": "14",
                    "kotasekarang": "1473",
                    "kodepossekarang": "null",
                    "alamatsekarang": "KOMPERTA BLOK D/E 15-B BUKIT DATUK BUKIT KAPUR Kota Dumai Riau",
                    "email": "on_hidayat@dephub.go.id",
                    "nohp": "081275295366",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2020-12-21 15:37:16",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                },
                "opadd_pegawai": {
                    "pegawaiid": "4",
                    "nip": "19840620 200604 1 004",
                    "pinabsensi": 4,
                    "namapegawai": "EKO",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/ywB8jWqTa1MiCXnlXk8h.JPG",
                    "jeniskelamin": 0,
                    "tempatlahir": "Bekasi",
                    "tgllahir": "1984-06-20",
                    "provinsiktp": "36",
                    "kotaktp": "3674",
                    "kodeposktp": null,
                    "alamatktp": "GRAND RESIDENCE PONDOK CABE BLOK A3/15  PAMULANG Kota Tangerang Selatan Banten",
                    "provinsisekarang": "36",
                    "kotasekarang": "3674",
                    "kodepossekarang": "null",
                    "alamatsekarang": "GRAND RESIDENCE PONDOK CABE BLOK A3/15  PAMULANG Kota Tangerang Selatan Banten",
                    "email": "ibnu_romadhona@dephub.go.id",
                    "nohp": "082133033084",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2021-04-25 20:09:58",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                }
            },
            "pertimbangan_ktu": null,
            "persetujuan_kadinav": null
        },
        {
            "cutiid": "S9SWvz8lmpFjoJXYgkV0",
            "pegawaiid": "148",
            "jeniscutiid": "gC1b0UunoRwUYY0I1HH8",
            "tanggalcuti": "2021-06-29",
            "durasi": 1,
            "alasancuti": "Cuti tahunan",
            "alamatcuti": "Cuti tahunan",
            "notelp": "0812358786",
            "opadd": "148",
            "pcadd": null,
            "tgladd": "2021-06-29 14:36:51",
            "opedit": null,
            "pcedit": null,
            "tgledit": null,
            "dlt": false,
            "pegawai": {
                "pegawaiid": "148",
                "nip": "19841016 201012 1 002",
                "pinabsensi": 148,
                "namapegawai": "SIGIT EKO PRABOWO",
                "npwp": null,
                "urlfoto": "foto_pegawai/zDRhqPUjTpyoMFgwHYQ2.JPG",
                "jeniskelamin": 0,
                "tempatlahir": "Rumbai",
                "tgllahir": "1984-10-16",
                "provinsiktp": "14",
                "kotaktp": "1473",
                "kodeposktp": "28825",
                "alamatktp": "Jl. Baruna Baru No. 79   Kota Dumai Riau",
                "provinsisekarang": "14",
                "kotasekarang": "1473",
                "kodepossekarang": "28814",
                "alamatsekarang": "Jl. Baruna Baru No. 79   Kota Dumai Riau",
                "email": "eckoprabowo24@gmail.com",
                "nohp": "081365299491",
                "statuspegawai": 0,
                "opadd": null,
                "pcadd": null,
                "tgladd": null,
                "opedit": null,
                "pcedit": null,
                "tgledit": "2021-04-05 11:00:32",
                "dlt": false,
                "fotoktp": null,
                "fotomedicalcheckup": null,
                "latitude_rumah": null,
                "longitude_rumah": null,
                "latitude_office": "1.683686976511167",
                "longitude_office": "101.45663233908355"
            },
            "jenis_cuti": {
                "jeniscutiid": "gC1b0UunoRwUYY0I1HH8",
                "kode": "01",
                "uraian": "Cuti Tahunan",
                "opadd": null,
                "pcadd": null,
                "tgladd": "2021-01-20 08:13:15",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false
            },
            "pertimbangan_atasan": {
                "cutipertimbanganatasanid": "QdwaxNDzuPHZMVeNOX6y",
                "cutiid": "S9SWvz8lmpFjoJXYgkV0",
                "kinerja": 2,
                "hambatpekerjaan": 0,
                "persetujuan": 1,
                "solusihambatan": "OK",
                "alasan": "OK",
                "penunjukanpelaksanaharian": 2,
                "pelaksanaharianid": "79",
                "opadd": "4",
                "pcadd": null,
                "tgladd": "2021-06-29 14:39:32",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "pelaksana_harian": {
                    "pegawaiid": "79",
                    "nip": "19700704 199009 1 001",
                    "pinabsensi": 79,
                    "namapegawai": "ON HIDAYAT",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/CsxJXhya1X6rPxrpiQm2.JPG",
                    "jeniskelamin": 0,
                    "tempatlahir": "PAYAKUMBUH",
                    "tgllahir": "1970-07-04",
                    "provinsiktp": "14",
                    "kotaktp": "1473",
                    "kodeposktp": null,
                    "alamatktp": "KOMPERTA BLOK D/E 15-B BUKIT DATUK BUKIT KAPUR Kota Dumai Riau",
                    "provinsisekarang": "14",
                    "kotasekarang": "1473",
                    "kodepossekarang": "null",
                    "alamatsekarang": "KOMPERTA BLOK D/E 15-B BUKIT DATUK BUKIT KAPUR Kota Dumai Riau",
                    "email": "on_hidayat@dephub.go.id",
                    "nohp": "081275295366",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2020-12-21 15:37:16",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                },
                "opadd_pegawai": {
                    "pegawaiid": "4",
                    "nip": "19840620 200604 1 004",
                    "pinabsensi": 4,
                    "namapegawai": "EKO",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/ywB8jWqTa1MiCXnlXk8h.JPG",
                    "jeniskelamin": 0,
                    "tempatlahir": "Bekasi",
                    "tgllahir": "1984-06-20",
                    "provinsiktp": "36",
                    "kotaktp": "3674",
                    "kodeposktp": null,
                    "alamatktp": "GRAND RESIDENCE PONDOK CABE BLOK A3/15  PAMULANG Kota Tangerang Selatan Banten",
                    "provinsisekarang": "36",
                    "kotasekarang": "3674",
                    "kodepossekarang": "null",
                    "alamatsekarang": "GRAND RESIDENCE PONDOK CABE BLOK A3/15  PAMULANG Kota Tangerang Selatan Banten",
                    "email": "ibnu_romadhona@dephub.go.id",
                    "nohp": "082133033084",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2021-04-25 20:09:58",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                }
            },
            "pertimbangan_ktu": {
                "cutipertimbanganktuid": "ltDavgORPFK99ZX6dKtc",
                "cutiid": "S9SWvz8lmpFjoJXYgkV0",
                "disiplinkepatuhan": 2,
                "masalahadm": 0,
                "solusimasalahadm": "OK",
                "persetujuan": 1,
                "alasan": null,
                "opadd": "79",
                "pcadd": null,
                "tgladd": "2021-06-29 14:40:38",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "opadd_pegawai": {
                    "pegawaiid": "79",
                    "nip": "19700704 199009 1 001",
                    "pinabsensi": 79,
                    "namapegawai": "ON HIDAYAT",
                    "npwp": null,
                    "urlfoto": "foto_pegawai/CsxJXhya1X6rPxrpiQm2.JPG",
                    "jeniskelamin": 0,
                    "tempatlahir": "PAYAKUMBUH",
                    "tgllahir": "1970-07-04",
                    "provinsiktp": "14",
                    "kotaktp": "1473",
                    "kodeposktp": null,
                    "alamatktp": "KOMPERTA BLOK D/E 15-B BUKIT DATUK BUKIT KAPUR Kota Dumai Riau",
                    "provinsisekarang": "14",
                    "kotasekarang": "1473",
                    "kodepossekarang": "null",
                    "alamatsekarang": "KOMPERTA BLOK D/E 15-B BUKIT DATUK BUKIT KAPUR Kota Dumai Riau",
                    "email": "on_hidayat@dephub.go.id",
                    "nohp": "081275295366",
                    "statuspegawai": 0,
                    "opadd": null,
                    "pcadd": null,
                    "tgladd": null,
                    "opedit": null,
                    "pcedit": null,
                    "tgledit": "2020-12-21 15:37:16",
                    "dlt": false,
                    "fotoktp": null,
                    "fotomedicalcheckup": null,
                    "latitude_rumah": null,
                    "longitude_rumah": null,
                    "latitude_office": "1.683686976511167",
                    "longitude_office": "101.45663233908355"
                }
            },
            "persetujuan_kadinav": {
                "cutipersetujuankadisnavid": "j2RAfZTXHDMMlhv5Hxq9",
                "cutiid": "S9SWvz8lmpFjoJXYgkV0",
                "persetujuan": 1,
                "arahan": "BAIK",
                "opadd": "aZHwHdTUngIjysK2nHwz",
                "pcadd": null,
                "tgladd": "2021-06-29 14:43:07",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false,
                "opadd_pegawai": null
            }
        },
        {
            "cutiid": "eZ9E2IIPftuUefNAOllp",
            "pegawaiid": "10",
            "jeniscutiid": "gC1b0UunoRwUYY0I1HH8",
            "tanggalcuti": "2021-11-14",
            "durasi": 6,
            "alasancuti": "Jenguk Keluarga",
            "alamatcuti": "Jalan Kaliurang",
            "notelp": "081365241681",
            "opadd": "10",
            "pcadd": null,
            "tgladd": "2021-11-14 19:35:06",
            "opedit": null,
            "pcedit": null,
            "tgledit": null,
            "dlt": false,
            "pegawai": {
                "pegawaiid": "10",
                "nip": "19791130 200604 1 004",
                "pinabsensi": 10,
                "namapegawai": "AOFUN  SUROSO, ST",
                "npwp": "58.082.592.5-541.000",
                "urlfoto": "foto_pegawai/2pcd60SJig2QPtzo1Hy6.JPG",
                "jeniskelamin": 0,
                "tempatlahir": "KOTA DUMAI",
                "tgllahir": "1979-11-30",
                "provinsiktp": "14",
                "kotaktp": "1473",
                "kodeposktp": null,
                "alamatktp": "Jl. Baruna III No. E-3   Kota Dumai Riau",
                "provinsisekarang": "14",
                "kotasekarang": "1473",
                "kodepossekarang": "null",
                "alamatsekarang": "Jl. Baruna III No. E-3   Kota Dumai Riau",
                "email": "aofun_suroso@dephub.go.id",
                "nohp": "0811709996",
                "statuspegawai": 0,
                "opadd": null,
                "pcadd": null,
                "tgladd": null,
                "opedit": null,
                "pcedit": null,
                "tgledit": "2020-12-15 14:48:30",
                "dlt": false,
                "fotoktp": null,
                "fotomedicalcheckup": null,
                "latitude_rumah": null,
                "longitude_rumah": null,
                "latitude_office": "1.683686976511167",
                "longitude_office": "101.45663233908355"
            },
            "jenis_cuti": {
                "jeniscutiid": "gC1b0UunoRwUYY0I1HH8",
                "kode": "01",
                "uraian": "Cuti Tahunan",
                "opadd": null,
                "pcadd": null,
                "tgladd": "2021-01-20 08:13:15",
                "opedit": null,
                "pcedit": null,
                "tgledit": null,
                "dlt": false
            },
            "pertimbangan_atasan": null,
            "pertimbangan_ktu": null,
            "persetujuan_kadinav": null
        }
    ]
}
 

Pendrush

Well-Known Member
Licensed User
Longtime User
Copy/Paste JSON here.

This is result:
B4X:
Dim parser As JSONParser
parser.Initialize(<text>)
Dim root As Map = parser.NextObject
Dim data As List = root.Get("data")
For Each coldata As Map In data
 Dim pegawaiid As String = coldata.Get("pegawaiid")
 Dim alasancuti As String = coldata.Get("alasancuti")
 Dim opedit As String = coldata.Get("opedit")
 Dim jeniscutiid As String = coldata.Get("jeniscutiid")
 Dim tanggalcuti As String = coldata.Get("tanggalcuti")
 Dim dlt As String = coldata.Get("dlt")
 Dim opadd As String = coldata.Get("opadd")
 Dim notelp As String = coldata.Get("notelp")
 Dim alamatcuti As String = coldata.Get("alamatcuti")
 Dim pertimbangan_atasan As Map = coldata.Get("pertimbangan_atasan")
 Dim penunjukanpelaksanaharian As Int = pertimbangan_atasan.Get("penunjukanpelaksanaharian")
 Dim opadd_pegawai As Map = pertimbangan_atasan.Get("opadd_pegawai")
 Dim jeniskelamin As Int = opadd_pegawai.Get("jeniskelamin")
 Dim kotaktp As String = opadd_pegawai.Get("kotaktp")
 Dim urlfoto As String = opadd_pegawai.Get("urlfoto")
 Dim fotomedicalcheckup As String = opadd_pegawai.Get("fotomedicalcheckup")
 Dim provinsisekarang As String = opadd_pegawai.Get("provinsisekarang")
 Dim pinabsensi As Int = opadd_pegawai.Get("pinabsensi")
 Dim nip As String = opadd_pegawai.Get("nip")
 Dim tgledit As String = opadd_pegawai.Get("tgledit")
 Dim tgllahir As String = opadd_pegawai.Get("tgllahir")
 Dim pcadd As String = opadd_pegawai.Get("pcadd")
 Dim tempatlahir As String = opadd_pegawai.Get("tempatlahir")
 Dim statuspegawai As Int = opadd_pegawai.Get("statuspegawai")
 Dim email As String = opadd_pegawai.Get("email")
 Dim kotasekarang As String = opadd_pegawai.Get("kotasekarang")
 Dim fotoktp As String = opadd_pegawai.Get("fotoktp")
 Dim longitude_rumah As String = opadd_pegawai.Get("longitude_rumah")
 Dim provinsiktp As String = opadd_pegawai.Get("provinsiktp")
 Dim pegawaiid As String = opadd_pegawai.Get("pegawaiid")
 Dim kodeposktp As String = opadd_pegawai.Get("kodeposktp")
 Dim npwp As String = opadd_pegawai.Get("npwp")
 Dim opedit As String = opadd_pegawai.Get("opedit")
 Dim alamatktp As String = opadd_pegawai.Get("alamatktp")
 Dim latitude_rumah As String = opadd_pegawai.Get("latitude_rumah")
 Dim dlt As String = opadd_pegawai.Get("dlt")
 Dim alamatsekarang As String = opadd_pegawai.Get("alamatsekarang")
 Dim latitude_office As String = opadd_pegawai.Get("latitude_office")
 Dim opadd As String = opadd_pegawai.Get("opadd")
 Dim namapegawai As String = opadd_pegawai.Get("namapegawai")
 Dim longitude_office As String = opadd_pegawai.Get("longitude_office")
 Dim kodepossekarang As String = opadd_pegawai.Get("kodepossekarang")
 Dim tgladd As String = opadd_pegawai.Get("tgladd")
 Dim nohp As String = opadd_pegawai.Get("nohp")
 Dim pcedit As String = opadd_pegawai.Get("pcedit")
 Dim solusihambatan As String = pertimbangan_atasan.Get("solusihambatan")
 Dim opedit As String = pertimbangan_atasan.Get("opedit")
 Dim cutipertimbanganatasanid As String = pertimbangan_atasan.Get("cutipertimbanganatasanid")
 Dim pelaksana_harian As Map = pertimbangan_atasan.Get("pelaksana_harian")
 Dim jeniskelamin As Int = pelaksana_harian.Get("jeniskelamin")
 Dim kotaktp As String = pelaksana_harian.Get("kotaktp")
 Dim urlfoto As String = pelaksana_harian.Get("urlfoto")
 Dim fotomedicalcheckup As String = pelaksana_harian.Get("fotomedicalcheckup")
 Dim provinsisekarang As String = pelaksana_harian.Get("provinsisekarang")
 Dim pinabsensi As Int = pelaksana_harian.Get("pinabsensi")
 Dim nip As String = pelaksana_harian.Get("nip")
 Dim tgledit As String = pelaksana_harian.Get("tgledit")
 Dim tgllahir As String = pelaksana_harian.Get("tgllahir")
 Dim pcadd As String = pelaksana_harian.Get("pcadd")
 Dim tempatlahir As String = pelaksana_harian.Get("tempatlahir")
 Dim statuspegawai As Int = pelaksana_harian.Get("statuspegawai")
 Dim email As String = pelaksana_harian.Get("email")
 Dim kotasekarang As String = pelaksana_harian.Get("kotasekarang")
 Dim fotoktp As String = pelaksana_harian.Get("fotoktp")
 Dim longitude_rumah As String = pelaksana_harian.Get("longitude_rumah")
 Dim provinsiktp As String = pelaksana_harian.Get("provinsiktp")
 Dim pegawaiid As String = pelaksana_harian.Get("pegawaiid")
 Dim kodeposktp As String = pelaksana_harian.Get("kodeposktp")
 Dim npwp As String = pelaksana_harian.Get("npwp")
 Dim opedit As String = pelaksana_harian.Get("opedit")
 Dim alamatktp As String = pelaksana_harian.Get("alamatktp")
 Dim latitude_rumah As String = pelaksana_harian.Get("latitude_rumah")
 Dim dlt As String = pelaksana_harian.Get("dlt")
 Dim alamatsekarang As String = pelaksana_harian.Get("alamatsekarang")
 Dim latitude_office As String = pelaksana_harian.Get("latitude_office")
 Dim opadd As String = pelaksana_harian.Get("opadd")
 Dim namapegawai As String = pelaksana_harian.Get("namapegawai")
 Dim longitude_office As String = pelaksana_harian.Get("longitude_office")
 Dim kodepossekarang As String = pelaksana_harian.Get("kodepossekarang")
 Dim tgladd As String = pelaksana_harian.Get("tgladd")
 Dim nohp As String = pelaksana_harian.Get("nohp")
 Dim pcedit As String = pelaksana_harian.Get("pcedit")
 Dim dlt As String = pertimbangan_atasan.Get("dlt")
 Dim alasan As String = pertimbangan_atasan.Get("alasan")
 Dim opadd As String = pertimbangan_atasan.Get("opadd")
 Dim kinerja As Int = pertimbangan_atasan.Get("kinerja")
 Dim cutiid As String = pertimbangan_atasan.Get("cutiid")
 Dim tgledit As String = pertimbangan_atasan.Get("tgledit")
 Dim pcadd As String = pertimbangan_atasan.Get("pcadd")
 Dim tgladd As String = pertimbangan_atasan.Get("tgladd")
 Dim persetujuan As Int = pertimbangan_atasan.Get("persetujuan")
 Dim pelaksanaharianid As String = pertimbangan_atasan.Get("pelaksanaharianid")
 Dim hambatpekerjaan As Int = pertimbangan_atasan.Get("hambatpekerjaan")
 Dim pcedit As String = pertimbangan_atasan.Get("pcedit")
 Dim cutiid As String = coldata.Get("cutiid")
 Dim tgledit As String = coldata.Get("tgledit")
 Dim pcadd As String = coldata.Get("pcadd")
 Dim jenis_cuti As Map = coldata.Get("jenis_cuti")
 Dim opadd As String = jenis_cuti.Get("opadd")
 Dim tgledit As String = jenis_cuti.Get("tgledit")
 Dim pcadd As String = jenis_cuti.Get("pcadd")
 Dim kode As String = jenis_cuti.Get("kode")
 Dim tgladd As String = jenis_cuti.Get("tgladd")
 Dim opedit As String = jenis_cuti.Get("opedit")
 Dim uraian As String = jenis_cuti.Get("uraian")
 Dim pcedit As String = jenis_cuti.Get("pcedit")
 Dim jeniscutiid As String = jenis_cuti.Get("jeniscutiid")
 Dim dlt As String = jenis_cuti.Get("dlt")
 Dim tgladd As String = coldata.Get("tgladd")
 Dim persetujuan_kadinav As Map = coldata.Get("persetujuan_kadinav")
 Dim opadd As String = persetujuan_kadinav.Get("opadd")
 Dim cutiid As String = persetujuan_kadinav.Get("cutiid")
 Dim tgledit As String = persetujuan_kadinav.Get("tgledit")
 Dim cutipersetujuankadisnavid As String = persetujuan_kadinav.Get("cutipersetujuankadisnavid")
 Dim pcadd As String = persetujuan_kadinav.Get("pcadd")
 Dim opadd_pegawai As String = persetujuan_kadinav.Get("opadd_pegawai")
 Dim tgladd As String = persetujuan_kadinav.Get("tgladd")
 Dim opedit As String = persetujuan_kadinav.Get("opedit")
 Dim persetujuan As Int = persetujuan_kadinav.Get("persetujuan")
 Dim pcedit As String = persetujuan_kadinav.Get("pcedit")
 Dim dlt As String = persetujuan_kadinav.Get("dlt")
 Dim arahan As String = persetujuan_kadinav.Get("arahan")
 Dim durasi As Int = coldata.Get("durasi")
 Dim pcedit As String = coldata.Get("pcedit")
 Dim pegawai As Map = coldata.Get("pegawai")
 Dim jeniskelamin As Int = pegawai.Get("jeniskelamin")
 Dim kotaktp As String = pegawai.Get("kotaktp")
 Dim urlfoto As String = pegawai.Get("urlfoto")
 Dim fotomedicalcheckup As String = pegawai.Get("fotomedicalcheckup")
 Dim provinsisekarang As String = pegawai.Get("provinsisekarang")
 Dim pinabsensi As Int = pegawai.Get("pinabsensi")
 Dim nip As String = pegawai.Get("nip")
 Dim tgledit As String = pegawai.Get("tgledit")
 Dim tgllahir As String = pegawai.Get("tgllahir")
 Dim pcadd As String = pegawai.Get("pcadd")
 Dim tempatlahir As String = pegawai.Get("tempatlahir")
 Dim statuspegawai As Int = pegawai.Get("statuspegawai")
 Dim email As String = pegawai.Get("email")
 Dim kotasekarang As String = pegawai.Get("kotasekarang")
 Dim fotoktp As String = pegawai.Get("fotoktp")
 Dim longitude_rumah As String = pegawai.Get("longitude_rumah")
 Dim provinsiktp As String = pegawai.Get("provinsiktp")
 Dim pegawaiid As String = pegawai.Get("pegawaiid")
 Dim kodeposktp As String = pegawai.Get("kodeposktp")
 Dim npwp As String = pegawai.Get("npwp")
 Dim opedit As String = pegawai.Get("opedit")
 Dim alamatktp As String = pegawai.Get("alamatktp")
 Dim latitude_rumah As String = pegawai.Get("latitude_rumah")
 Dim dlt As String = pegawai.Get("dlt")
 Dim alamatsekarang As String = pegawai.Get("alamatsekarang")
 Dim latitude_office As String = pegawai.Get("latitude_office")
 Dim opadd As String = pegawai.Get("opadd")
 Dim namapegawai As String = pegawai.Get("namapegawai")
 Dim longitude_office As String = pegawai.Get("longitude_office")
 Dim kodepossekarang As String = pegawai.Get("kodepossekarang")
 Dim tgladd As String = pegawai.Get("tgladd")
 Dim nohp As String = pegawai.Get("nohp")
 Dim pcedit As String = pegawai.Get("pcedit")
 Dim pertimbangan_ktu As Map = coldata.Get("pertimbangan_ktu")
 Dim opadd_pegawai As Map = pertimbangan_ktu.Get("opadd_pegawai")
 Dim jeniskelamin As Int = opadd_pegawai.Get("jeniskelamin")
 Dim kotaktp As String = opadd_pegawai.Get("kotaktp")
 Dim urlfoto As String = opadd_pegawai.Get("urlfoto")
 Dim fotomedicalcheckup As String = opadd_pegawai.Get("fotomedicalcheckup")
 Dim provinsisekarang As String = opadd_pegawai.Get("provinsisekarang")
 Dim pinabsensi As Int = opadd_pegawai.Get("pinabsensi")
 Dim nip As String = opadd_pegawai.Get("nip")
 Dim tgledit As String = opadd_pegawai.Get("tgledit")
 Dim tgllahir As String = opadd_pegawai.Get("tgllahir")
 Dim pcadd As String = opadd_pegawai.Get("pcadd")
 Dim tempatlahir As String = opadd_pegawai.Get("tempatlahir")
 Dim statuspegawai As Int = opadd_pegawai.Get("statuspegawai")
 Dim email As String = opadd_pegawai.Get("email")
 Dim kotasekarang As String = opadd_pegawai.Get("kotasekarang")
 Dim fotoktp As String = opadd_pegawai.Get("fotoktp")
 Dim longitude_rumah As String = opadd_pegawai.Get("longitude_rumah")
 Dim provinsiktp As String = opadd_pegawai.Get("provinsiktp")
 Dim pegawaiid As String = opadd_pegawai.Get("pegawaiid")
 Dim kodeposktp As String = opadd_pegawai.Get("kodeposktp")
 Dim npwp As String = opadd_pegawai.Get("npwp")
 Dim opedit As String = opadd_pegawai.Get("opedit")
 Dim alamatktp As String = opadd_pegawai.Get("alamatktp")
 Dim latitude_rumah As String = opadd_pegawai.Get("latitude_rumah")
 Dim dlt As String = opadd_pegawai.Get("dlt")
 Dim alamatsekarang As String = opadd_pegawai.Get("alamatsekarang")
 Dim latitude_office As String = opadd_pegawai.Get("latitude_office")
 Dim opadd As String = opadd_pegawai.Get("opadd")
 Dim namapegawai As String = opadd_pegawai.Get("namapegawai")
 Dim longitude_office As String = opadd_pegawai.Get("longitude_office")
 Dim kodepossekarang As String = opadd_pegawai.Get("kodepossekarang")
 Dim tgladd As String = opadd_pegawai.Get("tgladd")
 Dim nohp As String = opadd_pegawai.Get("nohp")
 Dim pcedit As String = opadd_pegawai.Get("pcedit")
 Dim cutipertimbanganktuid As String = pertimbangan_ktu.Get("cutipertimbanganktuid")
 Dim opedit As String = pertimbangan_ktu.Get("opedit")
 Dim dlt As String = pertimbangan_ktu.Get("dlt")
 Dim disiplinkepatuhan As Int = pertimbangan_ktu.Get("disiplinkepatuhan")
 Dim alasan As String = pertimbangan_ktu.Get("alasan")
 Dim masalahadm As Int = pertimbangan_ktu.Get("masalahadm")
 Dim opadd As String = pertimbangan_ktu.Get("opadd")
 Dim cutiid As String = pertimbangan_ktu.Get("cutiid")
 Dim tgledit As String = pertimbangan_ktu.Get("tgledit")
 Dim solusimasalahadm As String = pertimbangan_ktu.Get("solusimasalahadm")
 Dim pcadd As String = pertimbangan_ktu.Get("pcadd")
 Dim tgladd As String = pertimbangan_ktu.Get("tgladd")
 Dim persetujuan As Int = pertimbangan_ktu.Get("persetujuan")
 Dim pcedit As String = pertimbangan_ktu.Get("pcedit")
Next
 
Upvote 1

syerif

Active Member
Licensed User
Longtime User
Copy/Paste JSON here.

This is result:
B4X:
Dim parser As JSONParser
parser.Initialize(<text>)
Dim root As Map = parser.NextObject
Dim data As List = root.Get("data")
For Each coldata As Map In data
 Dim pegawaiid As String = coldata.Get("pegawaiid")
 Dim alasancuti As String = coldata.Get("alasancuti")
 Dim opedit As String = coldata.Get("opedit")
 Dim jeniscutiid As String = coldata.Get("jeniscutiid")
 Dim tanggalcuti As String = coldata.Get("tanggalcuti")
 Dim dlt As String = coldata.Get("dlt")
 Dim opadd As String = coldata.Get("opadd")
 Dim notelp As String = coldata.Get("notelp")
 Dim alamatcuti As String = coldata.Get("alamatcuti")
 Dim pertimbangan_atasan As Map = coldata.Get("pertimbangan_atasan")
 Dim penunjukanpelaksanaharian As Int = pertimbangan_atasan.Get("penunjukanpelaksanaharian")
 Dim opadd_pegawai As Map = pertimbangan_atasan.Get("opadd_pegawai")
 Dim jeniskelamin As Int = opadd_pegawai.Get("jeniskelamin")
 Dim kotaktp As String = opadd_pegawai.Get("kotaktp")
 Dim urlfoto As String = opadd_pegawai.Get("urlfoto")
 Dim fotomedicalcheckup As String = opadd_pegawai.Get("fotomedicalcheckup")
 Dim provinsisekarang As String = opadd_pegawai.Get("provinsisekarang")
 Dim pinabsensi As Int = opadd_pegawai.Get("pinabsensi")
 Dim nip As String = opadd_pegawai.Get("nip")
 Dim tgledit As String = opadd_pegawai.Get("tgledit")
 Dim tgllahir As String = opadd_pegawai.Get("tgllahir")
 Dim pcadd As String = opadd_pegawai.Get("pcadd")
 Dim tempatlahir As String = opadd_pegawai.Get("tempatlahir")
 Dim statuspegawai As Int = opadd_pegawai.Get("statuspegawai")
 Dim email As String = opadd_pegawai.Get("email")
 Dim kotasekarang As String = opadd_pegawai.Get("kotasekarang")
 Dim fotoktp As String = opadd_pegawai.Get("fotoktp")
 Dim longitude_rumah As String = opadd_pegawai.Get("longitude_rumah")
 Dim provinsiktp As String = opadd_pegawai.Get("provinsiktp")
 Dim pegawaiid As String = opadd_pegawai.Get("pegawaiid")
 Dim kodeposktp As String = opadd_pegawai.Get("kodeposktp")
 Dim npwp As String = opadd_pegawai.Get("npwp")
 Dim opedit As String = opadd_pegawai.Get("opedit")
 Dim alamatktp As String = opadd_pegawai.Get("alamatktp")
 Dim latitude_rumah As String = opadd_pegawai.Get("latitude_rumah")
 Dim dlt As String = opadd_pegawai.Get("dlt")
 Dim alamatsekarang As String = opadd_pegawai.Get("alamatsekarang")
 Dim latitude_office As String = opadd_pegawai.Get("latitude_office")
 Dim opadd As String = opadd_pegawai.Get("opadd")
 Dim namapegawai As String = opadd_pegawai.Get("namapegawai")
 Dim longitude_office As String = opadd_pegawai.Get("longitude_office")
 Dim kodepossekarang As String = opadd_pegawai.Get("kodepossekarang")
 Dim tgladd As String = opadd_pegawai.Get("tgladd")
 Dim nohp As String = opadd_pegawai.Get("nohp")
 Dim pcedit As String = opadd_pegawai.Get("pcedit")
 Dim solusihambatan As String = pertimbangan_atasan.Get("solusihambatan")
 Dim opedit As String = pertimbangan_atasan.Get("opedit")
 Dim cutipertimbanganatasanid As String = pertimbangan_atasan.Get("cutipertimbanganatasanid")
 Dim pelaksana_harian As Map = pertimbangan_atasan.Get("pelaksana_harian")
 Dim jeniskelamin As Int = pelaksana_harian.Get("jeniskelamin")
 Dim kotaktp As String = pelaksana_harian.Get("kotaktp")
 Dim urlfoto As String = pelaksana_harian.Get("urlfoto")
 Dim fotomedicalcheckup As String = pelaksana_harian.Get("fotomedicalcheckup")
 Dim provinsisekarang As String = pelaksana_harian.Get("provinsisekarang")
 Dim pinabsensi As Int = pelaksana_harian.Get("pinabsensi")
 Dim nip As String = pelaksana_harian.Get("nip")
 Dim tgledit As String = pelaksana_harian.Get("tgledit")
 Dim tgllahir As String = pelaksana_harian.Get("tgllahir")
 Dim pcadd As String = pelaksana_harian.Get("pcadd")
 Dim tempatlahir As String = pelaksana_harian.Get("tempatlahir")
 Dim statuspegawai As Int = pelaksana_harian.Get("statuspegawai")
 Dim email As String = pelaksana_harian.Get("email")
 Dim kotasekarang As String = pelaksana_harian.Get("kotasekarang")
 Dim fotoktp As String = pelaksana_harian.Get("fotoktp")
 Dim longitude_rumah As String = pelaksana_harian.Get("longitude_rumah")
 Dim provinsiktp As String = pelaksana_harian.Get("provinsiktp")
 Dim pegawaiid As String = pelaksana_harian.Get("pegawaiid")
 Dim kodeposktp As String = pelaksana_harian.Get("kodeposktp")
 Dim npwp As String = pelaksana_harian.Get("npwp")
 Dim opedit As String = pelaksana_harian.Get("opedit")
 Dim alamatktp As String = pelaksana_harian.Get("alamatktp")
 Dim latitude_rumah As String = pelaksana_harian.Get("latitude_rumah")
 Dim dlt As String = pelaksana_harian.Get("dlt")
 Dim alamatsekarang As String = pelaksana_harian.Get("alamatsekarang")
 Dim latitude_office As String = pelaksana_harian.Get("latitude_office")
 Dim opadd As String = pelaksana_harian.Get("opadd")
 Dim namapegawai As String = pelaksana_harian.Get("namapegawai")
 Dim longitude_office As String = pelaksana_harian.Get("longitude_office")
 Dim kodepossekarang As String = pelaksana_harian.Get("kodepossekarang")
 Dim tgladd As String = pelaksana_harian.Get("tgladd")
 Dim nohp As String = pelaksana_harian.Get("nohp")
 Dim pcedit As String = pelaksana_harian.Get("pcedit")
 Dim dlt As String = pertimbangan_atasan.Get("dlt")
 Dim alasan As String = pertimbangan_atasan.Get("alasan")
 Dim opadd As String = pertimbangan_atasan.Get("opadd")
 Dim kinerja As Int = pertimbangan_atasan.Get("kinerja")
 Dim cutiid As String = pertimbangan_atasan.Get("cutiid")
 Dim tgledit As String = pertimbangan_atasan.Get("tgledit")
 Dim pcadd As String = pertimbangan_atasan.Get("pcadd")
 Dim tgladd As String = pertimbangan_atasan.Get("tgladd")
 Dim persetujuan As Int = pertimbangan_atasan.Get("persetujuan")
 Dim pelaksanaharianid As String = pertimbangan_atasan.Get("pelaksanaharianid")
 Dim hambatpekerjaan As Int = pertimbangan_atasan.Get("hambatpekerjaan")
 Dim pcedit As String = pertimbangan_atasan.Get("pcedit")
 Dim cutiid As String = coldata.Get("cutiid")
 Dim tgledit As String = coldata.Get("tgledit")
 Dim pcadd As String = coldata.Get("pcadd")
 Dim jenis_cuti As Map = coldata.Get("jenis_cuti")
 Dim opadd As String = jenis_cuti.Get("opadd")
 Dim tgledit As String = jenis_cuti.Get("tgledit")
 Dim pcadd As String = jenis_cuti.Get("pcadd")
 Dim kode As String = jenis_cuti.Get("kode")
 Dim tgladd As String = jenis_cuti.Get("tgladd")
 Dim opedit As String = jenis_cuti.Get("opedit")
 Dim uraian As String = jenis_cuti.Get("uraian")
 Dim pcedit As String = jenis_cuti.Get("pcedit")
 Dim jeniscutiid As String = jenis_cuti.Get("jeniscutiid")
 Dim dlt As String = jenis_cuti.Get("dlt")
 Dim tgladd As String = coldata.Get("tgladd")
 Dim persetujuan_kadinav As Map = coldata.Get("persetujuan_kadinav")
 Dim opadd As String = persetujuan_kadinav.Get("opadd")
 Dim cutiid As String = persetujuan_kadinav.Get("cutiid")
 Dim tgledit As String = persetujuan_kadinav.Get("tgledit")
 Dim cutipersetujuankadisnavid As String = persetujuan_kadinav.Get("cutipersetujuankadisnavid")
 Dim pcadd As String = persetujuan_kadinav.Get("pcadd")
 Dim opadd_pegawai As String = persetujuan_kadinav.Get("opadd_pegawai")
 Dim tgladd As String = persetujuan_kadinav.Get("tgladd")
 Dim opedit As String = persetujuan_kadinav.Get("opedit")
 Dim persetujuan As Int = persetujuan_kadinav.Get("persetujuan")
 Dim pcedit As String = persetujuan_kadinav.Get("pcedit")
 Dim dlt As String = persetujuan_kadinav.Get("dlt")
 Dim arahan As String = persetujuan_kadinav.Get("arahan")
 Dim durasi As Int = coldata.Get("durasi")
 Dim pcedit As String = coldata.Get("pcedit")
 Dim pegawai As Map = coldata.Get("pegawai")
 Dim jeniskelamin As Int = pegawai.Get("jeniskelamin")
 Dim kotaktp As String = pegawai.Get("kotaktp")
 Dim urlfoto As String = pegawai.Get("urlfoto")
 Dim fotomedicalcheckup As String = pegawai.Get("fotomedicalcheckup")
 Dim provinsisekarang As String = pegawai.Get("provinsisekarang")
 Dim pinabsensi As Int = pegawai.Get("pinabsensi")
 Dim nip As String = pegawai.Get("nip")
 Dim tgledit As String = pegawai.Get("tgledit")
 Dim tgllahir As String = pegawai.Get("tgllahir")
 Dim pcadd As String = pegawai.Get("pcadd")
 Dim tempatlahir As String = pegawai.Get("tempatlahir")
 Dim statuspegawai As Int = pegawai.Get("statuspegawai")
 Dim email As String = pegawai.Get("email")
 Dim kotasekarang As String = pegawai.Get("kotasekarang")
 Dim fotoktp As String = pegawai.Get("fotoktp")
 Dim longitude_rumah As String = pegawai.Get("longitude_rumah")
 Dim provinsiktp As String = pegawai.Get("provinsiktp")
 Dim pegawaiid As String = pegawai.Get("pegawaiid")
 Dim kodeposktp As String = pegawai.Get("kodeposktp")
 Dim npwp As String = pegawai.Get("npwp")
 Dim opedit As String = pegawai.Get("opedit")
 Dim alamatktp As String = pegawai.Get("alamatktp")
 Dim latitude_rumah As String = pegawai.Get("latitude_rumah")
 Dim dlt As String = pegawai.Get("dlt")
 Dim alamatsekarang As String = pegawai.Get("alamatsekarang")
 Dim latitude_office As String = pegawai.Get("latitude_office")
 Dim opadd As String = pegawai.Get("opadd")
 Dim namapegawai As String = pegawai.Get("namapegawai")
 Dim longitude_office As String = pegawai.Get("longitude_office")
 Dim kodepossekarang As String = pegawai.Get("kodepossekarang")
 Dim tgladd As String = pegawai.Get("tgladd")
 Dim nohp As String = pegawai.Get("nohp")
 Dim pcedit As String = pegawai.Get("pcedit")
 Dim pertimbangan_ktu As Map = coldata.Get("pertimbangan_ktu")
 Dim opadd_pegawai As Map = pertimbangan_ktu.Get("opadd_pegawai")
 Dim jeniskelamin As Int = opadd_pegawai.Get("jeniskelamin")
 Dim kotaktp As String = opadd_pegawai.Get("kotaktp")
 Dim urlfoto As String = opadd_pegawai.Get("urlfoto")
 Dim fotomedicalcheckup As String = opadd_pegawai.Get("fotomedicalcheckup")
 Dim provinsisekarang As String = opadd_pegawai.Get("provinsisekarang")
 Dim pinabsensi As Int = opadd_pegawai.Get("pinabsensi")
 Dim nip As String = opadd_pegawai.Get("nip")
 Dim tgledit As String = opadd_pegawai.Get("tgledit")
 Dim tgllahir As String = opadd_pegawai.Get("tgllahir")
 Dim pcadd As String = opadd_pegawai.Get("pcadd")
 Dim tempatlahir As String = opadd_pegawai.Get("tempatlahir")
 Dim statuspegawai As Int = opadd_pegawai.Get("statuspegawai")
 Dim email As String = opadd_pegawai.Get("email")
 Dim kotasekarang As String = opadd_pegawai.Get("kotasekarang")
 Dim fotoktp As String = opadd_pegawai.Get("fotoktp")
 Dim longitude_rumah As String = opadd_pegawai.Get("longitude_rumah")
 Dim provinsiktp As String = opadd_pegawai.Get("provinsiktp")
 Dim pegawaiid As String = opadd_pegawai.Get("pegawaiid")
 Dim kodeposktp As String = opadd_pegawai.Get("kodeposktp")
 Dim npwp As String = opadd_pegawai.Get("npwp")
 Dim opedit As String = opadd_pegawai.Get("opedit")
 Dim alamatktp As String = opadd_pegawai.Get("alamatktp")
 Dim latitude_rumah As String = opadd_pegawai.Get("latitude_rumah")
 Dim dlt As String = opadd_pegawai.Get("dlt")
 Dim alamatsekarang As String = opadd_pegawai.Get("alamatsekarang")
 Dim latitude_office As String = opadd_pegawai.Get("latitude_office")
 Dim opadd As String = opadd_pegawai.Get("opadd")
 Dim namapegawai As String = opadd_pegawai.Get("namapegawai")
 Dim longitude_office As String = opadd_pegawai.Get("longitude_office")
 Dim kodepossekarang As String = opadd_pegawai.Get("kodepossekarang")
 Dim tgladd As String = opadd_pegawai.Get("tgladd")
 Dim nohp As String = opadd_pegawai.Get("nohp")
 Dim pcedit As String = opadd_pegawai.Get("pcedit")
 Dim cutipertimbanganktuid As String = pertimbangan_ktu.Get("cutipertimbanganktuid")
 Dim opedit As String = pertimbangan_ktu.Get("opedit")
 Dim dlt As String = pertimbangan_ktu.Get("dlt")
 Dim disiplinkepatuhan As Int = pertimbangan_ktu.Get("disiplinkepatuhan")
 Dim alasan As String = pertimbangan_ktu.Get("alasan")
 Dim masalahadm As Int = pertimbangan_ktu.Get("masalahadm")
 Dim opadd As String = pertimbangan_ktu.Get("opadd")
 Dim cutiid As String = pertimbangan_ktu.Get("cutiid")
 Dim tgledit As String = pertimbangan_ktu.Get("tgledit")
 Dim solusimasalahadm As String = pertimbangan_ktu.Get("solusimasalahadm")
 Dim pcadd As String = pertimbangan_ktu.Get("pcadd")
 Dim tgladd As String = pertimbangan_ktu.Get("tgladd")
 Dim persetujuan As Int = pertimbangan_ktu.Get("persetujuan")
 Dim pcedit As String = pertimbangan_ktu.Get("pcedit")
Next
it got error at this line Dim pertimbangan_atasan As Map = coldata.Get("pertimbangan_atasan")
 
Upvote 0

DonManfred

Expert
Licensed User
Longtime User
The json is inconsequent.
One time
Dim opadd_pegawai As Map = pertimbangan_atasan.Get("opadd_pegawai"):
        Dim opadd_pegawai As Map = pertimbangan_atasan.Get("opadd_pegawai")
opadd_pegawai is a map. and later in the json opadd_pegawai only returns a STRING.

You need to change this inconsequency.
 
Upvote 0

syerif

Active Member
Licensed User
Longtime User
The json is inconsequent.
One time
Dim opadd_pegawai As Map = pertimbangan_atasan.Get("opadd_pegawai")"opadd_pegawai"):
        Dim opadd_pegawai As Map = pertimbangan_atasan.Get("opadd_pegawai")
opadd_pegawai is a map. and later in the json opadd_pegawai only returns a STRING.

You need to change this inconsequency.
i only consume API, i can not change JSON Format, any suggestion to my problem?
 
Upvote 0

DonManfred

Expert
Licensed User
Longtime User
i can not change JSON Format, any suggestion to my problem?
Change the code generated to match the namingrules of Objects.
The compile will say something if you first use var X as a map and later you´ll use var X as string.
Rename the variable generated (or better the outer map Objectname.)
 
Upvote 0

TILogistic

Expert
Licensed User
Longtime User
?
"opadd_pegawai": null
valid:
B4X:
If Not(pertimbangan_atasan.Get("opadd_pegawai") = Null) Then
    Dim opadd_pegawai As Map = pertimbangan_atasan.Get("opadd_pegawai")
    ....
    ...
End If

when Json data is dynamic you need to validate if the field exists or has a valid value

if field exists
pertimbangan_atasan.ContainsKey("opadd_pegawai")

if exists get value, if not default value ("")
pertimbangan_atasan.GetDefault("opadd_pegawai", "")

valid type:
If pertimbangan_atasan.Get("opadd_pegawai") Is Map Then

End If
 
Last edited:
Upvote 0

TILogistic

Expert
Licensed User
Longtime User
test:
You have to check the subbranches, because there are fields that are repeated in the subbranches and subbranches that are null.
B4X:
Dim parser As JSONParser
    parser.Initialize(s)
    Dim mRoot As Map = parser.NextObject
    Dim data As List = mRoot.Get("data")
    For Each coldata As Map In data
        
        Dim cutiid As String = coldata.Get("cutiid")
        Dim pegawaiid As String = coldata.Get("pegawaiid")
        Dim jeniscutiid As String = coldata.Get("jeniscutiid")
        Dim tanggalcuti As String = coldata.Get("tanggalcuti")
        Dim durasi As Int = coldata.Get("durasi")
        Dim alasancuti As String = coldata.Get("alasancuti")
        Dim alamatcuti As String = coldata.Get("alamatcuti")
        Dim notelp As String = coldata.Get("notelp")
        Dim opadd As String = coldata.Get("opadd")
        Dim pcadd As String = coldata.Get("pcadd")
        Dim tgladd As String = coldata.Get("tgladd")
        Dim opedit As String = coldata.Get("opedit")
        Dim pcedit As String = coldata.Get("pcedit")
        Dim tgledit As String = coldata.Get("tgledit")
        Dim dlt As String = coldata.Get("dlt")

        If coldata.Get("pegawai") Is Map Then
            Dim pegawai As Map = coldata.Get("pegawai")
'            Log(pegawai.As(JSON).ToString)
            Log("pegawai: " & pegawai.ContainsKey("opadd_pegawai"))
        End If
        
        If coldata.Get("jenis_cuti") Is Map Then
            Dim jenis_cuti As Map = coldata.Get("jenis_cuti")
'            Log(jenis_cuti.As(JSON).ToString)
            Log("jenis_cuti: " & jenis_cuti.ContainsKey("opadd_pegawai"))
        End If
        
        If coldata.Get("pertimbangan_atasan") Is Map Then
            Dim pertimbangan_atasan As Map = coldata.Get("pertimbangan_atasan")
'            Log(pertimbangan_atasan.As(JSON).ToString)
            Log("pertimbangan_atasan: " & pertimbangan_atasan.ContainsKey("opadd_pegawai"))
        End If

        If coldata.Get("pertimbangan_ktu") Is Map Then
            Dim pertimbangan_ktu As Map = coldata.Get("pertimbangan_ktu")
'            Log(pertimbangan_ktu.As(JSON).ToString)
            Log("pertimbangan_ktu: " & pertimbangan_ktu.ContainsKey("opadd_pegawai"))
        End If
        
        If coldata.Get("persetujuan_kadinav") Is Map Then
            Dim persetujuan_kadinav As Map = coldata.Get("persetujuan_kadinav")
'            Log(persetujuan_kadinav.As(JSON).ToString)
            Log("persetujuan_kadinav: " & persetujuan_kadinav.ContainsKey("opadd_pegawai"))
        End If
        
        Log("----------------------------------")
    Next

1644266897204.png
 
Upvote 0
Top