Page History
[ |../../index.htm#lansa/wamengt4_0160.htm]
You are here:
...
WAM010 - Using WEB_MAPs
In this step, you will add the RDMLX code consisting of multiple WebRoutines to the newly created WAM.
1. Immediately following the BEGIN_COM, insert the following RDMLX code to create a WebRoutine named WMdemo:
Webroutine Name(WMdemo) Desc('WEB_MAP WR1')
Endroutine
2. All fields in the WebRoutine will be both incoming and outgoing, so they will be specified FOR(*BOTH). By default, all of the fields will be displayed as input fields. You could write the following WEB_MAP statement for the WebRoutine:
WEB_MAP FOR(*BOTH) FIELDS(#EMPNO #GIVENAME #SURNAME #ADDRESS1 #POSTCODE (#STDRENTRY *HIDDEN))
However, a GROUP_BY may be used in a WEB_MAP, so you will use the following code:
Begin_Com Role(*EXTENDS #PRIM_WAM)
Group_By Name(#Empdata) Fields(#empno #surname #givename #address1 #postcode)
Webroutine Name(WMdemo) Desc('WEB_MAP WR1')
Web_Map For(*BOTH) Fields(#empdata (#stdrentry *hidden))
. . . WebRoutine
...