View previous topic :: View next topic
|
Author |
Message |
Manikandesvaran D
New User
Joined: 05 Dec 2013 Posts: 11 Location: india
|
|
|
|
Hi All,
I want to keep a LOCK on my GET QUEUE Command.When i tried to write LOCK on GET QUEUE, results in error while compilation.
Syntax 1 :
GET QUEUE ID WS-QUEUE
KEEP INTO WS-QUEUE-INFORMATION
TO WS-QUEUE-END
LOCK.
$
Error : <E> DC163004 EXPECTED PERIOD NOT FOUND. STMT FLUSHED.
Syntax 2 :
GET QUEUE ID WS-QUEUE
KEEP LOCK INTO WS-QUEUE-INFORMATION
$
Error : <E> EXPECTED KEYWORD INTO NOT FOUND. STMT FLUSHED.
TO WS-QUEUE-END
FIRST.
But without LOCK statement the code is getting compiled successful
GET QUEUE ID WS-QUEUE
KEEP INTO WS-QUEUE-INFORMATION
TO WS-QUEUE-END
FIRST.
above syntax Compiled successfully.
But i want to use LOCK statement on my GET QUEUE command.Could anyone please give me the correct syntax for that.
Thanks in advance. |
|
Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2454 Location: Hampshire, UK
|
|
|
|
What does the manual say for the syntax? You HAVE to follow that, not make up your own. I don't recall a LOCK statement from my days of doing IDMS many years ago so it may be something more recent and, anyway, my manuals are in another country so I cannot check it out. |
|
Back to top |
|
|
Manikandesvaran D
New User
Joined: 05 Dec 2013 Posts: 11 Location: india
|
|
|
|
Nic Clouston wrote: |
What does the manual say for the syntax? You HAVE to follow that, not make up your own. I don't recall a LOCK statement from my days of doing IDMS many years ago so it may be something more recent and, anyway, my manuals are in another country so I cannot check it out. |
Thanks NIC for your response.
here is the manual.
***************************************************************
GET QUEUE
[[ID] queue-area]
┌ / Next◄ \ ┐
│ │ First │ │
│ < Last > │
│ │ Prior │ │
│ │ N th │ │
└ \ RECord ID scr-rec-id / ┘
/ \
< Delete◄ >
\ Keep /
/ \
< LOck◄ >
\ NOLock /
/ \
< Wait >
\ NOWait◄ /
┌ ┌/ \┐┐
│ INto buff-start │< TO buff-end >││
└ └\ MAX Length max-reclen /┘┘
[RETurn LENgth [INto] len-field]
***************************************************************
also in support.ca.com/cadocs/0/CA%20IDMS%2018%205%20User%20Bookshelf-ENU/Bookshelf_Files/HTML/IDMS_DML_Online_User_ENU/index.htm?toc.htm?985487.html |
|
Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2454 Location: Hampshire, UK
|
|
|
|
Please read and understand the syntax diagrams - LOck is default action. |
|
Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2454 Location: Hampshire, UK
|
|
|
|
Another possibility is that you are not looking at the manual that relates to your level of IDMS and that the level you are using does not have the LOCK option. |
|
Back to top |
|
|
Manikandesvaran D
New User
Joined: 05 Dec 2013 Posts: 11 Location: india
|
|
|
|
Nic Clouston wrote: |
Another possibility is that you are not looking at the manual that relates to your level of IDMS and that the level you are using does not have the LOCK option. |
Thanks NIC for your support.I will look into that. |
|
Back to top |
|
|
|