Overview: We need to push Avante Users to the website from certain screens. This task is to create a routine that we can call from multiple screens that will build the marker record, and call a browser on the client computer.
Part 1: Detect if we should call the website: NO LONGER NEEDED DUE TO CREATING A PROCESS THAT CAN BE CALLED FROM SOPP9116.14
- In SOPP9116.14 we check what program a given request type should call. If based on the request type the PGM = "WEB" then that means call the website with the method you will develop in Part 2
- The code in SOPP9116.14 looks at RECORD<9> for a transaction ID. This is not something we are going to have to worry about now. We have not crossed the bridge on how we will handle opening transactions.
Part 2: Create a modular program to call up the website. Call it WEBS9006.1
Create a process called WEB9006 using PD.B from TCL. Point it to WEBS9006.1
Input Parameters:
- CONTACT.NBR - PARMS(14)<5>
- CUSTOMER.NBR - PARMS(14)<4>
- OPERATOR CODE - PARMS(14) <3>
- REQUEST NUMBER - PARMS(14)<10>
- REQUEST SOURCE - PARMS(14)<6>
Part 2a: Create the TXX marker record:
- Call WEB.SAVE.TXX.RECORD
- INPUT PARAMS:
- CONTACT.NBR
- CUSTOMER.NBR
- OPERATOR CODE
- REQUEST NUMBER
- REQUEST SOURCE
- RETURN PARAMS
- When the call is complete PARAMS will be the TXX key written.
- INPUT PARAMS:
Part 2b: Call the browser on the client computer using TU.LAUNCH.APP:
- A good example would be QUOP4000.47PS
- READ WEB.APP.LAD FROM SYSCON
- F2 is the client path to the browser.
- Add F5 to be the url to the website. For dev it will be http://10.15.5.51/
- The PATH you are going to send them to will always be
- Set the equivalent of VARS to:
- "portNbr=":@PORT: "&portMarker=" :TXX.KEY resulting in:
- portNbr=PORT&portMarker=TXX.KEY
- "portNbr=":@PORT: "&portMarker=" :TXX.KEY resulting in:
- Build LAUNCHLN the same way.
- APP : " " : PATH : "?" : VARS
- it would look something like:
"c:\program files\iexplore.exe" -noframemerging http://10.15.5.51/?PORT.NUMBER=500&PORT.MARKER=12000
- Call TU.LAUNCH.APP the same way.
- This should bring up internet explorer logged in as the contact you set in Part 2a.
- READ WEB.APP.LAD FROM SYSCON