Skip to main content

Problem:

This illustrates GetSystemTime and GetLocalTime. It also uses CBL_ALLOC_MEM and CBL_FREE_MEM to get and free memory for the SYSTEMTIME structure and passes the pointer to the API calls by value rather than by reference.

Resolution:

INTRODUCTION

==========

The program illustrates the use of the Windows API GetSystemTime and GetLocalTime. It also uses CBL_ALLOC_MEM and CBL_FREE_MEM to get and free memory for the SYSTEMTIME structure and passes the pointer to the API calls by value rather than by reference.

SOURCE FILES:

==========

Program Files     Description

----------------     -----------------------------------------------------------

GST.APP             Net Express project file

GST.CBL             COBOL source code

Help Files:

----------------     -----------------------------------------------------------

Readme.TXT      This file

REQUIREMENTS:

==========

Net Express v3.1

OPERATION:

========

Consider the following steps:

1. Load GST.APP into Net Express

2. Click on Project > Update All Dependencies

3. Click on Project > Rebuild Al

4. Run or Animate the project

NOTE:

====

The call to COB32API.DLL is only necessary if the program is

animated or run in INT.

==========================================================

Keywords: demonstration, sample, example, demo, win32 api, gst.zip

demo.ex

demo.ne

Attachments:

gst.zip

Old KB# 4177