Free software training Videos

Free software training Videos
https://www.youtube.com/user/VLRTraining

List Of Best WebSites

Showing posts with label cl command. Show all posts
Showing posts with label cl command. Show all posts

Sunday, 25 November 2012

DSPMSGD IN AS400

                      Display Message Description (DSPMSGD







                                                         
 Type choices, press Enter.                              
                                                         
 Range of message identifiers:    RANGE                  
   Lower value  . . . . . . . . .                CPF5702  
   Upper value  . . . . . . . . .                *ONLY   
 Message file . . . . . . . . . . MSGF           QCPFMSG 
   Library  . . . . . . . . . . .                  *LIBL 
 Detail . . . . . . . . . . . . . DETAIL         *FULL   
 Format message text  . . . . . . FMTTXT         *YES    
 Output . . . . . . . . . . . . . OUTPUT         *      


 ----------------------------------------------------------------------------------
 Message ID . . . . . . . . . :   CPF5702                                     
 Message file . . . . . . . . :   QCPFMSG                                     
   Library  . . . . . . . . . :     QSYS                                      
                                                                              
 Message . . . . :   File either not DDM file or not found.                   
 Cause . . . . . :   A request to do a remote operation was received, but file
   &1 in library &2 either is not a distributed data management (DDM) file or 
   is not found.                                                              
 Recovery  . . . :   Do one of the following and then try the command again:  
     -- Specify a DDM file on the command.                                    
     -- Specify a different value for the system parameter.                   
     -- Create a DDM file.                                                    
                                                                              
                                                

----------------------------------------------------------------
SOME MESSAGE CODES
CPF3204
Cannot find object needed for file &1 in &2.
CPF323C
QRECOVERY library could not be allocated.
CPF5702
File either not DDM file or not found.
CPF7302
File &1 not created in library &2.
                             
                                                                               

Friday, 23 November 2012

*cat in as400


The *CAT operator concatenates two character strings

operator symbol is     ||


EXAMPLE1:
  CHGVAR     VAR(&C) VALUE('RAM' *CAT 'ESH')
            output
RAMESH


EAMPLE2;
CHGVAR     VAR(&C) VALUE('RAM   ' *CAT 'ESH')

     OUTPUT
RAM  ESH ( 2 SPACES AFTER RAM)





Example:

0001.00 PGM                                                                 
0002.00              DCL        VAR(&A) TYPE(*CHAR) LEN(10) VALUE('ramesh') 
0003.00              DCL        VAR(&B) TYPE(*CHAR) LEN(10) VALUE('CHANDANA')
0004.00              DCL        VAR(&C) TYPE(*CHAR) LEN(20)                 
0005.00              CHGVAR     VAR(&C) VALUE(&a *cat &b)                   
0006.00              SNDUSRMSG  &C                                          
0007.00 ENDPGM  


OutPUT

Job 418467/CHVRAMESH/QPADEV0024 changed by JOBMANAGER.
ramesh    CHANDANA                                                   




_________USING OPERATOR  SYMBOL __________________
0001.00 PGM                                                                 
0002.00              DCL        VAR(&A) TYPE(*CHAR) LEN(10) VALUE('ramesh') 
0003.00              DCL        VAR(&B) TYPE(*CHAR) LEN(10) VALUE('CHANDANA')
0004.00              DCL        VAR(&C) TYPE(*CHAR) LEN(20)                 
0005.00              CHGVAR     VAR(&C) VALUE(&a *cat &b)                   
0006.00              SNDUSRMSG  &C                                          
0007.00              CHGVAR     VAR(&C) VALUE('  RAM   ' || ' ESH ')        
0008.00              SNDUSRMSG  &C                                          
0009.00 ENDPGM