Prev
Next
Forums Integration / Customization S3 Customization/Development

Lawson S3 .sr coding

 2 Replies
 0 Subscribed to this topic
 17 Subscribed to this forum
Sort:
Author
Messages
Pramod Chandra
Basic Member Send Private Message
Posts: 12
Basic Member
4/28/2011 2:48 PM
Hi,       I have a custom table in ZZ system code M1LOOKUPVL Fields PROCESS-ID     Alpha (10)                 Primary Index key1 KEY2               Alpha (10)                 Primary Index key2 KEY3               Alpha (10)                 Primary Index key3 SEQ1               Numeric(06)               Primary Index key4 FLD1               Alpha(50) I have stored Values like PROCESS_ID=ZR62CODE KEY2=ZR62CODE KEY3=ZR62CODE SEQ1=1 FLD1=1C my ZZ.sr codes looks like DEFINE SELECT      "Interface codes"        ID              ZR-MLK-S-0001        SCRFLD      ZR62-MLK-CODES        FILENAME    M1LOOKUPVL        INDEX         ZMVSET1        KEYRNG      "ZR62CODE"        NXTKEY      ZR62-MLK-CODES        DSPFLDS     FLD1=2:"Interface codes"        RETURNS     FLD1 INTO ZR62-MLK-CODES my kndef and skndef (ZZ) are zr1 = ZR62-MLK-CODES but still the list of values (select) doesnt work obviously I do srgen Thanks in Advance pramod
Ragu Raghavan
Veteran Member Send Private Message
Posts: 477
Veteran Member
4/28/2011 4:23 PM
In the .scr code, you have assigned the key zr1 to the appropriate field and done a compile?
Sam Simpson
Veteran Member Send Private Message
Posts: 239
Veteran Member
4/28/2011 8:37 PM
Your KEYRNG should equal the number of characters with your index key. Therefor add blanks if less than 10.