IIUG Software Repository Files

From: Dave Snyder <dave.snyder@das13.snide.com>
Subject: CHECK WRITING PROGRAM IN INFORMIX
Date: Fri, 19 Nov 1993 22:14:54 -0500 (EST)

In article <1993Nov19.225251.8278@nevada.edu> sxj@nye.nscee.edu (Sam Jain)
writes:
}
} Does anyone have a readymade check writing program to print checks on
} continuous perforated forms.. in particular, it would need to
} convert like 1296 - to tweleve hundred and ninety six dollars and no cents
} for checks and stuff like that
}

Do you mean like the following... BTW this program is formatted for Deluxe
Computer Check #91002 and has a dol2word() function.

Here --------- Snip Here --------- Snip Here --------- Snip Here --------- Snip

I N F O   F O R   T A B L E   apchk


Index name          Owner     Type    Cluster  Columns

ixchk_1             dave      unique  No       chk_number


Column name          Type                                    Nulls

chk_number           char(6)                                 no
chk_date             date                                    yes
chk_status           char(1)                                 yes

Here --------- Snip Here --------- Snip Here --------- Snip Here --------- Snip

I N F O   F O R   T A B L E   apinv


Index name          Owner     Type    Cluster  Columns

ixinv_1             dave      unique  No       ven_code
                                               inv_number
                                               inv_sequence


Column name          Type                                    Nulls

ven_code             char(8)                                 no
inv_number           char(10)                                no
inv_sequence         smallint                                no
inv_date             date                                    yes
inv_amount           money(8,2)                              no
inv_description      char(30)                                yes
batchnum             integer                                 yes
trn_number           integer                                 yes
chk_number           char(6)                                 yes
due_date             date                                    yes

Here --------- Snip Here --------- Snip Here --------- Snip Here --------- Snip

I N F O   F O R   T A B L E   aptrn


Index name          Owner     Type    Cluster  Columns

ixtrn_1             michele   unique  No       ven_code
                                               inv_number
                                               inv_sequence

ixtrn_2             michele   unique  No       trn_number


Column name          Type                                    Nulls

ven_code             char(8)                                 no
inv_number           char(10)                                no
inv_sequence         smallint                                no
inv_date             date                                    yes
inv_amount           money(8,2)                              no
inv_description      char(30)                                yes
batchnum             integer                                 no
trn_number           serial                                  no
chk_number           char(6)                                 yes
chk_date             date                                    yes

Here --------- Snip Here --------- Snip Here --------- Snip Here --------- Snip

I N F O   F O R   T A B L E   apven


Index name          Owner     Type    Cluster  Columns

ixven_1             dave      unique  No       ven_code


Column name          Type                                    Nulls

ven_code             char(8)                                 no
ven_name             char(30)                                yes
ven_addr1            char(30)                                yes
ven_addr2            char(30)                                yes
ven_city             char(20)                                yes
ven_state            char(2)                                 yes
ven_zip              char(10)                                yes
ven_phone            char(13)                                yes
ven_contact          char(10)                                yes
ven_ship1            char(30)                                yes
ven_ship2            char(30)                                yes
ven_ship3            char(30)                                yes

Here --------- Snip Here --------- Snip Here --------- Snip Here --------- Snip
# o_chkp.4gl
# Created by: db4glgen, v3.17 93/11/18 10:22:56