| Topics: | 
VIDEOTRK contains sample data about customer, rental, and purchase information for a video rental business. It can be joined to the MOVIES or ITEMS data source. VIDEOTRK and MOVIES are used in examples that illustrate the use of the Maintain Data facility.
FILENAME=VIDEOTRK, SUFFIX=FOC SEGNAME=CUST, SEGTYPE=S1 FIELDNAME=CUSTID, ALIAS=CIN, FORMAT=A4, $ FIELDNAME=LASTNAME, ALIAS=LN, FORMAT=A15, $ FIELDNAME=FIRSTNAME, ALIAS=FN, FORMAT=A10, $ FIELDNAME=EXPDATE, ALIAS=EXDAT, FORMAT=YMD, $ FIELDNAME=PHONE, ALIAS=TEL, FORMAT=A10, $ FIELDNAME=STREET, ALIAS=STR, FORMAT=A20, $ FIELDNAME=CITY, ALIAS=CITY, FORMAT=A20, $ FIELDNAME=STATE, ALIAS=PROV, FORMAT=A4, $ FIELDNAME=ZIP, ALIAS=POSTAL_CODE, FORMAT=A9, $ SEGNAME=TRANSDAT, SEGTYPE=SH1, PARENT=CUST FIELDNAME=TRANSDATE, ALIAS=OUTDATE, FORMAT=YMD, $ SEGNAME=SALES, SEGTYPE=S2, PARENT=TRANSDAT FIELDNAME=PRODCODE, ALIAS=PCOD, FORMAT=A6, $ FIELDNAME=TRANSCODE, ALIAS=TCOD, FORMAT=I3, $ FIELDNAME=QUANTITY, ALIAS=NO, FORMAT=I3S, $ FIELDNAME=TRANSTOT, ALIAS=TTOT, FORMAT=F7.2S, $ SEGNAME=RENTALS, SEGTYPE=S2, PARENT=TRANSDAT FIELDNAME=MOVIECODE, ALIAS=MCOD, FORMAT=A6, INDEX=I, $ FIELDNAME=COPY, ALIAS=COPY, FORMAT=I2, $ FIELDNAME=RETURNDATE, ALIAS=INDATE, FORMAT=YMD, $ FIELDNAME=FEE, ALIAS=FEE, FORMAT=F5.2S, $
SECTION 01
             STRUCTURE OF FOCUS    FILE VIDEOTRK ON 05/15/03 AT 12.25.19
 
         CUST
 01      S1
**************
*CUSTID      **
*LASTNAME    **
*FIRSTNAME   **
*EXPDATE     **
*            **
***************
 **************
       I
       I
       I
       I TRANSDAT
 02    I SH1
**************
*TRANSDATE   **
*            **
*            **
*            **
*            **
***************
 **************
       I
       +-----------------+
       I                 I
       I SALES           I RENTALS
 03    I S2        04    I S2
**************    **************
*PRODCODE    **   *MOVIECODE   **I
*TRANSCODE   **   *COPY        **
*QUANTITY    **   *RETURNDATE  **
*TRANSTOT    **   *FEE         **
*            **   *            **
***************   ***************
 **************    **************FILENAME=MOVIES, SUFFIX=FOC SEGNAME=MOVINFO, SEGTYPE=S1 FIELDNAME=MOVIECODE, ALIAS=MCOD, FORMAT=A6, INDEX=I, $ FIELDNAME=TITLE, ALIAS=MTL, FORMAT=A39, $ FIELDNAME=CATEGORY, ALIAS=CLASS, FORMAT=A8, $ FIELDNAME=DIRECTOR, ALIAS=DIR, FORMAT=A17, $ FIELDNAME=RATING, ALIAS=RTG, FORMAT=A4, $ FIELDNAME=RELDATE, ALIAS=RDAT, FORMAT=YMD, $ FIELDNAME=WHOLESALEPR, ALIAS=WPRC, FORMAT=F6.2, $ FIELDNAME=LISTPR, ALIAS=LPRC, FORMAT=F6.2, $ FIELDNAME=COPIES, ALIAS=NOC, FORMAT=I3, $
SECTION 01
             STRUCTURE OF FOCUS    FILE MOVIES   ON 05/15/03 AT 12.26.05
 
         MOVINFO
 01      S1
**************
*MOVIECODE   **I
*TITLE       **
*CATEGORY    **
*DIRECTOR    **
*            **
***************
 **************FILENAME=ITEMS, SUFFIX=FOC SEGNAME=ITMINFO, SEGTYPE=S1 FIELDNAME=PRODCODE, ALIAS=PCOD, FORMAT=A6, INDEX=I, $ FIELDNAME=PRODNAME, ALIAS=PROD, FORMAT=A20, $ FIELDNAME=OURCOST, ALIAS=WCOST, FORMAT=F6.2, $ FIELDNAME=RETAILPR, ALIAS=PRICE, FORMAT=F6.2, $ FIELDNAME=ON_HAND, ALIAS=NUM, FORMAT=I5, $
SECTION 01
             STRUCTURE OF FOCUS    FILE ITEMS    ON 05/15/03 AT 12.26.05
 
         ITMINFO
 01      S1
**************
*PRODCODE    **I
*PRODNAME    **
*OURCOST     **
*RETAILPR    **
*            **
***************
 **************| WebFOCUS | |
| Feedback |