PSA48P23 ;VMP/PDW-BUILD MCKESSON XTMP( ;9/19/2004
;;3.0;DRUG ACCOUNTABILITY/INVENTORY INTERFACE;**48**;10/24/97
;;1739564~237^1739580~237^1739598~237^1739721~10^1739739~100^1739747~1000^1739788~100^1739887~300^1739929~90^1739937~90^
;;1739945~90^1739952~1^1739960~100^1739978~12^1739986~12^1739994~1^1740018~100^1740026~500^1740034~100^1740042~500^
;;1740059~100^1740083~240^1740109~10^1740125~1^1740133~60^1740182~100^1740190~10^1740208~10^1740216~50^1740224~2^
;;1740232~50^1740265~10^1740299~10^1740307~10^1740323~30^1740331~500^1740349~250^1740372~100^1740547~25^1740554~1000^
;;1740562~100^1741008~100^1741180~1^1741198~1000^1741214~100^1741230~90^1741404~480^1741529~500^1741610~500^1741685~473^
;;1741693~473^1741701~10^1741727~100^1741735~1000^1741743~100^1741750~100^1741982~1000^1742121~250^1742295~10^1742303~30^
;;1742352~2^1742543~1^1742956~50^1743137~355^1743152~200^1743194~480^1743244~360^1743251~100^1743301~20^1743368~100^
;;1743400~120^1743475~100^1743509~225^1743582~100^1743624~100^1743673~100^1743681~100^1743699~120^1743723~100^1743731~30^
;;1743772~400^1743822~3840^1743871~15^1743939~500^1744002~120^1744051~200^1744259~237^1744283~30^1744309~100^1744366~100^
;;1744523~150^1744630~237^1744689~500^1744739~50^1744804~10^1744929~60^1745058~100^1745116~100^1745157~360^1745199~113^
;;1745207~100^1745306~56.7^1745363~100^1745405~236.56^1745447~100^1745470~120^1745611~50^1745686~340^1745710~125^1745785~100^
;;1745793~60^1745819~15^1745884~30^1745926~120^1745934~10^1745975~30^1746080~100^1746213~237^1746254~118^1746734~200^
;;1746809~480^1746825~30^1746973~500^1747062~5^1747179~250^1747260~50^1747328~480^1747344~480^1747385~100^1747427~10^
;;1747435~120^1747542~100^1747559~50^1747633~100^1747674~480^1747823~5^1747831~150^1747849~10^1747930~100^1747989~10^
;;1748110~50^1748185~100^1748284~500^1748367~100^1748375~100^1748391~100^1748417~100^1748425~1000^1748441~2500^1748458~50^
;;1748466~177^1748490~100^1748524~100^1748557~100^1748565~100^1748607~5^1748615~100^1748631~100^1748649~108^1748656~120^
;;1748664~360^1748672~120^1748680~120^1748698~30^1748714~90^1748722~30^1748748~100^1748755~100^1748771~1000^1748805~480^
;;1748813~10^1748821~480^1748839~90^1748888~30^1748912~150^1748938~500^1748946~1^1748953~1000^1748961~100^1748987~3840^
;;1748995~100^1749100~80^1749118~100^1749126~100^1749142~100^1749167~480^1749233~6^1749241~100^1749266~100^1749290~50^
;;1749332~1000^1749399~2^1749480~5^1749555~180^1749605~180^1749787~17^1749795~2^1749852~1000^1749860~100^1749936~100^
;;1749951~1^1749977~237^1749993~50^1750017~20^1750025~500^1750033~28.4^1750066~500^1750140~100^1750215~180^1750249~1^
;;1750322~100^1750348~500^1750470~10^1750496~240^1750595~100^1750686~25^1750736~946^1750751~250^1750777~10^1750801~15^
;;1750827~240^1750835~30^1750892~10^1751056~30^1751072~89^1751122~10^1751155~50^1751171~100^1751189~30^1751197~1000^
;;1751247~10^1751304~30^1751312~1000^1751528~500^1751601~150^1751635~15^1751668~30^1751726~100^1751734~100^1751809~1000^
;;1751858~30^1752005~100^1752047~1000^1752088~100^1752187~200^1752203~30^1752252~1000^1752310~100^1752344~100^1752377~1000^
;;1752393~100^1752401~100^1752435~100^1752641~250^1752682~12^1752799~1000^1752823~500^1752856~100^1752880~500^1752922~12^
;;1752955~100^1752963~100^1753045~125^1753110~100^1753318~1000^1753383~20^1753391~100^1753417~100^1753490~1000^1753532~100^
;;1753540~100^1753557~237^1753805~1000^1753961~1000^1753987~500^1754019~10^1754076~100^1754415~50^1754480~89^1754522~56.7^
;;1754597~1000^1754613~15^1754720~1000^1754746~15^1754837~15^1754852~1^1754910~1000^1754944~30^1754951~250^1755008~15^
;;1755065~28.4^1755081~10^1755164~100^1755271~1^1755347~340.2^1755545~30^1755578~45^1755602~60^1755693~50^1755743~100^
;;1755784~60^1755842~454^1755867~60^1755933~5^1755990~200^1756006~100^1756014~100^1756048~50^1756071~1^1756147~100^
;;1756246~50^1756295~10^1756311~5^1756527~200^1756717~5^1756758~5^1756832~20^1756881~500^1756956~40^1756964~5^
;;1757061~200^1757178~5^1757301~2^1757368~1^1757384~5^1757392~8^1757418~1000^1757467~5^1757608~5^1757707~100^
;;1757749~15^1757756~250^1757863~237^1757939~30^1758101~89^1758127~20^1758184~100^1758218~1000^1758291~5^1758309~50^
;;1758572~946^1758580~100^1758655~5^1758770~5^1758796~100^1758804~20^1758929~5^1759158~237^1759166~100^1759174~50^
;;1759315~5^1759331~30^1759380~20^1759430~100^1759455~118^1759471~100^1759547~5^1759596~5^1759687~5^1760065~120^
;;1760404~5^1760461~5^1760503~50^1760578~50^1760602~50^1761162~50^1761378~50^1761394~100^1761600~100^1761675~100^
;;1761808~150^1761824~100^1761832~100^1761881~100^1761956~100^1761972~120^1761998~15^1762004~5^1762012~100^1762186~60^
;;1762210~15^1762293~200^1762301~30^1762368~15^1762400~100^1762491~15^1762525~24^1762541~30^1762814~48^1762830~120^
;;1762863~60^1762970~100^1762996~15^1763010~10^1763184~15^1763317~10^1763366~15^1763390~20^1763549~10^1763580~15^
;;1763853~100^1763929~500^1763937~100^1764034~10^1764042~100^1764117~30^1764174~2^1764190~50^1764232~125^1764349~6^
;;1764398~50^1764810~1000^1764992~3^1765080~100^1765122~1000^1765171~100^1765254~1000^1765353~100^1765411~1000^1765486~480^
;;1765585~0.5^1765650~5^1765726~100^1765767~150^1765817~1000^1765833~237^1765890~30^1766229~28.4^1766237~300^1766260~100^
;;1766344~500^1766401~100^1766500~250^1766534~1^1766559~100^1766567~360^1766575~100^1766609~200^1766716~28^1766781~60^
;;1766872~30^1766955~100^1767003~90^1767060~237^1767110~10^1767128~90^1767169~60^1767177~100^1767193~500^1767276~90^
;;1767292~45^1767300~100^1767326~100^1767383~130^1767441~100^1767458~100^1767482~1^1767573~100^1767599~1000^1767615~100^
;;1767649~283^1767656~100^1767714~1^1767722~100^1767748~300^1767771~100^1767805~30^1767854~60^1767979~100^1768019~100^
;;1768027~100^1768100~100^1768126~500^1768159~100^1768167~500^1768175~100^1768183~100^1768209~500^1768241~100^1768316~1000^
;;1768381~100^1768407~100^1768456~5^1768506~100^1768563~120^1768589~100^1768597~100^1768605~100^1768639~100^1768647~100^
;;1768696~100^1768712~1000^1768720~180^1768753~60^1768787~385^1768795~100^1768845~100^1768878~1000^1768886~100^1768894~1000^
;;END
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPSA48P23 6177 printed Nov 22, 2024@16:58:34 Page 2
PSA48P23 ;VMP/PDW-BUILD MCKESSON XTMP( ;9/19/2004
+1 ;;3.0;DRUG ACCOUNTABILITY/INVENTORY INTERFACE;**48**;10/24/97
+2 ;;1739564~237^1739580~237^1739598~237^1739721~10^1739739~100^1739747~1000^1739788~100^1739887~300^1739929~90^1739937~90^
+3 ;;1739945~90^1739952~1^1739960~100^1739978~12^1739986~12^1739994~1^1740018~100^1740026~500^1740034~100^1740042~500^
+4 ;;1740059~100^1740083~240^1740109~10^1740125~1^1740133~60^1740182~100^1740190~10^1740208~10^1740216~50^1740224~2^
+5 ;;1740232~50^1740265~10^1740299~10^1740307~10^1740323~30^1740331~500^1740349~250^1740372~100^1740547~25^1740554~1000^
+6 ;;1740562~100^1741008~100^1741180~1^1741198~1000^1741214~100^1741230~90^1741404~480^1741529~500^1741610~500^1741685~473^
+7 ;;1741693~473^1741701~10^1741727~100^1741735~1000^1741743~100^1741750~100^1741982~1000^1742121~250^1742295~10^1742303~30^
+8 ;;1742352~2^1742543~1^1742956~50^1743137~355^1743152~200^1743194~480^1743244~360^1743251~100^1743301~20^1743368~100^
+9 ;;1743400~120^1743475~100^1743509~225^1743582~100^1743624~100^1743673~100^1743681~100^1743699~120^1743723~100^1743731~30^
+10 ;;1743772~400^1743822~3840^1743871~15^1743939~500^1744002~120^1744051~200^1744259~237^1744283~30^1744309~100^1744366~100^
+11 ;;1744523~150^1744630~237^1744689~500^1744739~50^1744804~10^1744929~60^1745058~100^1745116~100^1745157~360^1745199~113^
+12 ;;1745207~100^1745306~56.7^1745363~100^1745405~236.56^1745447~100^1745470~120^1745611~50^1745686~340^1745710~125^1745785~100^
+13 ;;1745793~60^1745819~15^1745884~30^1745926~120^1745934~10^1745975~30^1746080~100^1746213~237^1746254~118^1746734~200^
+14 ;;1746809~480^1746825~30^1746973~500^1747062~5^1747179~250^1747260~50^1747328~480^1747344~480^1747385~100^1747427~10^
+15 ;;1747435~120^1747542~100^1747559~50^1747633~100^1747674~480^1747823~5^1747831~150^1747849~10^1747930~100^1747989~10^
+16 ;;1748110~50^1748185~100^1748284~500^1748367~100^1748375~100^1748391~100^1748417~100^1748425~1000^1748441~2500^1748458~50^
+17 ;;1748466~177^1748490~100^1748524~100^1748557~100^1748565~100^1748607~5^1748615~100^1748631~100^1748649~108^1748656~120^
+18 ;;1748664~360^1748672~120^1748680~120^1748698~30^1748714~90^1748722~30^1748748~100^1748755~100^1748771~1000^1748805~480^
+19 ;;1748813~10^1748821~480^1748839~90^1748888~30^1748912~150^1748938~500^1748946~1^1748953~1000^1748961~100^1748987~3840^
+20 ;;1748995~100^1749100~80^1749118~100^1749126~100^1749142~100^1749167~480^1749233~6^1749241~100^1749266~100^1749290~50^
+21 ;;1749332~1000^1749399~2^1749480~5^1749555~180^1749605~180^1749787~17^1749795~2^1749852~1000^1749860~100^1749936~100^
+22 ;;1749951~1^1749977~237^1749993~50^1750017~20^1750025~500^1750033~28.4^1750066~500^1750140~100^1750215~180^1750249~1^
+23 ;;1750322~100^1750348~500^1750470~10^1750496~240^1750595~100^1750686~25^1750736~946^1750751~250^1750777~10^1750801~15^
+24 ;;1750827~240^1750835~30^1750892~10^1751056~30^1751072~89^1751122~10^1751155~50^1751171~100^1751189~30^1751197~1000^
+25 ;;1751247~10^1751304~30^1751312~1000^1751528~500^1751601~150^1751635~15^1751668~30^1751726~100^1751734~100^1751809~1000^
+26 ;;1751858~30^1752005~100^1752047~1000^1752088~100^1752187~200^1752203~30^1752252~1000^1752310~100^1752344~100^1752377~1000^
+27 ;;1752393~100^1752401~100^1752435~100^1752641~250^1752682~12^1752799~1000^1752823~500^1752856~100^1752880~500^1752922~12^
+28 ;;1752955~100^1752963~100^1753045~125^1753110~100^1753318~1000^1753383~20^1753391~100^1753417~100^1753490~1000^1753532~100^
+29 ;;1753540~100^1753557~237^1753805~1000^1753961~1000^1753987~500^1754019~10^1754076~100^1754415~50^1754480~89^1754522~56.7^
+30 ;;1754597~1000^1754613~15^1754720~1000^1754746~15^1754837~15^1754852~1^1754910~1000^1754944~30^1754951~250^1755008~15^
+31 ;;1755065~28.4^1755081~10^1755164~100^1755271~1^1755347~340.2^1755545~30^1755578~45^1755602~60^1755693~50^1755743~100^
+32 ;;1755784~60^1755842~454^1755867~60^1755933~5^1755990~200^1756006~100^1756014~100^1756048~50^1756071~1^1756147~100^
+33 ;;1756246~50^1756295~10^1756311~5^1756527~200^1756717~5^1756758~5^1756832~20^1756881~500^1756956~40^1756964~5^
+34 ;;1757061~200^1757178~5^1757301~2^1757368~1^1757384~5^1757392~8^1757418~1000^1757467~5^1757608~5^1757707~100^
+35 ;;1757749~15^1757756~250^1757863~237^1757939~30^1758101~89^1758127~20^1758184~100^1758218~1000^1758291~5^1758309~50^
+36 ;;1758572~946^1758580~100^1758655~5^1758770~5^1758796~100^1758804~20^1758929~5^1759158~237^1759166~100^1759174~50^
+37 ;;1759315~5^1759331~30^1759380~20^1759430~100^1759455~118^1759471~100^1759547~5^1759596~5^1759687~5^1760065~120^
+38 ;;1760404~5^1760461~5^1760503~50^1760578~50^1760602~50^1761162~50^1761378~50^1761394~100^1761600~100^1761675~100^
+39 ;;1761808~150^1761824~100^1761832~100^1761881~100^1761956~100^1761972~120^1761998~15^1762004~5^1762012~100^1762186~60^
+40 ;;1762210~15^1762293~200^1762301~30^1762368~15^1762400~100^1762491~15^1762525~24^1762541~30^1762814~48^1762830~120^
+41 ;;1762863~60^1762970~100^1762996~15^1763010~10^1763184~15^1763317~10^1763366~15^1763390~20^1763549~10^1763580~15^
+42 ;;1763853~100^1763929~500^1763937~100^1764034~10^1764042~100^1764117~30^1764174~2^1764190~50^1764232~125^1764349~6^
+43 ;;1764398~50^1764810~1000^1764992~3^1765080~100^1765122~1000^1765171~100^1765254~1000^1765353~100^1765411~1000^1765486~480^
+44 ;;1765585~0.5^1765650~5^1765726~100^1765767~150^1765817~1000^1765833~237^1765890~30^1766229~28.4^1766237~300^1766260~100^
+45 ;;1766344~500^1766401~100^1766500~250^1766534~1^1766559~100^1766567~360^1766575~100^1766609~200^1766716~28^1766781~60^
+46 ;;1766872~30^1766955~100^1767003~90^1767060~237^1767110~10^1767128~90^1767169~60^1767177~100^1767193~500^1767276~90^
+47 ;;1767292~45^1767300~100^1767326~100^1767383~130^1767441~100^1767458~100^1767482~1^1767573~100^1767599~1000^1767615~100^
+48 ;;1767649~283^1767656~100^1767714~1^1767722~100^1767748~300^1767771~100^1767805~30^1767854~60^1767979~100^1768019~100^
+49 ;;1768027~100^1768100~100^1768126~500^1768159~100^1768167~500^1768175~100^1768183~100^1768209~500^1768241~100^1768316~1000^
+50 ;;1768381~100^1768407~100^1768456~5^1768506~100^1768563~120^1768589~100^1768597~100^1768605~100^1768639~100^1768647~100^
+51 ;;1768696~100^1768712~1000^1768720~180^1768753~60^1768787~385^1768795~100^1768845~100^1768878~1000^1768886~100^1768894~1000^
+52 ;;END
