Steps To Register Unix Shell Script As A Concurrent Program

We can register an Unix shell script in our oracle application through a concurrent program. Here are the steps.
Step 1:
Copy the .prog script in ASCII mode to the bin directory of your application top directory. For example, call the script XXSHELL.prog and place it under $XXCUST_TOP/bin
step 2:
Check the file permissions. Sometimes it is required to give full permission to the script.
step 3:
Make a symbolic link from your script to $FND_TOP/bin/fndcpesr For example, if the script is called XXSHELL.prog , then use this:
cd $XXCUST_TOP/bin
ln -s $FND_TOP/bin/fndcpesr XXSHELL
This link should be named the same as your script without the .prog extension. Put the link for your script in the same directory where the script is located.
step 4:
Register the concurrent program, using an execution method of ‘Host’. Use the name of your script without the .prog extension as the name of the executable.
For the example above: Use XXSHELL as executable name.
Note:
Your script will be passed at least 4 parameters, from $1 to $4.
$1 = orauser/pwd
$2 = userid(apps)
$3 = username,
$4 = request_id

Any other parameters you define will be passed in as $5 and higher. Make sure your script returns an exit status also.
fndcpesr is a standard utility available in $FND_TOP directory. It is mainly used by the application to parse the above four arguments to the shell scripts.

declare
p_api_version_number NUMBER;
p_init_msg_list VARCHAR2(2000);
V_return_status VARCHAR2(2000);
V_msg_data VARCHAR2(2000);
p_action_code VARCHAR2(2000);
p_delivery_id NUMBER ;
V_trip_id VARCHAR2(30);
V_trip_name VARCHAR2(30);
V_msg_details VARCHAR2(3000);
V_msg_summary VARCHAR2(3000);
V_msg_count NUMBER;
V_init_msg_list VARCHAR(2000);

begin

p_delivery_id := 7102;           — dELIVERY ID FROM SALES TRANSACTION SCREEN
p_action_code :=’CONFIRM’;

WSH_DELIVERIES_PUB.Delivery_Action(
                                    p_api_version_number => 1.0,
                                    p_init_msg_list => V_init_msg_list,
                                    x_return_status => V_return_status,
                                    x_msg_count => V_msg_count,
                                    x_msg_data => V_msg_data,
                                    p_action_code => p_action_code,
                                    p_delivery_id => p_delivery_id,
                                    x_trip_id => V_trip_id,
                                    x_trip_name => V_trip_name);

  IF (V_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
              WSH_UTIL_CORE.get_messages(‘Y’, V_msg_summary, V_msg_details, V_msg_count);
             dbms_output.put_line(V_msg_details);
  END IF;
end;

1) Custom Table to store account segments.

create table XX_ACCOUNT_COMBINATIONS (CODE VARCHAR2(2000))

===========================================================================================


2) Function to Create or Check the Code Combinations in GL


create or replace function create_ccid
( p_concat_segs in varchar2
) return varchar2
is
-- pragma autonomous_transaction; -- if you need autonomy!
l_keyval_status BOOLEAN;
l_coa_id NUMBER;
l_err_msg varchar2(2000);
l_error varchar2(255);
begin
begin
select chart_of_accounts_id
into l_coa_id
from gl_sets_of_books
where set_of_books_id = fnd_profile.value('GL_SET_OF_BKS_ID');
exception
when no_data_found then
dbms_output.put_line('Chart of Accounts ID not found from profile option GL_SET_OF_BKS_ID');
dbms_output.put_line('Try setting up your environment with fnd_global.apps_initialize');
raise;
end;
-- keyval_mode can be one of CREATE_COMBINATION CHECK_COMBINATION FIND_COMBINATION
--create will only work if dynamic inserts on and cross validation rules not broken
l_keyval_status := fnd_flex_keyval.validate_segs(
'CHECK_COMBINATION',
'SQLGL',
'GL#',
l_coa_id,
p_concat_segs,
'V',
sysdate,
'ALL', NULL, NULL, NULL, NULL,
FALSE,FALSE, NULL, NULL, NULL);

if l_keyval_status then
return 'S';
else
--return l_error;
l_err_msg:=substr(fnd_flex_keyval.error_message, 1, 240); --fnd_message.get;

l_error := substr(fnd_flex_keyval.error_message, 1, 240);
dbms_output.put_line(l_error);
dbms_output.put_line('ERROR SEGMENT :');
l_error := to_char(fnd_flex_keyval.error_segment);
dbms_output.put_line(l_error);
dbms_output.put_line('ERROR ENCODED :');
l_error := substr(fnd_flex_keyval.encoded_error_message, 1, 240);
dbms_output.put_line(l_error);
dbms_output.put_line('FALSE');

dbms_output.put_line(l_err_msg||substr(sqlerrm,150,3));
return l_error;
end if;
end create_ccid;
/

3) Table to store Segments and Error / Success Status

CREATE TABLE XX_COMBINATION_ERROR_STATUS
(
CODE VARCHAR2(2000 BYTE),
STATUS VARCHAR2(2000 BYTE)
)


4) Procedure to Call Function to create combinations from the custom table


CREATE OR REPLACE procedure APPS.XX_CREATE_GL_ACC_COMBINATION
IS
V_COMBINATION VARCHAR2(240);
CURSOR C1 IS
SELECT DISTINCT CODE
FROM XX_ACCOUNT_COMBINATIONS;
--where rownum=1;

begin

FOR I IN C1 LOOP

select create_ccid(I.CODE) into V_COMBINATION from dual;

dbms_output.put_line (V_COMBINATION);

insert into xx_combination_error_status (code,status) values (i.code,v_combination);

END LOOP;


end;
/
Declare
  
      l_user_id         NUMBER;
      v_customer_id       NUMBER;
      l_email           VARCHAR2 (240);
      l_error_message   VARCHAR2 (240);
      l_record_status   BOOLEAN;

      CURSOR c1
      IS
         SELECT     *
               FROM XX_CONC_USERS
              where status = ‘R’
              and error_mesg is null
              FOR UPDATE;
   BEGIN
      FOR i IN c1
      LOOP
         l_record_status := TRUE;
         l_error_message := ”;

         BEGIN
            SELECT a.OBJECT_ID
            into v_customer_id
             FROM hz_relationships a, hz_parties b
          WHERE a.subject_id =
                            (SELECT party_id
                               FROM hz_parties
                              WHERE  upper(party_name) =  upper(i.vendor_name))
            AND LOWER (b.party_name) LIKE LOWER (i.conc_last_name|| ‘%’)
            AND a.party_id = b.party_id
            AND b.party_type = ‘PARTY_RELATIONSHIP’;
         EXCEPTION
            WHEN NO_DATA_FOUND
            THEN
               l_record_status := FALSE;
               l_error_message := ‘Employee not exist…’;
         END;

         IF l_record_status = TRUE
         THEN
            BEGIN
               fnd_user_pkg.createuser (x_user_name                 => LTRIM
                                                                          (RTRIM
                                                                              (i.conc_email
                                                                              )
                                                                          ),
                                        x_owner                     => NULL,
                                        x_unencrypted_password      => ‘123456’,
                                        x_description               => NULL,
                                        x_customer_id               => v_customer_id, —- OBJECT_ID of the Person  
                                        x_email_address             => i.conc_email      —– HZ_CONTACT_POINTS Email  
                                       );

               BEGIN
                  SELECT user_id
                    INTO l_user_id
                    FROM fnd_user
                   WHERE user_name = upper(i.conc_email);
               EXCEPTION
                  WHEN OTHERS
                  THEN
                     l_user_id := NULL;
               END;

               IF l_user_id IS NOT NULL
               THEN
                  fnd_user_resp_groups_api.insert_assignment
                                       (user_id                            => l_user_id,
                                        responsibility_id                  => 23415,
                                        responsibility_application_id      => 396,
                                        security_group_id                  => 0,
                                        start_date                         => TRUNC
                                                                                 (SYSDATE
                                                                                 ),
                                        end_date                           => NULL,
                                        description                        => NULL
                                       );

                  UPDATE XX_CONC_USERS
                     SET status = ‘S’,
                         error_mesg = NULL
                   WHERE CURRENT OF c1;
               ELSE
                  UPDATE XX_CONC_USERS
                     SET status = ‘R’,
                         error_mesg = ‘User Not Exist’
                   WHERE CURRENT OF c1;
               END IF;
            EXCEPTION
               WHEN OTHERS
               THEN
                  l_error_message := SUBSTR (SQLERRM, 1, 200);

                  UPDATE XX_CONC_USERS
                     SET status = ‘R’,
                         error_mesg = l_error_message
                   WHERE CURRENT OF c1;
            END;
         ELSE
            UPDATE XX_CONC_USERS
               SET status = ‘E’,
                   error_mesg = l_error_message
             WHERE CURRENT OF c1;
         END IF;
      END LOOP;

      COMMIT;
   END xx_create_user;
1) Editing the FILE:-
————————–

*) To come to end of file:- G

*) To delete the single word(can be free space):- dw

*) to delete the current single char:- (Esc and x)

*) To delete the complete line:- dd

*) To right over in the file:- cw

*) To remove the case sensitive:- :set ic

*) To Enable the case sensitive:- :set noic

*) Copy the complete line:- yy

*) Paste what ever copied:- p

2) GUN ZIP the file:-
—————————–

gzip file_name

Note:- While trying to download gunzip file from server to local machine it should be done in binary mode. Then it can exact using the wipzip software in WINDOWS Operating System.

After gzip, if we want to unzip the file then use the following.

gunzip file_name

2.1) To unzip or gunzip the file :-
———————————————

gunzip file_name

Example:-

gunzip XYZ_1.0_5.tar.gz

2.2) To untar the file:-
——————————

tar -xvf file_name

Example:-

tar -xvf XYZ_1.0_5.tar

3) To run the strings for the spawand program:-
————————————————————-

strings -a (shell_script_file_name) > (logfile.log)

Example:-

strings -a GLPURGE > /home/partners-home/hex/preddy/phani1.log

3.1) Basic grep command:-
———————————–

Example:-

grep ‘DROP index’ adwork001.log > /home/partners-home/xyz/preddy/dropindex.txt

Note:- grep command is just like the search for some specfic word in your windows file.
In Windows Operating System, we use the (CTRL+F) and then we give the word we want to search. Similarly, grep is used for UNIX or LINUX Operating system. In the above Example, I am searching for the ‘DROP index’ Word in adwork001.log file. And I want all the finding of this search stored in some file. So, I have given the path and file name where it should save.

4) Specfic to some project:-
————————————-

To check the number lst files:-
—————————————–
Example:-

ls -altr *.lst | wc -l

Note:- If some folder have some specfic extension files, then we can count the number of that specfic extension files then we can use the above command. In the above example, I am searching for the ‘lst’ extension files count.

To check the number of sql files with hit files :-
————————————————————

grep ‘.sql’ *.lst | wc -l

Note:- Say, we have some .sql files names in all the lst files in some folder. Then we can use the grep command to count the sql file names.

To check the number of files with hits in the lst file:-
——————————————————————

grep ‘Number of files with hits : [1-9]’ *.lst

Note:- You can also give the count of the files with the range. In the above example, I have givne the range from 1 to 9. If it find any number from this range then, it will get in the count.

To create the file of the complete module :-
——————————————————–

grep ‘.sql’ *.lst > lst_sql_’module_name’.txt

Example:-

grep ‘.sql’ *.lst > lst_sql_gl.txt

Note:- The above example to do the search and to the search results in some given file name.

5) To find the file in the current folder and subfolder:-
———————————————————————

find . -name ‘file_name*.sql’ -print

Example:-

find -i . -name ‘poXWFUNT*.sql’ -print

Note:- POXWFUNT.sql is the file name which I want to search. ‘i’ in the above command indicates that, search should not be based on case sensitive.

6) To grep the file for a specific word:-
————————————————-

grep -i ‘WORD’ FILE_NAME > log_file_name

Example:-

grep -i ‘ALTER table’ adwork001.log > altertable.txt

7) To Know the PORT number of Env file:-
—————————————————–

setenv | grep PORT

Note:- Run the above command after login to Instance. And you have would have the read privileges for the file. This is mostly useful for people, who are working in the Oracle Application. 

7.1) For specfic session we can change the variable value:-
————————————————————————-

setenv variable_name variable_value

Example :- The following was the current value.

INSTANCE_ENVID=XYZ12

(Used the following command to check the value (setenv | grep OBT)).

setenv OBTADMIN_ENVID OBT_12

The above command has changed the value of the variable.
———————————————————————

OBTADMIN_ENVID=OBT_12

Note:- If you exit from the session and then variable value will be revert back.

8) To know the path of the log and out files of the application:-
——————————————————————————

>>cd $APPLCSF

There you will have the log and out folders.

You can also try the following command to know the value of the APPLCSF variable.

env | grep log

9) Turn-on the application server:-
———————————————-

./oraWebAndForms.sh start Instance name

Example:-

./oraWebAndForms.sh start XYZ12

Note:-
——
1) XYZ12 is the Instane name.
2) After turnning the Database and concurrent manager up. still the application front end will not open. The you need to run the above script from the applmgr user

To login to different user:-
——————————

sudo su – applmgr

Note:- applmgr is the superuser name. This username can depends on the DBA, what they have given at your Instance.

9.1) If you are getting 500 Internal error message after bounce back then try this:-
—————————————————————————————————–

Try to restart your application and restart your manage and see if it resolve the issue.

For the 12 Release, the above solution may not work. After you cleared _pages in R12, you’ll need to recompile because the default mode is ‘justrun’ instead of ‘recompile’ as was in 11i.

I did the following while applmgr in my Instance XYZ12 env and the login now works:

1. cd $FND_TOP/patch/115/bin
2. ./ojspCompile.pl –compile –flush -p 2

(You can check if you are able to open the application or not). If you are still facing the issue then try rebounce the application and see if it resolve the issue).

3. /home/applmgr/oraWebAndForms.sh bounce xyz12

(./oraWebAndForms.sh bounce zyx12)

Note:-
——
You need to run the above script in the applmgr user

sudo su – applmgr

10) To start or stop the Internal concurrent manager:-
———————————————————————

cd $ADMIN_SCRIPTS_HOME/

./adcmctl.sh start apps/apps

./adcmctl.sh stop apps/apps

Note:- This need to be run from applmgr user
—–

sudo su – applmgr

11) To stop the database or start the database:-
————————————————————

cd $ORACLE_HOME/appsutil/scripts/xyz12_server/

Note:- The above path is specfic to my server Instance.

To stop the database:- adstopdb.sql*

To start the database:- adstrtdb.sql*

Note:- This need to be run from Oracle user.
——

sudo su – oracle

12) Converting all the tabs to space in the file:-
———————————————————–

By setting the following options in your ~/.vimrc file,
when you use tabs, spaces are actually entered into the file,
although it “feels” like there are tabs because backspaces work as they would with tabs.

You’ll never have to worry about differing tabstop standards again.
Try it out, I promise you’ll be completely sold!

set softtabstop=4
set expandtab
set shiftwidth=4

Note also that if you want to convert a file with tabs to all spaces, set the above options and then use:

:retab!

13) To know the Operating system on server (unix):-
——————————————————————

>uname

Example:-
———–

2007.08.06-3:18:03 preddy@oscar[6]/home/partners-home/xyz/phani/xyz_23Jul/abc/la/utils > uname

HP-UX

14) To know the Operating system on server from database:-
—————————————————————————

begin
dbms_output.put_line(‘Port String: ‘||dbms_utility.port_string);
end;

15) Admin utility to compile all the invalid objects:-
—————————————————————–

i) This utility is avilable for the applmgr user. Use the following command to login with applmgr user.

>>sudo su – applmgr

ii) Choose the Intance and then use the following command to run the adadmin utility.

>>adadmin

{ Note:- It will ask for the $APPL_TOP path. If the default path is not the correct one then provide the correct path.
It will ask for the Log file name. (Default name willl be (adadmin.log)).
It will ask if you can be notified by email if a failure occurs. (Default will be set for NO).
It will ask for the Batchsize (Default is 1000).
It will ask for the correct database name.
It will ask to enter the password for your ‘SYSTEM’ ORACLE schema.(“manager” will be the password).
(manager password will be only one you enter manually. Rest of things you take the default values.)
It will ask to enter the ORACLE password of Application Object Library (default will be [APPS]).
}

iii) To will give the menu with different options.
—————————————————–

We will choose the “Compile/Reload Applications Database Entities menu” option. It will be 3 option normally.

iv) To will again give the other set of menu optins.
———————————————–

We will choose “Compile APPS schema” option to compile all the Invalid objects in APPS schema.

(Note:- You can also use $ORACLE_HOME/rdbms/admin/utlrp.sql (which will compile all invalid objects thru SVRMGRL.)).

17) To know apps password:-
————————————–

cd $ORACLE_HOME/reports60/server

more CGIcmd.dat

You will find userid=APPS/apps_pass@Instance_name

Note:- If you have the FTP access for server files. Then we can know the Apps password.

18) QUOTA:-
———————

Say employees are allocated a certain amount of disk space on the file system for their personal files, say 1000Mb. If you go over your quota, you are given some ‘n’ days to remove excess files.
To check your current quota and how much of it you have used. For that you can use the following command.
quota -v

19) DF:-
————

To find out how much space is left on the fileserver, use the following command.
df .

20) DU:-
————-

The du command outputs the number of kilobyes used by each subdirectory. Useful if you have gone over quota and you want to find out which directory has the most files. From your home-directory, use the following command.
du -s *
The -s flag will display only a summary (total size) and the * means all files and directories.

21) GZIP:-
—————

This reduces the size of a file, thus freeing valuable disk space. This is compress the file. Is it similar to the Winzip in the Windows Operating system.
Example:-
ls -l phani.txt
note the size of the file using ls -l , then to compress phani.txt, use the following command.
gzip phani.txt
This will compress the file and place it in a file called phani.txt.gz
To see the change in size, use ls -l again.
To expand the file, use the gunzip command.
gunzip phani.txt.gz

This is similar to the Unzip the file in your Windows Operating system.

22) ZCAT:-
—————-

zcat will read gzipped files without needing to uncompress them first.
zcat phani.txt.gz
If the text scrolls too fast for you, pipe the output though less .
> zcat phani.txt.gz | less
23) FILE:- 
File classifies the named files according to the type of data they contain, for example ascii (text), pictures, compressed data, etc.. To report on all files in your home directory, use the following command.
file *

24) DIFF:-
—————-

This command compares the contents of two files and displays the differences. Say you have a file called file1 and you edit some part of it and save it as file2. To see the differences use the following command.
diff file1 file2

25) ECHO:-
——————

echo $variable_value

The value of the environment variable can get from the echo command.

Example:-

echo $APPL_TOP

In the above command we get the APPL_TOP variable value set in the environment file. APPL_TOP is the environment variable in the environment file.

26) General Commands:-
——————————

Command
Meaning
ls
list files and directories
ls -a
list all files and directories
mkdir
make a directory
cd directory
change to named directory
cd
change to home-directory
cd ~
change to home-directory
cd ..
change to parent directory
pwd
display the path of the current directory
cp file1 file2
copy file1 and call it file2
mv file1 file2
move or rename file1 to file2
rm file
remove a file
rmdir directory
remove a directory
cat file
display a file
less file
display a file a page at a time
head file
display the first few lines of a file
tail file
display the last few lines of a file
grep ‘keyword’ file
search a file for keywords
wc file
count number of lines/words/characters in file
command > file
redirect standard output to a file
command >> file
append standard output to a file
command < file
redirect standard input from a file
command1 |command2
pipe the output of command1 to the input of command2
cat file1 file2 > file0
concatenate file1 and file2 to file0
sort
sort data
who
list users currently logged in
*
match any number of characters
?
match one character
man command
read the online manual page for a command
whatis command
brief description of a command
apropos keyword
match commands with keyword in their man pages
ls -lag
list access rights for all files
chmod [optionsfile
change access rights for named file
command &
run command in background
^C
kill the job running in the foreground
^Z
suspend the job running in the foreground
bg
background the suspended job
jobs
list current jobs
fg %1
foreground job number 1
kill %1
kill job number 1
ps
list current processes
kill 26152
kill process number 26152