PowerHouse activity

James B. Byrne byrnejb at harte-lyne.ca
Tue Aug 10 13:12:23 CDT 2021


I am revisiting some very old Quick code and I have a question every now and
then which I hope to bounce off someone else; who knows PowerHouse.

PowerHouse here is 8.39 running on MPE/iX 7.5pp5+?? and using Image plus a few
KSAM files.

In one of the older programs I am looking at I see this construct

ROCEDURE UPDATE
BEGIN
STARTLOG TRANSACTIONS
LOCK TRANSACTIONS FILE, TRANACCT FILE, TRANDETL FILE,              &
     WORK-ACCT FILE, DISBURSEMENT FILE, ITEM-DISB FILE, ITEMS FILE,&
     DISB-ACCT FILE, ACCOUNTS FILE, REVENUE FILE
PUT NOTDELETED TRANSACTIONS
. . .

In another I see this:

PROCEDURE UPDATE
  BEGIN
    LOCK ACCOUNTS FILE , GL-ACRU FILE , REQUISITIONS FILE ,        &
         REVENUE FILE , TRANACCT-IN FILE , TRANDETL FILE ,         &
         TRANSACTIONS-IN FILE
;# Fetch and calculate accrued work-in-progress update immediately before PUT.
    DO INTERNAL ACCRUED-COST
;# Despite its name STARTLOG actually begins a transaction block.
    STARTLOG ACCOUNTS
. . .

Is there any significance in having the STARTLOG occur before the LOCK?

-- 
***          e-Mail is NOT a SECURE channel          ***
        Do NOT transmit sensitive data via e-Mail
   Unencrypted messages have no legal claim to privacy
 Do NOT open attachments nor follow links sent by e-Mail

James B. Byrne                mailto:ByrneJB at Harte-Lyne.ca
Harte & Lyne Limited          http://www.harte-lyne.ca
9 Brockley Drive              vox: +1 905 561 1241
Hamilton, Ontario             fax: +1 905 561 0757
Canada  L8E 3C3



More information about the powerh-l mailing list