Printer File, DBCS Capable

Tags:
AS/400
DBCS
Printer file
How to set Printer File as DBCS Capable = No
0

Answer Wiki

Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

Discuss This Question: 6  Replies

 
There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.
  • ToddN2000
    I think if you do a CHGPRTF on the file then F10 for all parameters and scroll down a ways you will find the DBCS options.
    You may just need to set these to *NO


    User specified DBCS data . . . . IGCDTA         *SAME    
    DBCS extension characters  . . . IGCEXNCHR      *SAME    
    DBCS character rotation  . . . . IGCCHRRTT      *SAME    
    DBCS characters per inch . . . . IGCCPI         *SAME    
    DBCS SO/SI spacing . . . . . . . IGCSOSI        *SAME    
    DBCS coded font:                 IGCCDEFNT                  
      DBCS coded font  . . . . . . .                *SAME       
        Library  . . . . . . . . . .                            
      Point size . . . . . . . . . .                            
    To stream file . . . . . . . . . TOSTMF         *SAME
    136,970 pointsBadges:
    report
  • JosephCompetente
    Actually, here is my problem

    IGCDTA = NO 
    But DBCS Capable = Yes

    User specified DBCS data  . . . . . . . . . : IGCDTA     *NO    
    DBCS capable  . . . . . . . . . . . . . . . :            Yes    
    Maximum file wait time  . . . . . . . . . . : WAITFILE   *IMMED 
    Share open data path  . . . . . . . . . . . : SHARE      *NO    
    Record format level check . . . . . . . . . : LVLCHK     *YES   
    Number of record formats  . . . . . . . . . :                7  
    User buffer length  . . . . . . . . . . . . :              145  
    35 pointsBadges:
    report
  • TheRealRaven
    If this is an externally-described file, we need to see the DDS to know where DBCS is enabled. (See the help definition of the IGCDTA() parameter when *NO is specified.)
    37,225 pointsBadges:
    report
  • JosephCompetente
    Thank you for your reply. What will I look for in the DDS?

    Here is the DDS below

    A*%%***********************************************************************   
    A*%%TS  RD  20120223  163432  MIS00243TA  REL-V6R1M0  5761-WDS                
    A*%%FI+10660100000000000000000000000000000000000000000000000000               
    A*%%FI       0000000000000000000000000000000000000000000000000                
    A*%%***********************************************************************   
    A*---                                  PAGESIZE(066 132)                      
    A*---                                  OVRFLW(060)                            
    A*---                                  FOLD(*NO)                              
    A*---                                  CPI(10.00)                             
    A*---                                  LPI(06.00)                             
    A          R HEADER                                                           
    A*%%***********************************************************************   
    A*%%RI 00000                                                                  
    A*%%***********************************************************************   
    A                                      SPACEA(001)                            
    A            QPROG         10         1                                       
    A                                      SKIPB(001)                             
    A            CTLCTR    R             38                                       
    A                                      REFFLD(CTLCTR SYS001ED)                
    A                                    99                                    
    A                                      'Time-'                             
    A            DTIME          6S 0    105                                    
    A                                      EDTWRD('  :  :  ')                  
    A                                   119                                    
    A                                      'Date:'                             
    A            QDATE     R            125                                    
    A                                      REFFLD(QDATE SYS001ED)              
    A                                      EDTCDE(Y)                           
    A                                    49                                    
    A                                      'Picking Document'            
    A                                      SPACEB(001)                   
    A                                   119                              
    A                                      'Page:'                       
    A                                   129                              
    A                                      PAGNBR                        
    A                                      EDTCDE(Z)                     
    A                                    46                              
    A                                      'For Warehouse:'              
    A                                      SPACEB(001)                   
    A            WHSE      R             61                              
    A                                      REFFLD(STRNUM TBLZON)         
    A                                     1                              
    A                                      'Print by Zone:'              
    A                                      SPACEB(001)                   
    A            BYZNE          1A  O    17                              
    A                                    46                              
    A                                      '***'                         
    A            DOCTYP        12        50                              
    A                                    63                              
    A                                      '***'                               
    A                                     5                                    
    A                                      'Transfer No.:'                     
    A                                      SPACEB(003)                         
    A            WHMVSR         8A  O    +1                                    
    A                                    37                                    
    A                                      'Document No.:'                     
    A            DOCNO     R             51                                    
    A                                      REFFLD(WHMOVE WHSMVD)               
    A                                      EDTCDE(Z)                           
    A                                    65                                    
    A                                      'Cycle No.:'                        
    A            WHCYCL    R             76                                    
    A                                      REFFLD(WHCYCL WHSMVH)               
    A                                      EDTCDE(Z)                           
    A                                    94                                    
    A                                      'Store :'                           
    A            WHMTLC    R            102                                    
    A                                      REFFLD(WHMTLC WHSMVD)               
    A                                      EDTCDE(Z)                           
    O*                                                                  
    A                                     5                             
    A                                      'Clerk: '                    
    A                                      SPACEB(002)                  
    A                                    13                             
    A                                      '..........'                 
    A                                    37                             
    A                                      'Date In: '                  
    A                                    46                             
    A                                      '..........'                 
    A                                    57                             
    A                                      'Time In: '                  
    A                                    66                             
    A                                      '..........'                 
    O*                                                                  
    A                                     1                             
    A                                      'Seq'                        
    A                                      SPACEB(002)                  
    O*                                                                  
    O*                                                                  
    A                                     9                              
    A                                      'From'                        
    A  40                                84                              
    A                                      'Pack'                        
    A  40                                96                              
    A                                      'Case  To'                    
    A                                   106                              
    A                                      'Each'                        
    A                                   112                              
    A                                      'Ea.'                         
    A                                   116                              
    A                                      ' Eaches To'                  
    A                                     1                              
    A                                      'Part No'                     
    A                                      SPACEB(001)                   
    A                                     9                              
    A                                      'Slot'                        
    A                                    19                              
    A                                      'SKU'                         
    A                                    36                              
    A                                      'Description'                     
    A                                    63                                  
    A                                      'UPC'                             
    A                                    72                                  
    A                                      'Quantity'                        
    A  40                                84                                  
    A                                      'Unit'                            
    A  40                                90                                  
    A                                      'BUM'                             
    A  40                                98                                  
    A                                      'Pick'                            
    A                                   106                                  
    A                                      'Unit'                            
    A                                   112                                  
    A                                      'U/M'                             
    A                                   120                                  
    A                                      'Pick'                            
    A                                    +5                                  
    A                                      'Ret. Price'                      
    O*                                                                       
    A                                     1                                   
    A                                      '_____'                            
    A                                      SPACEB(001)                        
    A                                     7                                   
    A                                      '________'                         
    A                                    16                                   
    A                                      '_________'                        
    A                                    26                                   
    A                                      '______________________________'   
    A                                    57                                   
    A                                      '______________'                   
    A                                    72                                   
    A                                      '__________'                       
    A  40                                84                                   
    A                                      '____'                             
    A  40                                90                                   
    A                                      '___'                              
    A  40                                94                                   
    A                                      '__________'                       
    A                                   106                                   
    A                                      '____'                              
    A                                   112                                    
    A                                      '___'                               
    A                                   116                                    
    A                                      '__________'                        
    A                                    +1                                    
    A                                      '_______________'                   
    A*%%***********************************************************************
    A*%%SS                                                                     
    A*%%CL 001                                                                 
    A*%%CL 001                                                                 
    A*%%CL 001                                                                 
    A*%%CL 003                                                                 
    A*%%CL 002                                                                 
    A*%%CL 002                                                                 
    A*%%CL 001                                                                 
    A*%%CL 001                                                                 
    A*%%CL 001                                                                 
    A*%%***********************************************************************
    A          R DETLIN                                                        
    A*%%***********************************************************************
    A*%%RI 00000                                                               
    A*%%***********************************************************************
    A                                      SPACEA(001)                         
    A N40        WHMVQ2    R            116                                    
    A                                      REFFLD(WHMVQR WHSMVD)               
    A                                      EDTCDE(L)                           
    A                                      SPACEB(001)                         
    A            RETAIL        13S 3O    +0                                    
    A                                      EDTCDE(L)                           
    O*                                                                         
    A            WHMVSQ    R              1                                    
    A                                      REFFLD(WHMVSQ WHSMVD)               
    A                                      EDTCDE(Z)                           
    A            WHMFSL    R              7                                    
    A                                      REFFLD(WHMFSL WHSMVD)               
    A            INUMBR    R             16                                    
    A                                      REFFLD(INUMBR INVMST)               
    A                                      EDTCDE(Z)                           
    A            DESC20        30        26                                    
    A            RUPC          14S 0O    57                                      
    A                                      EDTCDE(4)                             
    A            WHMVQR    R             72                                      
    A                                      REFFLD(WHMVQR WHSMVD)                 
    A                                      EDTCDE(L)                             
    A  40        FRPUNT    R   -3        84                                      
    A                           
    35 pointsBadges:
    report
  • ToddN2000
    I'd check the field definitions in your field reference files. One of them may have a definition that may be causing the issue. 
    136,970 pointsBadges:
    report
  • JosephCompetente
    Thank you all. It was the Open field type in the physical file being referenced.

    35 pointsBadges:
    report

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.

Following

Share this item with your network: