Listing 1. posting.tcl
ad_page_contract {
@author Reuven M. Lerner (<
@creation-date 2002-September-18
} {
} -properties {
postings:multirow
}
# Get all postings until now
set sql "SELECT PE.first_names || ' ' ||
PE.last_name
as user_name,
PA.email, PO.posting, PO.entry_date
FROM Persons PE, Parties PA,
atf_hello_postings PO
WHERE PE.person_id = PA.party_id
AND PE.person_id = PO.user_id
ORDER BY PO.entry_date DESC"
db_multirow postings get_postings $sql
ad_return_template
Copyright © 1994 - 2018 Linux Journal. All rights reserved.