RE: Collect all the nodes with a specified gi... ¿ ?

Subject: RE: Collect all the nodes with a specified gi... ¿ ?
From: Pieter Rijken <pieter.rijken@xxxxxx>
Date: Fri, 1 Oct 1999 10:12:36 +0200
Hi Reyes,

> (element FATHER 
>   (make element gi: (gi (current-node))
>     (let ((Keys  (filter-by-gi (current-node) '("KEY"))))
> 	  (make sequence 
> 	    (make element gi: "COLLECT" (process-collect-key Keys))
> 	    (process-children)
> 	  )
>     )
>   )
> )

(element FATHER
  (make element gi: "FATHER"
    (make sequence
      (make element gi: "collect"
        (process-node-list
          (select-elements (descendants (current-node)) '("key"))
        )
      )
      (process-children)
    )
  )
)

pieter


-- 
Pieter Rijken                          E-mail: pieter.rijken@xxxxxx

CMG Telecommunications and Utilities B.V.
Division Advanced Technology
Nieuwekade 1-19
P.O. Box 8038                 Phone: +31 30 2339300
3503 RA Utrecht               Fax:   +31 30 2339495
The Netherlands
-------------------------------------------------------------------

DISCLAIMER: This statement is not an official statement from, nor
            does it represent an official position of, CMG
            Telecommunications and Utilities B.V.

------------------------------------------------------------------- 


 DSSSList info and archive:  http://www.mulberrytech.com/dsssl/dssslist


Current Thread