Problems With Mapics/Lotus Notes/ADO (Bernard Green)

Hi Iain,

Bernard is right! We have same problem (65535) with you in reports generated
with Crystal Reports.

We change CCSID of MAPICS tables from 65535 to 1026(turkish). 37(US English)
also works properly.

Regards

Mehmet Tufekcioglu
TEKLAS Kaucuk
Istanbul/TURKEY 
email: mtufekcioglu@xxxxxxxxxxxxx

-----Original Message-----
From: mapics-l-request@xxxxxxxxxxxx
[mailto:mapics-l-request@xxxxxxxxxxxx]
Sent: Saturday, February 21, 2004 8:00 PM
To: mapics-l@xxxxxxxxxxxx
Subject: MAPICS-L Digest, Vol 2, Issue 53


Send MAPICS-L mailing list submissions to
        mapics-l@xxxxxxxxxxxx

To subscribe or unsubscribe via the World Wide Web, visit
        http://lists.midrange.com/mailman/listinfo/mapics-l
or, via email, send a message with subject or body 'help' to
        mapics-l-request@xxxxxxxxxxxx

You can reach the person managing the list at
        mapics-l-owner@xxxxxxxxxxxx

When replying, please edit your Subject line so it is more specific
than "Re: Contents of MAPICS-L digest..."


Today's Topics:

   1. RE: Problems With Mapics/Lotus Notes/ADO (Bernard Green)
   2. AS/400 Conversion (LeLeux@xxxxxxxxxxxx)
   3. Re: AS/400 Conversion (sjones@xxxxxxxxxxxxxx)


----------------------------------------------------------------------

message: 1
date: Sat, 21 Feb 2004 06:04:19 +1100
from: Bernard Green <bgreen@xxxxxxxxxx>
subject: RE: Problems With Mapics/Lotus Notes/ADO

Iain,

I'm not familiar with the code you are using (not my area).  However, just
glancing through your question I immediately recognised the value "65535" in
the line, 

Properties("Force Translate") = "65535"

On the iSeries, CCSID 65535 is what is used to prevent any data conversion
between language code pages when a file is moved around.  For example, if
you set data in a file in one language setting and the save it (i.e. to
poratable medium), and you want the data to be completely unchanged if the
file is restored to an iSeries with different language settings (e.g. you
don't want the crosshatch character to be changed to the British pound
sign), you make sure the file has CSSID 65535.

Now, I don't know where that fits exactly into what you are doing here, but
do you always use the above "force translate" line in this process - what
happens if you don't use it, or what happens if you force translate to the
US English CCSID (37 I think) ?


Bernard Green
Momentum Utilities
Sydney, Australia

bgreen@xxxxxxxxxx


-----Original Message-----
From: IWilson@xxxxxxxxxxxxxxxxxx [mailto:IWilson@xxxxxxxxxxxxxxxxxx] 
Sent: Thursday, 19 February 2004 3:20
To: mapics-l@xxxxxxxxxxxx
Subject: Problems With Mapics/Lotus Notes/ADO



Hi All

Hope someone can help me here as I am losing the plot fast.
I am attempting to import data from an AS400 table (The application is
Mapics)
into forms in a Lotus Notes application
Below is the code that I use to connect to the AS400. However when I attempt
to display any value from the record set I get a type mismatch error. If I
change the connection to point to a table in a non-mapics library I am able
to display the value with no problem. The user profile I am logging on with
has the required authority. I have retrieved data using ADO and Delphi
before so this should work. Has anyone any ideas please. Thanks in advance
for any help.

' ============================================
' The code used
' ============================================
Dim workspace As New NotesUIWorkspace
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim OpDoc As NotesDocument
Dim mConn As Variant
Dim mRS As Variant
Dim OperationsView As NotesView
Dim LString As String

Set db = session.CurrentDatabase
Set mConn = createobject("ADODB.Connection")
With mConn
.Provider = "IBMDA400.DataSource.1"
.Properties("Data Source") = "IP ADDRESS"
.Properties("User Id") = "USERNAME"
.Properties("Password") = "PASSWORD"
.Properties("Transport Product") = "Client Access"
.Properties("SSL") = "DEFAULT"
.Properties("Force Translate") = "65535"
.Properties("Convert Date Time To Char") = "TRUE" .Properties("Catalog
Library List") = "AMFLIBA" .Open End With

Set mRS = createobject("ADODB.Recordset")
Set mRS.ActiveConnection = mConn
LString = "select * From AMFLIBA.MOMAST"
mRS.Open LString

Set OperationsView = db.GetView("DTrackingByLineItem")
If (Not OperationsView Is Nothing) Then
Do While Not mRS.eof
                  ' I Get A Type Mismatch here
Messagebox  Cstr(mRS.fields("CALD").Value)
mRS.movenext
Loop
End If

mRS.close
Set mRS =Nothing

mConn.close
Set mConn = Nothing


Best Regards

Iain

Here is my disclaimer

_______________________________________________
This is the MAPICS ERP System Discussion (MAPICS-L) mailing list To post a
message email: MAPICS-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change
list options,
visit: http://lists.midrange.com/mailman/listinfo/mapics-l
or email: MAPICS-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/mapics-l.


------------------------------

message: 2
date: Fri, 20 Feb 2004 14:24:01 -0800
from: LeLeux@xxxxxxxxxxxx
subject: AS/400 Conversion

Perhaps this is a bit off topic, but certainly a good place to start since 
'MAPICS was ported to Linux'.

My question is:  Has anyone installed Linux on an AS/400 without going the 
IBM/RedHat route?

I know that SUSE can run on an ISeries, perhaps any RISC model?

Interested in any experiences that you may want to share.

Thanks in advance for your comments....james

------------------------------

message: 3
date: Sat, 21 Feb 2004 08:50:26 -0500
from: sjones@xxxxxxxxxxxxxx
subject: Re: AS/400 Conversion

LeLux:

I am not all that versed in Linux, but I had always thought that RedHat & 
SUSE are not versions of Linux, but provide you with Linux & who can help 
you with installing & running Linux.  I am pretty sure that Redhat or SUSE 
does not do anything to Linux, so you should be able to use whoever you 
want to supply you with Linux.

The COMMON conference in May is focusing on Linux, so I will be getting 
more education on Linux then. 

I would like to know what anyone is doing with Linux on the I-Series.  IBM 
sure has put a lot of money behind Linux and are really pushing the 
product.

 
Steve Jones



LeLeux@xxxxxxxxxxxx 
Sent by: mapics-l-bounces@xxxxxxxxxxxx
02/20/2004 05:24 PM
Please respond to
MAPICS ERP System Discussion <mapics-l@xxxxxxxxxxxx>


To
MAPICS ERP System Discussion <mapics-l@xxxxxxxxxxxx>
cc

Fax to

Subject
AS/400 Conversion






Perhaps this is a bit off topic, but certainly a good place to start since 

'MAPICS was ported to Linux'.

My question is:  Has anyone installed Linux on an AS/400 without going the 

IBM/RedHat route?

I know that SUSE can run on an ISeries, perhaps any RISC model?

Interested in any experiences that you may want to share.

Thanks in advance for your comments....james
_______________________________________________
This is the MAPICS ERP System Discussion (MAPICS-L) mailing list
To post a message email: MAPICS-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/mapics-l
or email: MAPICS-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/mapics-l.




------------------------------

_______________________________________________
This is the MAPICS ERP System Discussion (MAPICS-L) digest list
To post a message email: MAPICS-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/mapics-l
or email: MAPICS-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/mapics-l.



End of MAPICS-L Digest, Vol 2, Issue 53
***************************************