issue in SMS Connectivity

rammoorthi has asked for the wisdom of the Perl Monks concerning the following question:

Hi, This is ram. i am getting the error while sending a sms using smpp. the code is:

#!perl
use strict;
use warnings;

use Net::SMPP;

my $host = '10.100.7.177';
my $port = 5001;
my $system_id = 'r123';
my $password = 'r_123';


my ($smpp, $resp_pdu) = Net::SMPP->new_transmitter(
    $host,
    system_id => $system_id,
    password  => $password,
    system_type => 'r123',
    port      => $port
) or die "Cant connect to SMSC: $!";
print "PDU_resp ERROR: ".$resp_pdu->explain_status()
 if $resp_pdu->status;

$smpp->enquire_link() or die "Unable to connect to SMSC";
$resp_pdu = $smpp->submit_sm(
    destination_addr => '9610985672',
    short_message    => 'Hello World. via SMPP'
) or die;
print "PDU_resp ERROR: " . $resp_pdu->explain_status() 
if $resp_pdu->status;
my $msg_id = $resp_pdu->{message_id};

print "\nEOF\n";
##sleep 30;
#$resp_pdu = $smpp->query_sm(message_id => $msg_id) or die;
#die "PDU_resp ERROR: ".$resp_pdu->explain_status() if $resp_pdu->stat
+us;
#print "\nMessage state is $resp_pdu->{message_state}\n";
[download]

i am getting the error as



D:\Perl>perl smpp1.pl
PDU_resp ERROR: Invalid source address (ESME_RINVSRCADR=0x0000000A)
EOF
[download]

The sms heading should be A$-SMS Please help me to resolve this issue. Thanks Ram

Comment on issue in SMS Connectivity Select or Download Code

Replies are listed 'Best First'.
Re: issue in SMS Connectivity by davido (Cardinal) on Dec 11, 2012 at 08:52 UTC
It's a message from the SMPP gateway, and I think it's coming from your `new_transmitter()` call. Why don't you change your error message "print" statements to "warn", so that a line number gets reported. That will help to disambiguate what point along the way the message is being generated. Out of curiosity, is it intentional that your "system_type" and "system_id" are being set to the same value? Dave	[reply] [d/l]
Re^2: issue in SMS Connectivity by rammoorthi (Novice) on Dec 11, 2012 at 09:51 UTC
hi, i was getting error in the following code only `$resp_pdu = $smpp->submit_sm( destination_addr => '9610985672', short_message => 'Hello World. via SMPP' ) or die; print "PDU_resp ERROR: " . $resp_pdu->explain_status()` [download] i tried with country code as well like +91 before the mobile number. still same error. There is no intention that system type and id is same. i got this from system admin. thanks in advance ram	[reply] [d/l]
Re^3: issue in SMS Connectivity by Mr. Muskrat (Canon) on Dec 12, 2012 at 22:58 UTC
The error isn't about the destination address so why change that? It sounds like the server is expecting a non-null source address so pass one with source_addr in the call to submit_sm. `$resp_pdu = $smpp->submit_sm( source_addr => '', # add your source address here destination_addr => '9610985672', short_message => 'Hello World. via SMPP' ) or die; print "PDU_resp ERROR: " . $resp_pdu->explain_status()` [download]	[reply] [d/l]