if ( $PERMISSIONED_USER_1 ne "" && $PERMISSION_TYPE_1 ne "" ) { # HTTP POST if ( $PERMISSIONED_USER_1 ne "-1" && $PERMISSION_TYPE_1 ne "-1" ) { # Web page $AppParameters{'OrderSignedBy_PermR'} = $ThisUser; $AppParameters{'OrderSigned_TS_PermR'} = $Signoff_Now_TimeStamp; $AppParameters{'OrderSignedFor_PermR'} = $PERMISSIONED_USER_1; $AppParameters{'OrderSignedType_PermR'} = $PERMISSION_TYPE_1; if ( $PERMISSIONED_USER_2 != -1 && $PERMISSION_TYPE_2 != -1 ) { $AppParameters{'OrderSignedFor_PermR'} .= "|" . $PERMISSIONED_USER_2; $AppParameters{'OrderSignedType_PermR'} .= "|" . $PERMISSION_TYPE_2; if ( $PERMISSIONED_USER_3 != -1 && $PERMISSION_TYPE_3 != -1 ) { $AppParameters{'OrderSignedFor_PermR'} .= "|" . $PERMISSIONED_USER_3; $AppParameters{'OrderSignedType_PermR'} .= "|" . $PERMISSION_TYPE_3; if ( $PERMISSIONED_USER_4 != -1 && $PERMISSION_TYPE_4 != -1 ) { $AppParameters{'OrderSignedFor_PermR'} .= "|" . $PERMISSIONED_USER_4; $AppParameters{'OrderSignedType_PermR'} .= "|" . $PERMISSION_TYPE_4; if ( $PERMISSIONED_USER_5 != -1 && $PERMISSION_TYPE_5 != -1 ) { $AppParameters{'OrderSignedFor_PermR'} .= "|" . $PERMISSIONED_USER_5; $AppParameters{'OrderSignedType_PermR'} .= "|" . $PERMISSION_TYPE_5; if ( $PERMISSIONED_USER_6 != -1 && $PERMISSION_TYPE_6 != -1 ) { $AppParameters{'OrderSignedFor_PermR'} .= "|" . $PERMISSIONED_USER_6; $AppParameters{'OrderSignedType_PermR'} .= "|" . $PERMISSION_TYPE_6; if ( $PERMISSIONED_USER_7 != -1 && $PERMISSION_TYPE_7 != -1 ) { $AppParameters{'OrderSignedFor_PermR'} .= "|" . $PERMISSIONED_USER_7; $AppParameters{'OrderSignedType_PermR'} .= "|" . $PERMISSION_TYPE_7; if ( $PERMISSIONED_USER_8 != -1 && $PERMISSION_TYPE_8 != -1 ) { $AppParameters{'OrderSignedFor_PermR'} .= "|" . $PERMISSIONED_USER_8; $AppParameters{'OrderSignedType_PermR'} .= "|" . $PERMISSION_TYPE_8; if ( $PERMISSIONED_USER_9 != -1 && $PERMISSION_TYPE_9 != -1 ) { $AppParameters{'OrderSignedFor_PermR'} .= "|" . $PERMISSIONED_USER_9; $AppParameters{'OrderSignedType_PermR'} .= "|" . $PERMISSION_TYPE_9; if ( $PERMISSIONED_USER_10 != -1 && $PERMISSION_TYPE_10 != -1 ) { $AppParameters{'OrderSignedFor_PermR'} .= "|" . $PERMISSIONED_USER_10; $AppParameters{'OrderSignedType_PermR'} .= "|" . $PERMISSION_TYPE_10; } } } } } } } } } } }