home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 5_2007-2008.ISO / data / Zips / Restaurant20246310122006.psc / frmCAnalisaDate.frm < prev   
Text File  |  2002-02-15  |  13KB  |  322 lines
  1. VERSION 5.00
  2. Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
  3. Object = "{CDE57A40-8B86-11D0-B3C6-00A0C90AEA82}#1.0#0"; "MSDATGRD.OCX"
  4. Begin VB.Form frmCAnalisaDate 
  5.    BackColor       =   &H00FFFFFF&
  6.    BorderStyle     =   3  'Fixed Dialog
  7.    Caption         =   "Analisa Pemakaian Inventory per Hari"
  8.    ClientHeight    =   5265
  9.    ClientLeft      =   45
  10.    ClientTop       =   330
  11.    ClientWidth     =   6390
  12.    ControlBox      =   0   'False
  13.    BeginProperty Font 
  14.       Name            =   "Tahoma"
  15.       Size            =   8.25
  16.       Charset         =   0
  17.       Weight          =   400
  18.       Underline       =   0   'False
  19.       Italic          =   0   'False
  20.       Strikethrough   =   0   'False
  21.    EndProperty
  22.    LinkTopic       =   "Form1"
  23.    MaxButton       =   0   'False
  24.    MinButton       =   0   'False
  25.    ScaleHeight     =   5265
  26.    ScaleWidth      =   6390
  27.    ShowInTaskbar   =   0   'False
  28.    StartUpPosition =   1  'CenterOwner
  29.    Begin VB.CommandButton cmdCetak 
  30.       BackColor       =   &H8000000A&
  31.       Caption         =   "&Cetak"
  32.       BeginProperty Font 
  33.          Name            =   "Tahoma"
  34.          Size            =   8.25
  35.          Charset         =   0
  36.          Weight          =   700
  37.          Underline       =   0   'False
  38.          Italic          =   0   'False
  39.          Strikethrough   =   0   'False
  40.       EndProperty
  41.       Height          =   375
  42.       Left            =   3300
  43.       TabIndex        =   2
  44.       Top             =   4800
  45.       Width           =   1455
  46.    End
  47.    Begin VB.CommandButton cmdOK 
  48.       Caption         =   "&Keluar"
  49.       Default         =   -1  'True
  50.       BeginProperty Font 
  51.          Name            =   "Tahoma"
  52.          Size            =   8.25
  53.          Charset         =   0
  54.          Weight          =   700
  55.          Underline       =   0   'False
  56.          Italic          =   0   'False
  57.          Strikethrough   =   0   'False
  58.       EndProperty
  59.       Height          =   375
  60.       Left            =   4800
  61.       TabIndex        =   3
  62.       Top             =   4800
  63.       Width           =   1455
  64.    End
  65.    Begin VB.Frame fraFields 
  66.       BackColor       =   &H00FFC0C0&
  67.       BorderStyle     =   0  'None
  68.       BeginProperty Font 
  69.          Name            =   "MS Sans Serif"
  70.          Size            =   8.25
  71.          Charset         =   0
  72.          Weight          =   400
  73.          Underline       =   0   'False
  74.          Italic          =   0   'False
  75.          Strikethrough   =   0   'False
  76.       EndProperty
  77.       ForeColor       =   &H00000000&
  78.       Height          =   4695
  79.       Left            =   0
  80.       TabIndex        =   4
  81.       Top             =   60
  82.       Width           =   6315
  83.       Begin MSComCtl2.DTPicker dtpTanggal 
  84.          Height          =   315
  85.          Left            =   3180
  86.          TabIndex        =   0
  87.          Top             =   840
  88.          Width           =   2895
  89.          _ExtentX        =   5106
  90.          _ExtentY        =   556
  91.          _Version        =   393216
  92.          BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  93.             Name            =   "Tahoma"
  94.             Size            =   8.25
  95.             Charset         =   0
  96.             Weight          =   400
  97.             Underline       =   0   'False
  98.             Italic          =   0   'False
  99.             Strikethrough   =   0   'False
  100.          EndProperty
  101.          CustomFormat    =   "dddd, d mmmm yyyy"
  102.          Format          =   69533696
  103.          CurrentDate     =   37160
  104.       End
  105.       Begin MSDataGridLib.DataGrid dgAnalisa 
  106.          Bindings        =   "frmCAnalisaDate.frx":0000
  107.          Height          =   3255
  108.          Left            =   60
  109.          TabIndex        =   1
  110.          Top             =   1380
  111.          Width           =   6195
  112.          _ExtentX        =   10927
  113.          _ExtentY        =   5741
  114.          _Version        =   393216
  115.          AllowUpdate     =   0   'False
  116.          HeadLines       =   1
  117.          RowHeight       =   15
  118.          FormatLocked    =   -1  'True
  119.          BeginProperty HeadFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  120.             Name            =   "Tahoma"
  121.             Size            =   8.25
  122.             Charset         =   0
  123.             Weight          =   700
  124.             Underline       =   0   'False
  125.             Italic          =   0   'False
  126.             Strikethrough   =   0   'False
  127.          EndProperty
  128.          BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  129.             Name            =   "Tahoma"
  130.             Size            =   8.25
  131.             Charset         =   0
  132.             Weight          =   400
  133.             Underline       =   0   'False
  134.             Italic          =   0   'False
  135.             Strikethrough   =   0   'False
  136.          EndProperty
  137.          ColumnCount     =   8
  138.          BeginProperty Column00 
  139.             DataField       =   "Inventory"
  140.             Caption         =   "Kode"
  141.             BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
  142.                Type            =   0
  143.                Format          =   ""
  144.                HaveTrueFalseNull=   0
  145.                FirstDayOfWeek  =   0
  146.                FirstWeekOfYear =   0
  147.                LCID            =   1033
  148.                SubFormatType   =   0
  149.             EndProperty
  150.          EndProperty
  151.          BeginProperty Column01 
  152.             DataField       =   "NamaInventory"
  153.             Caption         =   "Inventory"
  154.             BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
  155.                Type            =   0
  156.                Format          =   ""
  157.                HaveTrueFalseNull=   0
  158.                FirstDayOfWeek  =   0
  159.                FirstWeekOfYear =   0
  160.                LCID            =   1033
  161.                SubFormatType   =   0
  162.             EndProperty
  163.          EndProperty
  164.          BeginProperty Column02 
  165.             DataField       =   "NamaSatuanKecil"
  166.             Caption         =   "Satuan*"
  167.             BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
  168.                Type            =   0
  169.                Format          =   ""
  170.                HaveTrueFalseNull=   0
  171.                FirstDayOfWeek  =   0
  172.                FirstWeekOfYear =   0
  173.                LCID            =   1033
  174.                SubFormatType   =   0
  175.             EndProperty
  176.          EndProperty
  177.          BeginProperty Column03 
  178.             DataField       =   "Ambil"
  179.             Caption         =   "Ambil"
  180.             BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
  181.                Type            =   1
  182.                Format          =   "#,##0.00"
  183.                HaveTrueFalseNull=   0
  184.                FirstDayOfWeek  =   0
  185.                FirstWeekOfYear =   0
  186.                LCID            =   1033
  187.                SubFormatType   =   0
  188.             EndProperty
  189.          EndProperty
  190.          BeginProperty Column04 
  191.             DataField       =   "Kembali"
  192.             Caption         =   "Kembali"
  193.             BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
  194.                Type            =   1
  195.                Format          =   "#,##0.00"
  196.                HaveTrueFalseNull=   0
  197.                FirstDayOfWeek  =   0
  198.                FirstWeekOfYear =   0
  199.                LCID            =   1033
  200.                SubFormatType   =   0
  201.             EndProperty
  202.          EndProperty
  203.          BeginProperty Column05 
  204.             DataField       =   "Pakai"
  205.             Caption         =   "Aktual (X)"
  206.             BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
  207.                Type            =   1
  208.                Format          =   "#,##0.00"
  209.                HaveTrueFalseNull=   0
  210.                FirstDayOfWeek  =   0
  211.                FirstWeekOfYear =   0
  212.                LCID            =   1033
  213.                SubFormatType   =   0
  214.             EndProperty
  215.          EndProperty
  216.          BeginProperty Column06 
  217.             DataField       =   "Sales"
  218.             Caption         =   "# Terpakai"
  219.             BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
  220.                Type            =   1
  221.                Format          =   "#,##0.00"
  222.                HaveTrueFalseNull=   0
  223.                FirstDayOfWeek  =   0
  224.                FirstWeekOfYear =   0
  225.                LCID            =   1033
  226.                SubFormatType   =   0
  227.             EndProperty
  228.          EndProperty
  229.          BeginProperty Column07 
  230.             DataField       =   "Varian"
  231.             Caption         =   "Diff. (X - Y)"
  232.             BeginProperty DataFormat {6D835690-900B-11D0-9484-00A0C91110ED} 
  233.                Type            =   1
  234.                Format          =   "#,##0.00"
  235.                HaveTrueFalseNull=   0
  236.                FirstDayOfWeek  =   0
  237.                FirstWeekOfYear =   0
  238.                LCID            =   1033
  239.                SubFormatType   =   0
  240.             EndProperty
  241.          EndProperty
  242.          SplitCount      =   1
  243.          BeginProperty Split0 
  244.             MarqueeStyle    =   3
  245.             ScrollBars      =   2
  246.             AllowSizing     =   0   'False
  247.             RecordSelectors =   0   'False
  248.             BeginProperty Column00 
  249.                ColumnWidth     =   1019.906
  250.             EndProperty
  251.             BeginProperty Column01 
  252.                ColumnWidth     =   2324.977
  253.             EndProperty
  254.             BeginProperty Column02 
  255.                ColumnWidth     =   1214.929
  256.             EndProperty
  257.             BeginProperty Column03 
  258.                Alignment       =   1
  259.                Object.Visible         =   0   'False
  260.                ColumnWidth     =   945.071
  261.             EndProperty
  262.             BeginProperty Column04 
  263.                Alignment       =   1
  264.                Object.Visible         =   0   'False
  265.                ColumnWidth     =   945.071
  266.             EndProperty
  267.             BeginProperty Column05 
  268.                Alignment       =   1
  269.                Object.Visible         =   0   'False
  270.                ColumnWidth     =   945.071
  271.             EndProperty
  272.             BeginProperty Column06 
  273.                Alignment       =   1
  274.                ColumnWidth     =   1379.906
  275.             EndProperty
  276.             BeginProperty Column07 
  277.                Alignment       =   1
  278.                Object.Visible         =   0   'False
  279.                ColumnWidth     =   1005.165
  280.             EndProperty
  281.          EndProperty
  282.       End
  283.       Begin VB.Image Image2 
  284.          Height          =   570
  285.          Left            =   180
  286.          Picture         =   "frmCAnalisaDate.frx":0015
  287.          Stretch         =   -1  'True
  288.          Top             =   60
  289.          Width           =   525
  290.       End
  291.       Begin VB.Label Label2 
  292.          AutoSize        =   -1  'True
  293.          BackStyle       =   0  'Transparent
  294.          Caption         =   "Analisa Pemakaian Inventory"
  295.          BeginProperty Font 
  296.             Name            =   "Times New Roman"
  297.             Size            =   15.75
  298.             Charset         =   0
  299.             Weight          =   400
  300.             Underline       =   0   'False
  301.             Italic          =   -1  'True
  302.             Strikethrough   =   0   'False
  303.          EndProperty
  304.          =          Strikethrough   =an5on&1 Left    _0uS5    E_S&1 Left    _0uS5    E_n{  1uS5 r1oaAXa   _0uS5    E_S&1 Lefddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddd dddddIddddddddddddddddf rXty
  305.          =      
  306.        Veip"ikethF3    xC0rue
  307.        ddddddddddddF122aaCdethF3   5DH dddddF122asdddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddr10 2 
  308.       gm aColumnWidt.ks1f Mks1f Mks1f gbS         A 1uS5 r1oaAXa  S2w0ru. aColumnWidt.ks1f Mks1f Mks1f gbS .-0 lTn     =   RIty
  309.          =          =   0   'False
  310.    0d7kefg2    Veip"iketh
  311.    0d7kefg2i=      
  312.  p"iketh
  313.  - dddddddddddddddddddddJldIdddmOdd dd ic45
  314.  MfEddddddtaFiex     =   0  'Tra  'Tra  'Tra  'Tr  Width           =   525
  315.       End
  316.       Begin VB.Label Label2 
  317.          Autoy   r    =   5C=     egin i  =   0   'False............. eFal0525
  318. idd.800
  319.       Width           =   1455
  320.    End iA7L 'Fa   ili c2aeFal05x xC0rue
  321.  iouIfc5B        operty Column03 
  322.                Alignment       =i=C91110E{