Compiling COBOL on Windows

1. Open up command prompt

2. Set up following environment variables for the session

• set PS_HOME=d:\psoft\HRSBX
• set COBROOT="C:\Program Files (x86)\Micro Focus\Net Express 5.1\Base" 

3. Make sure to use quotes for COBROOT
4. Make a temporary directory somewhere
   mkdir d:\temp
4. Go to setup directory under PS_HOME
    cd %PS_HOME%\setup
6. cblbld D: \temp   (there is a space between D: and \temp)
7. It will compile cobol and move the binaries to cblbina directory

If you are getting compilation error for just about every cobol, make sure that the license has not expired. Unfortunately, the compiler does not indicate that the license has expired. You can verify that in Micro Focus License Management System

 

Updating node definition with Database refresh

Make sure to truncate these tables:

DELETE FROM PSAPMSGPUBHDR;
DELETE FROM PSAPMSGPUBDATA;
DELETE FROM PSAPMSGPUBCON;
DELETE FROM PSAPMSGSUBCON;
DELETE FROM PSAPMSGPUBERR;
DELETE FROM PSAPMSGPUBERRP;
DELETE FROM PSAPMSGPUBCERR;
DELETE FROM PSAPMSGPUBCERRP;
DELETE FROM PSAPMSGSUBCERR;
DELETE FROM PSAPMSGSUBCERRP;
DELETE FROM PSAPMSGPCONDATA;
DELETE FROM PSAPMSGSCONDATA;
DELETE FROM PSIBLOGHDR;
DELETE FROM PSIBLOGDATA;
DELETE FROM PSIBLOGERR;
DELETE FROM PSIBLOGERRP;
DELETE FROM PSAPMSGARCHPH;
DELETE FROM PSAPMSGARCHPD;
DELETE FROM PSAPMSGARCHPC;
DELETE FROM PSAPMSGARCHSC;
DELETE FROM PSAPMSGARCHPT;
DELETE FROM PSAPMSGARCHST;
DELETE FROM PSIBLOGHDRARCH;
DELETE FROM PSIBLOGDATAARCH;


Update sender and receiver node in following tables:
PSIBRTNGSUBDEFN
PSRTNGDFNPARM
PSIBRTNGDEFN

Update PSIBRTNGSUBDEFN set SENDERNODENAME='HRSBX' WHERE SENDERNODENAME='HRPRD';
update PSIBRTNGSUBDEFN set RECEIVERNODENAME='HRSBX' WHERE RECEIVERNODENAME='HRPRD';
update PSIBRTNGSUBDEFN set SENDERNODENAME='FNSBX' WHERE SENDERNODENAME='FNPRD';
update PSIBRTNGSUBDEFN set RECEIVERNODENAME='FNSBX' WHERE RECEIVERNODENAME='FNPRD';

update PSRTNGDFNPARM set SENDERNODENAME='HRSBX' WHERE SENDERNODENAME='HRPRD';
update PSRTNGDFNPARM set RECEIVERNODENAME='HRSBX' WHERE RECEIVERNODENAME='HRPRD';
update PSRTNGDFNPARM set SENDERNODENAME='FNSBX' WHERE SENDERNODENAME='FNPRD';
update PSRTNGDFNPARM set RECEIVERNODENAME='FNSBX' WHERE RECEIVERNODENAME='FNPRD';

update PSIBRTNGDEFN set SENDERNODENAME='HRSBX' WHERE SENDERNODENAME='HRPRD';
update PSIBRTNGDEFN set RECEIVERNODENAME='HRSBX' WHERE RECEIVERNODENAME='HRPRD';
update PSIBRTNGDEFN set SENDERNODENAME='FNSBX' WHERE SENDERNODENAME='FNPRD';
update PSIBRTNGDEFN set RECEIVERNODENAME='FNSBX' WHERE RECEIVERNODENAME='FNPRD';

Update node name:
PSMSGNODEDEFN

update PSMSGNODEDEFN set MSGNODENAME='HRSBX' WHERE MSGNODENAME='HRPRD';
update PSMSGNODEDEFN set MSGNODENAME='FNSBX' WHERE MSGNODENAME='FNPRD';


Update trusted node:
PSTRUSTNODES
update PSTRUSTNODES SET MSGNODENAME='HRSBX' WHERE MSGNODENAME='HRPRD';
update PSTRUSTNODES SET MSGNODENAME='FNSBX' WHERE MSGNODENAME='FNPRD';

Update IBPASSWORD:
update PSMSGNODEDEFN set IBPASSWORD='XYZ'
WHERE MSGNODENAME in ('HRSBX','FNSBX');


Clear cache on the app server and make sure that the pub sub services are running.

WebProfile Tables (8.46)

These are the tables behind WebProfile Settings

SELECT * FROM PSWEBPROFILE
SELECT * FROM PSWEBPROFBROW
SELECT * FROM PSWEBPROFCOOK
SELECT * FROM PSWEBPROFDEF
SELECT * FROM PSWEBPROFHIST
SELECT * FROM PSWEBPROFNVP
SELECT * FROM PSWEBPROFPROP
 
PSWEBPROFNVP  stores Virtual Address(Load Balancer), XMLLINK userid and password, public access userid and password etc. These tables can save your life if you have messed up your web profile settings and cannot login through web