[SWEXA.WRK]SWEXA_DFX_ACCOUNTING_REC.CDO

!++
!
!  CDO record:
!       SWEXA_DFX_ACCOUNTING_REC
!
!  Purpose:
!       DECfax Accounting record.
!
!  Copyright:
!       Copyright © 1995 Corpita Pty Ltd
!       15 Bedford Street, Collingwood 3066, Australia
!
!  History:
!       28-May-1995 by Simon L. Jackson
!           Initial version
!
!--

define field FILLER_13
        datatype text 13.
define field FILLER_21
        datatype text 21.
define field FILLER_50
        datatype text 50.
define field FILLER_84
        datatype text 84.

define field DFX_ACCOUNTING_CHARGE_CODE
        datatype text 7.
define field DFX_ACC_STATUS
        datatype longword.
define field DFX_TIMESTAMP
        datatype unsigned quadword.

define record SWEXA_DFX_ACCOUNTING_REC.

        DFX_TIMESTAMP.
        DFX_USERNAME.
        FILLER_50.
        DFX_ACCOUNTING_CHARGE_CODE.
        DFX_SERVER_ID.
        FAX_MESSAGE_ID.
        FILLER_1.
        FAX_ADDRESS.
        FILLER_13.
        FAX_DURATION_INTERVAL.
        FILLER_21.
        DFX_ACC_STATUS.
        FILLER_84.

end SWEXA_DFX_ACCOUNTING_REC record.