<%@LANGUAGE="VBSCRIPT"%> <% ' ================================ ' AIS Debug variables ' ================================ Dim AISdebugSet AISdebugSet = "N" ' ===================================== ' Make sure to catch any database error ' ===================================== On Error Resume Next ' ================================ ' AISNews Recordset and variables ' ================================ Dim AISNews Dim AISNewsError Dim AISNewsIndex Set AISNews = Server.CreateObject("ADODB.Recordset") AISNews.ActiveConnection = MM_Foundation_STRING AISNews.Source = "select M.msg_id,M.title,M.abstract,M.author,M.details,M.urgency,M.msg_date,M.expiry_date,M.app_name,A.name from navigator.app_messages M, navigator.sys_applications A where M.app_name = A.code and trunc(sysdate) between M.msg_date and M.expiry_date-1 order by msg_date desc" AISNews.CursorType = 0 AISNews.CursorLocation = 2 AISNews.LockType = 1 AISNews.Open() ' Check that DB connection and SQL run went fine If Err.Number <> 0 Then AISNewsError= Err.Description Else AISNewsError= "None" End If AISNewsIndex = 0 ' ================================ ' AISFocus Recordset and variables ' ================================ Dim AISFocus Dim AISFocusError Dim AISFocusIndex Dim AISFocusShownAlways Dim AISFocusToBeShown Dim AISFocusRequestedId Dim AISFocusContent Dim AISUpperLeftImage Dim AISUpperRightImage Dim AISNextFocusId Dim AISPreviousFocusId Set AISFocus = Server.CreateObject("ADODB.Recordset") AISFocus.ActiveConnection = MM_AISweb_STRING AISFocus.Source = "SELECT id, title, text, upper_right_image, upper_left_image, date_from, date_to, always_shown FROM articles WHERE (articles.date_from<=Date() Or IsNull(articles.date_from)) And (articles.date_to>=Date() Or IsNull(articles.date_to)) ORDER BY articles.always_shown,articles.id;" AISFocus.CursorType = 0 AISFocus.CursorLocation = 2 AISFocus.LockType = 1 AISFocus.Open() ' Check that DB connection and SQL run went fine If Err.Number <> 0 Then AISFocusError= Err.Description Response.Write(""&AISFocusError&"") Else AISFocusError= "None" End If AISFocusRequestedId = Request.QueryString("focusid") ' ================================ ' AIS Procedures used in page ' ================================ sub getFocus() ' =========================================== ' GET FOCUS ' This procedure build the focus and store it ' in the AISFocusContent variable ' =========================================== If (AISFocus.EOF OR AISFocusError<> "None") Then Call AISdebug("Focus query returned NO records - maybe database connection error or no focus active") ' No focus found, maybe an error connecting the database or none is active... ' Display a default hardcoded focus item AISFocusContent= "

" AISFocusContent = AISFocusContent & "

AIS: the unique entry point to all administrative computing at CERN

" AISFocusContent = AISFocusContent & "
" AISFocusContent = AISFocusContent & "The AIS website provides you with links, documentation, Frequently Asked Questions pages, Quick Reference Guides etc on all administrative applications and projects at CERN." AISFocusContent = AISFocusContent & "

" AISFocusContent = AISFocusContent & "Choose one of the menu items on the left. If you are not sure on which option to use, the shortcuts on the right may help you finding the good one." Else Call AISdebug("Focus query returned records") AISFocusToBeShown = 0 ' Check if a given focus has been past as parameter ' In that case search for that focus (supposing it is active and therefore in the query results) If (AISFocusRequestedId) <> "" Then Call AISdebug("Requested focus: " & AISFocusRequestedId) AISFocus.MoveFirst Do Until (AISFocus.EOF) If (Cstr(AISFocus.Fields.Item("id")) = AISFocusRequestedId) Then AISFocusToBeShown = 1 Call AISdebug("Requested focus found: " & AISFocus.Fields.Item("title")) Exit Do Else Call AISdebug("Current focus id = " & AISFocus.Fields.Item("id")& ". Check next.") AISFocus.MoveNext End if Loop If (AISFocus.EOF) Then Call AISdebug("Requested focus not found or not active") End if End if ' Check if there was no requested focus or it has not been found or it is not active If (AISFocusToBeShown = 0) Then Call AISdebug("Choose a focus randomly") AISFocus.MoveFirst ' Check if there are any "Always Shown" focus (should always be on first record) AISFocusShownAlways = AISFocus.Fields.Item("always_shown").Value Call AISdebug("Always shown focus exists = " & AISFocusShownAlways) ' Check how many focus may be displayed (taking into account existence of "always shown" ones) While (NOT AISFocus.EOF) If AISFocusShownAlways Then ' There is at least one "Always Shown" focus, count only those ones If AISFocus.Fields.Item("always_shown").Value Then AISFocusIndex = AISFocusIndex+1 End If Else ' There are no "Always Shown" focus, all are counted AISFocusIndex = AISFocusIndex+1 End If AISFocus.MoveNext Wend Call AISdebug("Number of potential focus found = " & AISFocusIndex) ' Now decides (random) which focus is to be shown Randomize AISFocusToBeShown = Int((AISFocusIndex*Rnd)+1) Call AISdebug("Chosen focus = " & AISFocusToBeShown & "/" & AISFocusIndex) ' Move back to the randomly chosen focus AISFocus.MoveFirst For i = 1 to AISFocusToBeShown-1 AISFocus.MoveNext Next End if ' Now we should be placed on the focus to be displayed ' Get the to be displayed focus id AISFocusToBeShownId = AISFocus.Fields.Item("id") Call AISdebug("Chosen focus id = " & AISFocusToBeShownId) ' Find out what is the next focus id AISFocus.MoveNext If AISFocus.EOF Then AISFocus.MoveFirst End if AISNextFocusId = AISFocus.Fields.Item("id") Call AISdebug("Next focus id = " & AISNextFocusId) ' Move back to shown focus and find out at the same time which is the previous focus id AISFocus.MoveFirst If (AISFocus.Fields.Item("id") = AISFocusToBeShownId) Then ' Chosen focus was the first one, the previous one is therefore the last one Call AISdebug("Chosen focus is the first one") Do Until (AISFocus.EOF) AISPreviousFocusId = AISFocus.Fields.Item("id") AISFocus.MoveNext Loop AISFocus.MoveFirst Else Do While (AISFocus.Fields.Item("id") <> AISFocusToBeShownId) AISPreviousFocusId = AISFocus.Fields.Item("id") Call AISdebug(" - Current focus id = " & AISFocus.Fields.Item("id")) AISFocus.MoveNext Loop End If Call AISdebug(" - Moved back to chosen focus") Call AISdebug("Previous focus id = " & AISPreviousFocusId) ' Display the focus Call AISdebug("Build focus") AISUpperLeftImage = AISFocus.Fields.Item("upper_left_image") AISUpperRightImage = AISFocus.Fields.Item("upper_right_image") AISFocusContent = "" If (Len(AISUpperLeftImage)>0) Then Call AISdebug(" - upper left image is #" & AISUpperLeftImage & "#") AISFocusContent = AISFocusContent & "

" Else Call AISdebug(" - no upper left image") End if If (Len(AISUpperRightImage)>0) Then Call AISdebug(" - upper right image is #" & AISUpperRightImage & "#") AISFocusContent = AISFocusContent & "

" Else Call AISdebug(" - no upper right image") End if AISFocusContent = AISFocusContent & "

" & AISFocus.Fields.Item("Title").Value & "

" AISFocusContent = AISFocusContent & "
" AISFocusContent = AISFocusContent & AISFocus.Fields.Item("text") End If ' Checked if "any" focus was found end sub %> PAD: Frequently Asked Questions

CERN home > IT Department > AIS Home

Internal |

AIS Administrative Information Services

**Main Applications**

PAD Foire aux questions

Un problème que vous rencontrez peut être très commun, veuillez vérifier ci-dessous dans la liste des Questions Fréquemment Posées si l'une d'elles correspond à votre problème.

GENERALE

Sous quels systemes peut-on utiliser PAD?

Vous obtenez le message suivant:
Your current security settings prohibit running ActiveX controls on this page.
As a result, the page may not display correctly.

Qui utilise PAD?

Dans quel context utilise-t-on PAD?

Comment et où puis-je obtenir une formation PAD?

Quand j'accede a PAD, j'obtiens le message suivant:
Java Plug-in 1.4.0_02 cannot be located because values in the register key
HKEY_LOCAL_MACHINE\SOFTWARE\JavaSoft\JAVA Plug-in\1.4.0_02 is not found or is no longer valid

EXTERNALS

Quels types d'externes sont rentrés dans PAD?

J'ai saisie un NOUVEAU externe dans PAD mais je ne le trouve pas?

Jusqu'où va la responsabilité de garant pour un external qui vient au CERN?

COSTINGS

Lors de la saisie des costings j'ai un message d'erreure qui s'affiche à l'écran me signalant que des champs obligatoires ne sont pas remplis alors que cela n'est pas le cas

GENERALE

Sous quels systèmes peut-on utiliser PAD?

Veuillez vérifier la liste des systèmes requis pour l'utilisation de PAD.

Vous obtenez le message suivant:
Your current security settings prohibit running ActiveX controls on this page. As a result, the page may not display correctly.

Vous venez d'installer W2000 et essayez d'accéder a PAD en utilisant Internet Explorer et le message cité au-dessus apparait sur votre écran.

Solution:

Choisir l'option 'Tools- Internet options' du menu Internet Explorer
Puis choisir 'Security'
Selectionnez 'Internet' et actionnez la touche 'Custom level'
Puis vérifiez avec la liste ci-dessous si vous avez les bonnes options cochées:
Cliquez ensuite sur OK, puis selectionnez 'Local Intranet', actionnez la touche 'Custom level' et suivez les étapes 4 à 5
Appuyez sur OK.
Relancer PAD. Un message relatif à l'installation du Java plugin apparaît.
Répondez 'YES' et suivez la procédure qui vous est indiquée.

Qui utilise PAD?

PAD est utilisé par toutes les secrétaires de groupes et de division au CERN sauf la division HR, FI et le Users' Office.

Dans quel context utilise-t-on PAD ?

PAD signifie 'Personnel Administration for Divisions'. L'utilisation de cette application est strictement reservée pour la creation des externes presents dans une division, pour modifier et saisir des adresses internes et mettre à jour les costings.

Comment et où puis-je obtenir une formation PAD?

Si vous êtes amenés à utiliser PAD et avez besoin d'une formation, veuillez contacter Doreen Klem par email ou en appelant le 77609.

Quand j'accede a PAD, j'obtiens le message suivant:
Java Plug-in 1.4.0_02 cannot be located because values in the register key
HKEY_LOCAL_MACHINE\SOFTWARE\JavaSoft\JAVA Plug-in\1.4.0_02 is not found or is no longer valid

Pour resoudre ceci, il faut suivre la procedure suivante.

EXTERNALS

Quels types d'externes sont rentrés dans PAD?

Dans PAD vous pouvez uniquement saisir des externes presents au CERN et qui sont amenés à travailler dans votre division pour une période donnée. Dans ces cas vous devrez indiquer un garrant staff de votre division, la raison du séjour au CERN, le début et fin de leur contrat.

J'ai saisie un NOUVEAU externe dans PAD mais je ne le trouve pas?

Notion importante: un NOUVEAU externe comme stipulé dans le texte signifie une personne qui n'a jamais ete au CERN auparavant.

Dans la plupart des cas, cette situation se présente lorsque vous saisissez un NOUVEAU externe à une date située dans le future. Par exemple, admettons que nous sommes aujourd'hui le 06-DEC-2001 et que vous saisissez un NOUVEAU externe à la date du 01-jan-2002 dans le champ 'From'.

Lors de la recherche à la date du 06-DEC-2001 vous ne trouverez pas cette personne car elle n'existe dans le système qu'à partir du 01-JAN-2002.

Pour cette raison, la date saisie dans le champ 'From' doit rester à la date du jour et les dates à saisir dans le champ 'Start' et 'Expiry' doivent correspondre à la date de début et fin de contrat.

Jusqu'où va la responsabilité de garant pour un external qui vient au CERN?
[1] [2]

Xavier Daney, HR division:

"A mon avis, le garant CERN ne peut tre responsable que des dmarches habituelles entreprendre (lettres, information de l'employeur, etc.) en cas de non respect par un EXTERNAL de ses obligations vis vis du CERN. Dans le cas qui vous occuppe, le garant ne peut tre financirement responsable du non paiement de frais de logement. Par contre, il doit tout faire pour obliger l'EXTERNAL dont il est le garant payer les factures et frais non pays" [1]

COSTINGS

Lors de la saisie des costings j'ai un message d'erreure qui s'affiche à l'écran me signalant que des champs obligatoires ne sont pas remplis alors que cela n'est pas le cas

Veuillez suivre attentivement les étapes suivantes:

Pour insérer une nouvelle ligne de costing, cliquez sur ADD
Puis saisissez la date de début
Puis l'intersection PPA
Pour insérer une deuxième ligne de costing, cliquez à nouveau sur ADD
Puis saisissez d'abord l'intersection PPA et
ensuite la date de début.

En suivant bien les étapes telles que décrites au-dessus vous n'aurez plus l'affichage du message d'erreure.