You do a file equation:

FILE QKIN=XXXXXXX

In the file XXXXXX you have the following(example).  Commands separated by ";".  You need the "HP2392;" in the first line.

Code:                   Comments:                                   


hp2392;                 Hard code     
7;2;
091503;                 Date
;
99999999900;    Member#  - (de-identified)
;
NA;
/;
*931149805;     Provider #
/;
25050;                  Procedure code
/;
8000;                   Claim Amount:  80.00
072803;         Date of Service
;
11;                     Location
;
99213;          Procedure
/;
8000;           Service Amount:  80.00
/;
Y;              Hard Code
//;


This is example is to process a claim in AMISYS.  Each command is separated by ";".  I have a COBOL program(listener) that looks for a file in a group.  If one exists it equates to it.  Launches AMISYS as a XEQ command and adjudicates the claim in a batch environment.

To catch the output, use the following file equation:

FILE QKOUT=YOURFILE

All you need to do is run quick.


Good luck
Kent Wallace
Boise Id

>>> "Penney, John" <[log in to unmask]> 03/04/04 01:03PM >>>
Gentle Listers:

Thanks to our Tracy Pierce, I'm resending this question:

I need to run a Quick screen in BATCH MODE from within a Jobstream (HP3000
MPE/iX 7.5 PH 8.19)  (or rewrite it in QTP, Doh!), prompting for values
within a UDC. The PH manuals are singularly unhelpful in detail how to so
do. I recall parms like Termtype, VT100, stuff like that but my brain has
deteriorated and I can't memorize everything anymore(!).... Help!

John M Penney
DDPS
California Department of Corrections
1920 Alabama Ave.
Rancho Cordova, CA
(916)358-2247
(916)358-2322 Fax
(360)789-8159 Cell

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *