Page History
[ |../../index.htm#lansa/tgub9_003.htm]
現在地:
...
拡張可能なグループの例
例1:
GROUP_
...
BY (#XG_ADDR)
...
FIELDS (#ADDR1 #ADDR2 #ADDR3)
FETCH (*ALL *EXCLUDING #XG_ADDR *INCLUDING #ADDR1)
FROM_FILE (CUSTMST)
...
例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)