Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

Show 2 ways to convert a date from YYMMDD to MMDDYY (MULT operation not acceptable)

Answer Posted / sanjeet kumar

1)CVTDAT() DATE() RTNVAR() FROMFMT() TOFMT()

Source code is required to convert from one date format to another date format.

The source code in CLP is given below:

PGM
DCL VAR(&VAR1) LENGTH(6) TYPE(*CHAR) VALUE('YYMMDD')
DCL VAR(&RCVD) LENGTH(6) TYPE(*CHAR)
DCL VAR(&VAR2) LENGTH(4) TYPE(*CHAR)
DCL VAR(&VAR3) LENGTH(2) TYPE(*CHAR)
CHGVAR VAR(&VAR2) VALUE(%SST(&VAR1 3 4))
CHGVAR VAR(&VAR3) VALUE(%SST(&VAR1 1 2))
CHGVAR VAR(&RCVD) VALUE(&VAR2 *CAT &VAR3)
SNDMSG MSG(&RCVD) TOUSR(*USRPRF)
ENDPGM

Is This Answer Correct ?    0 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

during input operation which indicator position is seton if there is a record lock?

1597


what are the different opcodes available in rpg for database access ?

1705


How can we change the uppercase to Lowercase in RPG?

1431


what is rpg ?

1650


is their a difference in cobol400 for the release 5.2 and 6.1 at the as400.

2566


when should I use method get, and when should I use method post in my cgis?

1140


what is the maximum number of subroutines allowed in rpg?

1781


can error messages as a result of a comp, range or values keyword be overridden?

1916


how to validate input values in display file ?

1223


define the purpose/use for sflrna?

1663


how does the runqry show the output?

1419


what is the clp command to access a query/400?

2144


give three main purposes of file specification ?

1741


Difference between NOPASS & OMIT?

1855


How do you check object lock

833