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

Regarding use of '3F' in IMS-DC


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
anoopkhetan

New User


Joined: 22 Sep 2006
Posts: 3
Location: mumbai

PostPosted: Mon Sep 25, 2006 5:26 pm
Reply with quote

Hi,
I am working on enhancement project.
it uses IMS-DC where i find extensive use of '3F' in messages that are thrown to screen. Please let me know its use in programming. example is given below

Code:
    03  W07-SYSTEM-ERROR-MESSAGES.
         05  W07-ERROR-MSG1.
             10  FILLER               PIC X(48)    VALUE
              'NO DATA ENTERED - ENTER DATA OR SPECIAL FUNCTION'.
             10  W07-ERR-END1         PIC X        VALUE X'3F'.

         05  W07-ERROR-MSG2.
             10  FILLER               PIC X(21)    VALUE
             'SPECIAL FUNCTION KEY '.
             10  W07-MSG2-SPEC-FUNC   PIC X        VALUE SPACE.
             10  FILLER               PIC X(24)    VALUE
              ' INVALID WHEN IN INSPECT'.
             10  W07-ERR-END2         PIC X        VALUE X'3F'.


Thanks
Anoop
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Wed Oct 18, 2006 6:04 pm
Reply with quote

X'3F'is used to shorten the message sent from the program thus improving performance. It's specially used when the message is fixed length. It's placed at the end of the messages and tells IMS this was the complete message though the received length isn't.
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 -> IMS DB/DC

 


Search our Forums:

Back to Top