SET VAR vtablename TEXT = NULL
DECLARE cursor1 CURSOR FOR SELECT sys_table_name FROM sys_tables
OPEN cursor1
FETCH cursor1 INTO vtablename INDICATOR vi
WHILE SQLCODE <>100 THEN
  LIST &vtablename
  FETCH cursor1 INTO vtablename INDICATOR vi
ENDWHILE
DROP CURSOR cursor1
RETURN

Jeff Richardson | Project Manager, Asset Verification Services (AVS)
DMA – DuCharme, McMillen & Associates, Inc. | 828 S Harrison Street Suite 650, 
Fort Wayne, IN 46802
Cell: 724-366-1724
Connect: jrichard...@dmainc.com<mailto:jrichard...@dmainc.com> | 
Website<http://www.dmainc.com/> | 
LinkedIn<https://www.linkedin.com/company/ducharme-mcmillen-&-associates> | 
Twitter<https://twitter.com/DMATAX> | 
Facebook<https://www.facebook.com/DMAtaxservices>
___________________________________________________________
ATTENTION: This message and all attachments are PRIVATE, and may contain 
information that is CONFIDENTIAL and PRIVILEGED.  If you have received this 
message in error, please notify the sender by reply e-mail and delete the 
message immediately.

From: rbase-l@googlegroups.com [mailto:rbase-l@googlegroups.com] On Behalf Of 
Kaleb Wade
Sent: Wednesday, October 12, 2016 3:06 PM
To: RBASE-L <rbase-l@googlegroups.com>
Subject: [RBASE-L] - Print all column names of all tables in database

I'm looking for a way to generate a list to print out all the column names and 
data types in every table of a database grouped by table name. Essentially it 
would be a printout of the what the Data Dictionary (F3) shows. Any suggestions?
--
You received this message because you are subscribed to the Google Groups 
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to 
rbase-l+unsubscr...@googlegroups.com<mailto:rbase-l+unsubscr...@googlegroups.com>.
For more options, visit https://groups.google.com/d/optout.

ATTENTION: This message and all attachments are PRIVATE, and may contain 
information that is CONFIDENTIAL and PRIVILEGED. If you have received this 
message in error, please notify the sender by reply e-mail and delete the 
message immediately.

Disclaimer

The information contained in this communication from the sender is 
confidential. It is intended solely for use by the recipient and others 
authorized to receive it. If you are not the recipient, you are hereby notified 
that any disclosure, copying, distribution or taking action in relation of the 
contents of this information is strictly prohibited and may be unlawful.

This email has been scanned for viruses and malware, and may have been 
automatically archived by Mimecast Ltd, an innovator in Software as a Service 
(SaaS) for business. Providing a safer and more useful place for your human 
generated data. Specializing in; Security, archiving and compliance. To find 
out more visit the Mimecast website.

-- 
You received this message because you are subscribed to the Google Groups 
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to rbase-l+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.

Reply via email to