version 1.2, 1999/09/20 13:48:01 |
version 1.3, 1999/09/20 14:30:53 |
|
|
#!/usr/bin/nawk -f |
#!/usr/bin/nawk -f |
|
|
|
# used both by support.bld and by groups.bld, since the formats are similar |
|
|
# convert data like this (order doesn't matter except 0 at front) |
# convert data like this (order doesn't matter except 0 at front) |
# 0 |
# 0 |
# C Canada |
# C Canada |
|
|
} |
} |
|
|
function dump() { |
function dump() { |
print "<TR><TD>" |
print "<TR>" |
if (indv != "") |
print "<TD>" |
print indv "<BR>" |
if (indv != "") |
print org "<BR>" addr |
print indv "<BR>" |
|
print org "<BR>" addr |
print " <TD>" city "<BR>" prov |
print " <TD>" city "<BR>" prov |
print " <TD>" phone "<BR>" fax |
print " <TD>" |
|
if (phone != "") |
|
print phone "<BR>" |
|
print fax |
print " <TD>" |
print " <TD>" |
print "<A HREF=\"mailto:" email "\">" email "</A>" |
if (email != "") |
print "<BR>" |
print "<A HREF=\"mailto:" email "\">" email "</A>" "<BR>" |
print "<A HREF=\"" url "\">" url "</A>" |
print "<A HREF=\"" url "\">" url "</A>" |
print " <TD>" note |
print " <TD>" note |
} |
} |