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)