• Created by user-2c621, last updated by user-eb51a on Apr 11, 2023 1 minute read

Expandable Group Examples

Example 1:

     GROUP_BY (#XG_ADDR) FIELDS (#ADDR1 #ADDR2 #ADDR3)
     FETCH  (*ALL *EXCLUDING #XG_ADDR *INCLUDING #ADDR1)
            FROM_FILE (CUSTMST)

Example 2:

     GROUP_BY (#XG_GROUP1) FIELDS (#A #B #C)
     GROUP_BY (#XG_GROUP2) FIELDS (#D #E #F)
     SUBMIT    PROCESS (PROC01) FUNCTION (FUN01)
               EXCHANGE (#XG_GROUP1 *SYSUAR1 #XG_GROUP2 *EXCLUDING #C #D)
  • No labels