Home
About
Blog
Products
Forum
Support
Contact
Sunbelt Computer Software
PL/B Language Development and Support
Home
About
Blog
Products
Forum
Support
Contact
sunbelt-plb-samples/includes/plbapi.inc at main · KcsDev1982/sunbelt-plb-samples · GitHub
Skip to content
Navigation Menu
Sign in
Appearance settings
Platform
AI CODE CREATION
GitHub Copilot
Write better code with AI
GitHub Copilot app
Direct agents from issue to merge
MCP Registry
Integrate external tools
DEVELOPER WORKFLOWS
Actions
Automate any workflow
Codespaces
Instant dev environments
Issues
Plan and track work
Code Review
Manage code changes
Code Quality
Enforce quality at merge
APPLICATION SECURITY
GitHub Advanced Security
Find and fix vulnerabilities
Code security
Secure your code as you build
Secret protection
Stop leaks before they start
EXPLORE
Why GitHub
Documentation
Blog
Changelog
Marketplace
View all features
Solutions
BY COMPANY SIZE
Enterprises
Small and medium teams
Startups
Nonprofits
BY USE CASE
App Modernization
DevSecOps
DevOps
CI/CD
View all use cases
BY INDUSTRY
Healthcare
Financial services
Manufacturing
Government
View all industries
View all solutions
Resources
EXPLORE BY TOPIC
AI
Software Development
DevOps
Security
View all topics
EXPLORE BY TYPE
Customer stories
Events & webinars
Ebooks & reports
Business insights
GitHub Skills
SUPPORT & SERVICES
Documentation
Customer support
Community forum
Trust center
Partners
View all resources
Open Source
COMMUNITY
GitHub Sponsors
Fund open source developers
PROGRAMS
Security Lab
Maintainer Community
GitHub Stars
Archive Program
REPOSITORIES
Topics
Trending
Collections
Enterprise
ENTERPRISE SOLUTIONS
Enterprise platform
AI-powered developer platform
AVAILABLE ADD-ONS
GitHub Advanced Security
Enterprise-grade security features
Copilot for Business
Enterprise-grade AI features
Premium Support
Enterprise-grade 24/7 support
Pricing
Search
/
Sign in
Sign up
Appearance settings
You signed in with another tab or window.
Reload
to refresh your session.
You signed out in another tab or window.
Reload
to refresh your session.
You switched accounts on another tab or window.
Reload
to refresh your session.
Dismiss alert
{{ message }}
KcsDev1982
/
sunbelt-plb-samples
Public
Notifications
You must be signed in to change notification settings
Fork
2
Star
5
Code
Issues
0
Pull requests
0
Actions
Projects
Security and quality
0
Insights
Additional navigation options
Code
Issues
Pull requests
Actions
Projects
Security and quality
Insights
Files
Expand file tree
main
Breadcrumbs
sunbelt-plb-samples
/
includes
/
plbapi.inc
Copy path
Blame
More file actions
Blame
More file actions
Latest commit
History
History
History
109 lines (108 loc) · 3.48 KB
main
Breadcrumbs
sunbelt-plb-samples
/
includes
/
plbapi.inc
Copy path
Top
File metadata and controls
Code
Blame
109 lines (108 loc) · 3.48 KB
Raw
Copy raw file
Download raw file
Open symbols panel
Edit and raw actions
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
LISTOFF
%IFNDEF $DATATYPES_PLBH
*==============================================================================
. WINAPI support Integer Constants
and
Definitions.
.
. Last Revision Date:
31
Oct
2001
.
.
--
----------------------------------------------------------------------
. The following Integer constants
and
Definitions have been provided by
. Festus Redelinghuys. These constants
and
definitions can be used
in
. PROFILE definitions
and
associated WINAPI statements.
.
. Revision History:
.
%IFDEF $PLBAPI_HISTORY
.::
31
Oct
01
- Create PLB WINAPI include definitions. :
8.3F
%ENDIF
.
.
--
----------------------------------------------------------------------
.
$DATATYPES_PLBH EQU
1
. This
module
is
now defined
.
.
--
----------------------------------------------------------------------
. Constants
. =========
FALSE Integer
1
,
"
0x00
"
INVALID_HANDLE_VALUE Integer
4
,
"
0xFFFFFFFF
"
NULL Integer
1
,
"
0x00
"
S_FALSE Integer
1
,
"
0x01
"
S_OK Integer
1
,
"
0x00
"
TRUE Integer
1
,
"
0x01
"
GENERIC_ALL Integer
4
,
"
0x10000000
"
GENERIC_WRITE Integer
4
,
"
0x40000000
"
GENERIC_READ Integer
4
,
"
0x80000000
"
FILE_SHARE_READ Integer
1
,
"
0x01
"
FILE_SHARE_WRITE Integer
1
,
"
0x02
"
OPEN_EXISTING Integer
1
,
"
3
"
OPEN_ALWAYS Integer
1
,
"
4
"
FILE_ATTRIBUTE_NORMAL Integer
4
,
"
0x00000080
"
.
. Datatypes - ANSI
. ================
. Note :
. Prior
to
release
8.5F
, a duplicate
'
DEFINE
'
label
would cause
. the compiler
to
hang.
. Int4 - Pass the integer
value
to
the WinApi
. Pint4 - Pass the address(pointer)
of
an integer
to
the WinApi
. Dim - Pass the address(pointer)
of
a string variable
to
the WInApi
. Pdim - Pass the address(pointer)
of
a string variable
to
the
. WInApi. The WinApi
is
responsible
for
FP
and
LP.
Only
. used by custom DLL
'
s.
.
ACCESS_MASK DEFINE Int4
BOOL DEFINE Int4
BYTE DEFINE Int4
COLORREF DEFINE Int4
DWORD DEFINE Int4
HANDLE DEFINE Int4
HDC DEFINE Int4
HICON DEFINE Int4
HINSTANCE DEFINE Int4
HKL DEFINE Int4
HMENU DEFINE Int4
HRGN DEFINE Int4
HWND DEFINE Int4
LONG DEFINE Int4
LPBYTE DEFINE Dim ; May have to appended
'
A
'
to
; Function name
LPCTSTR DEFINE Dim ; May have to appended
'
A
'
to
; Function name
LPCVOID DEFINE Dim ; May have to appended
'
A
'
to
; Function name
LPDWORD DEFINE Pint4
LPHANDLE DEFINE Pint4
LPSECURITY_ATTRIBUTES DEFINE Int4 ; Pass NULL for a pointer
LPTSTR DEFINE Dim ; May have to appended
'
A
'
to
; Function name
LPVOID DEFINE Dim ; This could also be a Pint4
PHANDLE DEFINE Int4 ; Pass the pointer(address)
; using an integer
PVOID DEFINE Int4 ; Pass the pointer(address)
; using an integer
UINT DEFINE Int4
ULONG_PTR DEFINE Pint4
INT DEFINE Int4
LPOVERLAPPED DEFINE Int4
.
. Datatypes - STRUCTures
. ========================
. Pointers to strings that represent a structure.
. The corresponding RECORD must be
'
Unpacked
'
before the WinAPi call
. and
'
Pack
'
d after the WinApi call.
.
LARGE_INTEGER DEFINE Dim
LPMSG DEFINE Dim
LPRECT DEFINE Dim
POINT DEFINE Dim
SYSTEM_INFO DEFINE Dim
.
. Datatypes - UNICODE WIDE
. ========================
. Unicode characters occupy double the space of ANSI characters,
. including zero termination.
.
LPCWSTR DEFINE Dim
.
%ENDIF
LISTON
You can’t perform that action at this time.