Method code for $builder._ar__list()

[Turn on line numbering]

---

arg args, opts;
var requests, w, all, r, g, list, group;

group = (> ._ar__get_group(args, opts) <);
if (!group)
    return "Goodbye.";
if (group != 'All) {
    requests = filter r in (group.requests()) where (!r[2][2]);
    requests = #[[group, requests]];
    .tell("** Un-Resolved " + group.name() + " Action Requests:");
    w = .linelen() - 20;
} else {
    requests = #[];
    for g in (setremove($argroup.children(), $dismissed_problems)) {
        list = filter r in (g.requests()) where (!r[2][2]);
        if (list)
            requests = dict_add(requests, g, list);
    }
    all = 1;
    .tell("** ALL Un-Resolved Action Requests:");
    w = .linelen() - 34;
}
return ._ar__listgrp(requests, w, all);

// $#Edited: 27 Aug 01 16:09 $user_lynx

---

["// Created 26-Mar-1995 as a part of ColdCore, see: @help Credit"]