Skip to content

Instantly share code, notes, and snippets.

@wickchucked
Created May 8, 2013 21:47
Show Gist options
  • Save wickchucked/5543930 to your computer and use it in GitHub Desktop.
Save wickchucked/5543930 to your computer and use it in GitHub Desktop.
MQL command examples
.
.
. Example usage of mql command
.
.
*===============================================================================
:DEFINE CABDRW_ '0,F' Test Table
:DEFINE DRW_ 'F0' Test Table
:DEFINE TABLE_ <tbl>F0 Test Table
@.
@.rdb .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. CREATE TABLE Example
@.
@ brk .
.
*========================
CREATE TABLE empinfo in F0 (
"First" CHARACTER(20),
"Last" CHARACTER(20),
"Id" NUMERIC(5),
"Age" NUMERIC(3),
"City" CHARACTER(20),
"State" CHARACTER(15)
) ''empinfo table'';
@ brk rnm -1 .
@ lzr,CABDRW_,64,lin1 ldv <tbl>i4=64 gto lin+3 .
@ mql,CABDRW_,0199,,,,,,b '',-1 ,,<tbl>i4 .
@ dsp,CABDRW_,<tbl>,,,,,,,' CREATE TABLE complete. Location: '<tbl>'F0' .
@ ldv,z <tbl> .
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. INSERT INTO Example - If the number for values are the same as fields in the report
@.
@ brk,0,I .
*========================
INSERT INTO TABLE_ VALUES (
''Ed'',
''Winn'',
''1'',
''30'',
''Marshall'',
''Minnesota'');
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,CABDRW_,<tbl>,,,,,,,' INSERT INTO complete' .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. INSERT INTO Example - If the number for values are the same as fields in the report
@.
@ brk,0,I .
*========================
INSERT INTO TABLE_ VALUES (
''Bart'',
''Simpson'',
''2'',
''13'',
''Springfield'',
''Somewhere'');
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,CABDRW_,<tbl>,,,,,,,' INSERT INTO complete' .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. INSERT INTO Example - For a specific field(s)
@.
@ brk .
*========================
INSERT INTO TABLE_ ("First", "Last", "Id", "Age", "City", "State") VALUES (
''The'',
''Dude'',
''3'',
''60'',
''Hollywood'',
''California'');
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,CABDRW_,<tbl>,,,,,,,' INSERT INTO complete' .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. DELETE FROM Example -
@.
@ brk .
*========================
DELETE FROM TABLE_ WHERE Last = ''Dude'';
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,CABDRW_,<tbl>,,,,,,,' The dude abides..and hes gone.' .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. SELECT a single column
@.
@ brk .
*========================
SELECT first FROM TABLE_ WHERE First = ''Ed'';
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,-0,,,,,,,' showing SELECT single field result' .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. SELECT a multiple columns
@.
@ brk .
*========================
SELECT first,last,age FROM TABLE_ WHERE first = ''Ed'';
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,-0,,,,,,,' showing SELECT multiple fields result' .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. SELECT all from table
@.
@ brk .
*========================
SELECT * FROM TABLE_ WHERE first = ''Ed'';
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,-0,,,,,,,' showing SELECT all fields result' .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. ALTER TABLE Example 1
@.
@ brk .
*========================
ALTER TABLE TABLE_
ADD "New Field 1" CHARACTER(20);
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,CABDRW_,<tbl>,,,,,,,' added column New Field 1 to table' .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. ALTER TABLE Example 2 - Resizing a field
@.
@ brk .
*========================
ALTER TABLE TABLE_
Change "State" CHARACTER(30);
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,CABDRW_,<tbl>,,,,,,,' change column "State" from 15 to 30 characters' .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. ALTER TABLE Example 2 - Moving a field
@.
@ brk .
*========================
ALTER TABLE TABLE_
MOVE "Id" BEFORE "First";
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,CABDRW_,<tbl>,,,,,,,' move column "Id" to beginning of table' .
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. DROP TABLE Example
@.
@ brk .
*========================
DROP TABLE TABLE_
@ brk rnm -1 .
@ mql,CABDRW_,0199 '',-1
@ dsp,-0,,,,,,,' Table has bee deleted'
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@.
@. E R R O R ... woops
@.
@.----------------------------------------------------------------------------------------------------------------------------------
@0199:dsp,-0 .
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment