Interview Questions Answers.ORG
Interviewer And Interviewee Guide
Interviews
Quizzes
Home
Quizzes
Interviews Mainframe Technical Interviews:CICSCLIST (Command List)IBM ADABASIBM AS400IBM AssemblerIBM COBOL400IBM COOLPLEXIBM DB400IBM MainFrameIBM MVSIBM NaturalIBM OS 2IBM OS390IBM QMFIBM QSAMIBM REXXIBM RPG400IBM SysplexIDMSIMS DBJCLMQ SeriesVSAM
Copyright © 2018. All Rights Reserved
IBM COBOL400 Interview Question:
How to Convert 2010/02/11 to m/dd/yyy.. with string and without string if any other method... code?
Submitted by: AdministratorThe above issue can be resolved by using REDEFINES clause.
01 DATE-FIELD
05 DATE-YYYY PIC 9(04).
05 DATE-MM PIC 9(02).
05 DATE-DD PIC 9(02).
01 DATE-CONT REDEFINES DATE-FIELD
05 DATE-MM-CONT PIC 9(02).
05 DATE-DD-CONT PIC 9(02).
05 DATE-YYYY-CONT PIC 9(04).
I guess the above declaration will resolve it. I have not
tested it.
Submitted by: Administrator
01 DATE-FIELD
05 DATE-YYYY PIC 9(04).
05 DATE-MM PIC 9(02).
05 DATE-DD PIC 9(02).
01 DATE-CONT REDEFINES DATE-FIELD
05 DATE-MM-CONT PIC 9(02).
05 DATE-DD-CONT PIC 9(02).
05 DATE-YYYY-CONT PIC 9(04).
I guess the above declaration will resolve it. I have not
tested it.
Submitted by: Administrator
Copyright 2007-2024 by Interview Questions Answers .ORG All Rights Reserved.
https://InterviewQuestionsAnswers.ORG.
https://InterviewQuestionsAnswers.ORG.