COBOL

Enterprise Cobol obtaining calling program name

Enterprise Cobol v3.4 on Z/OS 1.9. Batch called program. I want to parse through mvs data areas to obtain the program name that called my program(dynamically). I have viewed examples on Share website to get some system info. I need specifically the program name that called my program. Is this...

HOW TO USE A PERFORM IN COBOL?

USING PERFORM TO EXECUTE MY PASSWORD HOW DO I USE IT?

How to read a PF from bottom up?

Wihtout using a LF how can i read a PF from bottom to up in cobol. If i use posdbf(*last) in clp  then how to proceed after that ? Software/Hardware used: as400

Necessity of a multi-member PF in COBOL

How do we read a multimember PF in cobol ?How does it differ from a regular PF ? Software/Hardware used: AS400

how to use a printer file in a program cobol

hi, how to use a printer file in a program cobol. i have the following: (I wanna know if the write part is correct)  MOVE M1DESC TO M1DESC-DSP.            MOVE M1DESC-DSP TO R1DESC-PRT.        MOVE PRINTER-LINE TO HIPR01R-RECORD.  WRITE HIPR01R-RECORD FROM PRINTER-LINE. ...

rpg

I have five indexed files in rpg prog. Can I decleared common key field parameters for all five files? Is it possible in cobol ? If not how will solve this querry in cobol ? Explain with an ex.

Coding to prevent table overflows withing programs

In this new world of zero tollerance for abends and the goal of 100% production stability, I have been charged with determining the best method to prevent abends due to internal program table overflows.  Our environment has Cobol, Eztrieve and Assembler programs with internal tables.  We are...

cobol book

hi everybody, i wanna buy a cobol book . Anyone knows about good book?   thanks. Software/Hardware used: as400

what is the correct form to read and write the formats of the dspfile?

hi, what is the correct form to read and write the formats of the dspfile? i don t know if is it correct: READ PANTALLA2 FORMAT IS 'ASU906CEF1' what is the meaning of 'ASU906CEF1' ? Software/Hardware used: as400

COBOL: Is it possible to apply a different Pic clause to a single variable?

Is it possible to use a different  Pic clause from a single variable? based on the condition. DEBIT             PIC ZZZZZZZ,ZZZ,ZZ9.99                      PIC ZZZ,ZZZ,ZZZ,ZZ9.99 For example              When true...

HOW I MAKE A COBOL PROGRAM THAT USE A DISPLAY FILE

HI, I don t know how to make a cobol program that use a display file, Please i need help. Maybe someone have a shell to do this. thanks.   Sylvana Software/Hardware used: as400

How to copy source code of Pgm into Flatfile in COBOL

I want to read the one of the pgm's source code through my another program. So anyone plz suggest me how can i read the source code?

COBOL Debugging

In as400, I can use STRISDB for Cobo LE, But it is not work Cobol, How to debug non ILE cobol?

SAP or Mainframe

hi.       I m fresher and want to go into specilaisation either to SAP or Mainframe.I have an aggreagte of 60% throughout my degree of B.E in I.T.  I am little bit confuse to which option to choose right now? So if anybody plaese help me to sort out this quetion  

LIKE command in cobol

how to use LIKE command in cobol programming Software/Hardware used: software

AS400, SQL and COBOL anomalies

I coded an update query in COBOL and included COMMIT=NONE so the update could go through. When the COBOL program executed it returned nulls, and coalesced the value to the default. When the query was executed either through qmqry or on-line on the sql screen it worked fine and updated the field...

GET OPID SEGMENT CICS FROM A COBOL/DB2/CICS PROGRAM (RACF)

Please I need Get the OPID segment CICS  of RACF from a COBOL/CICS  Program.   Thanks JORGE Software/Hardware used: OS/390 2.10 and RACF and CICS

How to get rid of compile error message?

In my printer file, I created a header with no picture clause for it and it is giving me an error message when I try to compile my COBOL program Software/Hardware used: AS/400

cobol to xml conversion

is there any utility which can convert my cobol files to xml format or cobol to business objects. Software/Hardware used: cobol,business objects xi R2

Forced Date Routine Processing

I’m trying to process a RUNDATE = 2009-08-07 into my COBOL code via a PARM-DATE Link. That date comes in… now I try to place it in the following piece of code: EXEC SQL SET :WS-PREV-WK = CHAR(DATE(TMP-DATE)- 7 DAYS) END-EXEC. What am I getting '0001-01-01' returned?