My scipt is actually checking for faulty queues to an extension. When the extension has queue, you can´t delete the extension.
I´m checking queues for DTS, EL6 and EL7 extensions. I have some adresses to print in BC8,9 and 10 for this and I would like to get the correkt adress in BC11 as well.
NIUX has already delivered the adresses, THANKS NIUX.
For a DTS extension in BC9 this goes:
print SUSIP and check the POINT for DERS1.
Then get the pointer for FILNO=2.
SACOP:LIM=X,UNIT=DERS1,FILNO=1,POINT=YY,RELOFF=A&B;
Check the status with:
SACOP:LIM=X,UNIT=DERS1,FILNO=2,POINT=ZZ,DSOFF=0;
DATA for DSOFF=0 ahould be 40 for a free extension. If it´s not free you can SACOS with:
SACOS:LIM=XX,UNIT=DERS1,FILNO=2,POINT=ZZ,DSOFF=0,DATA=40;
Chech the queue with:
SACOP:LIM=X,UNIT=DERS1,FILNO=2,POINT=ZZ,DSOFF=1;
Also chech USERSTATE with:
SACOP:LIM=X,UNIT=KLP1T1,FILNO=2,POINT=YY,DSOFF=48;
Also chech the SERVICESTATE with:
SACOP:LIM=X,UNIT=KLP1O,FILNO=1,POINT=YY,DSOFF=17&&1A;
What I need is the parameters for BC11:
DIRNO in FILNO=1 to show the extension number,(RELOFF=4&&7 for BC10)
RLINPTR in FILNO=1 to print the POINTER in FILNO 2 (RELOFF=C&D for BC10)
LINSTA in FILNO=2 to show status (DSOFF=0 in BC10)
RQUEPTR in FILNO=2 to show pinter to queue (DSOFF=1 in BC10)
USERSTATE in FILNO=2,UNIT=KLP1T1 (DSOFF=93 in BC10)
SERVICESTATE in FILNO=1,UNIT=KLP1O (DSOFF=19&&1C in BC10)
By doing this check in a scriptfile it´s much easier for everyone do do the check.
I will translate the scipt into english when I have the time. I have a lot on my mind right know but within 2 weeks it will be OK I guess.
NANSI