La structure de la source de données FOCUS varie en fonction de la requête de rapport. Pour ce faire, il faut passer par les étapes suivantes :
- Chaque commande d'agrégation (SUM, COUNT, WRITE) crée un segment, et chaque nouveau champ BY dans la requête devient une clé. Dans une requête qui utilise de multiples commandes d'affichage, la clé de tout segment nouvellement créé ne contient pas de clés qui se trouvent dans le segment mère.
- Si une commande PRINT ou LIST est utilisée pour créer un segment, tous les champs BY, ainsi que le champ FOCLIST interne, forment la clé.
- Tous les champs spécifiés après INDEX sont indexés ; c'est-à-dire que FIELDTYPE=I est spécifié dans le fichier principal. Un maximum de quatre champs peuvent être indexés.
- Si les données du fichier HOLD dépassent une page (4 octets pour les sources de données FOCUS ou 16 octets pour les sources de données XFOCUS), elle ne peuvent être stockées dans un segment unique. Les données qui sont trop longues pour tenir dans un seul segment deviendront un segment parent avec des segments enfant uniques. Pour une source de données FOCUS, les champs sont regroupés dans des segments normaux de taille de page FOCUS et ajoutés comme segments uniques au total de 32K données maximum. Pour une source de données XFOCUS, le segment racine peut contenir les 16K premiers octets de données, et des données supplémentaires jusqu'à hauteur du maximum de 32K octets seront placées dans un segment unique seul. Les champs BY doivent tous se produire dans la portion des données attribuées au segment racine.
Pour contrôler la propagation des attributs ACCEPT et TITLE au fichier principal associé au fichier HOLD, utilisez la commande SET HOLDATTR. Pour contrôler l'attribut FIELDNAME dans le fichier principal du fichier HOLD, utilisez la commande SET ASNAMES. Pour en savoir plus au sujet du contrôle des attributs TITLE, ACCEPT et FIELDNAME dans un fichier maître HOLD, consultez Contrôle d'attributs dans les fichiers Master HOLD.
L'exemple ci-après crée un sous-ensemble de la source de données CAR.
TABLE FILE CAR SUM SALES BY COUNTRY BY CAR BY MODEL ON TABLE HOLD AS X1 FORMAT FOCUS END
Cette requête crée une source de données FOCUS à segment unique avec un type de segment de S3 (car il a trois champs BY) appelé X1.
La requête crée le fichier principal X1 :
FILE=X1, SUFFIX=FOC SEGMENT=SEG01 ,SEGTYPE=S03 FIELDNAME=COUNTRY ,ALIAS=E01 ,USAGE=A10 ,$ FIELDNAME=CAR ,ALIAS=E02 ,USAGE=A16 ,$ FIELDNAME=MODEL ,ALIAS=E03 ,USAGE=A24 ,$ FIELDNAME=SALES ,ALIAS=E04 ,USAGE=I6 ,$
Cet exemple crée une source de données FOCUS à segment unique avec un type de segment de S4 (car il se compose de trois champs BY et du champ FOCLIST FIELD).
TABLE FILE CAR PRINT SALES BY COUNTRY BY CAR BY MODEL ON TABLE HOLD AS X2 FORMAT FOCUS INDEX MODEL END
Le fichier principal créé par cette requête est :
FILE=X2, SUFFIX=FOC SEGMENT=SEG01, SEGTYPE=S04 FIELDNAME=COUNTRY ,ALIAS=E01 ,USAGE=A10 ,$ FIELDNAME=CAR ,ALIAS=E02 ,USAGE=A16 ,$ FIELDNAME=MODEL ,ALIAS=E03 ,USAGE=A24 ,FIELDTYPE=I,$ FIELDNAME=FOCLIST ,ALIAS=E04 ,USAGE=I5 ,$ FIELDNAME=SALES ,ALIAS=E05 ,USAGE=I6 ,$
La requête suivante comprend deux commandes SUM. La première, SUM SALES BY COUNTRY, crée un segment avec comme clé COUNTRY et comme champ de données les valeurs sommées de SALES. La deuxième, SUM SALES BY COUNTRY BY CAR BY MODEL, crée un segmet descendant, avec comme clés CAR et MODEL et comme champ non-clé SALES.
Le champ COUNTRY ne fait pas partie de la clé du deuxième segment. COUNTRY est une clé dans le chemin vers le deuxième segment. Toute répétition de cette valeur est superflue.
TABLE FILE CAR SUM SALES BY COUNTRY SUM SALES BY COUNTRY BY CAR BY MODEL ON TABLE HOLD AS X3 FORMAT FOCUS END
Cela crée une source de données FOCUS à deux segments.
Le fichier principal pour cette source de données FOCUS nouvellement créée est :
FILE=X3, SUFFIX=FOC SEGMENT=SEG01, SEGTYPE=S01 FIELDNAME=COUNTRY ,ALIAS=E01 ,USAGE=A10 ,$ FIELDNAME=SALES ,ALIAS=E02 ,USAGE=I6 ,$ SEGMENT=SEG02, SEGTYPE=S02,PARENT=SEG01 FIELDNAME=CAR ,ALIAS=E03 ,USAGE=A16 ,$ FIELDNAME=MODEL ,ALIAS=E04 ,USAGE=A24 ,$ FIELDNAME=SALES ,ALIAS=E05 ,USAGE=I6 ,$
Dans cet exemple, chaque commande d'affichage crée un segment.
La clé du segment racine est le champ BY, COUNTRY, et les clés aux segments descendants sont les nouveaux champs BY. Le dernier segment utilise le champ FOCLIST interne comme partie de la clé, car la commande d'affichage est PRINT.
TABLE FILE CAR SUM SALES BY COUNTRY BY CAR SUM SALES BY COUNTRY BY CAR BY MODEL PRINT SALES BY COUNTRY BY CAR BY MODEL BY BODY ON TABLE HOLD AS X4 FORMAT FOCUS INDEX COUNTRY MODEL END
Le fichier principal est :
FILE=X4, SUFFIX=FOC SEGMENT=SEG01, SEGTYPE =S02 FIELDNAME=COUNTRY ,ALIAS=E01 ,USAGE=A10 ,FIELDTYPE=I,$ FIELDNAME=CAR ,ALIAS=E02 ,USAGE=A16 ,$ FIELDNAME=SALES ,ALIAS=E03 ,USAGE=I6 ,$ SEGMENT=SEG02, SEGTYPE =S01 ,PARENT=SEG01 FIELDNAME=MODEL ,ALIAS=E04 ,USAGE=A24 ,FIELDTYPE=I,$ FIELDNAME=SALES ,ALIAS=E05 ,USAGE=I6 ,$ SEGMENT=SEG03, SEGTYPE =S02 ,PARENT=SEG02 FIELDNAME=BODYTYPE ,ALIAS=E06 ,USAGE=A12 ,$ FIELDNAME=FOCLIST ,ALIAS=E07 ,USAGE=I5 ,$ FIELDNAME=SALES ,ALIAS=E08 ,USAGE=I6 ,$