IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Is the following MOVE statement works without Error?
IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
ramvishwa
Warnings : 2
New User


Joined: 18 Dec 2006
Posts: 18
Location: bangalore
PostPosted: Fri Jan 05, 2007 5:29 pm
 Reply with quote
WORKING-STORAGE SECTION.
01 WS-LOGIN.
02 USER PIC X(8).
02 PASSWORD PIC X(8).

------------------
----------------------------
EXEC CICS
RECIEVE MAP('MAP1') MAPSET('SIS')
INTO (MAP1I)
END-EXEC.
PARA2.
MOVE USERNMI TO WS-LOGIN.
MOVE PASWDI TO WS-LOGIN
This "MOVE" statement is associated with cics-cobol.. Clear my doubt. CORRECT ME IF AM WRONG..
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ
PostPosted: Fri Jan 05, 2007 6:07 pm
 Reply with quote
ramvishwa wrote:
Code:
WORKING-STORAGE SECTION.
            01 WS-LOGIN.
                 02 USER PIC X(8).       
                 02 PASSWORD PIC X(8).

        ------------------
           ----------------------------
             EXEC CICS
                   RECIEVE MAP('MAP1') MAPSET('SIS')
                   INTO (MAP1I)
             END-EXEC.
      PARA2.
             
MOVE USERNMI TO WS-LOGIN.
MOVE PASWDI TO WS-LOGIN
This "MOVE" statement is associated with cics-cobol.. Clear my doubt. CORRECT ME IF AM WRONG..
It would work better if you did this:
MOVE USERNMI TO USER OF WS-LOGIN.
MOVE PASWDI TO PASSWORD OF WS-LOGIN
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 

Similar Topics
Topic Forum Replies
No new posts Error to read log with rexx CLIST & REXX 11
No new posts Error when install DB2 DB2 2
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
No new posts COBOL - Move S9(11)v9(7) COMP-3 to -(... COBOL Programming 5
No new posts Error while running web tool kit REXX... CLIST & REXX 5
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us