;;ARGUS08Y   LNHD18:  CHD132:  LNTX46:  CHTX132:  LNTR08:  CHTR132:
;-NNNNNNNN-  LNHDxx:  CHDxxx:  LNTXxx:  CHTXxxx:  LNTRxx:  CHTRxxx:
; 
;           ARGUS POS REPORTING
;            15% SERVER SALES AND REPORTED TIPS
;             (Modified 04/05/90  -- Field size changes)
;             (Modified 04/23/90  -- Totals added)
;
Z1,001401^^^^^^^^^^^^^^^^,C3001,L4,S2,A24:C3002,L5,S2,A24:
C3003,L6,S2,A24:C3004,L7,S2,A24:
Z1,001401^^^^^^^^^^^^^^^^,C3001,L4,S109,A24:C3002,L5,S109,A24:
C3003,L6,S109,A24:C3004,L7,S109,A24:
L4,S39,"A R G U S   D A I L Y   S A L E S   R E P O R T I N G":
L5,S39,"---------------------TIP REPORT----------------------":
L08,S61,"                          pagexxxx    FFLLL   Run MM-DD-YY":
L8,S111,A8,ID:L8,S99,A5,IF:L8,S91,A4,IP:L7,S60,A12,IY:
L9,S02,"=======================================================================":
L9,S73,"=======================================================================":
L10,S08,"**********************************************************************":
L10,S78,"**************************************************":
L11,S08,"* NOTE:NEGATIVE AMOUNT IN THE DIFFERENCE COLUMN INDICATES A SERVER WHO":
L11,S78," HAS CLAIMED AN AMOUNT GREATER THAN 15% OF SALES. *":
L12,S08,"* POSITIVE AMOUNT INDICATES A SERVER CLAIMING LESS THAN 15% OF SALES.":
L12,S127,"*":
L13,S08,"**********************************************************************":
L13,S78,"**************************************************":
;   567890123456789012345678901234567890123456789012345678901234567890123
;        2         3         4         5         6         7         8   
L14,S20," YTD         YTD          YTD         YTD ":
;        2345678901234567890123454678901234567890123456789012345678901234567890
;                1         2          3         4         5         6         7     
L15,S02,"SERVER            SALES        15%         REPTIP       DIFF":
L16,S02,"========================================================================":
L16,S73,"========================================================================":
;
Z2,0115XXXX^^^^^^^XXXXX^^:
C0144,R1:C0148,R1:C0132,R2:C0136,R2:
;
[R8=15.]:
[R50=100.]:
;
;[R2=R2*R50]:
[R10=(R1*R8)/R50]:
[R20=(R10-R2)]:
;
[R81=(R81+R1)]:
[R82=(R82+R2)]:
[R91=(R91+R10)]:
[R92=(R92+R20)]:
;
IX05,S02,A5:C3001,S7,A8:C0001,S16,A9,P2:
C0002,S42,A8,P2:C0010,S30,A8,P2:
C0020,S55,A8,P2:
;
[R1=0]:[R2=0]:
;
Z3,L1,S02,"========================================================================":
L1,S73,"========================================================================":
L2,S05,"TOTALS":
C0081,L2,S13,A12,P2:C0082,L2,S42,A8,P2:C0091,L2,S28,A10,P2:C0092,L2,S55,A8,P2:
;;END
