home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-387-Vol-3of3.iso
/
s
/
sbt25gl.zip
/
ZIPGLC01.EXE
/
GLTRAN._XP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1993-02-11
|
82KB
|
1,867 lines
TYPE("lc_batchno") = "C"
TYPE("lc_bstat") = "C"
TYPE("lc_btype") = "C"
TYPE("lc_postprd") = "C"
TYPE("lc_postyr") = "C"
TYPE("ld_bdate") = "D"
TYPE("ld_edate") = "D"
TYPE("lc_ctrltot") = "N"
Preparing for transaction entry
a_glhunp//
batchno1
a_gldunp//
batchno1
a_glsegs//
segid1
a_gltype//
gltype
a_glacnt//
glacnt
a_glacnt,
Chart of Accounts has no accounts! Transaction
entry terminated.
a_gltype,
No Account Types have been set up for
Statistical accounts!
Transaction entry terminated.
No Account Types have been set up for
Normal accounts!
Transaction entry terminated.
To Period
To Year
Edit Journal Entries, <Ctrl-F8> for totals
GLACNT01
F$Fb/
Setting up transaction files
Initializing batch totals
Copying unposted detail
a_glhunp,
a_gldunp,
Initializing transaction totals
lp_tselect
Initializing transaction totals
lp_tadd
CTRL+F8
DO l_gltotl
CTRL+F2
DO l_segstr
Setting up transaction entry forms
lw_gltran
\<Select
\<Add
\<Edit
a_glhead,
a_glhead
\<Forward
\<Back
\<Void
a_glhead,
a_glhead
E\<xit
DO l_entr WITH PAD()
lw_gldtrn
BEGINNING BALANCE
CONVERSION
NORMAL
COMPARATIVE YEAR
STATISTICAL
SUBLEDGER
888888
UNPOSTED
HOLD
EMPTY
APPROVED
OUT OF BALANCE
POSTED
CANCELLED
RECLASSIFIED
DELETED
888888888
Manual
Standard
Reversing
Recurring
Allocation
Conversion
Manual 888888
lw_brow1
lw_totals
gltran.spr
gldtrn.spr
lw_gltran
lw_gldtrn
BROWSE FREEZE glacnt FIELDS glacnt :P=gc_acctpic :H=gc_accthdr &lc_acctlen, acntdesc =IIF(SEEK(a_gldetl->glacnt,"a_glacnt"), a_glacnt->gldesc,"") :H="Acct. Description" &lc_acctdes, gldamnt :15 :P="############.##" :H=" Debit", glcamnt :15 :P="############.##" :H=" Credit" NOWAIT NOCLEAR NODELETE NOMENU TITLE "Journal Transaction Entries" IN WINDOW lw_brow1 COLOR SCHEME 1
Edit Journal Entries, <Ctrl-F8> for totals
LP_TEXIT
LC_BATCHNOLC_BSTAT
FLC_BTYPE
LC_POSTPRDLC_POSTYR
LD_BDATE
LD_EDATE
LLN_CTRLTOTGN_TRACE
E_TRACE
GL_ASSERT
E_ASSRT
LN_TRNSEQ
LN_NEXTSEQLC_PAD
DBFLD_TRNDATELN_REC
LC_GLSEQNOLL_NEW
LL_TEDIT
LN_OPNFL
ELC_ACCTDESLL_EDITTRNLL_HEDIT
ELN_TRANCNTLL_INMENU
LC_ACCTLENLN_BDRTOT
LN_BCRTOT
LN_OPNFLD
LN_TDRTOT
LN_TCRTOT
LN_BAMTREMLN_TAMTREMLM_GLENTR
LW_BROW1
LN_CUROBJ
LN_LASTOBJLC_SAYBTYPLN_TOTHTRNLC_SAYBSTALC_GLACNT
LL_TSELECTLN_OLDDAMTLN_OLDCAMTLN_GLDAMNTLN_GLCAMNTLC_GLTDES
LL_TDELETELA_TRTYPE
LC_OLDACNTLL_ABORT
LL_BROWSE
LL_FIRSTEDLA_GLDETL
LA_GLHEAD
LC_GLREVRSLC_TOPER
FLC_TOYR
RGLC_REVCOLRLW_TOTALS
LL_NEWTRN
LN_ADDOBJ
LN_OPNFLSELN_TOTSEGSLC_STATMSGLC_XSTAT
LN_OPNFLTYLL_CTRPGDNLL_FRSTFLDLL_TCONTINLL_AUTDISTLC_AUTDISTLC_TRTYPE
LL_ESAVED
LL_STD
LN_ESCREADLC_GLDESC
LL_GLADD
FC_GLSEQNOFC_GLTDES
FC_TRTYPE
FD_GLDATE
FC_GLREFR
FC_BATCHNOFC_GLPER
FC_GLYEAR
FC_STATUS
FC_GLMOD
FFC_GLCOMP
FC_GLREVRSFC_REVPER
FC_REVYEARG_DSPPRC
YG_OPNFL
ADGF_GLHUNPFGF_GLDUNPFGF_GLSEGSFGF_GLTYPEFGLTYPE
GF_GLACNTFG_DSPALT
L_GLEXIT
RGC_OSEOL
NGC_APPLID
U_CHKPV
GC_USERID
GC_COMPID
G_DSPST
EGN_MSGLINEL_CRETMP
A_GLHEAD
OGLSEQNO
STATUS
OA_GLDETL
GLCAMNT
TGLDAMNT
A_GLBTCH
OBSTAT
GA_GLHUNP
LA_GLHUNP
BATCHNO
NOA_GLDUNP
NL_SUMBCH
L_UPBSTA
REMF8
MANT3
GLW_GLTRAN
G_PNTBG
GS_219
LP_TSELECTLP_TADD
RNBTYPE
LP_TEDIT
LP_TFWD
NOLP_TBACK
NLP_TDEL
RNLP_TEXIT
OLW_GLDTRN
GD_SDATE
EGLTDES
DGLREFR
DYEARPRD
DTRTYPE
DGLREVRS
DREVPER
DREVYEAR
DFD_ADDDATEADDDATE
DFC_ADDUSERADDUSER
GLACNT
GC_ACCTPICGC_ADRVPRGGN_ACCTLENLN_ACCTDESL_ENTR
SGK_ESC
TYPE("lc_initmde") = "C"
lc_initmdef
Manual
Standard
Reversing
Recurring
Allocation
Conversion
Manual 888888
UNPOSTED
HOLD
EMPTY
APPROVED
OUT OF BALANCE
POSTED
CANCELLED
DELETED
RECLASSIFIED
888888888
LC_INITMDEGN_TRACE
FE_TRACE
GL_ASSERT
E_ASSRT
LC_OLDWORKLL_EDITTRNA_GLDETL
ELN_TRANCNTGLSEQNO
LC_GLSEQNOA_GLHEAD
FC_BATCHNOLC_BATCHNOFC_GLSEQNOFD_GLDATE
LD_TRNDATEFC_GLTDES
GLTDES
OFC_GLREFR
GLREFR
OFC_GLPER
SLC_POSTPRDYEARPRD
EFC_GLYEAR
LC_POSTYR
FC_STATUS
STATUS
OFC_TRTYPE
TRTYPE
OLC_TRTYPE
FC_GLCOMP
GC_COMPID
FC_GLREVRSGLREVRS
OFC_REVPER
REVPER
OFC_REVYEARREVYEAR
OFD_ADDDATEGD_SDATE
OADDDATE
FC_ADDUSERGC_USERID
ADDUSER
TLC_SAYBSTAA_GLBTCH
TBSTAT
LC_BSTAT
ELC_GLREVRSLC_GLACNT
GLACNT
LN_GLDAMNTGLDAMNT
DLN_GLCAMNTGLCAMNT
LC_GLTDES
LN_TDRTOT
LN_TCRTOT
LN_TAMTREML_SUMDC
GC_ACCTPICLC_GLDESC
TYPE("ln_curobj") = "N"
ln_curobjf
Manual
Standard
Reversing
Recurring
Allocation
Conversion
Manual 888888
Manual
Standard
Reversing
Recurring
Allocation
Conversion
Manual 888888
gltran.spr
LN_CUROBJ
GN_TRACE
FE_TRACE
GL_ASSERT
E_ASSRT
LN_OBJECT
A_GLHEAD
FC_BATCHNOLC_BATCHNOFC_GLSEQNOLC_GLSEQNOFD_GLDATE
LD_TRNDATELL_ADDONE
LC_TRTYPE
FC_TRTYPE
TRTYPE
LL_HEDIT
LL_FRSTFLDGC_ADRVPRG
GN_TRACE
E_TRACE
FLL_RETURN
LL_FRSTFLDLC_BTYPE
FC_TRTYPE
GN_TRACE
E_TRACE
FFC_GLREVRSLC_TOPER
GN_TRACE
E_TRACE
FFC_GLREVRSLC_TOYR
GN_TRACE
E_TRACE
FLL_RETURN
LN_READKEYLL_CONT
LL_FRSTFLDFC_GLREVRSLC_GLREVRSGK_LFT
HNOGK_UP
EQNOLC_TOPER
SLC_TOYR
FC_REVPER
FC_REVYEARLW_GLTRAN
LN_LASTOBJ
GN_TRACE
E_TRACE
FLL_RETURN
LC_POSTPRDGN_FCPRDS
FC_REVPER
Reversing period must be between 01 and FF
GN_TRACE
E_TRACE
FLL_RETURN
LL_FRSTFLDFC_REVPER
GN_FCPRDS
G_DSPAL
GN_TRACE
E_TRACE
FLL_RETURN
LC_POSTPRDGN_FCPRDS
FC_REVYEARLC_POSTYR
a_sycdfi
Invalid period and year!
Period
is locked.
Invalid year!
GN_TRACE
E_TRACE
FLL_RETURN
LC_SALIAS
LL_FRSTFLDFC_REVYEARGC_FCYR
ARGC_COMPID
FC_REVPER
G_DSPAL
NOA_SYCDFI
PLOCKED
PERMLCK
The Transaction Date must fall in Period
. Please reenter!
GN_TRACE
E_TRACE
FLL_RETURN
LL_FRSTFLDFD_GLDATE
LD_BDATE
RLD_EDATE
G_DSPAL
LC_POSTPRDLC_POSTYR
GN_TRACE
E_TRACE
FLL_FRSTFLDLN_LASTOBJ
a_sysdatV
a_sysdat
GN_TRACE
E_TRACE
FLC_TRNSEQ
LN_TRNSEQ
LN_NEXTSEQA_SYSDAT
RG_SETSYS
GC_APPLID
GC_COMPID
G_LCKRC
STR10
A_GLHEAD
QBATCHNO
LC_BATCHNOGLSEQNO
YEARPRD
LC_POSTYR
LC_POSTPRDSTATUS
FLDGLMODULE
GFC_GLMOD
OGLCOMP
SADDUSER
GC_USERID
ADDDATE
ADDTIME
A_GLBTCH
BSTAT
OLC_BSTAT
LN_TOTHTRN
STANDCODE
a_glhaut//
auttype1
a_gldaut//
auttype1
Select a Standard Entry
Enter a Standard Entry code or press <F2> to
select from a list of available entries:
Standard Code
(Leave blank to revert to Manual Entry)
!!!!!!!!
lw_temp
Manual
auttype1
Manual
Standard Entry F
not found.
Reenter
GLHAUT
Select Automatic Standard Entry
Manual
Manual
gldtrn.spr
gltran.spr
GN_TRACE
E_TRACE
FLN_OPNFLH
LN_OPNFLD
LN_OLDAREALC_TEMP
RLN_RESP
LN_TEMPAMTLL_BROWTMPLC_HELPID
LL_ABORT
PLN_RECNO
AGC_HELPID
G_OPNFL
GF_GLHAUTFA_GLHAUT
AUTTYPE
GF_GLDAUTFAUTONO
DA_GLDAUT
GLW_TEMP
OA_GLHEAD
TTRTYPE
FC_TRTYPE
LC_TRTYPE
AUTTYPE1
AUTBASE
L_TMPCPY
PL_AUTDST
TG_GETDLG
G_LSTRC
L_SUMDC
L_INITVR
GC_ADRVPRGLW_TOTALS
L_CLRBRW
Enter amounts, <Ctrl-End> saves, <Esc> aborts changes
BROWSE FIELDS glacnt &lc_acctlen :P=gc_acctpic :H=gc_accthdr :V=l_vglac("BROWSE",a_gldetl->glacnt) :F :W=l_wrefdt(), gltdes &lc_acctdes :H=SPACE((79 - gn_acctlen-42)/2) + "Comment", gldamnt :15 :P="############.##" :H=" Debit" :V=l_bgldam() :F :W=.NOT. EMPTY(STRTRAN(STRTRAN(a_gldetl->glacnt,"-"," "), "0"," ")), glcamnt :15 :P="############.##" :H=" Credit" :V=l_bglcam() :F :W=.NOT. EMPTY(STRTRAN(STRTRAN(a_gldetl->glacnt,"-"," "), "0"," ")) NOCLEAR NODELETE NOMENU SAVE WHEN l_wrefdt() .AND. l_wbrow() TITLE "Enter Debit/Credit Amounts for Standard Entry" IN WINDOW lw_brow1 COLOR SCHEME 1
Cancel this Journal Transaction Entry?
GN_TRACE
E_TRACE
FLL_INWBROWLC_STATMSGG_DSPST
EAGN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
A_GLDETL
LC_OLDACNTGLACNT
ALW_BROW1
GK_ESC
LN_RESP
TFG_GETDLG
FC_STATUS
L_CLRBRW
Gldamnt
GN_TRACE
E_TRACE
FLL_INWBROWL_GOACNT
TYPE("lc_fldname") = "C"
Gldamnt
Glcamnt
Glacnt
Gltdes
LC_FLDNAMEGN_TRACE
FE_TRACE
OWGL_ASSERT
E_ASSRT
Enter Debit/Credit Amounts for Standard Entry
GN_TRACE
EE_TRACE
FLL_RETURN
LN_RECNO
LN_GLCAMNTA_GLDETL
EGLCAMNT
LN_TCRTOT
GLSEQNO
LC_GLSEQNOLN_TAMTREMLN_TDRTOT
GLDAMNT
CREDIT
Enter Debit/Credit Amounts for Standard Entry
GN_TRACE
EE_TRACE
FLL_RETURN
LN_READKEYLN_RECNO
TLN_GLDAMNTGLDAMNT
A_GLDETL
TLN_TDRTOT
GLSEQNO
NOLC_GLSEQNOLN_TAMTREMLN_TCRTOT
GLCAMNT
CREDIT
Enter Automatic Distribution Amount
Enter the full debit or credit dollar amount
to distribute. Debit/Credit amounts will be
automatically calculated based on preset
percentages.
Amount to Distribute
(Leave blank to enter amounts manually)
############.##
lw_temp
GN_TRACE
EE_TRACE
FLN_TEMPAMTLW_TEMP
an Invalid Account Number
a Deleted Account
an Inactive Account
an account that only allows posting from subsidiary ledgers
a Standard Account - Invalid for Statistical Batch Type
a Statistical Account - Invalid for Normal Batch Type
Error in accounts.
Account #
Automatic Entry
has no
detail accounts or is non-existent.
LC_TEMP
ELC_TYPE
FLC_BASE
MTGN_TRACE
TE_TRACE
MTLN_GLAMNT
LN_DTOT
LN_CTOT
TLL_RETURN
LC_MSG
NOLL_ERROR
OLN_COUNT
MLC_OFFSET
LN_TEMPAMTA_GLDAUT
TAUTONO
AUTTYPE
A_GLACNT
FGLACNT
GLSTAT
GPOSTJE
OLC_BTYPE
TGLTYPE
G_DSPAL
GC_OSEOL
A_GLDETL
GLAMNT
BATCHNO
MTLC_BATCHNOGLSEQNO
LC_GLSEQNOGLTDES
A_GLHAUT
GLDAMNT
RGGLCAMNT
CREDIT
ADDUSER
GC_USERID
ADDDATE
OADDTIME
TELN_TRANCNTG_DSPALT
TLN_REC
NOLL_ABORT
a_glhead
a_gldetl
GN_TRACE
EE_TRACE
FLA_GLHEAD
LA_GLDETL
A_GLHUNP
TA_GLHEAD
GLSEQNO
GC_IDRVTMPGC_TMPF1
GC_EXTNDX
A_GLDUNP
OA_GLDETL
BATCHNO
GC_TMPF2
TYPE("lc_padname") = "C"
LP_TEXIT
LP_TFWD
End of batch reached.
gltran.spr
gldtrn.spr
LP_TBACK
Beginning of batch reached.
gltran.spr
gldtrn.spr
LP_TEXIT
LP_TSELECT
Enter Transaction Number,
<F2> to list, <Esc> or blank to cancel
gltran.spr
gltran.spr
gldtrn.spr
Edit Journal Entries, <Ctrl-F8> for totals
LP_TDEL
Confirm Void of
Transaction #
Edit Journal Entries, <Ctrl-F8> for totals
LP_TADD
gldtrn.spr
Edit Journal Entries, <Ctrl-F8> for totals
LP_TEDIT
lw_gltran
LC_PADNAMEGN_TRACE
FE_TRACE
GL_ASSERT
E_ASSRT
TLN_RETVAL
LN_RESP
LC_OLDTSEQLL_ADD
LN_TRNREC
LC_DESCLENLN_DESCLENLL_ADDONE
LL_EDITONELC_EPAD
LL_CONT
GK_ESC
NELC_PAD
FLM_GLENTR
LW_GLTRAN
A_GLHEAD
EG_CHKRC
TLC_GLSEQNOGLSEQNO
LP_TBACK
G_DSPALT
LP_TFWD
A_GLDETL
LN_TRANCNTL_INITVR
OGC_ADRVPRGL_CLRBRW
GL_REQCTOTLN_CTRLTOTL_CHKBCH
LL_INMENU
L_GLEXIT
LN_TOTHTRNLC_STATMSGG_DSPST
TEGN_MSGLINELL_TSELECTLL_FIRSTEDLP_TEDIT
GC_APPLID
GC_COMPID
GC_USERID
G_GETDLG
EL_VOIDTR
OLP_TADD
LL_TDELETELN_TDRTOT
LN_TCRTOT
LN_OLDDAMTLN_OLDCAMTLN_TAMTREMLL_NEWTRN
L_PROCTR
L_EDTMNU
gltran.spr
gldtrn.spr
GN_TRACE
EE_TRACE
FA_GLDETL
GLSEQNO
LC_GLSEQNOLN_TRANCNTL_DELDET
FC_STATUS
A_GLHEAD
STATUS
L_WRTHED
LN_TOTHTRNL_SUMBCH
NL_WRTBCH
EL_UPBSTA
L_INITVR
OGC_ADRVPRGL_CLRBRW
TYPE("lc_handle") = "C"
\<Add
\<Edit
\<Save
\<Header
\<Delete
\<Cancel
DO l_edit WITH PAD(), lc_handle
lp_edetail
Edit or add an entry line, <Ctrl-F8> for totals
Edit or add an entry line, <Ctrl-F8> for totals
LP_ECANCEL
LC_HANDLE
GN_TRACE
FE_TRACE
GL_ASSERT
E_ASSRT
NOLL_UPDETL
LL_UPHEAD
LC_EPAD
LM_GLENTR
LM_GLEDIT
SCREEN
LP_EADD
RNLP_EDETAILLN_TRANCNTLP_ESAVE
LP_EHEADERLP_EDELETELP_ECANCELLN_TCRTOT
LN_TDRTOT
LN_OLDDAMTLN_OLDCAMTA_GLDETL
OGLDAMNT
GLSEQNO
LC_GLSEQNOGLCAMNT
LN_TAMTREML_SUMBCH
LL_EDITTRNLL_STD
PRGLL_EDITONELC_XSTAT
TLC_STATMSGG_DSPST
SGGN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
LW_GLTRAN
GK_ESC
TYPE("lc_padhndl") = "C"
TYPE("lc_handle") = "C"
LP_ECANCEL
LP_EHEADER
LP_EDETAIL
LP_EADD
LP_EDELETE
LP_ESAVE
LP_ESAVE
LP_ECANCEL
LC_PADHNDLLC_HANDLE
GN_TRACE
E_TRACE
GL_ASSERT
E_ASSRT
LL_CONT
GK_ESC
LC_EPAD
L_EHEADR
LL_EDETL
DLL_EADD
NDLL_EDEL
NDLL_ESAVNW
L_ESAVED
L_ECANCL
LG_DSPST
TELC_STATMSGGN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
LL_EDITONELM_GLEDIT
Enter transaction header information, <Esc> to
cancel
Manual
Standard
Reversing
Recurring
Allocation
Conversion
Manual 888888
gltran.spr
GN_TRACE
LE_TRACE
LM_GLEDIT
G_DSPST
GN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
LL_STD
LL_HEDIT
LL_GETTRN
LLN_CUROBJ
GK_ESC
LLN_ESCREADA_GLHEAD
LC_GLSEQNOGLREFR
TEFC_GLREFR
GLTDES
INEFC_GLTDES
GLDATE
FD_GLDATE
GLREVRS
NEFC_GLREVRSREVPER
FC_REVPER
REVYEAR
FC_REVYEARLL_UPHEAD
LC_TRTYPE
TRTYPE
GGC_ADRVPRG
Edit detail line, <Esc> to
cancel
CTRL+PGDN
BACKTAB
CTRL+Y
CTRL+F2
DO l_segstr
DO g_stfqs
gldtrn.spr
lp_esave
lp_edetail
GN_TRACE
LE_TRACE
LN_READKEYLM_GLEDIT
L_PICKLN
EG_DSPST
GN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
L_EDTLN
LCTRL
SCREADBACKTAB
SEQNOF2
TEGK_ESC
KEYLN_ESCREADLC_GLACNT
A_GLDETL
GLACNT
GLTDES
LC_GLTDES
GLDAMNT
LN_GLDAMNTGLCAMNT
LN_GLCAMNTCREDIT
LL_UPDETL
LL_UPHEAD
L_SUMBCH
GL_SUMDC
TL_OOBTST
GL_CLRBRW
GC_ADRVPRGLP_ESAVE
LC_EPAD
LP_EDETAIL
Add a detail line, <Esc> to
cancel
CTRL+PGDN
BACKTAB
CTRL+Y
CTRL+F2
DO l_segstr
DO g_stfqs
OUT OF BALANCE
gldtrn.spr
Edit or add an entry line, <Ctrl-F8> for totals
GN_TRACE
LE_TRACE
LL_INHEAD
LM_GLEDIT
G_DSPST
GN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
L_ADDTRN
LPGDN
LBACKTAB
SEQNOLL_UPDETL
LL_UPHEAD
A_GLDETL
DGLSEQNO
LC_GLSEQNOGLDAMNT
GLCAMNT
LN_TRANCNTFC_STATUS
LN_TDRTOT
LN_TCRTOT
LC_SAYBSTAL_OOBTST
A_GLHEAD
STATUS
L_SUMBCH
LN_ESCREADL_INITVR
GGC_ADRVPRGLC_STATMSG
DELETE
Delete detail line
Delete detail line for Account F
Delete
Cancel
gldtrn.spr
LP_EADD
GN_TRACE
LE_TRACE
LM_GLEDIT
L_PICKLN
G_DSPST
GN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
G_GETDLG
A_GLDETL
LGLACNT
L_GLDEL
LLL_UPDETL
LL_UPHEAD
L_SUMDC
NOL_OOBTST
L_SUMBCH
L_INITVR
DGC_ADRVPRGLN_TRANCNTLP_EADD
LC_EPAD
Saving Transaction #
gltran.spr
gldtrn.spr
GN_TRACE
LE_TRACE
G_DSPST
LC_GLSEQNOGN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
A_GLHEAD
STATUS
FC_STATUS
L_WRTHED
L_WRTDET
LL_SUMBCH
L_WRTBCH
L_OOBTST
OGLSEQNO
OL_INITVR
GC_ADRVPRGL_CLRBRW
GLL_EDITONELL_ESAVED
gltran.spr
gldtrn.spr
GN_TRACE
LE_TRACE
LN_TRANCNTLN_TOTHTRNFC_STATUS
A_GLDETL
GLSEQNO
LC_GLSEQNOA_GLHEAD
TSTATUS
L_WRTHED
L_SUMBCH
NL_WRTBCH
LL_INITVR
OGC_ADRVPRGL_CLRBRW
OLL_EDITONELL_UPDETL
LL_UPHEAD
L_WRTDET
A_GLBTCH
EEDTUSER
EDTTIME
EDTDATE
Cancel this transaction?
Cancel
Re-edit
Void this transaction
because it has no entries?
Re-edit
a_glhunp,
a_gldunp,
Restoring transaction
gltran.spr
gldtrn.spr
LP_ESAVE
GN_TRACE
LE_TRACE
LN_RESP2
TLC_HANDLE
G_GETDLG
LN_TRANCNTLL_ESAVED
LL_EDITONELL_UPHEAD
LL_UPDETL
A_GLHUNP
BATCHNO
NGLSEQNO
LLC_BATCHNOLC_GLSEQNOSTATUS
OA_GLHEAD
ELA_GLHUNP
A_GLDUNP
G_DSPPRC
TA_GLDETL
ELA_GLDETL
LN_TDRTOT
LN_TCRTOT
GLDAMNT
EGLCAMNT
OLN_TAMTREML_OOBTST
L_SUMBCH
A_GLBTCH
BSTAT
LN_BDRTOT
LN_BCRTOT
LC_BTYPE
GL_UPBSTA
GL_INITVR
GGC_ADRVPRGL_CLRBRW
L_VOIDTR
GLM_GLEDIT
LP_ESAVE
LC_EPAD
GN_TRACE
LE_TRACE
LN_VALID
TLL_TEDIT
LC_GLSEQNOLN_TRNREC
L_SELTNO
Journal transaction
not found.
Reenter
GLHEAD
.NOT. DELETED().AND. AT(status,"CD") = 0
Select Transaction to Edit
GN_TRACE
LE_TRACE
LN_RECNO
TLN_XRECNO
LC_OLDAREALN_RESP
LL_TSELECTLC_GLSEQNOA_GLHEAD
OG_GETDLG
OG_LSTRC
OLN_TRNREC
a_glbtchV
a_glbtch
UNPOSTED
HOLD
EMPTY
APPROVED
OUT OF BALANCE
POSTED
CANCELLED
DELETED
RECLASSIFIED
888888888
GN_TRACE
LE_TRACE
LC_OLDAREAFC_BSTAT
LN_RECNO
ALN_OOBCNT
LC_BTYPE
TLN_TOTHTRNA_GLHEAD
OGLSEQNO
LC_GLSEQNOSTATUS
A_GLBTCH
LCKSTAT
OG_LCKRC
NOBSTAT
OSTSUSER
EGC_USERID
STSDATE
STSTIME
TLC_SAYBSTALC_BSTAT
UNPOSTED
HOLD
EMPTY
APPROVED
OUT OF BALANCE
POSTED
CANCELLED
DELETED
RECLASSIFIED
888888888
Select account number, <F2> to list, <Esc>
to cancel
gldtrn.spr
Both Debit and Credit amounts may not be $0.00!
Cancel this detail line or reenter?
Reenter
Cancel
a_gldetl,
Journal Transaction Entries
Journal Transaction Entries
BROWSE FREEZE glacnt FIELDS glacnt :P=gc_acctpic :H=gc_accthdr &lc_acctlen, acntdesc =IIF(SEEK(a_gldetl->glacnt,"a_glacnt"), a_glacnt->gldesc,"") :H="Acct. Description" &lc_acctdes, gldamnt :15 :P="############.##" :H=" Debit", glcamnt :15 :P="############.##" :H=" Credit" NOWAIT NOCLEAR NODELETE NOMENU TITLE "Journal Transaction Entries" IN WINDOW lw_brow1 COLOR SCHEME 1
GN_TRACE
LE_TRACE
LN_RESP
EALL_INFORM
LN_READKEYLN_RETVAL
LL_OOBLOOPLL_DOAUTO
LN_ADDOBJ
LN_REC
A_GLDETL
OLC_GLACNT
GLACNT
GC_ACCTPICLN_GLDAMNTLN_GLCAMNTLC_GLTDES
FC_GLTDES
LN_OLDDAMTLN_OLDCAMTLC_SAYBSTAA_GLBTCH
BSTAT
AREALC_BSTAT
LN_TRANCNTLL_EDITTRNLC_DESCRIPGLTDES
LC_STATMSGG_DSPST
GN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
LW_GLDTRN
LL_TEDIT
GGC_ADRVPRGLN_ESCREADGK_ESC
GLL_CTRPGDNLN_TAMTREMG_GETDLG
DGC_OSEOL
DL_OOBTST
BATCHNO
NTFC_BATCHNOGLSEQNO
FC_GLSEQNOGLDAMNT
GLCAMNT
NTCREDIT
MNTADDUSER
NTADDDATE
ADDTIME
MTL_SUMDC
MTLN_BDRTOT
LN_BCRTOT
LN_BAMTREMLN_CTRLTOTLL_AUTDISTL_AUTOGL
LL_ABORT
LN_TDRTOT
LN_TCRTOT
FC_STATUS
L_CLRBRW
LW_BROW1
TLW_TOTALS
lc_testf
Transaction is out of balance by $FFF
LC_TEST
LGN_TRACE
E_TRACE
EALL_UPDATE
LL_OOBMSG
LN_TAMTREMLN_TDRTOT
LN_TCRTOT
LC_BTYPE
LN_TRANCNTFC_STATUS
A_GLHEAD
STATUS
L_UPBSTA
G_DSPAL
GN_TRACE
LE_TRACE
A_GLACNT
ALC_GLACNT
LC_GLDESC
GLDESC
MA_GLDETL
BACKTAB
CTRL+Y
DO g_stfqs
GN_TRACE
LE_TRACE
ABACKTAB
LDETL
LN_OLDDAMTLN_GLDAMNTY
GN_TRACE
LE_TRACE
LL_RETURN
LN_READKEYLN_RECNO
LN_GLDAMNTLN_GLCAMNTLN_TCRTOT
LN_TAMTREMLN_TDRTOT
GK_LFT
GN_TRACE
LE_TRACE
LN_OLDCAMTLN_GLCAMNT
GN_TRACE
LE_TRACE
LL_RETURN
LN_READKEYLN_RECNO
LN_GLCAMNTLN_GLDAMNTLN_TDRTOT
LN_TAMTREMLN_TCRTOT
Use Automatic Distribution?
a_glhaut//
auttype1
a_gldaut//
auttype1
Transaction #
will be deleted because all Debit/Credit
amounts are $0.00.
Reenter
Delete
GN_TRACE
LE_TRACE
LN_RESP
LC_ANS
KEYLN_TEMPAMTLL_BROWTMPLN_OPNFLH
LN_OPNFLD
LL_RETURN
LN_RESP3
LC_OFFSET
G_GETDLG
LN_GLDAMNTLN_GLCAMNTG_OPNFL
GF_GLHAUTFAUTTYPE
GF_GLDAUTFA_GLHAUT
TAUTONO
TA_GLDAUT
AL_TMPCPY
PLC_AUTDISTLL_ABORT
PL_BROWTMP
FC_STATUS
L_SUMDC
IPLN_TDRTOT
LN_TCRTOT
LC_GLSEQNOGC_OSEOL
Add new account automatically or manually?
Automatic
Manual
Cancel
New account is being created. Please wait...
Edit Journal Entries, <Ctrl-F8> for totals
CTRL+PGDN
BACKTAB
CTRL+F2
CTRL+Y
la_padf
Enter new account code/segment value attributes
glacnt
Edit Journal Entries, <Ctrl-F8> for totals
ON KEY LABEL CTRL+PGDN &lc_oklpgdn
ON KEY LABEL TAB &lc_okltab
ON KEY LABEL BACKTAB &lc_oklbtab
ON KEY LABEL CTRL+F2 &lc_oklcf2
ON KEY LABEL F2 &lc_oklf2
ON KEY LABEL CTRL+Y &lc_oklcy
la_xpadf
Reenter account!
New account entry was not saved!
Reenter account!
New account entry was not saved!
GN_TRACE
LE_TRACE
LC_OKLTAB
LC_OKLBTABLC_OKLCF2
LC_OKLF2
PLC_OKLCY
LN_RETURN
LC_SEGMT
LN_COUNT
LL_SEGDEF
LN_RESP
LL_RESP
NTLC_OKLPGDNA_GLSEGS
GN_TOTSEGSLC_ACCOUNTGA_SEGBEG
GA_SEGLEN
G_GETDLG
LC_STATMSGG_DSPST
PGN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
L_AUTACT
PLW_GLTRAN
LW_GLDTRN
LW_BROW1
OLW_TOTALS
LA_XPAD
LA_PAD
LA_XPRMPT
LA_PRMPT
GC_ADRVPRGA_GLTYPE
LC_BTYPE
DGLTYPE
GA_GLACNT
NLL_TRADDOKG_DSPALT
TYPE("lc_source") = "C"
TYPE("lc_account") = "C"
BROWSE
glacnt
glacnt
GLACNT
Account
Please reenter a Statistical account. The
account you entered is not a Statiscal
account type.
Please reenter a Standard account. The
account you entered is a Statiscal
account type.
a_glacnt'
Account F
is deleted.
Account #F
is marked as
Inactive in Account File.
Account #F
is marked in
Account File
to only allow
entries/postings from subsidiary ledgers.
gldtrn.spr
Enter Debit/Credit Amounts for Standard Entry
Press <Ctrl-PgDn> to balance transaction, <Esc>
to cancel
LC_SOURCE
LC_ACCOUNTGN_TRACE
E_TRACE
ABGL_ASSERT
E_ASSRT
PLN_RETURN
LC_OLDWORKLN_RESP
LN_RECNO
LC_MSG
LL_TRADDOKLL_REENTERLL_BROWSE
LL_ABORT
LL_NEW
EGSLL_DOAUTO
A_GLACNT
LC_BTYPE
TGLSTAT
GLTYPE
MSGGLACNT
PL_BRWACT
TLC_GLACNT
A_GLDETL
TL_NEWACT
TGC_OSEOL
POSTJE
G_DSPAL
LN_TRANCNTAUTONO
LL_AUTDISTLC_AUTDISTLN_GLDAMNTGLDAMNT
LN_GLCAMNTGLCAMNT
LC_GLTDES
GLTDES
GGC_ADRVPRGLC_GLDESC
GLDESC
LC_STATMSGG_DSPST
GN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
TYPE("ln_type") = "N"
TYPE("lc_field") = "C"
TYPE("lc_keyvar") = "C"
TYPE("lc_file") = "C"
TYPE("lc_title") = "C"
FILTERz
Select list:
Accounts
Types
Segments
SET FILTER TO &lc_oldfilt
gltype
GLTYPE
Account Type
SET FILTER TO &lc_oldfilt
lc_glacnt
not found:
FILTERz
No Account Range exists
for Account Major
No Statistical Account Range
exists for Account Major
Statistical accounts not
allowed in Normal Batch.
Normal accounts not
allowed in Statistical Batch.
SET FILTER TO &lc_oldfilt.
Accounts
Types
Reenter
ReenterF
A\<ccounts
Types
ReenterF
FILTERz
SET FILTER TO &lc_oldfilt
gltype
GLTYPE
Account Type
FILTERz
SET FILTER TO &lc_oldfilt
GLACNT
a_glacnt,
No records found.
ENTER
KEYBOARD CHR(gk_ctlend) PLAIN
lc_keyvar = &lc_field
ENTER
LN_TYPE
LC_FIELD
TLC_KEYVAR
LC_FILE
ABLC_TITLE
GN_TRACE
PE_TRACE
GL_ASSERT
E_ASSRT
LL_DONE
LL_HOTKEY
LN_TOCOL
KLC_DESCLENLC_RANGELNLN_DESCLENLC_XKEYVARLC_LOOKUP
LL_NORANGELN_READKEYLL_REENTERLL_RESP
SGLN_RESP
A_GLACNT
TLC_OLDFILTLC_BTYPE
TGLTYPE
TGLSTAT
POSTJE
G_GETDLG
L_BRWACT
A_GLTYPE
LC_MTYPE
TLN_ESCREADL_SEGBRS
LN_RECNO
RLC_MSG
GA_SEGLEN
GLLOW
GLUPP
GGN_ACCTLENLL_GLADD
LL_NEW
RG_DSPALT
ENTER
NTERLL_ASSERT
LN_TRACE
LC_LOGFILEGC_LOGFILEGL_HOTKEY
L_BROWSER
W_MSEL
GLACNT
BROWSE FREEZE glacnt FIELDS glacnt &lc_actlen :P=gc_acctpic :H=gc_accthdr, gldesc &lc_actdes :H="Acct. Description" NOMENU NOEDIT NOAPPEND NODELETE WINDOW lw_msel TITLE "Select Account" COLOR SCHEME 10
GLTYPE
BROWSE FREEZE gltype FIELDS gltype :H="Type" :4, gldesc :H="Description" &lc_tdeslen, gllow :H="From" &lc_typelen, glupp :H="To" &lc_typelen NOMENU NOEDIT NOAPPEND NODELETE WINDOW lw_msel TITLE "Select Account Type" COLOR SCHEME 10
LW_MSEL
LC_ACTLEN
LC_ACTDES
LC_TYPELENLC_TDESLENLN_TDESLENLC_OLDAREALN_ACTDES
LC_FILE
EAGN_ACCTLENLN_ACTLEN
GA_SEGLEN
CTRL+PGDN
DO l_pgdn
DO l_tabseg
BACKTAB
DO l_tabseg WITH COL(), "BACKTAB"
CTRL+Y
DO l_ctrly WITH "lc_glacnt"
CTRL+F2
DO l_segstr WITH lc_glacnt
DO l_stfqs WITH COL(), lc_glacnt, "LC_GLACNT"
GN_TRACE
E_TRACE
PELENTAB
DESLENBACKTAB
DAREAF2
A_GLDETL
GN_TRACE
E_TRACE
LN_CNTR
A_GLDETL
NLN_OLDDAMTGLDAMNT
NLN_OLDCAMTGLCAMNT
LN_TRANCNTL_SUMDC
NTL_CLRBRW
TYPE("lc_drorcr") = "C"
lc_drorcrf
A_GLDETL
gldtrn.spr
gltots.spr
LC_DRORCR
GN_TRACE
E_TRACE
GL_ASSERT
E_ASSRT
MTLN_RECNO
A_GLDETL
TGLDAMNT
LN_TDRTOT
GLSEQNO
NTLC_GLSEQNOGLCAMNT
LN_TCRTOT
LN_TAMTREMGC_ADRVPRGLW_TOTALS
CTRL+PGDN
CTRL+F8
BACKTAB
CTRL+Y
CTRL+F2
DO g_stfqs
a_glhead
a_gldetl
GN_TRACE
E_TRACE
LW_GLTRAN
LW_BROW1
LW_GLDTRN
LW_TOTALS
LM_GLENTR
NTTAB
LSEQNOBACKTAB
MTREMA_GLHEAD
GA_GLDETL
LN_OPNFL
A_GLACNT
ELN_OPNFLSEA_GLSEGS
RLN_OPNFLTYA_GLTYPE
GC_IDRVTMPGC_TMPF1
TGC_EXTNDX
GC_TMPF2
Correct Batch Control Total
Your entries do not total to the Batch Control Total!
Correct the Batch Control Total if it is incorrect!
Batch Control Total
Total Debits F
Total Credits F
############.##
@*HT \!\<Ok;\<Re-edit Transactions
lw_chkbch
a_glbtchV
a_glbtch
GN_TRACE
E_TRACE
LN_RESP
LN_OLDTOTLLC_OLDAREALN_CTRLTOTLN_BDRTOT
LN_TOTHTRNLW_CHKBCH
LN_BCRTOT
L_VCTRLT
TA_GLBTCH
TLCKSTAT
G_LCKRC
EMCTRLTOT
Cancel
Save transaction
Edit transaction
Cancel the entire transaction
Enter transaction header information. <Esc> to cancel
gltran.spr
gldtrn.spr
Getting next Transaction Number
gltran.spr
Void this Journal Transaction Entry?
Transaction #
will be deleted because all Debit/Credit
amounts are $0.00.
Reenter
Delete
CTRL+PGDN
BACKTAB
CTRL+Y
DO g_stfqs
Transaction
will be
cancelled because it has no entries!
Reenter or cancel?
Reenter
Cancel
OUT OF BALANCE
la_padf
Cancel
Save transaction
Edit transaction
Cancel the entire transaction
Saving Transaction #
gltran.spr
gldtrn.spr
Confirm Cancel of
Transaction #
Cancel
Cancelling/Deleting Transaction #
gltran.spr
gldtrn.spr
CTRL+F2
DO l_segstr
DO g_stfqs
GN_TRACE
E_TRACE
LL_LOOP
LN_RESP
TLLN_RESP2
ALL_MNULOOPLN_RETVAL
LN_PADNO
NLN_READKEYLN_RESP3
LL_CONT
TLM_GLENTR
LA_PAD
LA_PRMPT
MLW_GLTRAN
G_DSPCH
EALL_EDITTRNLN_CUROBJ
LC_STATMSGG_DSPST
RGN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
L_GETTRN
LL_NEWTRN
GK_ESC
LN_TOTHTRNA_GLHEAD
LC_GLSEQNOGLSEQNO
LN_TRANCNTL_INITVR
DGC_ADRVPRGL_CLRBRW
RLL_ADDONE
L_GETTR
NOFC_GLSEQNOGLREFR
GFC_GLREFR
GLTDES
FC_GLTDES
GLDATE
FD_GLDATE
STATUS
TRTYPE
FC_TRTYPE
GLREVRS
LEFC_GLREVRSREVPER
FC_REVPER
REVYEAR
FC_REVYEARG_GETDLG
NFC_STATUS
LW_GLDTRN
L_SELTMP
NL_BROWTMP
L_SUMDC
LN_TDRTOT
LN_TCRTOT
GC_OSEOL
OL_OOBTST
L_ADDTRN
NCTRL
TBACKTAB
FRSTFLDA_GLDETL
NGLDAMNT
NOGLCAMNT
STLC_SAYBSTAG_GETCH
L_WRTHED
L_WRTDET
DL_SUMBCH
L_WRTBCH
L_EDTMNU
LL_ESAVED
LP_TADD
TYPE("lc_edtmode") = "C"
ENTER
KEYBOARD CHR(gk_ctlend) PLAIN
RIGHTMOUSE
KEYBOARD CHR(gk_ctlend)
Select a detail line to F
<Esc> to cancel
BROWSE FREEZE glacnt FIELDS glacnt :P=gc_acctpic :H=gc_accthdr :W=l_wrefdt() &lc_acctlen, acntdesc =IIF(SEEK(a_gldetl->glacnt,"a_glacnt"), a_glacnt->gldesc,"") :H="Acct. Description" &lc_acctdes, gldamnt :R :15 :P="############.##" :H=" Debit", glcamnt :R :15 :P="############.##" :H=" Credit" NOCLEAR NOEDIT NODELETE NOMENU TITLE "Journal Transaction Entries" IN WINDOW lw_brow1 COLOR SCHEME 1
ENTER
a_gldetl,
a_gldetl
LC_EDTMODEGN_TRACE
E_TRACE
GL_ASSERT
E_ASSRT
ALN_RESP
OPLC_OLDAREALN_RETURN
LN_OLDREC
A_GLDETL
AENTER
RIGHTMOUSEG_DSPST
GN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
LL_HOTKEY
GL_HOTKEY
LW_BROW1
LW_TOTALS
LC_STATMSGGK_ESC
LC_GLACNT
GLACNT
LN_GLDAMNTGLDAMNT
LN_GLCAMNTGLCAMNT
LC_GLTDES
GLTDES
LN_OLDDAMTLN_OLDCAMT
Edit selected detail line. <Esc> to cancel
gldtrn.spr
CTRL+PGDN
BACKTAB
CTRL+Y
CTRL+F2
DO l_segstr
DO g_stfqs
GN_TRACE
EE_TRACE
LC_STATMSGG_DSPST
GN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
LW_GLDTRN
LL_TEDIT
AGC_ADRVPRGCTRL
EPGDN
SGLINEBACKTAB
LL_CTRPGDNLN_TAMTREMLN_GLDAMNTLN_GLCAMNT
gldtrn.spr
GN_TRACE
EE_TRACE
LL_OLDTEDTLC_CURWINDLL_TEDIT
TLC_GLACNT
A_GLDETL
GLACNT
LN_GLDAMNTGLDAMNT
ALN_GLCAMNTGLCAMNT
ELC_GLTDES
GLTDES
EGC_ADRVPRGLC_OLDACNT%
lw_gltotl
Batch and Transaction Totals
gltotl.spr
GN_TRACE
EE_TRACE
LW_GLTOTL
GC_ADRVPRGG_DSPST
LC_STATMSGGN_MSGLINEGC_APPLID
GC_COMPID
GC_USERID
a_gldunp5
a_gldunp
GN_TRACE
EE_TRACE
LN_OPNFL
LC_OLDAREAA_GLDUNP
AG_LCKFL
GGLSEQNO
NELC_GLSEQNO
GN_TRACE
EE_TRACE
A_GLDETL
GLCAMNT
ALN_BCRTOT
GLDAMNT
GLN_BDRTOT
LN_BAMTREMLN_CTRLTOTGLSEQNO
LC_GLSEQNO}
Journal Transaction Entries
Journal Transaction Entries
gltots.spr
BROWSE FREEZE glacnt FIELDS glacnt :P=gc_acctpic :H=gc_accthdr &lc_acctlen, acntdesc =IIF(SEEK(a_gldetl->glacnt,"a_glacnt"), a_glacnt->gldesc,"") :H="Acct. Description" &lc_acctdes, gldamnt :15 :P="############.##" :H=" Debit", glcamnt :15 :P="############.##" :H=" Credit" NOWAIT NOCLEAR NOEDIT NODELETE NOMENU TITLE "Journal Transaction Entries" IN WINDOW lw_brow1 COLOR SCHEME 1
gltots.spr
GN_TRACE
EE_TRACE
A_GLDETL
LW_BROW1
AGC_ADRVPRGLW_TOTALS
Control total required!
ERROR
GN_TRACE
EE_TRACE
LL_RETURN
GL_REQCTOTLN_CTRLTOTG_DSPAL
a_glhead,
Manual
Standard
Reversing
Recurring
Allocation
Conversion
Manual 888888
GN_TRACE
EE_TRACE
LC_GLSEQNOA_GLHEAD
TGLSEQNO
OTFD_GLDATE
GLDATE
FC_GLTDES
GLTDES
TFC_GLREFR
GLREFR
OFC_GLPER
EYEARPRD
FC_GLYEAR
FC_GLREVRSGLREVRS
TFC_REVPER
REVPER
NFC_REVYEARREVYEAR
TLC_TRTYPE
TRTYPE
LC_GLREVRSLC_TOPER
SLC_TOYR
a_gldetl0
a_gldunp//
batchno1
batchno1
a_gldunpV
a_gldunp
a_gldetl,
a_gldetl,
a_gldunp5
a_gldunp
a_gldunp5
a_gldunp
GN_TRACE
EE_TRACE
LA_GLDETL
LC_OLDAREAA_GLDETL
AG_OPNFL
GF_GLDUNPFBATCHNO1
A_GLDUNP
TLC_BATCHNOLC_GLSEQNOBATCHNO
EGLSEQNO
G_LCKRC
NOGLACNT
VRSGLTDES
TG_LCKFL
a_glbtchV
a_glbtch
Updating batch header record
GN_TRACE
EE_TRACE
LC_OLDAREAFC_LOWSEQ
FC_UPPSEQ
FC_BSTAT
FC_DRTOTALFC_CRTOTALFC_STSUSERFC_STSDATEFC_STSTIMEA_GLBTCH
ALCKSTAT
G_LCKRC
NOLC_BTYPE
SLN_TOTHTRNLN_BDRTOT
LN_BCRTOT
BSTAT
RLOWSEQ
NFC_GLSEQNOUPPSEQ
QNODRTOTAL
OCRTOTAL
STSUSER
GC_USERID
STSDATE
STSTIME
a_glhunp//
batchno1
a_glhunp5
a_glhunp
Updating transaction header record
a_glhunpV
a_glhunp
GN_TRACE
EE_TRACE
LC_OLDAREAG_OPNFL
EAGF_GLHUNPFLC_BATCHNOLC_GLSEQNOG_LCKFL
ALA_GLHUNP
RG_LCKRC
EBATCHNO
MEA_GLHEAD
AGLSEQNO
GLTDES
OGLREFR
SGLDATE
NYEARPRD
STATUS
LC_BTYPE
RTRTYPE
NGLMODULE
OGLCOMP
OGLREVRS
OREVPER
REVYEAR
ADDUSER
ADDDATE
ADDTIME
TL_INITVR
L_GETTRN
L_WGLREV
L_WTOPER
L_WTOYR
L_VGLREV
L_WREVPE
L_VREVPE
L_WREVYE
L_VREVYE
L_VGLDAT
L_VGLTDE
L_GETTR
L_SELTMP
L_BROWTMP
L_WBROW
L_GOACNT
L_BGLCAM
L_BGLDAM
L_AUTDST
L_TMPCPY
L_CRETMP
L_ENTR
L_VOIDTR
L_EDTMNU
L_EDIT
L_EHEADR
L_EDETL
L_EADD
L_EDEL
L_ESAVNW
L_ESAVED
L_ECANCL
L_VGLSEQ
L_SELTNO
L_UPBSTA
L_ADDTRN
L_OOBTST
L_WGLDES
L_WGLDAM
L_VGLDAM
L_WGLCAM
L_VGLCAM
L_AUTOGL
L_NEWACT
L_VGLAC
L_BRWACT
L_BROWSER
L_WGLAC
L_GLDEL
L_SUMDC
L_GLEXIT
L_CHKBCH
L_PROCTR
L_PICKLN
L_EDTLN
L_WREFDT
L_GLTOTL
L_DELDET
L_SUMBCH
L_CLRBRW
L_VCTRLT
L_WBGLSE
L_WRTDET
L_WRTBCH
L_WRTHED
C:\GLDISK\
C:\GLDISK\GLTRAN.PRG
GLTRAN.FXP