IndexFullKeyedJoin.ecl 523 B

1234567891011121314151617181920212223
  1. //
  2. // Example code - use without restriction.
  3. //
  4. IMPORT $;
  5. r1 := RECORD
  6. $.DeclareData.Layout_Person;
  7. $.DeclareData.Layout_Accounts;
  8. END;
  9. r1 Xform1($.DeclareData.Person.FilePlus L,
  10. $.DeclareData.Accounts R) := TRANSFORM
  11. SELF := L;
  12. SELF := R;
  13. END;
  14. J1 := JOIN($.DeclareData.Person.FilePlus(PersonID BETWEEN 1 AND 100),
  15. $.DeclareData.Accounts,
  16. LEFT.PersonID=RIGHT.PersonID,
  17. Xform1(LEFT,RIGHT),
  18. KEYED($.DeclareData.IDX_Accounts_PersonID));
  19. OUTPUT(J1,ALL);