Passing Record Structure
Heasman, David
david.heasman@schroders.com
Thu, 28 Feb 2002 11:39:13 -0000
..
PUT VS-JOURNAL-DRIVER
LET T-JNL-STATUS = "N"
;Run journal screens
RUN SCREEN prog_BBB PASSING VS-JOURNAL-DRIVER MODE E
IF T-JNL-STATUS <> "Y"
THEN ERROR "Journal details were not confirmed... voucher not issued"
ELSE NULL
END
----------------------------------------------------------------------------
--
now program prog_BBB has
..
..
FILE VS-JOURNAL-DRIVER MASTER
..
LET JOURNAL-NUMBER OF VS-JOURNAL-DRIVER = JOURNAL-NUMBER OF VS-JOURNALS
----------------------------------------------------------------------------
--
and there is no "PUT VS-JOURNAL-DRIVER" stmt in prog_BBB.
Does this means that program prog_BBB makes entries for the same record in
prog_AAA
Certainly looks like it. And also T-JNL-STATUS isn't passed down (is it?)
so
will be = "N". Looks like a big bug.
__________________________________________________________________
This message might contain confidential information. If it has been sent to you in error please do not forward it or copy it or act upon its contents, but report it to postmaster@schroders.com
Schroders has the right lawfully to record, monitor and inspect messages between its employees and any third party. Your messages shall be subject to such lawful supervision as Schroders deems to be necessary in order to protect its information, its interests and its reputation.
Schroders prohibits and takes steps to prevent its information systems from being used to view, store or forward offensive or discriminatory material. If this message contains such material please report it to abuse@schroders.com
Schroders does not normally accept or offer business instructions via email. Any action that you might take upon this message might be at your own risk.
Schroder Investment Management Limited
31 Gresham Street
London EC2V 7QA
Registered Office at above address
Registered number 1893220 England
Regulated by the FSA