rptba

Name

rptbai, rptbaj, rptbae, rptbac4, rptbaf, rptbaz — Replace data table

Synopsis

subroutine rptbai(key,size,values,status)
character*(*) key
integer*4 size
integer*4 values(*)
integer*4 status

subroutine rptbaj(key,size,buffer,status)
character*(*) key
integer*4 size
integer*8 values(*)
integer*4 status

subroutine rptbae(key,size,buffer,status)
character*(*) key
integer*4 size
real*4 values(*)
integer*4 status

subroutine rptbac(key,size,buffer,status)
character*(*) key
integer*4 size
complex real*4 values(*)
integer*4 status

subroutine rptbaf(key,size,buffer,status)
character*(*) key
integer*4 size
real88 values(*)
integer*4 status

subroutine rptbaz(key,size,buffer,status)
character*(*) key
integer*4 size
complex real*8 values(*)
integer*4 status

Description

The rptba functions replace the content of a key residing in the table buffer. If the key in the table does not exist it will be inserted. The replace operations thus never abort if the data already exist. rptbai replaces data of type I, rptbaj data of type J, rptbae data of type E, rptbac data of type C, rptbaf data of type F, and rptbaz data of type D. Elements of arrays cannot be replaced separately, i.e the whole array must be replaced

Parameters

key: Character string containing the name of the key (input).
size: Number of data elements of buffer to be inserted (input). Note that the array size is limited by the table size.
values: Buffer containing data to be inserted (input). See description above.
status