:INC JOBI.GET_CLIENT, NOFOUND = IGNORE
01 !this include script returns 1 in prod, 2 in UAT, and 3 in Dev
02 !Use &PC_NUM# as an arg in variable lookups ie
GET_VAR(("VARA.STATIC.FIREWALL.DATA", "HW", &PC_NUM#)
03 :SWITCH &$CLIENT#
04 !adding 1000 as alternate prod environment for lb dr evolution
05 :CASE 0100
06 :PSET &PC_NUM# = 1
07 :CASE 0102
08 :PSET &PC_NUM# = 2
09 :CASE 0101
10 :PSET &PC_NUM# = 3
11 :ENDSWITCH
12
13 :IF &$SYSTEM# = 'AUTODR'
14 : PSET &PC_NUM# = 1
15 :ENDIF
:SET &LV_CONNECTION# = GET_VAR("VARA.STATIC.FIREWALL.DATA", "DB_CONN",
&PC_NUM#)
:PSET &PV_CONN_TEST# = SYS_HOST_ALIVE(,&LV_CONNECTION#)
:P Connection to database &LV_CONNECTION# alive? &PV_CONN_TEST#
--
<http:
www.verizon.com="">Scott Hughes
IT Network Services
O 949 286 7668
M 505 373 7872
7000 Central Blvd SW
Albuquerque, New Mexico 87121
Original Message:
Sent: 6/17/2022 11:54:00 AM
From: marc broussard
Subject: awa 12.3 how to test of an objet CONN before transferring files
Hello
In AWA 12.3 (windows 2019), I have an objet connexion to do some files transferts.
Thoses transferts are often in error because the connexion is lost before starting !
I would like, in order to have less errors, to test the connexion and then to do the transfert :
1/ test the connexion
if ok:
2/ job of transfert
else : nothing, bye bye
can you help ?
thanks a lot
Marc Broussard
EQUANS INEO</http:>