CODEWITHSUNDEEP
sqldb2ibm-midrangerpglecontrol-language
learning_fly
learning_fly

Reputation: 392

Deleting and updating on different LPARs

Is it possible to compute a file member removal in a rpgle program from a development lpar.

   eg: RMVM FILE(LIB/FILE1) MBR(PAR1981181)

and performing updates on a different file in a different lpar altogether?

 UPDATE "SCDTA.CORP"/AR#RMTPRL9 
SET SENTFLAG = ' ', DATESENT = '0001-01-01', TIMESENT = '00:00:00', XMITT# = 0, LOCATION =   'PACI175A', ARBATCH# = ' ' 
 WHERE LOCATION = 'PACI173A' AND ARBATCH# = 'PAR1981181'

How exactly can one perform setting of lpars in one single program?Is this possible. Please guide.

Upvotes: 0

Views: 205

Answers (2)

WarrenT
WarrenT

Reputation: 4542

If you are on release 7.1 and have the appropriate PTF group loaded, then you can use 3-part naming in SQL. This let's you qualify a table reference with the database (ie. RDB directory entry) and schema (ie. library).

For example:

UPDATE OTHERSYS.SCDTA_CORP.AR#RMTPRL9 
  SET SENTFLAG = ' ' 
    , DATESENT = '0001-01-01'
    , TIMESENT = '00:00:00'
    , XMITT#   = 0
    , LOCATION = 'PACI175A'
    , ARBATCH# = ' ' 
  WHERE LOCATION = 'PACI173A'
    AND ARBATCH# = 'PAR1981181'

Upvotes: 1

James Allman
James Allman

Reputation: 41188

These operations can be be done by using DDM and RUNRMTCMD to link the LPAR's as remote systems.

For more information see:

Upvotes: 2

Related Questions