MAC-PAC Homecontact ussupport login 
Documentation > MAC-PAC Technical Library > Financial > General Ledger > Programs > General Ledger Post Request - Purpose > General Ledger Post Request - Calculations

General Ledger Post Request - Calculations

GL200E

A.   Housekeeping

This module initializes program variables and constants, sets initial processing flags, and formats the Screen One subfile for display.

B.   Mainline

This module initializes program constraints and sets the processing request code for the initial process in its start of session function.  The module then controls the flow of the program processing depending upon the module request code returned by each subroutine module.  The subroutine modules are described below.  The mainline continues to control processing until the end session request is made and the end of job (LR) indicator is set to terminate processing.

1.   SIMAIN

This module controls the processing of Screen One.  It consists of three subroutines, Screen One Format (SIFMT); Screen One Execute Format (SIEXFT); and Screen One Validation (SIPROC).  The first subroutine sets on the error indicators.  SIEXFT then displays the screen and classifies the request.  S1PROC reads the screen, validates the input fields, and calls the subroutine CHKPST in order to check that the subsystems are closed.  If so, then S1PROC submits the requested reports to be processed individually for each location.

2.   SETERR - Set Error Indicators

This common subroutine is executed by all screen modules and is used to set on indicators for data errors detected through validations.

3.   *PSSR - File Exception/Error

This common subroutine is executed whenever a program execution or program detected error occurs and causes control to pass to subroutine ABNEND.

4.   FILERR - File Error

This common subroutine is executed whenever a file error occurs which is not otherwise trapped by an error indicator or an input, update or output operation.  This subroutine causes control to be passed either to subroutine ABNEND or to the appropriate screen with an error message.

5.   ABNEND - Abnormal Termination

This common subroutine is called b the mainline when the value of error severity is greater than 1.  This module terminates the program by setting on indicator LR and executing a return statement.

Date Field Validation

Screen
Field

 

Field
Name

 

Data
Type

 

Master File
Validation

Additional
Validation

Report date

SCRDAT

A

 

Non-blank

Process all

SCPOPT

A

 

D, F, L, Q, T, or blank

Roll

SCROLL

N

 

 

Promptable Fields

Process all

Post Option

SCROLL

SCPOPT

SFPOPT

N

 

 

*A = Alphanumeric; N = Unsigned Numeric; S = Signed Numeric

GL200E Program Menu