How do I call a QUICK slave screen from COBOL and pass parame
ters?
Kogan, Arthur
akogan@westpac.com.au
Mon, 1 Mar 1999 14:23:47 +1100
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
------_=_NextPart_000_01BE6393.2CAA0F7C
Content-Type: text/plain
Hi Fernando,
the easiest way to achieve the functionality you need is to use an
intermediate file, i.e.
1. write the student number to the file in COBOL
2. call the quick screen.
3. in quick screen read the file and retrieve the data for the student.
4. write the count to the file and exit.
5. back in COBOL read the file and get the count.
No parameter passing required.
Regards,
Arthur Kogan
Westpac Financial Services
Sydney, Australia
> -----Original Message-----
> From: Fernando Olmos [SMTP:folmos@rmit.EDU.AU]
> Sent: Monday, 1 March 1999 12:24 PM
> To: powerh-l@lists.swau.edu
> Subject: Q: How do I call a QUICK slave screen from COBOL and pass
> parameters?
>
> Any ideas?
>
> I know I can call it using CALL INTRINSIC "COMMAND" USING W15-COMMAND
> W15-ERR W15-PARM, where W15-.. is:
>
> 01 W15-COMMAND. FO010399
> 03 FILLER PIC X(60) VALUE FO010399
> "RUN QUICK.CURRENT.COGNOS;INFO='AUTO=TAK0095P.PUB.TIMS'".FO010399
> 03 FILLER PIC X VALUE %15. FO010399
> 01 W15-ERR PIC S9(4) COMP VALUE 0. FO010399
> 01 W15-PARM PIC S9(4) COMP VALUE 0. FO010399
>
>
> I am trying to run TAK0095P passing a STUDENT-NUMBER PIC X(8) and
> receiving a count of records processed.
>
> Thanks in advance
>
>
> --
> ,-._|\ Fernando J. Olmos (Analyst Programer)
> / \ Information Technology Services - A.S.B.
> \_,--._/ Royal Melbourne Institute of Technology (Australia)
> v ===================================================
> VOICE: (03)9925-3615 FAX: (03)9925-1096
> eMAIL: folmos@rmit.edu.au ICQ# 32264128
> ==============================================================
>
> = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
> =
> Subscribe: "subscribe powerh-l" in message body to
> majordomo@lists.swau.edu
> Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
> powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
> This list is closed, thus to post to the list, you must be a subscriber.
------_=_NextPart_000_01BE6393.2CAA0F7C
Content-Type: application/ms-tnef
Content-Transfer-Encoding: base64
eJ8+IicDAQaQCAAEAAAAAAABAAEAAQeQBgAIAAAA5AQAAAAAAADoAAEIgAcAGAAAAElQTS5NaWNy
b3NvZnQgTWFpbC5Ob3RlADEIAQSAAQBHAAAAUkU6IEhvdyBkbyBJIGNhbGwgYSBRVUlDSyBzbGF2
ZSBzY3JlZW4gZnJvbSBDT0JPTCBhbmQgcGFzcyBwYXJhbWV0ZXJzPwBQFwEJgAEAIQAAAEU3QjVF
RjA3NkVDRkQyMTE4ODNFMDAwMDgzNjgzNTY3ABcHASCAAwAOAAAAzwcDAAEADgAZACUAAQAnAQEF
gAMADgAAAM8HAwABAA4AFwAvAAEALwEBDYAEAAIAAAACAAIAAQOQBgAYCwAAKwAAAAsAAgABAAAA
AwAuAAAAAABAADkA4O0w65JjvgEeAHAAAQAAAEMAAABIb3cgZG8gSSBjYWxsIGEgUVVJQ0sgc2xh
dmUgc2NyZWVuIGZyb20gQ09CT0wgYW5kIHBhc3MgcGFyYW1ldGVycz8AAAIBcQABAAAAGwAAAAG+
Y4sGzOJVJQPPeRHSnhkAAPa4+hEAAdD9QAACAQkQAQAAAOsFAADnBQAARgsAAExaRnWShwA7AwAK
AHJjcGcxMjXSMgD7MzYB6CACpAPjCQIAY2gKwHNldDAeIAcTAoMAUBBWcHJx3jIRWQ5QA9URZX0K
gAjI7CA7CW8OMDUVfwpgAoDZCoF1YwBQCwNjAEELYCJuDhAwMzMLpiBIGGkgRgSRAHBkbywHCqIK
hAqAdGhlIGUOYQCQB5AFQHdheSCodG8gANBoCJB2G8CBG6JmdW5jdGkCICkHQGl0HIB5CGAgbtkJ
4GQgBAAcknUREBzA2wOgC4B0BJAHgGQHMB/wEx2AAxBlLB7wLmUu6wrjGyYxITB3BRAgcRui3Rww
dQEAAjAeoHUG0ASQDxySHVMgsR/BIENPQtRPTBrkMiEwYwdAAyDpG6JxdQ3gayLQBQAJ4bouGuQz
ITAkkSY6IBbg3mEe4CQHGpEogXQIgR0lemQgYGEdgAWxIqkm9TQ/IioFoB2gBUAj2ilyZXjrHjAm
9TUhMGIA0CZwJJZ7KI8e4GcRICy4JvUa5E77HLAKsWEHgB/xMwEEEAuAHmcwESYxFuEyG1JlZz0L
EXMa2wcQG6AIcCBLbm81oAuQGvNXHCEKsGO3GkALgABwYwcxBlJ2DeBXB5Aa5AawZB6weSDgQfcf
YCnQHhFhGuoK9B4gDzF3GMEBQBKgbx/wHcAR5DGoNiAtPbJPBRBnOHHlAyBNB5BzYTFAPbMa5g88
xDyRCxM8xmktMTTGNAFAHiAxODABQAzQrUFTYhpAA2E6DINiEUAxGlYgT2wEYAQgW1OwTVRQOgIQ
RBJAIBABLoFFRFUuQVVd3xrlQoAGYAIwQudNAiAqgL06MTEF0ArAENBHwDlIYAFHwDI6MjQgUE2J
RfdUb0LncG93BJAwaC1sQB4gHDBzLmkD4GF1IRBkDHBGB3XMYmo88ULnUToaEEpwGypwHLBJJZQq
sFFVSfxDSyLQC2AdISglA1IvtecpcjOyMwhzPz9fQGo8Fq8TkROSDAE2dG4cgGkBAM8b8FGnGwJO
AGtuTaFOAh8DoCWjHjAfUTPyQ0FMoTAASU5UUlhQU06wBCAiJMBNTUFORAgiIFVYsE5HIFcYMTUt
WQVZ40VSUqFZ41BBUk0g4HcbsGsW4FnjLidxc0LgGvkgfjBH0FnqITBer1+/YKxG/k9doBlgSGBd
NWCiGWBhkT5JWCBa8GCvSPBYwVgolQ9AKWORVlgQVUVgv0Nhz2OTIlJVTk6ELjRDVVsARVhgaMBP
RzBOT1M7WFBmsD0nRUXAVGnwVEFLQeA5ADVQLlBVQi5U4kkF4CciLma/Ys9j3/ZYbZVlZCVaAF6a
a71dpoda8nJfZHVTOSg0ZSD1WQFQZVUwXplwv13EW3J/cp9zf3SPdZ5VnDNAHJBy9nkz8hyhch2g
SaBqhTOnISqwU1RVRGkRLU7YVU1CbWFkpDhlICl0nTlQaTkwfmMtBG9mgGJ/BbA10DMAA2A5UREQ
NKxUuRDgbmsEICSRKLB2OJH6ZXs/Cj2wd5+G/4gPiKeFbDYsXGBffFxceoJtQ4ZKITBEBChU8AdA
ed0cMVADYAnAM0FyZSKJD8wgL4lVipFJbirRAMC3HdJJoAWQaFaACQBnHIDHOQY9oBFQLlMuayCN
X72O0V+KMIpBjnEIAHk+Y35sBuAIcB6wjxEcMB4wdV8gcYGRj+mL8Dp2KWc7dn2IoT2Xv5jPmd5n
PWVBT9VOsEVNcCgZYClIYA4wzi0PMFoAekZBWJxJGVDuOT2QiWuIp2VZMG0wTXAbRMpLoS5LcI8B
Q1EjQCAzMjI2NA4gOP+Rr5nfpM+l35o/o2WXoKh//6mPqp+rr6vyOYVMcATyI5D5TXAic62GSldZ
cCSRB4HfPsIvMARwHIMAwGqB8QNw9m9K7xsCVQCArYkdoK4//69MsH9LPkpvS3Qe8jWgH/DfHGEe
0QIgPvAcZWIugbZDfTkRLreGg0YfAbZCHvJj/wkAgqEg4DbhHxO3gBwxI9X3tkIg4B5ybTpxLzAf
gSLQLa2Gcib1FJEAwVAAAwD9P1IDAAAeAEIQAQAAAB8AAAA8czZkYTg2ZjIuMDI1QGVtcy5ybWl0
LmVkdS5hdT4AAAsAAIAIIAYAAAAAAMAAAAAAAABGAAAAAAOFAAAAAAAAAwAHgAggBgAAAAAAwAAA
AAAAAEYAAAAAEIUAAAAAAAADACOACCAGAAAAAADAAAAAAAAARgAAAABShQAAdBAAAB4AJIAIIAYA
AAAAAMAAAAAAAABGAAAAAFSFAAABAAAABQAAADguMDIAAAAAAwAPgAggBgAAAAAAwAAAAAAAAEYA
AAAAAYUAAAAAAAALACmACCAGAAAAAADAAAAAAAAARgAAAAAOhQAAAAAAAAMADIAIIAYAAAAAAMAA
AAAAAABGAAAAABGFAAAAAAAAAwArgAggBgAAAAAAwAAAAAAAAEYAAAAAGIUAAAAAAAAeADqACCAG
AAAAAADAAAAAAAAARgAAAAA2hQAAAQAAAAEAAAAAAAAAHgA7gAggBgAAAAAAwAAAAAAAAEYAAAAA
N4UAAAEAAAABAAAAAAAAAB4APIAIIAYAAAAAAMAAAAAAAABGAAAAADiFAAABAAAAAQAAAAAAAAAD
ACYAAAAAAAMANgAAAAAAHgAxQAEAAAAPAAAAS09HQU5BNERDQjc4MzgAAAMAGkAAAAAAHgAwQAEA
AAAPAAAAS09HQU5BNERDQjc4MzgAAAMAGUAAAAAAAwCAEP////8CAfk/AQAAAGIAAAAAAAAA3KdA
yMBCEBq0uQgAKy/hggEAAAAGAAAAL089V0VTVFBBQy9PVT1XQkMvQ049UkVDSVBJRU5UUy9DTj1N
U01BSUwgQUREUkVTU0VTL0NOPUtPR0FOQTREQ0I3ODM4AAAAHgD4PwEAAAAOAAAAS29nYW4sIEFy
dGh1cgAAAB4AOEABAAAADwAAAEtPR0FOQTREQ0I3ODM4AAACAfs/AQAAAGIAAAAAAAAA3KdAyMBC
EBq0uQgAKy/hggEAAAAGAAAAL089V0VTVFBBQy9PVT1XQkMvQ049UkVDSVBJRU5UUy9DTj1NU01B
SUwgQUREUkVTU0VTL0NOPUtPR0FOQTREQ0I3ODM4AAAAHgD6PwEAAAAOAAAAS29nYW4sIEFydGh1
cgAAAB4AOUABAAAADwAAAEtPR0FOQTREQ0I3ODM4AABAAAcw8E3BSpJjvgFAAAgwfA+qLJNjvgEe
AD0AAQAAAAUAAABSRTogAAAAAB4AHQ4BAAAAQwAAAEhvdyBkbyBJIGNhbGwgYSBRVUlDSyBzbGF2
ZSBzY3JlZW4gZnJvbSBDT0JPTCBhbmQgcGFzcyBwYXJhbWV0ZXJzPwAACwApAAAAAAALACMAAAAA
AAMABhC/DuD0AwAHEPQFAAADABAQAAAAAAMAERABAAAAHgAIEAEAAABlAAAASElGRVJOQU5ETyxU
SEVFQVNJRVNUV0FZVE9BQ0hJRVZFVEhFRlVOQ1RJT05BTElUWVlPVU5FRURJU1RPVVNFQU5JTlRF
Uk1FRElBVEVGSUxFLElFMVdSSVRFVEhFU1RVREVOVAAAAAB7BA==
------_=_NextPart_000_01BE6393.2CAA0F7C--
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.