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/plbwebcli/appoffline.pls 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
/
plbwebcli
/
appoffline.pls
Copy path
Blame
More file actions
Blame
More file actions
Latest commit
History
History
History
145 lines (128 loc) · 4.71 KB
main
Breadcrumbs
sunbelt-plb-samples
/
plbwebcli
/
appoffline.pls
Copy path
Top
File metadata and controls
Code
Blame
145 lines (128 loc) · 4.71 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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
*---------------------------------------------------------------
.
. Program Name: appoffline
. Description: PlbWebCli Application Offline Sample
.
. Revision History:
.
. 17-04-07 whk
. Original code
.
INCLUDE plbequ.inc
INCLUDE plbmeth.inc
INCLUDE plbstdlib.inc
*---------------------------------------------------------------
WebForm PLFORM appofflnf.pwf
.
FullData DIM 200
JsonBody DIM 400
.
Result FORM 5
.
BaseDir DIM 150
SampleName DIM 200
.
SampleData XDATA
.
Client CLIENT
RunTime RUNTIME
.
*................................................................
.
. Code start
.
CALL Main
LOOP
EVENTWAIT
REPEAT
STOP
*................................................................
.
. TestClick - Handle a request to perform a test
.
TestClick LFUNCTION
ENTRY
EVENTINFO 0,result=Result
SWITCH Result
CASE 1
CALL Install
CASE 2
CALL GoOffline
CASE 3
CALL GoOffline1
CASE 4
CALL GetData
ENDSWITCH
FUNCTIONEND
*................................................................
.
. Install
.
Install LFUNCTION
ENTRY
Client.AppDownLoad Using "offline/sunhello.css", "cdvfile://localhost/persistent/sunhello.css"
Client.AppDownLoad Using "offline/sunhello.html", "cdvfile://localhost/persistent/sunhello.html"
Client.AppDownLoad Using "offline/sunhello.js", "cdvfile://localhost/persistent/sunhello.js"
Client.AppDownLoad Using "offline/sunviewfile.css", "cdvfile://localhost/persistent/sunviewfile.css"
Client.AppDownLoad Using "offline/sunviewfile.html", "cdvfile://localhost/persistent/sunviewfile.html"
Client.AppDownLoad Using "offline/sunviewfile.js", "cdvfile://localhost/persistent/sunviewfile.js"
Client.AppDownLoad Using "offline/userdata.json", "cdvfile://localhost/persistent/userdata.json"
Client.AppInstallOffline Using "Offline Hello", "sunhello.html","sunhello.css","sunhello.js"
Client.AppInstallOffline Using "Offline Test1", "sunhello.html","sunhello.css","sunhello.js"
Client.AppInstallOffline Using "Offline File", "sunviewfile.html","sunviewfile.css","sunviewfile.js"
Client.AppInstallOffline Using "Offline Test1","",*Options=2
SETPROP EditText2, Text="Installed"
FUNCTIONEND
*................................................................
.
. GoOffline
.
GoOffline LFUNCTION
ENTRY
Client.AppSetOffline Using "sunhello.html","sunhello.css","sunhello.js"
SHUTDOWN
FUNCTIONEND
*................................................................
.
. GoOffline1
.
GoOffline1 LFUNCTION
ENTRY
Client.AppSetOffline Using "sunviewfile.html","sunviewfile.css","sunviewfile.js"
SHUTDOWN
FUNCTIONEND
*................................................................
.
. GetData - Get a data file
.
GetData LFUNCTION
ENTRY
EVENTREG Client,AppEventDoUpload,UploadDone,ARG1=FullData
Client.AppUpload Giving Result Using "cdvfile://localhost/persistent/sampleData.txt", "sampleData.txt"
FUNCTIONEND
*................................................................
.
. UploadDone
.
UploadDone LFUNCTION
ENTRY
RunTime.GetDir GIVING BaseDir USING *TYPE=6
PACK SampleName, BaseDir, "sampleData.txt"
SETPROP EditText2, Text=SampleName
SampleData.LoadJson Using SampleName, JSON_LOAD_FROM_FILE
SampleData.StoreJson Giving JsonBody
SETPROP EditText1, Text=JsonBody
FUNCTIONEND
*................................................................
.
. Main - Main program entry point
.
. Register and Startup the battery events
.
Main LFUNCTION
ENTRY
WINHIDE
FORMLOAD WebForm
SETPROP EditText1, Text=""
SETPROP EditText2, Text=""
FUNCTIONEND
You can’t perform that action at this time.