1. PN4000 online help
2. Variant
3. System
4. Variant info
5. Routines
6. Functions for determining material number and group
7. Determine material group using the material number

Determine material group using the material number

In the variant, the material can be changed. It may be necessary to know to which material group the new material belongs (e.g. steel/stainless steel, or films coated/uncoated). For example, you can calculate different deduction values or use different tools.

If the material number is known, you can use the following routine to determine the corresponding group.

C     Determine material group using the material number

C     

C call:

C     CALL P2H045 (IMAT,IGRP,IRET)

C     

C     The following variables must be defined beforehand:

C     

C     IMAT : Material number for which the group is being searched

C     IGRP : the material group for the given material (return value)

C     IRET : is not evaluated, but must be specified

C     

C     Example:

C     --------------------------------------------------

C     Determine material group using the material number

C     --------------------------------------------------

      IMAT = 5

C     

      CALL P2H045 (IMAT,IGRP,IRET)

C     

C     Check if stainless steel

      IF (IGRP.EQ.2) THEN

      ENDIF

C