× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



You can use ping inside a CL program. Here is an extract from the help text (F1) associated with ping :
Element 2: Summary, if response errors

*COMP
If the PING (CFYTCPCNN) request is successful, the summary
message returned is a completion message.

*ESCAPE
A monitorable escape message is returned. This is useful if you
have written a program to issue the PING request and wish to
monitor the PING request for errors. See the error messages
section of the PING (VFYTCPCNN) command help for a list of
possible escape messages.


Denis Robitaille
Chef de service TI – Solution d’entreprise
Infrastructure et opérations

CASCADES CENTRE DES TECHNOLOGIES
412 Marie Victorin
Kingsey falls(Québec) Canada J0A 1B0
Tél : 819 363 6100 Poste :52130
Cell : 819 352 9362


-----Message d'origine-----
De : RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> De la part de Carel
Envoyé : 15 mai 2019 08:22
À : rpg400-l@xxxxxxxxxxxxxxxxxx
Objet : Re: Validate URL in RPG

Think he wants to do a PING from an RPGLE program.

Maybe the system API can be used for that. Or using QSH.

Kind regards,
Carel Teijgeler

Op 15-5-2019 om 12:16 schreef Jonathan Wilson:
On Wed, 2019-05-15 at 09:54 +0000, Jean-Marc DUVAL wrote:
Thanks Jonathan for this great regular expression for offline structure controls that allows me to do a pre-check but here I would like to check the existence of this URL in an RPG program.

Sorry, should have been slightly clearer when I said it was possible
to use C, SQL, something else... from within RPG you can call C API's
and SQL. Both of which provide methods to do regex matching.

Some pointers to get you started.

C
http://www.scottklement.com/rpg/copybooks/regex_h.rpgle.txt
https://www.ibm.com/developerworks/community/forums/html/topic?id=355b
0d77-a5e6-46c2-af6e-8ffe9641f497
SQL
https://www.nicklitten.com/simple-email-validation-sql-rpg-ile-program
/

Obviously you could do it the long way with RPG checks and substs and
scans and trims... but why re-invent the wheel :-)

Regards,

Jean-Marc DUVAL

-----Message d'origine-----
De : RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> De la part de
Jonathan Wilson Envoyé : mercredi 15 mai 2019 10:47 À :
rpg400-l@xxxxxxxxxxxxxxxxxx Objet : Re: Validate URL in RPG

On Wed, 2019-05-15 at 08:26 +0000, Jean-Marc DUVAL wrote:
Hello everyone

I need to control that a URL entered by a user is valid.
Would anyone have an example of RPG code for this?
I'm going to have to say that regex might be the best way (I know nothing about regex) as there are a good few examples on the interwebby.
(https://www.regextester.com/98055)

Likewise, there are examples of using regex from within RPG such as via SQL (possibly others, maybe C, or an API?).

The expression required is (remove quotes) "(ftp|http|https):\/\/(\w
+:{0,1}\w*@)?(\S+)(:[0-9]+)?(\/|\/([\w#!:.?+=&%@!\-\/]))?"

Hope this helps.

Regards,

Jean-Marc DUVAL

--
This is the RPG programming on IBM i (RPG400-L) mailing list To post
a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our
affiliate link: https://amazon.midrange.com


--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com Cascades - ATTENTION: Ce courriel provient de l'extérieur de l'organisation. Ne pas cliquer sur les liens et ne pas ouvrir les pièces jointes sauf si vous reconnaissez l'expéditeur et que vous êtes sûr que le contenu est légitime.
Cascades - CAUTION: This email is from outside the organization. Do not click on links or open attachments unless you recognize the sender and you are sure the content is safe.


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.