Follow this step if you did not set up documents for an employee using the demonstration VLF application, in the file DXDOCS.

This WAM will display a fixed list of documents for an employee, based on a data from a supplied text file. To simplify building the list of documents, the WAM reads a text file MYDOCS.txt to populate a working list. Another working list is populated for display. A later step will add another column to this list which will contain a clickable image.

1. Create a new WAM:
   
        Name: iiiDspEmpDocs
        Description: Display Employee Documents
        Layout Weblet: iiilay01
   
2. Create your WAM based on the following logic:
   
   
   • Map field STDRENTRY for *both as a *hidden field
   • Define a Group_By, EMPDATA for fields, EMPNO, SURNAME, GIVENAME, ADDRESS1, ADDRESS2, ADDRESS3, POSTCODE, DEPTMENT and SECTION.
   • Define a working list DOCLIST containing fields DF_ELFNAM
   • Define a working list MYDOCS containing field STD_TEXTL
   • Define a work field RETCODE with reference field IO$STS
   • Define a webroutine BEGIN
   • Map field EMPNO for *both
   • Map fields FULLNAME, ADDRESS1, ADDRESS2, ADDRESS3, POSTCODE, DEPTMENT and SECTION for *output. All fields should have a display attribute of *output
   • If STDRENTRY = S
   • Clear list DOCLIST
   • Clear list MYDOCS
   • Fetch group_by EMPDATA from file PSLMST with the key EMPNO
   • Use the BIF transform_file to populate the list MYDOCS from the file "C:\Program Files (x86)\LANSA\MYDOCS.txt"
   • Selectlist MYDOCS
   • Change DF_ELFNAM to STD_TEXTL
   • Add an entry to DOCLIST
   • Endselect
   • Endif
     
     
3. Define a WebRoutine SEND_DOCUMENT with a Response keyword of #HTTPR
   
   
   • Map field DF_ELFNAM for *input
   • Set #HTTPR, property ContentFile to "C:\Program Files (x86)\LANSA\" + DF_ELFNAM
   • Endroutine
     
     Sample code is supplied in WAM095. Appendix B. 
     
     
4. Compile your WAM. Open the WebRoutine BEGIN in the Design view, it should look like the following:
   
   
   
   
5. Drop a Push Button weblet alongside the employee number field.
   Set up the push button properties:

   Property	Value
   Caption	Details
   On_Click_wrname	BEGIN
   submitExtraFields	STDRENTRY
   	Literal Value: S

   
   
   
6. Save your changes.
   
   
7. Select the column heading "Document long file" and delete it.
   Type in a new column heading - Employee Documents.
   You may need to click on another part of the layout to refresh the column heading.
   
   
8. Drop an Anchor weblet into the list's file name column. Ignore the increase in width of the column. At run time it will be displayed with the width of the actual file names.
   Set up the Anchor weblet properties:

   Property	Value
   Currentrowhfield	DF_ELFNAM
   Currentrownumval	$DF_ELFNAM
   On_click_wrname	SEND_DOCUMENT
   Show_in_new_window	True

   
   Your design should look like the following:
   
   
9. Save your changes.
   
   
10. Execute your WAM in the browser. Any employee number may be entered (A0070, A0090, A1234 etc). The WAM will always display the employee details and a fixed list of documents.
    Click on one of the documents to display it. The way that the browser and Windows handles the request will depend on the version of browser and the version of Windows being used. For example, in Windows 7 with MS Office installed and IE10, the txt and pdf files are displayed in a new browser tab. The Office documents prompt to be displayed in the required Office program.

Continue with Step 4. Enhance Appearance of the Documents List  (Optional).