Mainframe Made Easy

Пікірлер

@ragothamankrishnamoorthyra863 14 күн бұрын

Excellent

@mdshanawaz1312 14 күн бұрын

Sir , do you have PDF of this Q&A, can you share the link

@mainframemadeeasy 14 күн бұрын

Yes pls email me [email protected]

@ranjithkumar-hl4yo Ай бұрын

Good morning, Sir. I am working on a project where I need to browse all members in a PDS for character 'D' at column 20 and fetch the first 8 bytes from member to output file. I used IEBPTPCH to print members in the temp file and SORT to check for conditions. The output file doesn't have desired results. Kindly correct my understanding. Thanks Sir. JCL: Exec PGM=IEBPTPCH SYSUT1 INPUT PDS SYSUT2 TEMP FILE SYSIN DD* PRINT TYPORG=PO EXEC PGM=SORT SORIN TEMP FILE SORTOUT OUTPUT FILE SYSIN DD * SORT FIELDS=COPY INLCUDE COND=(20,1,CH,EQ,C'D') OUTREC FIELDS=(1,8)

@mainframemadeeasy Ай бұрын

@@ranjithkumar-hl4yo Looks fine for me But since you have written OUTREC to fetch first 8 bytes lrecl of file will be 8 Or if file length is say 80 OUTREC fields=(1,8,80:X) will work If you give me SYSOUT of error we can see what went wrong. If you want you can send an email with only error msg in Sysout to [email protected]

@shalinis1465 Ай бұрын

Venkatesh, you can use String command. You have given like Delimited by space, so the program will ignore other characters after it encounters a first space in both the fields. That's why you didn't get the expected output. Instead of Delimited by space, try giving Delimited by size. It should work actually.

@mainframemadeeasy Ай бұрын

@@shalinis1465 Thanks for letting me know

@pradeepkumar-e5x1d Ай бұрын

Thank you 😊

@sanruth28 Ай бұрын

Hi, did you upload the full video? I am not able to find it in your channel.

@mainframemadeeasy Ай бұрын

@@sanruth28 give me time will upload

@weronpc 2 ай бұрын

That was helpful, thank you for sharing

@ranjithkumar-hl4yo 2 ай бұрын

Good afternoon, Sir. I need clarity from you for the below problem . We have a huge tape file which got split into 7 DASD O/P files based on record type using OUTFIL conditions. Client has shared a requirement that we need to count the number of records from the input tape file and put the count in a new 8th dataset in the same sort step which will be used in the program for further process. I suggested taking count from the 7 DASD files using ICETOOL since reading will be faster and exhibit the results to the Client. But client disagreed. I'm trying other approaches as well, Sir. Kindly help me with this, Sir.

@mainframemadeeasy 2 ай бұрын

You can do using SORT or a Program to count and write the count in an O/p file. I will send code for SORT in a few mins. You can try the same.

@ranjithkumar-hl4yo 2 ай бұрын

Thanks for your immediate response, Sir. I'm just explaining the issue I faced. I included TRAILER in OUTFIL and captured the count at the end of the 7 files. But the ask is to capture it in the 8th output file in the same Sort step, Sir.

@mainframemadeeasy 2 ай бұрын

@@ranjithkumar-hl4yo I have assumed Output file length as 80 bytes INREC FIELDS=(1:C'COUNTER',8:C'00000001',80:X) SORT FIELDS=(1,7,CH,A) SUM FIELDS=(8,8,ZD) OUTREC FIELDS=(8,8,80:X) 80 - Last column in O/p file

@mainframemadeeasy 2 ай бұрын

@@ranjithkumar-hl4yo ohk got it. But how come we can keep SORT fields, SUm fields and INREC fields are common for other 7 Output files Only Outrec and Include/Omit can be written as a Sub parameter of OUTFIL

@mainframemadeeasy 2 ай бұрын

We have a COUNT parm to give the number of records in file . I will send the syntax

@swethacherukuri9446 2 ай бұрын

Hi sir , what were the spaces that are provided and how did u provide the spaces between those three characters??

@mainframemadeeasy 2 ай бұрын

@@swethacherukuri9446 An X denotes 1 Space. If you want to add 3 Spaces in an output file , we can give 3X in OUTREC fields or INREC fields. Alternatively if you mention column numbers for output record , any left over column will automatically will be padded with SPACES.

@swethacherukuri9446 2 ай бұрын

@@mainframemadeeasy thanks sir

@harisankarraj 2 ай бұрын

background music disturbance a lot

@mainframemadeeasy 2 ай бұрын

@@harisankarraj ok will check and remove the music

@ranjithkumar-hl4yo 2 ай бұрын

Hi Sir, the below jcl ended with cc 16. WER268A OUTFIL STATEMENT: SYNTAX ERROR. Im not getting, Sir. Pls help me on this. Is it because I have only syncsort not DFsort //STEP1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD DSN=your.flag.file,DISP=SHR //SORTOUT DD SYSOUT=* //SYSIN DD * SORT FIELDS=COPY OUTFIL REMOVECC,NODETAIL, TRAILER1=('NUMBER OF RECORDS: ',COUNT=(M11,LENGTH=8)) /*

@mainframemadeeasy 2 ай бұрын

@@ranjithkumar-hl4yo I think after RECORDS comma is missing When you are continuing to next line we need to end with a comma in prev line Pls check and let me know

@ranjithkumar-hl4yo 2 ай бұрын

@@mainframemadeeasy Thanks sir. It's working. ☺️

@shilpa003 2 ай бұрын

Sir I am unable to understand the Equals usage part!! What if we omit the Equals after the Sort field?

@mainframemadeeasy 2 ай бұрын

@@shilpa003 Equals is necessary to pull first record from input to output based on sort fields criteria. Default is no equals . If we mention that, it will go to a separate routine that decide which dup records to be removed and which one to bring it to output file. We don’t have any control over which record will come in Output file. Hope you got it.

@shilpa003 2 ай бұрын

Yes understood @@mainframemadeeasy thank You Sir!!

@MuraliGanji-b3p 2 ай бұрын

I am trying to compile my BMS but i am getting return code 12 how to resolve that

@mainframemadeeasy 2 ай бұрын

@@MuraliGanji-b3p we need to check for MNOTE or ASMA in the compile listing. It shows Warnings and Errors. You need to see that understand correct and recompile

@SupercopGmaingYT 3 ай бұрын

Valuable information

@fuleiliu-i4b 3 ай бұрын

he's my current lecturer for Mainframe, can vouch a very good instructor!

@mainframemadeeasy 3 ай бұрын

@@fuleiliu-i4b Thanks for your feedback Lui

@prathapn01 3 ай бұрын

When a GN call is issued continuously it will fetch all the occurences of each segment in the hierarchy... If GNP is issued how is it done ? will it fetch data from currently pointed parent and it's child segments or only current segment ?

@mainframemadeeasy 3 ай бұрын

@@prathapn01 GNP will read only child occurrences under a parent for a specific segment of you give an SSA. If you don’t give an SSA, it will read all the occurrences under a Parent in all levels below the parent in a hierarchy

@prathapn01 3 ай бұрын

can you explain exactly what is the scenario we should be using CECI READ file command ?

@mainframemadeeasy 3 ай бұрын

@@prathapn01 If you want to test a resource after allocation to make sure it works, you can use CECI. It is easy to test debug and fix rather than testing the transaction. Once it is working as expected you can use it as an embedded command and test the transaction

@chiruaks1 4 ай бұрын

Excellent information Sir, thank you.

@chiruaks1 4 ай бұрын

Excellent information Sir

@chiruaks1 4 ай бұрын

Excellent information Sir

@neeharikamalligunta3021 5 ай бұрын

Nice questions

@mainframemadeeasy 5 ай бұрын

Thanks for the feedback

@neeharikamalligunta3021 5 ай бұрын

Thank you for sharing questions.. can we get part 3 questions as well??

@dishaagarkar9593 6 ай бұрын

i m having doubt in second one 7,11,ZD,EDIT=($III,III,IIT.TTIS) SIGNS=(,,,-) 000 002 000 00 CONVERTED TO $2,000.00 $III,III,IIT.TTI S HOWWWWWWWWWWWWWW??????

@dishaagarkar9593 6 ай бұрын

HOW THIS MASKING IS WORKING HERE

@mainframemadeeasy 6 ай бұрын

I is an Insignificant digit . If it has a 0 then it masks and do floating

@sandeep7yadav 6 ай бұрын

This session is very useful for refresh knowledge. Do you have any hard copy detail on this ?

@mainframemadeeasy 6 ай бұрын

We are preparing hard copy details this year . Will be live in our website