Click above to get retro games delivered to your door ever month!

Syntax

APICS( cP_ra, cF_ra )

Purpose

Fill an array with appropriate picture statements from an array of field
names.

Arguments

     cP_ra -- array of pictures

     cF_ra -- array of field names

Setup

Both arrays are declared. The array of field names contains only names of
existing fields in the selected file.

Example

     LOCAL fields, pics
     SELECT CUSTOMER
     ra_size := FCOUNT()
     fields  := ARRAY( ar_size )
     pics    := ARRAY( ar_size )
     AFIELDS( fields )
     APICS( ar_pics, fields )

Returns

.T.

Side Effects

The arrays are compared lengthwise and the shorter value is used. The array
of pictures is filled by successive calls to GEN_PIC(), which somewhat
intelligently manufactures picture clauses.

Artful Calls

GEN_PIC

Source File

AA_APICS.PRG