Oracle – Table Structure

Posted on By David Kittell 
SELECT atc.TABLE_NAME
	,atc.COLUMN_NAME
	,atc.DATA_TYPE
	,CASE DATA_TYPE
		WHEN 'VARCHAR2'
			THEN '(' || DATA_LENGTH || ')'
		WHEN 'NUMBER'
			THEN CASE
					WHEN DATA_PRECISION IS NOT NULL
						THEN '(' || DATA_PRECISION || CASE
								WHEN DATA_SCALE <> 0
									THEN ',' || DATA_SCALE
								END
					END || CASE
					WHEN DATA_PRECISION IS NOT NULL
						THEN ')'
					END
		END DATA_LENGTH
FROM all_tab_columns atc
WHERE atc.TABLE_NAME = '<Table Name>';
Originally Posted on November 14, 2013
Last Updated on October 26, 2015
All information on this site is shared with the intention to help. Before any source code or program is ran on a production (non-development) system it is suggested you test it and fully understand what it is doing not just what it appears it is doing. I accept no responsibility for any damage you may do with this code.
Code Oracle SQL

Related Posts

Read Text File Line By Line

Posted on

Public Class ReadFromFile Shared Sub Main() Dim sFileName As String Dim srFileReader As System.IO.StreamReader Dim sInputLine As String sFileName = "test.txt" srFileReader = System.IO.File.OpenText(sFileName) sInputLine = srFileReader.ReadLine() Do Until sInputLine is Nothing System.Console.WriteLine(sInputLine) sInputLine = srFileReader.ReadLine() Loop End Sub End Class Originally Posted on September 18, 2013Last Updated on October…

Read More

Make textfield only accept numberic values

Posted on

$(document).ready(function() { $(".numbersonly").keyup(function (event) { var value = jQuery(this).val(); value = value.replace(/[^0-9]+/g, ”); jQuery(this).val(value); }); }); Originally Posted on July 3, 2013Last Updated on October 26, 2015 All information on this site is shared with the intention to help. Before any source code or program is ran on a production…

Read More

MessageBox Class

Posted on

Dim result = MessageBox.Show("Message To Display", "MessageBox Title", MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question) If result = DialogResult.Cancel Then MessageBox.Show("Cancel Button Pressed", "MessageBox Title",MessageBoxButtons.OK , MessageBoxIcon.Exclamation) ElseIf result = DialogResult.No Then MessageBox.Show("No Button Pressed", "MessageBox Title", MessageBoxButtons.OK, MessageBoxIcon.Error) ElseIf result = DialogResult.Yes Then MessageBox.Show("Yes Button Pressed", "MessageBox Title", MessageBoxButtons.OK, MessageBoxIcon.Information) End If var result…

Read More