X++ Conpeek Conpoke AX

static void Test_Conpeek_Conpoke(Args _args)
{
    container c1 = ["item1", "item2", "item3"];
    container c2;
    int i;
    void conPrint(container c)
    {
        for (i = 1 ; i <= conlen(c) ; i++)
        {
            info(conpeek(c, i));
        }
    };
    conPrint(c1);
    c2 = conpoke(c1, 4, "PokedItem");
    info('---');
    conPrint(c2);
    info(conpeek(c1, 1));
    c2 = connull();
    info('---');
    conPrint(c2);
    info(int2str(conlen(c2)));
}