Please help me draw the Warner $-$ Orr diagram, The top one is the question and the below one is the example $,$ help me write like the showing example.

ORDER ENTAY

OBTAIN CUSTOMER ORDER DETAILS

IF $($CUSTOMER IS VALID$)$

THEN SET UP CUSTOMER DETAILS FOR ORDEA HEADER AECORD

SET UP JRDER DELIVERY ADDRESS FOR ORDER HEADER RECORD

WRITE ORDER HEADER AECOAD

ELSE $($CUSTOMEA IS NOT VALID$)$

ISSUE MESSAGE "INVALID CUSTOMER"

EXIT ORDER ENTAY

REPEAT UNTIL IORDER IS COMPLETEI

OETAIN ORDEA UNE ITEM DETALLS

IF $($ORDERED PRODUCT IS VALID$)$

AND IF $($QUANTITY ORDERED IS AVAILABLE$)$

THEN SET UP PRODUCT DETALS FOR LINE ITEM AECORD

SET UP OUANTITY ORDERED FOR LINE ITEM RECORD

DECAEMENT PRODUCT QUANTITY ON HAND BY QUANTITY ORDERED

UPDATE PRODUCT RECORD

WRITE LINE ITEM RECORD

ELSE $($QUANTITY ORDERED IS NOT AVAILABLE$)$

SET UP PROOUCT DETAILS FOR BACKORDER RECORD

SET UP QUANTITY BACKORDERED FOR BACKORDER AECORD

WRTE BACKORDER RECORD

ELSE $($ORDERED PRODUCT IS NOT VALID$)$

ISSUE MESSAGE 'TINVALID PAODUCT'

END REPEAT

PREPARE PACKING SLIP

WRITE PACKING SUIP

ExIT

ORDER ENTAY

OBTAIN CUSTOMER ORDER DETAILS

IF $($CUSTOMER IS VALID$)$

THEN SET UP CUSTOMER DETAILS FOR ORDEA HEADER AECORD

SET UP JRDER DELIVERY ADDRESS FOR ORDER HEADER RECORD

WRITE ORDER HEADER AECOAD

ELSE $($CUSTOMEA IS NOT VALID$)$

ISSUE MESSAGE "INVALID CUSTOMER"

EXIT ORDER ENTAY

REPEAT UNTIL IORDER IS COMPLETEI

OETAIN ORDEA UNE ITEM DETALLS

IF $($ORDERED PRODUCT IS VALID$)$

AND IF $($QUANTITY ORDERED IS AVAILABLE$)$

THEN SET UP PRODUCT DETALS FOR LINE ITEM AECORD

SET UP OUANTITY ORDERED FOR LINE ITEM RECORD

DECAEMENT PRODUCT QUANTITY ON HAND BY QUANTITY ORDERED

UPDATE PRODUCT RECORD

WRITE LINE ITEM RECORD

ELSE $($QUANTITY ORDERED IS NOT AVAILABLE$)$

SET UP PROOUCT DETAILS FOR BACKORDER RECORD

SET UP QUANTITY BACKORDERED FOR BACKORDER AECORD

WRTE BACKORDER RECORD

ELSE $($ORDERED PRODUCT IS NOT VALID$)$

ISSUE MESSAGE 'TINVALID PAODUCT'

END REPEAT

PREPARE PACKING SLIP

WRITE PACKING SUIP

ExIT

$$

ORDER ENTHY

OBTAIN CUSTOMER ORDER DETAILS

IF $($CUSTOMER IS VALID$)$

THEN SET UP CUSTOMER DETAILS FOR ORDEA HEADER RECORD

SET UP JRDER DELIVERY ADDRESS FOR ORDEA HEADER RECORD

WRITE ORDEA HEADER AECOAD

ELSE $($CUSTOMER IS NOT VALID$)$

ISSUE MESSAGE "INVALID CUSTOMER"

EXIT ORDER ENTRY

REPEAT UNTIL $($ORDEA IS COMPLETE$)$

OGTAIN ORDER LNE ITEM DETALS

IF $($ORDERED PRODUCT IS VALID$)$

AND IF $($QUANTITY ORDERED IS AVALLABLE$)$

THEN SET UP PROOUCT DETALLS FOR LINE ITEM AECOAD

SET UP OUANTITY ORDERED FOR LINE ITEM RECORD

DECREMENT PRODUCT QUANTITY ON HAND BY QUANTITY ORDERED

UPDATE PRODUCT RECORD

WRITE LNE ITEM RECORD

ELSE $($QUANTTTY ORDERED IS NOT AVAILABLE$)$

SET UP PRODUCT DETALS FOR BACXORDER RECORD

SET UP OUANTITY BACKORDERED FOR BACKORDER AECORD

WRITE BACKORDEA RECORD

ELSE $($ORDERED PRODUCT IS NOT VALID$)$

ISSUE MESSAGE "TNVALID PAODUCT"

END PEPEAT

PREPARE PACIXING SLIP

WAITE PACKING SLIP

EXIT

ORDER ENTRY:

$*$Process custore

FOR ALI orders

icces

Issue

ENDIF

FOR ALL it

Access

IF ITB

$?1=$ end of custome file $=$ true

$?2=$ end of esder file $=$ true

Accue shipping document form

Enter clipping data Print documento

ind

ORDER ENTHY

OBTAIN CUSTOMER ORDER DETAILS

IF $($CUSTOMER IS VALID$)$

THEN SET UP CUSTOMER DETAILS FOR ORDEA HEADER RECORD

SET UP JRDER DELIVERY ADDRESS FOR ORDEA HEADER RECORD

WRITE ORDEA HEADER AECOAD

ELSE $($CUSTOMER IS NOT VALID$)$

ISSUE MESSAGE "INVALID CUSTOMER"

EXIT ORDER ENTRY

REPEAT UNTIL $($ORDEA IS COMPLETE$)$

OGTAIN ORDER LNE ITEM DETALS

IF $($ORDERED PRODUCT IS VALID$)$

AND IF $($QUANTITY ORDERED IS AVALLABLE$)$

THEN SET UP PROOUCT DETALLS FOR LINE ITEM AECOAD

SET UP OUANTITY ORDERED FOR LINE ITEM RECORD

DECREMENT PRODUCT QUANTITY ON HAND BY QUANTITY ORDERED

UPDATE PRODUCT RECORD

WRITE LNE ITEM RECORD

ELSE $($QUANTTTY ORDERED IS NOT AVAILABLE$)$

SET UP PRODUCT DETALS FOR BACXORDER RECORD

SET UP OUANTITY BACKORDERED FOR BACKORDER AECORD

WRITE BACKORDEA RECORD

ELSE $($ORDERED PRODUCT IS NOT VALID$)$

ISSUE MESSAGE "TNVALID PAODUCT"

END PEPEAT

PREPARE PACIXING SLIP

WAITE PACKING SLIP

EXIT

ORDER ENTRY:

$*$Process custore

FOR ALI orders

icces

Issue

ENDIF

FOR ALL it

Access

IF ITB

$?1=$ end of custome file $=$ true

$?2=$ end of esder file $=$ true

Accue shipping document form

Enter clipping data Print documento

ind