You need the shift-in and shift-out  characters at the start and end.  Also you 
need the dot in front of each character.

ABCD     DC   G'<.A.B.C.D>'

Chris Blaicher
Principal Software Engineer, Software Development
Syncsort Incorporated
50 Tice Boulevard, Woodcliff Lake, NJ 07677
P: 201-930-8260  |  M: 512-627-3803    
E: [email protected]

-----Original Message-----
From: IBM Mainframe Assembler List [mailto:[email protected]] On 
Behalf Of Jose Flores
Sent: Monday, December 08, 2014 5:33 PM
To: MVS List Server 2
Subject: Re: Assembly of G-Type constants not working for me

Doesn't like it! 
I edited and entered hexadecimal data ...


Options for this Assembly 
NOADATA                   
  ALIGN                   
NOASA                     
  BATCH                   
  CODEPAGE(047C)          
NOCOMPAT                  
  DBCS                  <-------  
  DECK                    
  DXREF                   
  ESD                     


0001C5                              734 DBCS1     DC    G' A B C'            
** ASMA206E G-type constant must not contain single-byte data -  A B C'      
** ASMA435I Record 32 in SYSJF.SYSJFB.JOB04694.D0000101.? on volume:         
0001C5                              735 DBCS2     DC    G' X Y z'            
** ASMA206E G-type constant must not contain single-byte data -  X Y z'      
** ASMA435I Record 33 in SYSJF.SYSJFB.JOB04694.D0000101.? on volume:         

000041 DBCS1     DC    G'âAâBâC'      
    CCCEF44444CC4444C74C4C4C7444444
    42321000004300007D212223D000000
--------------------------------------
000042 DBCS2     DC    G'âXâYâz'      
    CCCEF44444CC4444C74E4E4A7444444
    42322000004300007D272829D000000
--------------------------------------

-----Original Message-----
From: IBM Mainframe Assembler List [mailto:[email protected]] On 
Behalf Of Blaicher, Christopher Y.
Sent: Monday, December 08, 2014 5:20 PM
To: [email protected]
Subject: Re: Assembly of G-Type constants not working for me

>From the manual - here are examples

DBCS1 DC G'<.A.B.C>'
DBCS2 DC GL10'<.A.B.C>'
DBCS3 DC GL4'<.A.B.C>'

Chris Blaicher
Principal Software Engineer, Software Development Syncsort Incorporated
50 Tice Boulevard, Woodcliff Lake, NJ 07677
P: 201-930-8260  |  M: 512-627-3803
E: [email protected]

-----Original Message-----
From: IBM Mainframe Assembler List [mailto:[email protected]] On 
Behalf Of Jose Flores
Sent: Monday, December 08, 2014 5:13 PM
To: MVS List Server 2
Subject: Re: Assembly of G-Type constants not working for me

Hi John,

Still does not work. Listing excerpt below.

  Loc  Object Code    Addr1 Addr2  Stmt   Source Statement                      
            HLASM R6.0  2014/12/08
0001C5                              734 DBCS1     DC    G'42C142C2'             
                                  
** ASMA206E G-type constant must not contain single-byte data - 42C142C2'       
                                  
** ASMA435I Record 32 in SYSJF.SYSJFB.JOB02015.D0000101.? on volume:            
                                  



-----Original Message-----
From: IBM Mainframe Assembler List [mailto:[email protected]] On 
Behalf Of John Ehrman
Sent: Monday, December 08, 2014 4:56 PM
To: [email protected]
Subject: Re: Assembly of G-Type constants not working for me

It's probably because the notations ".A" and ".B" represent the DBCS codings 
for those double-byte characters, not the EBCDIC characters "." 
and "A".

If you can enter data in hex, try assembling G'42C142C2' (where I wrote the hex 
representations of each byte) -- this is the DBCS representation of "AB"

Regards... John 

Reply via email to