Mainframe, MVS and zOS Discussion

pra_passion

Have a name field of 100 characters that name field contains ‘(any name’). You need identify the field size of the till end

Can We use character handling for this?

Inspect ws-a tallying ws-cnt for all characters

pra_passion

Can anyone help me with the exact answer for below question.

Q). I have a COBOL DB2 program which is having a logic of updating the policy details in the table, unfortunately the program got abended due to other some other issues.. now I need to rollback the updates to the original status as it was ...

pra_passion

Hi All,

Previously we are transferring the file to vendor using connect direct job.

Now, As per requirement we need to transfer the same file using SFTP.

Does anyone have, any website link or some info related to SFTP file transfer coding.

Please share.

pra_passion

Hi,

Can any one tell me how to solve null indicator sqlcode - 305?

Thanks.

pra_passion

Hi,

Need help :: "how to convert Gregorian date to julian date in cobol"?

Code: Select all

COMPUTE WS-INT-DATE  = FUNCTION INTEGER-OF-DATE(WS-GREG-DATE)
     COMPUTE WS-JULN-DATE = FUNCTION DAY-OF-INTEGER(WS-INT-DATE)

pra_passion

Happy New year!

pra_passion

If I am passing control card in SYSin as a PDS member then sort card is getting processed
E.g. SYSin dd dsn=tuz.pds(ctlcard)
But if I am passing it as PS file then it is giving me error as 'no ctl card found '
What can be the issue ?
E.g. SYSin dd dsn=tuz.ps.t1

pra_passion

Happy New Year 2024, everyone!

Mainframe, MVS and zOS Discussion

Search found 8 matches

Identify the field size in COBOL

How to rollback the updates in COBOL program?

Connect Direct to SFTP transfer in mainframes.

How to solve null indicator sqlcode - 305?

how to convert Gregorian date to julian date in cobol?

Re: 🎄✨ Celebrate the Season with Our Festive Forum Makeover! ✨🎄

Control Card not found.

Re: 🎄✨ Celebrate the Season with Our Festive Forum Makeover! ✨🎄