P93081 and AS/400 and flat file output

I’m still working on their fairly painful barcode solution, actually it’s back is broken – now making things a little nicer.  Anyway, we promoted the code to another environment and saw that the files being produced from JDE were a bunch of cr@p. 

äè==äàŒ=ää =äè=Ž ì =è =¢ë+ <è (+ï (èè &|+ &(+ <琌 ¢(  &ꔌ”=ëà‘• ¢íë <ê+ äñ ì!Ž=à吐åê㌙–Œ‘•ŒŽŒšššššššššššššššššššššššššššššššš+ã¦é㐌ššš+˜¦|ãŒšššššššššššššššššššŽšššššššššššššššššššššššššššššššššššššššššššššššššššššššššššššššššššššššššššŽšššššššš+ã¦é㐌šššŒššššššššššššššššššššššššššššššššššššššššššššššššššššššŽšš+‘ããáá‘㘐¢ãçãááñã㘑ããáñáãçãááãçãáñã㘑ã¢ãᐐ‘㘎áã㘐琑ãñ㘑㘑ããᐌšššššššššššššššššššššššššššššššš+‘ããáá‘㘐¢Žãçãááñã㘑ããáñáãçãááãçãáñã㘑ã¢ãᐐ‘㘐áã㘐琑ãñ㘑㎘‘ããáé“ã¦.㘐Œššš+‘ããáá‘㘐¢ãçãááñã㘑ããáñáãçãááãçã᎐ñã㘑ã¢ãᐐ‘㘐áã㘐琑ãñ㘑㘑ããáé“䐦ñ˜ŒšššššššššššššššššššššŽšššššššššššššššššššššššššššššššššššššššššššš%ñ“䐦ñ˜ŒššššššššššššššššššŽššššššššššššššššššššššššššššš%ñ“ã¦.㘐ŒšššŒšššššššššššššššššššššššššššššššŽšššššššššššššššššššššššššššššššššš€šššššššššššššššššššššššššššššššššššššššššŽššššššššššššššššš ì Ž ((èŽ &•Ž <<””™Ž <됎 ã萌”˜ ì吐åê㌑Œ‘ ãëŽ ãè•™Œ™‘   +Œ”™Œ”™Œè萐“(¬ ãç* äñ‘ 㘠ãà–– ãë äñŽ ãè”™–Œ•   +Œ““Œ“‘Œè萐“(¬ ãç* äñ‘ 㘠ãàä|.á ãë äñŽ ãè“•Œ‘•   +Œ““Œ“‘Œè萐“(¬ ãç* äñ‘ 㘠ãàëßêí&€ä|ä €ä|<  ãë äñŽ ãè“•Œ“™™   +Œ““Œ”Œè萐“(¬ ãç* äñ‘ 㘠ãà“•‘™˜ ãë äñŽ ãè•Œ“™™   +Œ““ŒŒè萐“(¬ ãç* äñ‘ 㘠ãà™ ãë äñŽ ãè“‘™Œ“™™   +Œ““ŒŒè萐“(¬ ãç* äñ‘ 㘠ãà. +åã< è ãë äñŽ ãè”™–Œ“™™   +Œ““Œ“‘Œè萐“(¬ ãç* äñ‘ 㘠ãà‘˜•– ãë äñŽ ã蕐Œ“”   +Œ““Œ“‘Œè萐“(¬ ãç* äñ‘ 㘠ãà‘€|〕 ãë äñŽ ã萌““   +Œ““Œ“‘Œè萐“(¬ ãç* äñ‘ 㘠ãà‘™– ãë äñŽ &é‘ŒŒ‘Œß ì!Ž ì  ñàåêã ãë ì!Ž

 

So this is a file that should look like:

 

CT~~CD,~CC@~CT~
@XA~TA000~JSN@LT0@MNW@MTT@PON@PMN@LH0,0@JMA@PR4,4~SD15@JUS@LRN@CI0@XZ
~DG000.GRF,72960,152,
,::::::::::::::::::::::::::::::::N07FjQF0,:::N0780jO0F0,:::::::::::::::::::
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
::::::::N07FjQF0,:::,::::::::::::::::::::::::::::::::::::::::::::::::::::::
::N01FFE07E001F80J07FHFE07E0I07FF81FFE0I07E07FHFE07E07FHFE0I07FF81FJFE001F8
007E07FF80H01FIF81F81FFE0,::::::::::::::::::::::::::::::::N01FFE07E001F80J0
7FHFE07E0I07FF81FFE0I07E07FHFE07E07FHFE0I07FF81FJFE001F8007E07FF80H01FIF81F
81FFE0Q03FjKF80,:::N01FFE07E001F80J07FHFE07E0I07FF81FFE0I07E07FHFE07E07FHFE
0I07FF81FJFE001F8007E07FF80H01FIF81F81FFE0Q03C0jI0780,:::::::::::::::::::::
::::::::::::::::::::::::::::::::::::::::::::lI03C0jI0780,::::::::::::::::::
:::::::::::::::::::::::::::::lI03FjKF80,:::,:::::::::::::::::::::::::::::::
:::::::::::::::::::::::::::::::::: :::::::::::::::::::::::::::::::::::::::::
:::::::::::::::::@XA
@MMT
@PW1205
@LL0449
@LS0
@FT0,480@XG000.GRF,1,1@FS
@FT59,91@A@N,49,49,TT0003M_@FH\@CI17@F8@FD655@FS@CI0
@FT496,57@A@N,33,31,TT0003M_@FH\@CI17@F8@FD0COKE@FS@CI0
@FT35,175@A@N,33,31,TT0003M_@FH\@CI17@F8@FDSYRUP COCA COLA@FS@CI0
@FT35,399@A@N,33,24,TT0003M_@FH\@CI17@F8@FD22/03/2013@FS@CI0
@FT225,399@A@N,33,22,TT0003M_@FH\@CI17@F8@FD243@FS@CI0
@FT319,399@A@N,33,22,TT0003M_@FH\@CI17@F8@FDTAREE@FS@CI0
@FT496,399@A@N,33,31,TT0003M_@FH\@CI17@F8@FD123456@FS@CI0
@FT520,304@A@N,33,31,TT0003M_@FH\@CI17@F8@FD1 OF 5@FS@CI0
@FT202,330@A@N,33,31,TT0003M_@FH\@CI17@F8@FD00019067@FS@CI0
@PQ1,0,1,Y@XZ
@XA@ID000.GRF@FS@XZ

 

Okay, that is quite some difference, but I’ve had this before.

 

Open up the P93081 and add a record for IBM-37 for the environment that I’m using and the user.  Test – still wrong.  Restart E1 (the kernel that writes the files must cache this information at startup) in case it’s cache and bosch!  we’re away with the proper format.  Love it when a seemingly very complex issues becomes innocuous.