146 lines
2.1 KiB
Plaintext
Executable File
146 lines
2.1 KiB
Plaintext
Executable File
/******************************************************************************
|
|
/*
|
|
/* Data in loadfile format to be loaded into demo file D_ENGAGEMENTS.F
|
|
/*
|
|
/* Module %M% Version %I% Date %H%
|
|
/*
|
|
/* (c) Copyright 1998 Ardent Software Inc. - All Rights Reserved
|
|
/* This is unpublished proprietary source code of Ardent Software Inc.
|
|
/* The copyright notice above does not evidence any actual or intended
|
|
/* publication of such source code.
|
|
/*
|
|
/*******************************************************************************
|
|
/*
|
|
/* Maintenance log - insert most recent change descriptions at top
|
|
/*
|
|
/* Date.... GTAR# WHO Description........................................
|
|
/* 10/14/98 23801 SAP Change copyrights.
|
|
/* 01/24/96 17671 LAG Updated header to reflect loadfile comment format
|
|
/* 05/09/95 16054 KAB Updates from Technical Publications
|
|
/* 04/21/95 16054 KAB Updates from Technical Publications
|
|
/* 04/18/95 16054 TFH Initial version
|
|
/*
|
|
/*******************************************************************************
|
|
/*
|
|
@ PH
|
|
ID.SUP LOCATION.CODE DATE TIME ADVANCE
|
|
@ID D Default record ID for RetrieVe
|
|
0
|
|
|
|
ENGAGEMENTS.F
|
|
10L
|
|
S
|
|
@REVISE PH
|
|
TIME ADVANCE GATE.NUMBER GATE.REVENUE GATE.TICKETS ACT.NO RIDE.ID RIDE.REVENUE RIDE.TICKETS CONC.ID CONC.REVENUE CONC.TICKETS LABOR PAY
|
|
ACT.NO D
|
|
6
|
|
|
|
|
|
5R
|
|
M
|
|
ADVANCE D
|
|
2
|
|
MD2$,
|
|
|
|
12R
|
|
S
|
|
CONC.ID D
|
|
10
|
|
|
|
|
|
5R
|
|
M
|
|
CONCS.ASSOC
|
|
CONC.REVENUE D
|
|
11
|
|
MD2$,
|
|
|
|
12R
|
|
M
|
|
CONCS.ASSOC
|
|
CONC.TICKETS D
|
|
12
|
|
|
|
|
|
5R
|
|
M
|
|
CONCS.ASSOC
|
|
CONCS.ASSOC PH
|
|
CONC.ID CONC.REVENUE CONC.TICKETS
|
|
DATE I
|
|
FIELD(@ID,"*",2)
|
|
D2/
|
|
|
|
10R
|
|
S
|
|
|
|
GATE.NUMBER D
|
|
3
|
|
|
|
|
|
5R
|
|
M
|
|
GATE.REVENUE D
|
|
4
|
|
MD2$,
|
|
|
|
12R
|
|
M
|
|
GATES.ASSOC
|
|
GATE.TICKETS D
|
|
5
|
|
|
|
|
|
5R
|
|
M
|
|
GATES.ASSOC
|
|
GATES.ASSOC PH
|
|
GATE.NUMBER GATE.REVENUE GATE.TICKETS
|
|
LABOR D
|
|
13
|
|
|
|
|
|
5R
|
|
S
|
|
LOCATION.CODE I
|
|
FIELD(@ID,"*",1)
|
|
|
|
|
|
7L
|
|
S
|
|
PAY D
|
|
14
|
|
MD2$,
|
|
|
|
10R
|
|
S
|
|
RIDE.ID D
|
|
7
|
|
|
|
|
|
5R
|
|
M
|
|
RIDES.ASSOC
|
|
RIDE.REVENUE D
|
|
8
|
|
MD2$,
|
|
|
|
12R
|
|
M
|
|
RIDES.ASSOC
|
|
RIDE.TICKETS D
|
|
9
|
|
|
|
|
|
5R
|
|
M
|
|
RIDES.ASSOC
|
|
RIDES.ASSOC PH
|
|
RIDE.ID RIDE.REVENUE RIDE.TICKETS
|
|
TIME D
|
|
1
|
|
MTH
|
|
|
|
10R
|
|
S
|