EDIT e altro

EMM 1997

INDIETRO

Note sparse da ricordare in ambiente OS390

Utilizzare il comando SQLIDT per entrare nel template
Sostituire tutti caratteri della colonna 1 con una stringa: C P'=' H27P 1 1 ALL

Editor Comandi (vale per tutti gli edit)

I	insert line (to insert one or more lines of new data)
D	delete line (to delete one line, several lines,
R	repeat line (to repeat a single line one or more times, or to repeat a block of lines one or more times).
C	to identify the source of a copy operation.
M	to identify the source of a move operation.
A	to identify the destination of a move/copy operation.
B	to identify the destination of a move/copy operation.
O	to identify the destination of an move/copy overlay operation.
)	Shift right one or more columns.
(	Shift left one or more columns.
>	Shift data right one or more characters.
<	Shift data left one or more characters.
X	Exclude one line, several lines, or a block of lines.
F	Show the first line(s) from a block of excluded lines.
L	Show the last line(s) from a block of excluded lines.
S	Show the most significant line(s) from a block of excluded lines.
TS	text split, to split a text line at the cursor to allow insertion
TF	text flow, to flow text to the end of a paragraph
TE	text enter, to format the screen for power typing one or more text paragraphs
LC	lowercase, to change text from uppercase to lowercase
UC	uppercase, to change text from lowercase to uppercase
BNDS	to display and allow changes to the current bounds.
COLS	to display a formatted line for identifying display columns.
MASK	to display and allow changes to the current mask.
TABS	to display and allow changes to the current tabs line.
MD	Convert a line
MDn	Convert 'n' lines
MDD or MDMD	Convert a block of lines

Primary commands

LOCATE	to display a particular line in the data.
RESET	to reset the edit display.
SUBMIT	to submit edit data as a job stream for background execution.
PROFILE	to display the current edit profile, to select an alternate edit profile, or to control profile locking.
RECOVERY	to set RECOVERY mode on or off.
SAVE	to save the data without ending the edit session.
CANCEL	to cancel edit without saving the data.
SPROF	to display the current SCLM edit profile during an SCLM edit session.
FLIP	to reverse the exclude status of a range of lines.
COMPARE	to display differences between data sets.
FIND	to find a specified character string.
CHANGE	to find and then change a specified character string.
EXCLUDE	to exclude lines that contain a specified character string.
NUMBER	to set NUMBER mode on or off.
RENUM	to set NUMBER mode on and renumber the data.
UNNUM	to set NUMBER mode off and blank out sequence numbers.
AUTONUM	to set AUTONUM mode on or off.
AUTOLIST	to set AUTOLIST mode on or off. (formerly PRINT )
STATS	to set STATS mode on or off.
AUTOSAVE	to set AUTOSAVE mode on or off.
PACK	to set PACK mode on or off.
VERSION	to set the version number stored with the statistics.
LEVEL	to set the modification level stored with the statistics.
INTRO	Introduction to external data commands
CREATE	to create a new member of a partitioned data set.
REPLACE	to replace a member, or an entire sequential data set.
COPY	to copy data from a member or sequential data set.
MOVE	to move (copy and delete) a member or sequential data set.
MODEL	to copy a predefined model.
SCREATE	to create a new member within SCLM.
SREPLACE	to replace a member within SCLM.
SMOVE	to move (copy and delete) a member within SCLM.
DELETE	to delete excluded or nonexcluded lines from data being edited.
SORT	to perform sorting functions on the data being edited.
EDIT	to cause a recursive entry into edit.
UNDO	to "undo" (reverse) the last command you entered.

JCL, alcune notevoli cose

Utility JCL

JSCHANG Usare SYS%%.SYS%%.INDX(JSCHANG) per fare cambiamenti intelligenti.

JREF Comando da usare nell’editor per fare il reformat del jcl.

JCARD in edit per avere la scheda job.

CMP

PROBLEM SOLVER

"cercare un codice di errore"
nel caso di errori del tipo IEF450I si può scrivere TSO MESSAGGI 450I per info (ora QW);
"dataset migrato" usa il comando hreca .
"allocare spazio per un sequenziale"
=3.2 comando A, le prime due righe vuote le altre riempirle con i dati copiati da un sequenziale simile.

Alcuni codici di errore

Codice	Descrizione/soluzione

S322	CPU time ecceduto soluzione cambia coda;

Macro e altre amenità

TSO

TSO TSODSN SYS3P.SCHSV.CNTL Per vedere chi usa una libreria
TSO PROCDCF per stampare un documento
TSO VISM SSMHMAG view dell'oggetto seguento path definito in P.LIB(PROFxxx)
TSO EDM SSMHMAG edit dell'oggetto seguento path definito in P.LIB(PROFxxx)
SEND 'prova' USER(ITE54) come il WRITE di VMS
ANNI JOTTI data di nascita di Jotti
TSO ANNIV compleanno del giorno
TSO T nome telefono di nome
TEL nome telefono di nome
PLEASE DEL per cancellare una coda (?)
TSO SAULOG ma si fa prima utilizzando SYS0P.SAUFLG99.DS

STAMPA 9

Stampa nella coda 9 l'oggetto, poi bisogna andare nelle code a modificare i parametri di stampa (funziona solo in edit)

OGL definizioni per le stampe OGL

PAGEDEF

srfu02

FORMDEF

srfv02

HYPEDIT

Richiama la procedura sulla quale di trova il cursore, prima il comando poi ci si posiziona sull'oggetto da richiamare

SDSF e stampe

Action characters that can be entered in the NP column

// Block repeat; type // on the first row and another // on the last row to be processed

= Repeat previous action character or overtype

+ Expand the NP column. (Use RESET to reset.)

? Display a list of the data sets for an output group.

(Access the Job Data Set panel.)

// Block repeat; type // on the first row and

another // on the last row to be processed

= Repeat previous action character or overtype

+ Expand the NP column. (Use RESET to reset.)

C Purge an output data set. (See note.)

O Release an output data set. (See note.)

P Purge an output data set. (See note.)

Q Display output descriptors for the data set.

(Access the Output Descriptors panel.)

S Display line-mode data set or data sets. Other forms:

SB (ISPF Browse), SE (ISPF Edit), SJ (Edit JCL)

A Release a job's output.

C Purge a job's output.

H Hold a job's output.

L List a job's output in the log.

O Release output for printing.

P Purge a job's output.

Code Job e Stampa

PREFIX per vedere tutto quando la Antonella fa delle modifiche alla temp.
PR consente di vedere le stampanti e controllare il loro stato.
Se si va su =S si deve decidere come visualizzare le code:

*J2SI*	coda della stampante 6° piano via PC	classe A
*SMP1*	Stampante aghi cliente	Classe A
I	mostra le code attive nel momento di collegamento	opzioni/comandi
O	mostra le code in uscita	OO per classe O, OX per classe X, O9 per classe 9; con Q si vanno a vedere le proprietà della stampa
H	questi sono i risultati dell'esecuzione, dopo qualche ora vengono cancellati	? per vedere gli step e successivamente S per vedere lo step che interessa: normalmente il cedolino STEP 4 o il log ...LOG
*DA OJOB*	Mostra i dati (CPU time) dei job attivi

È possibile portare in stampa il risultato di un job mettendo il codice della coda e lo "o":

NP JOBNAME JOBID OWNER PRTY C FORMS DEST TOT-REC

o SRFJGEST JOB01899 ITE54 5 X STD LOCAL 6,159

Varie

Auto update

Si attiva utilizzando il comando &nn con nn > 10 ed indica il n° di sec. Per il refresh. Il tso va in SYSTEM…

Edit utilizzando ST

To display the job's output with ISPF Edit, use SE. To display just the JCL for the job, use SJ. You can change and resubmit the JCL from the display. The title line of the panel shows the job name, job ID, and ddname, as follows:
SDSF EDIT -- jobname (jobid ) ddname

Changes you make to the data are not saved.

Per trovare un errore si possono mettere degli XEVID nel formulario di test in modo da poterli trovare nella SYSOUT.

Ditto (G ) ovvero come cercare nelle tabelle

Si usa per lavorare sulle tabelle in browse (per modificarle bisogna avere una temp), scelta 1, 3 (VSAM perché i dati che voglio cercare sono lì (?)), inserisco SYS0P.GESF01.DATV ("tabella GEST"), scrivo il nome nella KEY della tabella che sto cercando;

Uso del CTD

Per vedere le classi tipo 5 utilizza id: IT134, passwd: YRP'"

=======> ctd

------------------------------ Mes

LU: Applicazione

Messaggio:

Conviene cercare utilizzando il JOB NAME mettendoci il nome con una wildcard.
nell'elenco ci sono i job segnato con classe 5 e le stampe segnate con la classe A
Quando si esce si fa PF3
FIND per trovare il job che interessa
V per vedere
Settare la DISPLAY:

DISPLAY TYPE Desired Report list display type (or format).

D Default - for operations personnel

U User - for end users

J Job - for production control/programmers

S SDSF - similar to IBM's SDSF

A All fields

VSAM Asincroni

Alcuni VSAM sono asincroni ed hanno la maschera PER0X.SXXFAXXX.DV e se si vuole inizializzarli (creare e cancellare un record vuoto) è possibile utilizzare la MFEND0.INFO%%0W.CNTL(PERJVINI). È stato utilizzato per l’errore del file "empty" che ha dato:

IEC161I 039-061,SRFJD130,P003 S001,SALFX07,,,PER0P.SRFAD071.DV

Allocare

Alcuni sequenziali rischiamo di esplodere perché sono frammentati e quindi conviene ridefinirli. Usare il comando TSO BLKOPT

Esempio di come sono:

Data Set Information

Data Set Name . . . . : PER0T.SBMF0AO.DATS

General Data Current Allocation

Management class . . : MCTEST01 Allocated tracks . : 81

Storage class . . . : MAYCACHE Allocated extents . : 9

Volume serial . . . : SMT003

Device type . . . . : 3390

Data class . . . . . : Current Utilization

Organization . . . : PS Used tracks . . . . : 75

Record format . . . : FB Used extents . . . : 9

Record length . . . : 1024

Block size . . . . : 2048

1st extent tracks . : 1

Secondary tracks . : 10

Data set name type :

Creation date . . . : 1999/04/13

Expiration date . . : ***None***

Esempio di come dovrebbero diventare:

Data Set Information

Data Set Name . . . . : PER0P.SSMF0AO.DATS

General Data Current Allocation

Management class . . : MCPROD05 Allocated cylinders : 7

Storage class . . . : MAYCACHE Allocated extents . : 1

Volume serial . . . : SMP032

Device type . . . . : 3390

Data class . . . . . : Current Utilization

Organization . . . : PS Used cylinders . . : 4

Record format . . . : FB Used extents . . . : 1

Record length . . . : 1024

Block size . . . . : 22528

1st extent cylinders: 7

Secondary cylinders : 1

Data set name type :

Creation date . . . : 1999/05/03

Expiration date . . : ***None***

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

SPDJBR14 - IEFBR14 Allocazione ark.sequenziali SPD.

SPDJD105 - ADRDSSU Restore archivio anagrafico mese precedente

SPDJD205 - IEBGENER Copia nastro input su disco .

SORT Sort ark.temporaneo contenente giornaliere.

SPDJI510 - REPRO Archiviazione file SCAU su nastro

SPDJI515 - IDCAMS Delete-define cluster archivio SCAU

Considerazioni varie

Quando si porta in produzione un formulario bisogna anche portarlo in Endevor. Questo perché i sorgenti ed i cntl passo in produzione attraverso Endevor mentre il CMP passa per una RUA e quindi è consigliato "aggiornare" anche Endevor.
Se si sbaglia qualcosa portando qualcosa in S, ad esempio il subgroup, è necessario cancellare l’oggetto portato in S utilizzando FOREGROUND perché il comando UPDATE o OVERRIDE SIGNOUT non funzionano su oggetti che non siano identici anche nella subsystem, type etc..

Comandi dell’ambiente di sviluppo

Select an environment to continue.

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

1 MFEND0T AMBIENTE MF TEST in questo ambiente viene messo come default il test T S

2 MFEND0P AMBIENTE MF ESERCIZIO qui invece P e F

2 FOREGROUND

2 Add

per portare da fuori in W senza fare batch (attenzione che va in SYSTEM)

Figura 2.2

Dove si possono usare i seguenti valori:

3 Retrieve

per portare da esercizio in test
ENV ... SYS ... SUB ... ELE ... TYP ... STA ... sulla lista mettere R per retrive => RETRIVED

3 BATCH

questa funzione è migliore per portare da test ad esercizio perché si controlla la cosa senza restare bloccati

2 EDIT sulla mia ITE54.P.LIB uso uno dei parametri ADDCMP o ADDSRCE per portare da test ad esercizio
ADD (e MOVE) dei membri che mi interessano; modifico mettendo i nomi che interessano ed il tipo linguaggio programmazione + PF3
3 SUBMIT sottometto il job con il membro della mia P.LIB che ho appena creato
CCID = pacchetto sul quale si segna movimentazione degli oggetti (è legato alle SAU); si possono verificare errori di tipo RC04!
4 PACKAGE
1 DISPLAY attenzione i PACKAGE hanno progressivo ES$199900001$*; e bisogna crearne uno nuovo;
2 CREATE
B BUILD
DESCRIPTION SAL - MODIFICA PROGRAMMI CVD
TYPE STANDARD

5 MOVE
FROM ENDEVOR:

ENVIRONMENT => CCID =>

SYSTEM => INFOTN INFO04

SUBSYSTEM =>

ELEMENT =>

TYPE => DOC FORMULE

STAGE =>

invio col blank per la lista; faccio la lista mettendo O davanti ai membri che mi interessano e dare invio; uscire 3-4 volte fino al menu principale di ENDEVOR.;

scrive PACKAGE CONSTRUCTED
3 CAST
CAST PACKAGE
CAST SUCCESFUL
4 REVIEW
A APPROVARE
APPROVAL PERFORMED

Hosted by www.Geocities.ws