Andre White
2019-12-17 14:16:54 UTC
Hi Guys,
Currently I have a tool to query Enscribe file using SQL command.
If you interested to try, just let me know.
----------------------------------------------------------------------------
Enscribe Query 2.0 (Beta) (Non-Commercial Version)
HEADING Command
DEFAULT IS ON
Example : HEADING ON
: HEADING OFF
RAWDATA Command
DEFAULT IS OFF
Example : RAWDATA ON
: RAWDATA OFF
CLEAR Command
DICT Command
Example : DICT $TEST.ADRTOOL
HELP Command
OUT or OUTPUT Command
Example : OUT TERM (PRINT TO TERMINAL)
: OUT $VOL.SUBVOL.FILENAME ! (WILL PURGE THE PREVIOUS DATA)
: OUT $VOL.SUBVOL.FILENAME (CONTINUE TO WRITE TO NEXT RECORD)
SEPARATOR Command
Example : SEPARATOR ,
SHOW Command
How To use : SHOW {RECS|DEFS} RECORD-NAME/DEFINITION-NAME, {TAL|COBOL}
: SHOW {RECS|DEFS} *
: SHOW {*}
Example : SHOW RECS *
: SHOW RECS ATDD1, TAL
: SHOW DEFS *
: SHOW DEFS ATDD1
: SHOW *
FUNCTIONS List
: UNPAK^BINARY or BIN^HEXCHAR^BINARY
: HEX^ASC^BINARY
: UNPAK or BIN^HEXCHAR
: HEX^ASC
: BINARY
: SUM
SELECT Command
Example : SELECT * FROM [TABLE] WHERE [CONDITION]
: SELECT [FIELD^NAME, ...] FROM [TABLE] WHERE [CONDITION] [LIMIT 1]
[SKIP 1]
: SELECT [FIELD^NAME, ...] FROM [=DEFINE^NAME] WHERE [CONDITION]
: SELECT * FROM $VOl.SUBVOL.FILENAME WHERE TERM-ID = "%TEST%" AND
AMT-1 > 700 LIMIT 50
: SELECT BINARY(TERM-ID) FROM $VOl.SUBVOL.FILENAME WHERE TERM-ID = "%T
EST%" AND AMT-1 > 700 LIMIT 50
: SELECT BINARY(TERM-ID[0:0]) FROM $VOl.SUBVOL.FILENAME WHERE TERM-ID
= "%TEST%" AND AMT-1 > 700 LIMIT 50
SET Command
Example : SET RECS TLF
: SET DEFS TLF
UPDATE Command (Coming Soon)
INSERT Command (Coming Soon)
HOW TO USE
1. YOU MUST SET THE DICT LOCATION USING DICT COMMAND
2. IF THE FILENAME SAME AS RECORD NAME, NO NEED TO SET RECS/DEFS
ELSE YOU NEED TO SET RECS/DEFS USING SET COMMAND
3. IF YOU WANT THE OUTPUT IN FILE YOU SHOULD USING OUT or OUTPUT COMMAND
4. IF YOU DONT WANT TO PRINT THE HEADER/HEADING YOU SHOULD USING HEADING COMMAND
Currently I have a tool to query Enscribe file using SQL command.
If you interested to try, just let me know.
----------------------------------------------------------------------------
Enscribe Query 2.0 (Beta) (Non-Commercial Version)
help
Help is available for the following commands :HEADING Command
DEFAULT IS ON
Example : HEADING ON
: HEADING OFF
RAWDATA Command
DEFAULT IS OFF
Example : RAWDATA ON
: RAWDATA OFF
CLEAR Command
DICT Command
Example : DICT $TEST.ADRTOOL
HELP Command
OUT or OUTPUT Command
Example : OUT TERM (PRINT TO TERMINAL)
: OUT $VOL.SUBVOL.FILENAME ! (WILL PURGE THE PREVIOUS DATA)
: OUT $VOL.SUBVOL.FILENAME (CONTINUE TO WRITE TO NEXT RECORD)
SEPARATOR Command
Example : SEPARATOR ,
SHOW Command
How To use : SHOW {RECS|DEFS} RECORD-NAME/DEFINITION-NAME, {TAL|COBOL}
: SHOW {RECS|DEFS} *
: SHOW {*}
Example : SHOW RECS *
: SHOW RECS ATDD1, TAL
: SHOW DEFS *
: SHOW DEFS ATDD1
: SHOW *
FUNCTIONS List
: UNPAK^BINARY or BIN^HEXCHAR^BINARY
: HEX^ASC^BINARY
: UNPAK or BIN^HEXCHAR
: HEX^ASC
: BINARY
: SUM
SELECT Command
Example : SELECT * FROM [TABLE] WHERE [CONDITION]
: SELECT [FIELD^NAME, ...] FROM [TABLE] WHERE [CONDITION] [LIMIT 1]
[SKIP 1]
: SELECT [FIELD^NAME, ...] FROM [=DEFINE^NAME] WHERE [CONDITION]
: SELECT * FROM $VOl.SUBVOL.FILENAME WHERE TERM-ID = "%TEST%" AND
AMT-1 > 700 LIMIT 50
: SELECT BINARY(TERM-ID) FROM $VOl.SUBVOL.FILENAME WHERE TERM-ID = "%T
EST%" AND AMT-1 > 700 LIMIT 50
: SELECT BINARY(TERM-ID[0:0]) FROM $VOl.SUBVOL.FILENAME WHERE TERM-ID
= "%TEST%" AND AMT-1 > 700 LIMIT 50
SET Command
Example : SET RECS TLF
: SET DEFS TLF
UPDATE Command (Coming Soon)
INSERT Command (Coming Soon)
HOW TO USE
1. YOU MUST SET THE DICT LOCATION USING DICT COMMAND
2. IF THE FILENAME SAME AS RECORD NAME, NO NEED TO SET RECS/DEFS
ELSE YOU NEED TO SET RECS/DEFS USING SET COMMAND
3. IF YOU WANT THE OUTPUT IN FILE YOU SHOULD USING OUT or OUTPUT COMMAND
4. IF YOU DONT WANT TO PRINT THE HEADER/HEADING YOU SHOULD USING HEADING COMMAND
exit
$TEST ADRTOOL 3> z