Information Systems:G/L Balances do Not Roll Over
From the scheduler, job ENDOFMONTH (program EOM) runs at 3:15AM on the first of every month. It calls UNIPHARMIT / EOMASW, which does a period roll over for every company. This is the command which retrieves the parameters, and the command that runs the roll over program. (Note that PAID is ‘parameter ID’.)
RTVASWPAR PGM(ASGC032) PAID(MONTHROLL) USER(*ALL)
EXCASWPGM PGM(ASGC032) PARM(Y) DTA('N NNY *DEVTYPE N')
To see the parameters, find this record in file SROLPA -
Program User id Parameter Description LPUSR1
ID
ASGC032 *ALL MONTHROLL Roll all companies ACCFICIUI1I2I3PLUCVA
To see the effects of this, on a command line key in GO GLSET and press enter. Select option 2 – Work with G/L control file.
*CF/480B* G/L control file maintenance 3/20/15 09:03:48 GDMD0911
-------------------------------------------------------------------------------
Period name End date
Actual year/period.. 1602 FEBRUARY 022815
MARCH 033115
Last closed period.. 1513 APRIL 043015
First stored period. 0508 MAY 053115
JUNE 063015
JULY 073115
AUGUST 083115
SEPTEMBER 093015
OCTOBER 103115
NOVEMBER 113015
No of normal periods 12 DECEMBER 123115
Total no of periods. 13 JANUARY 013116
YEAR END 043016
‘Actual year / period’ is moved forward every time a period roll over is performed.
Although when you are in G/L Transaction Inquiry, it might look like the opening balances for the year have not been created, it may be that the Analyser summary levels are incorrect.
A quick way of testing this, is to use query to look at the opening balances in Analyser. (See QUERY for detailed instructions.)
Instead of using the AS/400 Query builder (which is not for the feint of heart), write an SQL statement to get the data. One has been created and stored in the following location:
\\superserver\Tech\common\Saved SQL Queries\Opening Balance Queries\Opening Balance for Fiscal Year has not been rolled over (CF Companny).sql \\superserver\Tech\common\Saved SQL Queries\Opening Balance Queries\Opening Balance for Fiscal Year has not been rolled over (CF Company).sql
Read files ANOSTK (keys) and ANOBOB (opening balances) matched on KESUTA eq BOSUTA, and KEREFK eq BOREFK.
Define a result field of BODAOB + BOCAOB.
Select records where BOYEAR eq the current fiscal year, and KEMK01 EQ some G/L account, for example ‘100200’ (CIBC – Operating Line).
When you run this query, you should see something like –
Display Report
Report width . . . . . : 917
Position to line . . . . . Shift to column . . . . . .
Line ....+....1....+....2....+....3....+....4....+....5....+....6....+....7..
BAL Lvl Key
cod 01
000001 497.40- 008 100200
000002 497.40- 002 100200
000003 497.40- 013 100200
000004 497.40- 006 100200
000005 497.40- 003 100200
000006 497.40- 004 100200
000007 497.40- 007 100200
000008 497.40- 009 100200
000009 497.40- 001 100200
000010 497.40- 014 100200
000011 497.40- 005 100200
000012 63,951.4000 A11 100200
000013 63,951.4000 A12 100200
****** ******** End of report ********
F3=Exit F12=Cancel F19=Left F20=Right F24=More keys
G/L Transaction Inquiry shows the balance for this account at 201512 as being 63951.50, which means the amounts showing for A11 and A12 (system base levels) are correct , and all the summary levels are wrong. This means they have to be rebuilt. For instructions, see Rebuild Custom Summary Level.
If you run the same query after the rebuilds, all the amounts should all be the same.
Display Report
Report width . . . . . : 917
Position to line . . . . . Shift to column . . . . . .
Line ....+....1....+....2....+....3....+....4....+....5....+....6....+....7..
BAL Lvl Key
cod 01
000001 63,951.4000 008 100200
000002 63,951.4000 002 100200
000003 63,951.4000 013 100200
000004 63,951.4000 006 100200
000005 63,951.4000 003 100200
000006 63,951.4000 004 100200
000007 63,951.4000 007 100200
000008 63,951.4000 009 100200
000009 63,951.4000 001 100200
000010 63,951.4000 014 100200
000011 63,951.4000 005 100200
000012 63,951.4000 A11 100200
000013 63,951.4000 A12 100200
****** ******** End of report ********
F3=Exit F12=Cancel F19=Left F20=Right F21=Split F22=Width 80