Comments on: Macro Script on AS/400

By: tomliotta

tomliotta — Sat, 13 Aug 2011 04:14:17 +0000

What is the macro selecting from?

Tom

By: yorkshireman

yorkshireman — Fri, 12 Aug 2011 07:21:21 +0000

Am I right in think ing that you run a Client Access transfer to move the dat to a PC, then your script?
If so, you can automate the Client access with the RTOPCB batch transfer. A STRPCCMD could be automated as a scheduled job within the IBM i Series, run the transfer, call Excel, and IFIRC, the macro set to run on opening the sheet.

By: deepu9321

deepu9321 — Fri, 12 Aug 2011 05:20:14 +0000

It is an Excel compatible macro. And, As of now we are automating(Scheduled Jobs) all other Reports except Macro scripts. Still it will be good if I can know about this. Here is the structure of the code. I have not included fully.

Sub Macro1()
'
' Macro1 Macro
' Macro created 5/02/2010 by Allan Guatlo
'

'
    Columns("A:A").Select
    Selection.TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth, _
        FieldInfo:=Array(Array(0, 1), Array(44, 1), Array(55, 1), Array(64, 1), Array(73, 1), _
        Array(82, 1), Array(91, 1), Array(100, 1), Array(109, 1), Array(118, 1), Array(127, 1), _
        Array(136, 1), Array(145, 1), Array(154, 1), Array(168, 1), Array(176, 1), Array(190, 1))
    Cells.Select
    Cells.EntireColumn.AutoFit
....
...
...
    Columns("U:U").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Selection.Delete Shift:=xlToLeft
    
    Rows("1:1").Select
    Selection.Insert Shift:=xlDown
    Range("A1").Select
    
    ActiveCell.FormulaR1C1 = reportMonth
    
End Sub

Pradeep.

By: tomliotta

tomliotta — Fri, 12 Aug 2011 04:25:40 +0000

…using it for Extracting Data from Database to Excel Sheet.

An Excel-compatible file could be generated on the AS/400 on a schedule. The basic question would be about what “Data from Database” is used as input to the macro.

Tom

By: yorkshireman

yorkshireman — Wed, 10 Aug 2011 08:22:42 +0000

Perhaps you should give some more details – the term ‘macro script’ isn’t very precise. Is it a macro in Client Access? in Excel? ‘macroo’s used to imply a keystroke recorder, but could now include any functionality.

How is the macro started – on which platform? Can you post the code here ?

Generating a report at a monthend is uitterly fundamental to business processing, and on IBM a Scheduled job entry would be a start point.

More information please…

By: deepu9321

deepu9321 — Wed, 10 Aug 2011 04:59:35 +0000

I am not writing into any Display Files using Macro and using it for Extracting Data from Database to Excel Sheet.

Pradeep.

By: tomliotta

tomliotta — Tue, 09 Aug 2011 22:05:47 +0000

Although there’s not much chance of replicating the actual macro onto your AS/400, the functions that are done by the macro can usually be duplicated. The difficult parts to duplicate would be any times that your macro entered characters into a display file in one of your applications.

What tasks does your macro do?

Tom