No helpful console messages. And really, I wouldn't expect any. the
user/account is still valid and
working fine on other jobs that aren't using special STREAMX features.
Tom
--------------------------------------------------
From: <[log in to unmask]>
Sent: Thursday, June 17, 2010 10:21 AM
To: "Tom Hula" <[log in to unmask]>
Cc: <[log in to unmask]>
Subject: RE: [HP3000-L] VESOFT STREAMX
> As you stream the job, check the console. It may tell you the issue.
> Something like, "Missing USER" or "Group"...
>
> Mark Ranft
> (612) 804-2774
> [log in to unmask]
>
>
> ---- Original Message ----
> From: [log in to unmask]
> To: [log in to unmask]
> Subject: RE: [HP3000-L] VESOFT STREAMX
> Date: Thu, 17 Jun 2010 10:11:08 -0400
>
>>I use streamx capabilities in some of my jobs and stream all my jobs
>>via streamx. Suddenly, this morning, any job that contains streamx
>>prompts or :: commands is not working. It just comes back without
>>issuing a job number, like it would if you had the user/account
>>information wrong somehow.
>>
>>I did make a change to our production account yesterday, removing
>>some users and groups that are no longer being used. But I have
>>verified that the particular job I am trying to stream has absolutely
>>no reference to any of the old users or groups. I've gone through
>>STREAMX.DATA.VESOFT and SECURCON.DATA.VESOFT, making sure
>>that there weren't any references to the users/groups. I am leaning
>>toward
>>the change that I made causing the problem, but I can't see how.
>>
>>Everything else in Vesoft seems to be running normally: Security/3000
>>is working fine and MPEX seems to be working normally. VESOFT menus
>>appear to be working normally. Everything was working fine yesterday.
>>
>>Here is the job I am trying, unsuccessfully, to stream:
>>
>>!JOB J0895,BATCH.PROD,QINV1;JOBQ=PDQ;INPRI=4
>>
>>!COMMENT MAKE SURE SESSIONS ARE LOGGED OFF
>>!CDELUSRS.QCMD.PROD
>>!COMMENT THE INVOICING & INVENTORY
>>!BUILD R089510A.DB;REC=-8,1,F,ASCII;DISC=1
>>!COMMENT STARTING INVENTORY EXTRACT PROGRAM
>>!FILE R08IDB=R08IDB.DB
>>!PURGE R089121
>>!PURGE R089122
>>!BUILD R089121;DISC=45000,32;REC=-50,23,F,ASCII
>>!BUILD R089122;DISC=45000,32;REC=-12,16,F,ASCII
>>!FILE TRANOT1=R089121,OLD
>>!FILE TRANOT2=R089122,OLD
>>!RUN B089120.QPRG.P
>>!COMMENT STARTING SORT BY ITEM-SN8/F-M-CODE
>>!PURGE S089121
>>!RUN SORT.PUB.SYS
>>INPUT R089121
>>OUTPUT S089121
>>KEY 1,10
>>END
>>!COMMENT STARTING SORT BY INVOICE/LINE/SUB
>>!PURGE S089122
>>!RUN SORT.PUB.SYS
>>INPUT R089122
>>OUTPUT S089122
>>KEY 1,12
>>END
>>!COMMENT STARTING INVENTORY UPDATE
>>!FILE TJH;DEV=LP,3
>>!FILE R089DB=R089DB.DB
>>!FILE TRANIN=S089121
>>!FILE R08NDB=R08NDB.DB
>>!FILE R08IDB=R08IDB.DB
>>!FILE PRINT;DEV=1010,8;CCTL
>>!RUN B089130.QPRG.P;STDLIST=*TJH
>>!PURGE R089141
>>!BUILD R089141;REC=-6,64,F,ASCII;DISC=5000
>>!FILE QSLIST=R089141,OLD;DEV=DISC
>>!RUN QUERY.PUB.SYS
>>DA=R08IDB.DB
>>DP
>>5
>>S=INVOICE-HEADER
>>FIND STATUS IE DI,VI
>>REPORT NOPAGE OUT=LP
>>D1,INVOICE-NO,6
>>END
>>E
>>!COMMENT STARTING DETAIL CLEARING OF R08IDB
>>!FILE R08IDB=R08IDB.DB
>>!FILE CTLDB=CTLDB.DB
>>!FILE TRANIN=S089122
>>!FILE TRANIN2=R089141
>>!RUN B089140.QPRG.P
>>!FILE APP=R089123.DB;ACC=APPEND
>>!RUN FCOPY.PUB.SYS
>>FROM=R089121;TO=*APP
>>E
>>!PURGE R089121
>>!PURGE R089122
>>!PURGE S089122
>>!PURGE R089141
>>!STREAM JDEBUG.QJOBS
>>!STREAM J08H3.QJOBS
>>!COMMENT ::
>>!COMMENT ::ECHO J08H6: Delete closed POs and original POs of shippers
>>!COMMENT ::ECHO w/o open orders...press RETURN for Thur.(am)
>>or press
>>!COMMENT ::ECHO {HPDAY} for tonight or press 0 to cancel J08H6
>>on
>>!COMMENT ::ECHO Thurs.(am):
>>!COMMENT ::PROMPT STRING V08H6="J08H6 [4]:";DEFAULT="4";CHECK=(V08H6
>>= "4" &
>>!COMMENT :: OR V08H6 = "{HPDAY}" OR V08H6 = "0"); &
>>!COMMENT :: CHECKERROR="4 OR {HPDAY} OR 0"
>>!COMMENT ::ECHO
>>-------------------------------------------------------
>>!COMMENT ::ECHO
>>!COMMENT ::ASSIGN W08H6 = INTEGERPARSE(V08H6)
>>!COMMENT ::IF W08H6 = HPDAY THEN
>>!STREAM J08H6.QJOBS
>>!COMMENT ::ENDIF
>>::
>>::ECHO J089K: Delete UNIT-COST-LOG over 30 days old...press
>>::ECHO RETURN for Thur.(am) or press {HPDAY} for tonight or
>>::ECHO press 0 to cancel J089K on Thurs.(am):
>>::PROMPT STRING V089K="J089K[4]:";DEFAULT="4";CHECK=(V089K = "4" OR &
>>:: V089K = "{HPDAY}" OR V089K = "0"); &
>>:: CHECKERROR="4 or {HPDAY} or 0"
>>::ECHO -------------------------------------------------------
>>::ECHO
>>::ASSIGN W089K = INTEGERPARSE(V089K)
>>::IF W089K = HPDAY THEN
>>!STREAM J089K.QJOBS
>>::ENDIF
>>::
>>::ECHO J089AA: Duplicate Generic Code Check...press RETURN
>>::ECHO for Thur.(am) or press {HPDAY} to run tonight or
>>::ECHO press 0 to cancel J089AA on Thur.(am):
>>::PROMPT STRING V089AA="J089AA[4]:";DEFAULT="4"; &
>>:: CHECK=(V089AA = "4" OR V089AA = "{HPDAY}" OR V089AA = "0"); &
>>:: CHECKERROR="4 OR {HPDAY} OR 0"
>>::ECHO -------------------------------------------------------
>>::ECHO
>>::ASSIGN W089AA = INTEGERPARSE(V089AA)
>>::IF W089AA = HPDAY THEN
>>!STREAM J089AA.QJOBS
>>::ENDIF
>>::
>>::ECHO J089D: Reconcile Inventory...rounds on hand to tenths...
>>::ECHO press RETURN for Thur.(am) or press {HPDAY} to
>>::ECHO to run tonite or press 0 to cancel J089D on Thur.(am):
>>::PROMPT STRING V089D="J089D[4]:";DEFAULT="4";CHECK=(V089D = "4" &
>>:: OR V089D = "{HPDAY}" OR V089D = "0"); &
>>:: CHECKERROR = "4 OR {HPDAY} OR 0"
>>::ECHO -------------------------------------------------------
>>::ECHO
>>::ASSIGN W089D = INTEGERPARSE(V089D)
>>::IF W089D = HPDAY THEN
>>!STREAM J089D.QJOBS
>>::ENDIF
>>::
>>!STREAM J089H.QJOBS
>>!STREAM J089I.QJOBS
>>!STREAM J089Q.QJOBS
>>::
>>::ECHO J089TC: Inventory Usage Report (All Depts) ... press RETURN
>>::ECHO for Fri.(am) or press {HPDAY} to run tonite or press
>>::ECHO 0 to cancel J089TC on Fri.(am):
>>::PROMPT STRING V089TC="J089TC[5]:";DEFAULT="5";CHECK=(V089TC &
>>:: = "5" OR V089TC = "{HPDAY}" OR V089TC = "0"); &
>>:: CHECKERROR="5 OR {HPDAY} OR 0"
>>::ECHO -------------------------------------------------------
>>::ECHO
>>::ASSIGN W089TC = INTEGERPARSE(V089TC)
>>::IF W089TC = HPDAY THEN
>>!STREAM J089TC.QJOBS
>>::ELSE
>>!STREAM J089TA.QJOBS
>>!STREAM J089TJ.QJOBS
>>!STREAM J089TH.QJOBS
>>::ENDIF
>>!PURGE R089510A.DB
>>!PRINTDB
>>!STREAM JVPROD.QJOBS
>>!STREAM JOARAGE.QJOBS
>>!EOJ
>>
>>I'm going to call VESOFT...just wondered if anyone out there sees an
>>obvious problem.
>>Tom
>>
>>* 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 *
|
