30 octobre 2017

HRaSpace Self-Service - Erreur RSBHR05GC - processus par défaut pour les GP

Après une opération de duplication d'environnement HRaSuite 7, suite à la connexion, un message d'erreur apparaît lors de l'affichage de HRaSpace.

Dans les logs du serveur Web on trouve :
HRAccess system error [TYERRE='R',TYORDR='S',CDPROG='BHR',CDFONC='05',CDSFTC='GC',ZOERR1='PP20',ZOERR2='000000000000100          02000',ZOERR3='',ZOERR4='',ZOERR5='',MSG='Erreur sur dossier']


Le code SQL 100 signifie qu'une donnée technique n'a pas été trouvée.
La table concernée est la PP20 (objet Plateforme physique).


Dans le squelette de BHR on trouvera en fonction 05GC :
431100*Recherche du radical du.
431200*processus BP défini par défaut.
431300*dans la PP20 pour appel à BHT.
431400     MOVE        W-WP00-CDPLPH TO H-CDPLPH.
431500     PERFORM     F9SBA THRU F9SBA-FN.
431600           IF    SQLCODE = W-WP00-NOTFND
431700     MOVE        SPACE TO CO16
431800     MOVE        "RSBHR05GC" TO CO16-GROUPE (1:9)
431900     MOVE        SQLSTATE TO CO16-ZOERR2 (26 : 5)
432000     MOVE        SQLCODE TO CO16-ZOER29
432100     MOVE        SQLERRMC TO CO16-GROUPE (70:70)
432200     MOVE        "PP20" TO CO16-ZOERR1
432300     IF SQLCODE <    ZERO MOVE "-"
432400     TO CO16-ZOERR2 (1:1) END-IF
432500     MOVE        "99" TO CO16-CDRET
432600     GO TO F79.

089500*********************************
089600*FONCTIONS DE RECHERCHE DE LIGNES
089700*DANS UNE TABLE
089800*********************************
089900*********************************
090000*N9SBA.    NOTE *SELECT TABLE W-WP00-IDTABL         *.
090100 F9SBA.
090200     MOVE        ZERO TO SQLCODE.

092000*N9SGP.    NOTE *SELECT TABLE PP20                  *.
092100 F9SGP.    IF    W-WP00-IDTABL = "PP20"
092200           NEXT SENTENCE ELSE GO TO     F9SGP-FN.
092400     EXEC SQL    SELECT
092500                         RDPROS
092600                 INTO    :H-RDPROS
092700                 FROM             PP20
092800                 WHERE   CDPLPH = :H-CDPLPH
092900                 AND     CDICON = 'GP_DEFAULT'     END-EXEC.
093100         GO TO     F9SBA-FN.



Le programme recherche un processus dont le champ CDICON vaut 'GP_DEFAULT'.
Effectivement, dans ma base de données, je ne retrouve pas mon environnement PPCLIINT :
Select * from PP20 where CDICON = 'GP_DEFAULT' ;
PPCLIDEV ANBHT  GP_DEFAULT  ANBHT  TYBX   Z00      ANBHTBHT      0             S      2011-04-12-11.55.28.000000
PPCLIPRD ANBHT  GP_DEFAULT  ANBHT  TYBX   Z00      ANBHTBHT      0             S      2012-01-24-14.14.17.000000
PPCLIREC ANBHT  GP_DEFAULT  ANBHT  TYBX   Z00      ANBHTBHT      0             S      2011-06-27-11.01.05.000000
PPCLIREF ANBHT  GP_DEFAULT  ANBHT  TYBX   Z00      ANBHTBHT      0             S      2011-03-15-18.23.43.000000



Ceci est lié à un dysfonctionnement de la chaine RB4 que j'ai utilisé pour rafraîchir l'objet plateforme ...
Pour corriger ma plateforme PPCLIINT :
update PP20 set CDICON = 'GP_DEFAULT' where cdexec='ANBHTBHT' and cdplph='PPCLIINT';



2 commentaires:

  1. J'ai une erreur semblable mais sur le programme BHT

    com.hraccess.openhr.exception.HRResultSYSTEMERRORException: HRAccess system error [TYERRE='R',TYORDR='S',CDPROG='BHT',CDFONC='9S',CDSFTC='BB',ZOERR1='PP20',ZOERR2='000000000000100 02000',ZOERR3='ORA-00100: no data found',ZOERR4=

    '',ZOERR5='',MSG='Erreur sur dossier']


    Sur l'environnement récemment raffraîchi j'ai

    Select * from PP20 where CDICON = 'GP_DEFAULT' and CDPLPH='PPCLIINV';



    CDPLPH CDPRO CDICON RDPRO RDMDC CDTRAN CDEXEC RDUT01 RDUT02

    -------- ----- ----------- ----- ----- -------- -------- -------- --------

    RDUT03 RDUT04 RDUT05 RDUT06 RDUT07 RDUT0 RDUT0 RDUT1 T RDT T

    -------- -------- -------- -------- -------- ----- ----- ----- - --- -

    TIMODI CDRGPS

    ------------------- --------

    PPCLIINV ANBHT GP_DEFAULT ANBHT TYBX Z00 ANBHTBHT

    0 S

    2015-03-18-09.16.40

    Une idée?

    RépondreSupprimer
  2. Juste pour activer le suivi des réponses

    RépondreSupprimer