330 likes | 493 Views
Introduction to Monarch 3.1. ASNA Monarch. Preserves RPG assets For interactive applications it targets ASP.NET Yields 100% native .NET Assemblies Data can remain in the iSeries or move to SQL Server Benefits Fastest Time to Market Reduced Risk Best ROI.
E N D
ASNA Monarch • Preserves RPG assets • For interactive applications it targets ASP.NET • Yields 100% native .NET Assemblies • Data can remain in the iSeries or move to SQL Server • Benefits • Fastest Time to Market • Reduced Risk • Best ROI Set of technologies to assist in the migration of iSeries applications to the .NET platform
Monarch Anatomy Methodology Migration Agents Application Analysis (I) Application Framework Strategy Planning AVR/DG Extensions M A I F S E
Monarch Process Analysis and M A I F S E
PhysicalFile LogicalFile DataArea Display FileDDS Message File CL Source RPG /400 RPG ILE Source Printer File DDS Display FileAgent Message File Agent CLAgent RPGAgent Printer O-SpecAgent Printer FileAgent Dataand SchemaAgent * PhysicalFile LogicalFile Display aspx MsgFile.XML AVR Class AVR Class .NET Print File Monarch Process M A I F S E
Picturing Applications • Exhibit: A graphical representation of all the programs in a Gallery grouped into Clusters • Cluster: A group of programs, typically associated by a call graph Cluster U V W X Y Z M A I F S E
Cluster • Cluster Definition • A group of programs, typically associated by a call graph. • Natural Cluster • A natural cluster is found by taking all the programs that can be reached by following the call graph starting at a single entry point program; only the programs that can be reached by following that path and not any other path are part of the cluster. M A I F S E
A U B C V W A D E F X Y Z G H K Natural Clusters M A I F S E
Clusters Cluster A Cluster U Cluster F M A I F S E
M A I F S E
M A I F S E
M A I F S E
Section • Section is a subset of an Exhibits' Clusters: • Based on Select/Omit type operations • Cluster Attributes: • Name, Interactive, Variable Calls, Unknown Calls, Contains a particular program • Cluster’s Entry Point Program Attributes • Program Name, Program Library Name, Last time used • The Cluster belongs to a particular application, i.e.: is called by other Clusters in the Section. M A I F S E
M A I F S E
M A I F S E
M A I F S E
M A I F S E
M A I F S E
M A I F S E
M A I F S E
M A I F S E
M A I F S E
M A I F S E
M A I F S E
PhysicalFile LogicalFile DataArea Display FileDDS Message File CL Source RPG /400 RPG ILE Source Printer File DDS Display FileAgent Message File Agent CLAgent RPGAgent Printer O-SpecAgent Printer FileAgent Dataand SchemaAgent * PhysicalFile LogicalFile Display aspx MsgFile.XML AVR Class AVR Class .NET Print File Monarch Migration Agents M A I F S E
M A I F S E
Original Application M A I F S E
Migrated Application M A I F S E
Modernized Look M A I F S E
Visual RPG DclFld zipService Cheeso.ZipcodeLookupService... TagR0Clear FMLKUNDZAdd 0##KNDR Move *Off *IN98Move *On *IN96Move *Off *IN11 TagR1 ExFmtBELD01//* F3 - USER SELECTED UPDATE OPTIONIf (*IN03 = *On)GotoENDEEndIf //* F16 - USER SELECTED Find ZipCode’s CityIf (*IN16 = *On) FMCityST = zipService.ZtoCS(FMZipCode)EndIf//* F7 - USER SELECTED ANOTHER OPTIONIf ( *IN07 = *On)ReadFMLKUNDIf( *IN11 =*On)ZAdd0##KDNR Visual RPG TagR0ClearFMLKUNDZAdd 0##KNDR Move *Off *IN98Move *On *IN96Move *Off *IN11TagR1 ExFmtBELD01//* F3 - USER SELECTED UPDATE OPTIONIf (*IN03 = *On)GotoENDEEndIf//* F7 - USER SELECTED ANOTHER OPTIONIf ( *IN07 = *On)ReadFMLKUNDIf( *IN11 =*On)ZAdd0##KDNR RPG/400 AVR C R0 TAG C *NOKEY CLEAR FMLKUND C Z-ADD 0 ##KNDR C MOVE '0' *IN98 C MOVE '1' *IN96 C MOVE '0' *IN11 C R1 TAG C EXFMT BELD01 C* F3 - USER SELECTED UPDATE OPTION C *IN03 IFEQ '1' C GOTO ENDE C ENDIF C* F7 - USER SELECTED ANOTHER OPTION C *IN07 IFEQ '1' C READ FMLKUND 11 C *IN11 IFEQ '1' C Z-ADD 0 ##KDNR M A I F S E
New AVR/DG Support • Full ILE Support • Service Programs • Procedures • CALLB (Including Prototypes) • Dynamic Program Calls via CALLD • Includes calls using a variable • Introduces the concept of Dynamic References • QTEMP support for SQL Server • Create Duplicate File M A I F S E
New Framework Facilities • Enhancing Monarch Applications with Non-Displayfile ASPX pages • ShowPage and AcceptCommands • New Command object provides these methods: • Call, Return, RequestShutdown • SetLdaField, GetLdaField • SetLdcObject, GetLdcObject, RmvLdcObject • Support for Master Pages • New Browser Server Controls • Date Fields • Function Key Button • Grouping Panel • Message Panel M A I F S E
This is Monarch RPG /400 RPG ILE Source Printer File DDS RPGAgent Printer O-SpecAgent Printer FileAgent AVR Class .NET Print File