> Tech > Figure 1

Figure 1

Tech - Par Renaud ROSSET - Publié le 24 juin 2010

Explorer deux fichiers de messages par mot-clé

*************************************************************
  PGM

*** First create a PF to output to ***
  CRTPF FILE(QTEMP/SCANMSG) RCDLEN(132)

*** Print the all messages from the first MSGF ***
  DSPMSGD RANGE(*FIRST *LAST) MSGF(ERRMSGF1) +
  DETAIL(*BASIC) OUTPUT(*PRINT)

*** Copy it to PF just created ***
  CPYSPLF FILE(QPMSGD) TOFILE(QTEMP/SCANMSG)

Figure 1

+
SPLNBR(*LAST) MBROPT(*REPLACE)

*** Delete the spooled file ***
DLTSPLF FILE(QPMSGD) SPLNBR(*LAST)

*** Repeat the whole operation on the next MSGF ***
DSPMSGD RANGE(*FIRST *LAST) MSGF(ERRMSGF2) +
DETAIL(*BASIC) OUTPUT(*PRINT)

CPYSPLF FILE(QPMSGD) TOFILE(QTEMP/SCANMSG) +
SPLNBR(*LAST) MBROPT(*ADD)

DLTSPLF FILE(QPMSGD) SPLNBR(*LAST)

*** Now run a query on the PF ***
RUNQRY QRY(*NONE) QRYFILE((QTEMP/SCANMSG)) +
OUTTYPE(*DISPLAY) RCDSLT(*YES)

*************************************************
*** For the record selection,
type: ***
*** SCANMSG LIKE ‘%keyword%’ ***

*** replacing keyword with whatever your looking for.
***
*************************************************

*** Delete the PF in QTEMP
DLTF FILE(QTEMP/SCANMSG)

ENDPGM
*************************************************************

Téléchargez cette ressource

Guide de Threat Intelligence contextuelle

Guide de Threat Intelligence contextuelle

Ce guide facilitera l’adoption d’une Threat Intelligence - renseignement sur les cybermenaces, cyberintelligence - adaptée au "contexte", il fournit des indicateurs de performance clés (KPI) pour progresser d' une posture défensive vers une approche centrée sur l’anticipation stratégique

Les plus consultés sur iTPro.fr

A lire aussi sur le site

À la une de la chaîne Tech